data/skeletons/c-like.m4

   1                                                             -*- Autoconf -*-
   2
   3 # Common code for C-like languages (C, C++, Java, etc.)
   4
   5 # Copyright (C) 2012-2015, 2018-2022 Free Software Foundation, Inc.
   6
   7 # This program is free software: you can redistribute it and/or modify
   8 # it under the terms of the GNU General Public License as published by
   9 # the Free Software Foundation, either version 3 of the License, or
  10 # (at your option) any later version.
  11 #
  12 # This program is distributed in the hope that it will be useful,
  13 # but WITHOUT ANY WARRANTY; without even the implied warranty of
  14 # MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  15 # GNU General Public License for more details.
  16 #
  17 # You should have received a copy of the GNU General Public License
  18 # along with this program.  If not, see <https://www.gnu.org/licenses/>.
  19
  20
  21 # _b4_comment(TEXT, OPEN, CONTINUE, END)
  22 # --------------------------------------
  23 # Put TEXT in comment.  Avoid trailing spaces: don't indent empty lines.
  24 # Avoid adding indentation to the first line, as the indentation comes
  25 # from OPEN.  That's why we don't patsubst([$1], [^\(.\)], [   \1]).
  26 # Turn "*/" in TEXT into "* /" so that we don't unexpectedly close
  27 # the comments before its end.
  28 #
  29 # Prefix all the output lines with PREFIX.
  30 m4_define([_b4_comment],
  31 [$2[]b4_gsub(m4_expand([$1]),
  32             [[*]/], [*\\/],
  33             [/[*]], [/\\*],
  34             [
  35 \(.\)], [
  36 $3\1])$4])
  37
  38
  39 # b4_comment(TEXT, [PREFIX])
  40 # --------------------------
  41 # Put TEXT in comment.  Prefix all the output lines with PREFIX.
  42 m4_define([b4_comment],
  43 [_b4_comment([$1], [$2/* ], [$2   ], [  */])])
  44
  45
  46
  47
  48 # _b4_dollar_dollar(VALUE, SYMBOL-NUM, FIELD, DEFAULT-FIELD)
  49 # ----------------------------------------------------------
  50 # If FIELD (or DEFAULT-FIELD) is non-null, return "VALUE.FIELD",
  51 # otherwise just VALUE.  Be sure to pass "(VALUE)" if VALUE is a
  52 # pointer.
  53 m4_define([_b4_dollar_dollar],
  54 [b4_symbol_value([$1],
  55                  [$2],
  56                  m4_if([$3], [[]],
  57                        [[$4]], [[$3]]))])
  58
  59 # b4_dollar_pushdef(VALUE-POINTER, SYMBOL-NUM, [TYPE_TAG], LOCATION)
  60 # b4_dollar_popdef
  61 # ------------------------------------------------------------------
  62 # Define b4_dollar_dollar for VALUE-POINTER and DEFAULT-FIELD,
  63 # and b4_at_dollar for LOCATION.
  64 m4_define([b4_dollar_pushdef],
  65 [m4_pushdef([b4_dollar_dollar],
  66             [_b4_dollar_dollar([$1], [$2], m4_dquote($][1), [$3])])dnl
  67 m4_pushdef([b4_at_dollar], [$4])dnl
  68 ])
  69 m4_define([b4_dollar_popdef],
  70 [m4_popdef([b4_at_dollar])dnl
  71 m4_popdef([b4_dollar_dollar])dnl
  72 ])