nuweb.w

@@ -1814,7 +1814,7 @@ Fragment parameters were added on later in nuweb's development.
 There still is not, for example, an index of fragment parameters.
 We need a data type to keep track of fragment parameters.
 
-@o global.h -cc -d
+@d Type decl...
 @{typedef int *Parameters;
 @| Parameters @}
 
@@ -4999,7 +4999,8 @@ comment_ArglistElement(FILE * file, Arglist * args, int quote)
 @d Include an embedded scrap in comment
 @{Embed_Node * e = (Embed_Node *)q;
 fputc('{', file);
-write_scraps(file, "", e->defs, -1, "", 0, 0, 0, 0, e->args, 0, 1, "");
+write_scraps(file, "", e->defs, -1, "", 0, 0, 0, 0, e->args, 0,
+             (Parameters)1, "");
 fputc('}', file);@}
 
 @d Include a fragment use in comment