Mercurial > hg > octave-nkf
view doc/interpreter/images.awk @ 17818:f1b59ef34eda
attempt to avoid setting persistent state on i/o streams (bug #40396)
* utils.h, utils.cc (octave_preserve_stream_state): New class.
* debug.cc, pr-output.cc, variables.cc, ov-base-sparse.cc: Use it to
save and restore stream flags, precision, field width, and fill
character.
author | John W. Eaton <jwe@octave.org> |
---|---|
date | Thu, 31 Oct 2013 17:26:04 -0400 |
parents | 219dcb37bdf9 |
children | 501cb6a90f0f |
line wrap: on
line source
BEGIN { exts[1] = "eps"; exts[2] = "pdf"; exts[3] = "png"; exts[4] = "txt"; printf ("IMAGES_SRC =\n"); for (i = 1; i <= 4; i++) { printf ("IMAGES_%s =\n", toupper (exts[i])); } } { script = $1; basename = script; sub (/\.m$/, "", basename); ubasename = toupper (basename); printf ("IMAGES_SRC += %s\n", script); for (i = 1; i <= 4; i++) { ext = exts[i]; uext = toupper (ext); printf ("%s_%s =", ubasename, uext); for (j = 2; j <= NF; j++) printf (" %s.%s", $j, ext); printf ("\n"); printf ("IMAGES_%s += $(%s_%s)\n", uext, ubasename, uext); for (j = 2; j <= NF; j++) { printf ("%s.%s: %s\n", $j, ext, script); printf ("\t$(top_builddir)/run-octave -f -q -H -p $(srcdir) --eval \"%s ('%s', '%s');\"\n", basename, $j, ext); } } }