Compare commits
2 Commits
1-compile-
...
a00e33176b
Author | SHA1 | Date | |
---|---|---|---|
a00e33176b
|
|||
72e2ca0e8e
|
4
global.h
4
global.h
@@ -183,7 +183,7 @@ extern void write_files(Name *files);
|
||||
#line 3889 "nuweb.w"
|
||||
extern void source_open(char *name);
|
||||
/* pass in the name of the source file */
|
||||
extern int source_get(void);
|
||||
extern int source_get(void);
|
||||
/* no args; returns the next char or EOF */
|
||||
extern int source_last; /* what last source_get() returned. */
|
||||
extern int source_peek; /* The next character to get */
|
||||
@@ -194,7 +194,7 @@ extern void source_ungetc(int*);
|
||||
#line 4173 "nuweb.w"
|
||||
extern void init_scraps(void);
|
||||
extern int collect_scrap(void);
|
||||
extern int write_scraps(FILE *file, char *spelling, Scrap_Node *defs,
|
||||
extern int write_scraps(FILE *file, char *spelling, Scrap_Node *defs,
|
||||
int global_indent, char *indent_chars,
|
||||
char debug_flag, char tab_flag, char indent_flag,
|
||||
unsigned char comment_flag, Arglist *inArgs,
|
||||
|
4
latex.c
4
latex.c
@@ -461,7 +461,7 @@ void write_tex(char *file_name, char *tex_name)
|
||||
char * p = label_name;
|
||||
while (c =
|
||||
#line 2750 "nuweb.w"
|
||||
source_get(), c != nw_char) /* Here is 151a-01 */
|
||||
source_get(), c != nw_char) /* Here is 148c-01 */
|
||||
*p++ = c;
|
||||
*p = '\0';
|
||||
c =
|
||||
@@ -761,7 +761,7 @@ static void copy_scrap(FILE *file, int prefix, Name *name)
|
||||
char * p = label_name;
|
||||
while (c =
|
||||
#line 2750 "nuweb.w"
|
||||
source_get(), c != nw_char) /* Here is 151a-01 */
|
||||
source_get(), c != nw_char) /* Here is 148c-01 */
|
||||
*p++ = c;
|
||||
*p = '\0';
|
||||
c =
|
||||
|
10
nuweb.w
10
nuweb.w
@@ -3888,7 +3888,7 @@ We need two routines to handle reading the source files.
|
||||
@d Function pro...
|
||||
@{extern void source_open(char *name);
|
||||
/* pass in the name of the source file */
|
||||
extern int source_get(void);
|
||||
extern int source_get(void);
|
||||
/* no args; returns the next char or EOF */
|
||||
extern int source_last; /* what last source_get() returned. */
|
||||
extern int source_peek; /* The next character to get */
|
||||
@@ -4172,7 +4172,7 @@ int num_scraps(void)
|
||||
@d Function pro...
|
||||
@{extern void init_scraps(void);
|
||||
extern int collect_scrap(void);
|
||||
extern int write_scraps(FILE *file, char *spelling, Scrap_Node *defs,
|
||||
extern int write_scraps(FILE *file, char *spelling, Scrap_Node *defs,
|
||||
int global_indent, char *indent_chars,
|
||||
char debug_flag, char tab_flag, char indent_flag,
|
||||
unsigned char comment_flag, Arglist *inArgs,
|
||||
@@ -4637,8 +4637,8 @@ a->next = next;@}
|
||||
}@}
|
||||
|
||||
@o scraps.c -cc -d
|
||||
@{int write_scraps(FILE *file, char *spelling, Scrap_Node *defs,
|
||||
int global_indent, char *indent_chars, char debug_flag,
|
||||
@{int write_scraps(FILE *file, char *spelling, Scrap_Node *defs,
|
||||
int global_indent, char *indent_chars, char debug_flag,
|
||||
char tab_flag, char indent_flag,
|
||||
unsigned char comment_flag, Arglist *inArgs,
|
||||
char *inParams[9], Parameters parameters, char *title)
|
||||
@@ -4954,7 +4954,7 @@ 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,
|
||||
write_scraps(file, "", e->defs, -1, "", 0, 0, 0, 0, e->args, 0,
|
||||
(Parameters)1, "");
|
||||
fputc('}', file);@}
|
||||
|
||||
|
12
scraps.c
12
scraps.c
@@ -60,7 +60,7 @@ comment_ArglistElement(FILE * file, Arglist * args, int quote)
|
||||
#line 4955 "nuweb.w"
|
||||
Embed_Node * e = (Embed_Node *)q;
|
||||
fputc('{', file);
|
||||
write_scraps(file, "", e->defs, -1, "", 0, 0, 0, 0, e->args, 0,
|
||||
write_scraps(file, "", e->defs, -1, "", 0, 0, 0, 0, e->args, 0,
|
||||
(Parameters)1, "");
|
||||
fputc('}', file);
|
||||
#line 4947 "nuweb.w"
|
||||
@@ -408,7 +408,7 @@ int collect_scrap(void)
|
||||
char * p = label_name;
|
||||
while (c =
|
||||
#line 4388 "nuweb.w"
|
||||
source_get(), c != nw_char) /* Here is 151a-01 */
|
||||
source_get(), c != nw_char) /* Here is 148c-01 */
|
||||
*p++ = c;
|
||||
*p = '\0';
|
||||
c =
|
||||
@@ -718,8 +718,8 @@ static Arglist *pop_scrap_name(Manager *manager, Parameters *parameters)
|
||||
}
|
||||
|
||||
#line 4640 "nuweb.w"
|
||||
int write_scraps(FILE *file, char *spelling, Scrap_Node *defs,
|
||||
int global_indent, char *indent_chars, char debug_flag,
|
||||
int write_scraps(FILE *file, char *spelling, Scrap_Node *defs,
|
||||
int global_indent, char *indent_chars, char debug_flag,
|
||||
char tab_flag, char indent_flag,
|
||||
unsigned char comment_flag, Arglist *inArgs,
|
||||
char *inParams[9], Parameters parameters, char *title)
|
||||
@@ -1026,7 +1026,7 @@ int write_scraps(FILE *file, char *spelling, Scrap_Node *defs,
|
||||
char * p = label_name;
|
||||
while (c =
|
||||
#line 4821 "nuweb.w"
|
||||
pop(&reader), c != nw_char) /* Here is 151a-01 */
|
||||
pop(&reader), c != nw_char) /* Here is 148c-01 */
|
||||
*p++ = c;
|
||||
*p = '\0';
|
||||
c =
|
||||
@@ -2059,7 +2059,7 @@ static int reject_match(Name *name, char post, ArgManager *reader)
|
||||
if (sym_char(first) && sym_char(prev)) return TRUE;
|
||||
if (op_char(last) && op_char(post)) return TRUE;
|
||||
if (op_char(first) && op_char(prev)) return TRUE;
|
||||
return FALSE; /* Here is 150b-01 */
|
||||
return FALSE; /* Here is 148b-01 */
|
||||
}
|
||||
|
||||
#line 6407 "nuweb.w"
|
||||
|
Reference in New Issue
Block a user