dnl WARNING WARNING WARNING WARNING
dnl do not edit! this is aclocal.m4, generated from stepmake/aclocal.m4
-dnl WARNING WARNING WARNING WARNING
-dnl do not edit! this is aclocal.m4, generated from stepmake/aclocal.m4
dnl aclocal.m4 -*-shell-script-*-
dnl StepMake subroutines for configure.in
fi
AC_MSG_CHECKING("Guile version")
need_guile_version="1.3.4"
- guile_version=`expr "\`$guile_config --version 2>&1\`" : ".*\($need_guile_version\).*"`
+ need_guile_version_numeric=100304
+ guile_version=`$guile_config --version 2>&1 | awk '{print $NF}'`
+ guile_version_numeric=`echo $guile_version | awk -F. '
+{if ([$]3) {last = [$]3}
+else {last =0}}
+{printf "%s%s%s\n",[$]1*100, [$]2*10,last}'`
AC_MSG_RESULT("$guile_version")
- if test "$guile_version" != "$need_guile_version"; then
+ if test $guile_version_numeric -lt $need_guile_version_numeric
+ then
AC_STEPMAKE_WARN("Guile version "$need_guile_version" or newer is needed")
fi
GUILE_FLAGS
'option-sep' : ', *',
'intertext': r',?\s*intertext=\".*?\"',
#ugh fix
- 'multiline-comment': r"(?s)(?P<code>@ignore\s.*?@end ignore)\s",
- 'singleline-comment': r"(?m)(?P<code>^@c.*$\n+)",
+ 'multiline-comment': r"(?sm)^\s*(?!@c\s+)(?P<code>@ignore\s.*?@end ignore)\s",
+ 'singleline-comment': r"(?m)^.*?(?P<match>(?P<code>@c.*$\n+))",
'numcols': no_match,
}
}
if m.group('num') == 'two':
return [('numcols', m.group('code'), 2)]
-def new_chop_chunks(chunks, re_name, func):
+def chop_chunks(chunks, re_name, func, use_match=0):
newchunks = []
for c in chunks:
if c[0] == 'input':
newchunks.append (('input', str))
str = ''
else:
- newchunks.append (('input', str[:m.start ('match')]))
- #newchunks.extend(func(m))
- # python 1.5 compatible:
- newchunks = newchunks + func(m)
- str = str [m.end(0):]
- else:
- newchunks.append(c)
- return newchunks
-
-def chop_chunks(chunks, re_name, func):
- newchunks = []
- for c in chunks:
- if c[0] == 'input':
- str = c[1]
- while str:
- m = get_re (re_name).search (str)
- if m == None:
- newchunks.append (('input', str))
- str = ''
- else:
- newchunks.append (('input', str[:m.start (0)]))
+ if use_match:
+ newchunks.append (('input', str[:m.start ('match')]))
+ else:
+ newchunks.append (('input', str[:m.start (0)]))
#newchunks.extend(func(m))
# python 1.5 compatible:
newchunks = newchunks + func(m)
chunks = chop_chunks(chunks, 'verb', make_verb)
chunks = chop_chunks(chunks, 'multiline-comment', do_ignore)
#ugh fix input
- chunks = new_chop_chunks(chunks, 'include', do_include_file)
- chunks = new_chop_chunks(chunks, 'input', do_input_file)
+ chunks = chop_chunks(chunks, 'include', do_include_file, 1)
+ chunks = chop_chunks(chunks, 'input', do_input_file, 1)
return chunks
my_depname = my_outname + '.dep'
chunks = read_doc_file(input_filename)
- chunks = new_chop_chunks(chunks, 'mudela', make_mudela)
- chunks = new_chop_chunks(chunks, 'mudela-file', make_mudela_file)
- chunks = new_chop_chunks(chunks, 'mudela-block', make_mudela_block)
- chunks = chop_chunks(chunks, 'singleline-comment', do_ignore)
+ chunks = chop_chunks(chunks, 'mudela', make_mudela, 1)
+ chunks = chop_chunks(chunks, 'mudela-file', make_mudela_file, 1)
+ chunks = chop_chunks(chunks, 'mudela-block', make_mudela_block, 1)
+ chunks = chop_chunks(chunks, 'singleline-comment', do_ignore, 1)
chunks = chop_chunks(chunks, 'preamble-end', do_preamble_end)
chunks = chop_chunks(chunks, 'numcols', do_columns)
#print "-" * 50
fi
AC_MSG_CHECKING("Guile version")
need_guile_version="1.3.4"
- guile_version=`expr "\`$guile_config --version 2>&1\`" : ".*\($need_guile_version\).*"`
+ need_guile_version_numeric=100304
+ guile_version=`$guile_config --version 2>&1 | awk '{print $NF}'`
+ guile_version_numeric=`echo $guile_version | awk -F. '
+{if ([$]3) {last = [$]3}
+else {last =0}}
+{printf "%s%s%s\n",[$]1*100, [$]2*10,last}'`
AC_MSG_RESULT("$guile_version")
- if test "$guile_version" != "$need_guile_version"; then
+ if test $guile_version_numeric -lt $need_guile_version_numeric
+ then
AC_STEPMAKE_WARN("Guile version "$need_guile_version" or newer is needed")
fi
GUILE_FLAGS