X-Git-Url: https://diplodocus.org/git/nmh/blobdiff_plain/4f9a626afed661270364f0f7982fc3767f688e05..108ac3fa0df7dfd51988a15ff6355508172aa9bb:/sbr/fmt_compile.c

diff --git a/sbr/fmt_compile.c b/sbr/fmt_compile.c
index 0b739cf9..1d03b21f 100644
--- a/sbr/fmt_compile.c
+++ b/sbr/fmt_compile.c
@@ -35,6 +35,8 @@
  *
  * - Add the code in fmt_scan.c to handle your new function.
  *
+ * - Add code to fmtdump.c to display your new function.
+ *
  * - Document the new function in the mh-format(5) man page.
  *
  */
@@ -137,6 +139,7 @@ static struct ftable functable[] = {
      { "putnumf",    TF_EXPR,	FT_NUMF,	0,		0 },
      { "putaddr",    TF_STR,	FT_PUTADDR,	0,		0 },
      { "putlit",     TF_STR,	FT_STRLIT,	0,		0 },
+     { "zputlit",    TF_STR,	FT_STRLITZ,	0,		0 },
      { "void",       TF_NOP,	0,		0,		0 },
 
      { "comp",       TF_COMP,	FT_LS_COMP,	0,		TFL_PUTS },
@@ -246,7 +249,7 @@ static struct ftable functable[] = {
 #define PUTLIT(str)		do { NEW(FT_LIT,0,0); fp->f_text = (str); } while (0)
 #define PUTC(c)			do { NEW(FT_CHAR,0,0); fp->f_char = (c); } while (0)
 
-static char *format_string;
+char *format_string;
 static unsigned char *usr_fstring;	/* for CERROR */
 
 #define CERROR(str) compile_error (str, cp)