Update bootstrap files.
This commit is contained in:
161
global.h
161
global.h
@@ -1,5 +1,9 @@
|
||||
|
||||
#line 826 "nuweb.w"
|
||||
/* Include files */
|
||||
|
||||
#line 835 "nuweb.w"
|
||||
|
||||
#include <stdlib.h>
|
||||
#include <stdio.h>
|
||||
#include <string.h>
|
||||
@@ -7,7 +11,11 @@
|
||||
#include <signal.h>
|
||||
#include <locale.h>
|
||||
|
||||
#line 826 "nuweb.w"
|
||||
|
||||
/* Type declarations */
|
||||
|
||||
#line 854 "nuweb.w"
|
||||
#ifndef FALSE
|
||||
#define FALSE 0
|
||||
#endif
|
||||
@@ -15,12 +23,21 @@
|
||||
#define TRUE 1
|
||||
#endif
|
||||
|
||||
#line 1815 "nuweb.w"
|
||||
typedef int *Parameters;
|
||||
|
||||
#line 3784 "nuweb.w"
|
||||
|
||||
#define MAX_INDENT 500
|
||||
|
||||
#line 5074 "nuweb.w"
|
||||
typedef struct scrap_node {
|
||||
struct scrap_node *next;
|
||||
int scrap;
|
||||
char quoted;
|
||||
} Scrap_Node;
|
||||
|
||||
#line 5083 "nuweb.w"
|
||||
typedef struct name {
|
||||
char *spelling;
|
||||
struct name *llink;
|
||||
@@ -35,20 +52,30 @@ typedef struct name {
|
||||
unsigned char comment_flag;
|
||||
unsigned char sector;
|
||||
} Name;
|
||||
|
||||
#line 5536 "nuweb.w"
|
||||
#define ARG_CHR '\001'
|
||||
|
||||
#line 5596 "nuweb.w"
|
||||
typedef struct arglist
|
||||
{Name * name;
|
||||
struct arglist * args;
|
||||
struct arglist * next;
|
||||
} Arglist;
|
||||
|
||||
#line 5760 "nuweb.w"
|
||||
typedef struct embed {
|
||||
Scrap_Node * defs;
|
||||
Arglist * args;
|
||||
} Embed_Node;
|
||||
|
||||
#line 6240 "nuweb.w"
|
||||
typedef struct uses {
|
||||
struct uses *next;
|
||||
Name *defn;
|
||||
} Uses;
|
||||
|
||||
#line 6482 "nuweb.w"
|
||||
typedef struct l_node
|
||||
{
|
||||
struct l_node * left, * right;
|
||||
@@ -56,13 +83,21 @@ typedef struct l_node
|
||||
char name[1];
|
||||
} label_node;
|
||||
|
||||
#line 827 "nuweb.w"
|
||||
|
||||
/* Limits */
|
||||
|
||||
#line 864 "nuweb.w"
|
||||
|
||||
#ifndef MAX_NAME_LEN
|
||||
#define MAX_NAME_LEN 1024
|
||||
#endif
|
||||
|
||||
#line 828 "nuweb.w"
|
||||
|
||||
/* Global variable declarations */
|
||||
|
||||
#line 1036 "nuweb.w"
|
||||
extern int tex_flag; /* if FALSE, don't emit the documentation file */
|
||||
extern int html_flag; /* if TRUE, emit HTML instead of LaTeX scraps. */
|
||||
extern int output_flag; /* if FALSE, don't emit the output files */
|
||||
@@ -86,62 +121,135 @@ extern char * hyperoptions; /* The options to pass to the
|
||||
extern int includepath_flag; /* Do we have an include path? */
|
||||
extern struct incl{char * name; struct incl * next;} * include_list;
|
||||
/* The list of include paths */
|
||||
|
||||
#line 1094 "nuweb.w"
|
||||
extern int nw_char;
|
||||
|
||||
#line 1104 "nuweb.w"
|
||||
extern char *command_name;
|
||||
|
||||
#line 1505 "nuweb.w"
|
||||
extern unsigned char current_sector;
|
||||
extern unsigned char prev_sector;
|
||||
|
||||
#line 1703 "nuweb.w"
|
||||
extern char blockBuff[6400];
|
||||
|
||||
#line 2418 "nuweb.w"
|
||||
extern int extra_scraps;
|
||||
|
||||
#line 3901 "nuweb.w"
|
||||
extern char *source_name; /* name of the current file */
|
||||
extern int source_line; /* current line in the source file */
|
||||
|
||||
#line 4237 "nuweb.w"
|
||||
extern int already_warned;
|
||||
|
||||
#line 5100 "nuweb.w"
|
||||
extern Name *file_names;
|
||||
extern Name *macro_names;
|
||||
extern Name *user_names;
|
||||
extern int scrap_name_has_parameters;
|
||||
extern int scrap_ended_with;
|
||||
|
||||
#line 6491 "nuweb.w"
|
||||
extern label_node * label_tab;
|
||||
|
||||
#line 829 "nuweb.w"
|
||||
|
||||
/* Function prototypes */
|
||||
extern void pass1();
|
||||
extern void write_tex();
|
||||
|
||||
#line 1400 "nuweb.w"
|
||||
extern void pass1(char *file_name);
|
||||
|
||||
#line 2034 "nuweb.w"
|
||||
extern void write_tex(char *file_name, char *tex_name);
|
||||
|
||||
#line 2582 "nuweb.w"
|
||||
void initialise_delimit_scrap_array(void);
|
||||
|
||||
#line 2676 "nuweb.w"
|
||||
void update_delimit_scrap();
|
||||
|
||||
#line 3100 "nuweb.w"
|
||||
extern int has_sector(Name *, unsigned char);
|
||||
extern void write_html();
|
||||
extern void write_files();
|
||||
extern void source_open(); /* pass in the name of the source file */
|
||||
extern int source_get(); /* no args; returns the next char or EOF */
|
||||
|
||||
#line 3227 "nuweb.w"
|
||||
extern void write_html(char *file_name, char *html_name);
|
||||
|
||||
#line 3764 "nuweb.w"
|
||||
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);
|
||||
/* 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 */
|
||||
|
||||
#line 3964 "nuweb.w"
|
||||
extern void source_ungetc(int*);
|
||||
extern void init_scraps();
|
||||
extern int collect_scrap();
|
||||
extern int write_scraps();
|
||||
extern void write_scrap_ref();
|
||||
extern void write_single_scrap_ref();
|
||||
extern int num_scraps();
|
||||
|
||||
#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,
|
||||
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);
|
||||
extern void write_scrap_ref(FILE *file, int num, int first, int *page);
|
||||
extern void write_single_scrap_ref(FILE *file, int num);
|
||||
extern int num_scraps(void);
|
||||
|
||||
#line 4501 "nuweb.w"
|
||||
extern void add_to_use(Name * name, int current_scrap);
|
||||
Arglist * instance();
|
||||
extern void collect_numbers();
|
||||
extern Name *collect_file_name();
|
||||
extern Name *collect_macro_name();
|
||||
extern Arglist *collect_scrap_name();
|
||||
extern Name *name_add();
|
||||
extern Name *prefix_add();
|
||||
extern char *save_string();
|
||||
extern void reverse_lists();
|
||||
|
||||
#line 4575 "nuweb.w"
|
||||
extern Arglist *instance(Arglist *a, Arglist *par, char *arg[9], int *ch);
|
||||
|
||||
#line 4984 "nuweb.w"
|
||||
extern void collect_numbers(char *aux_name);
|
||||
|
||||
#line 5116 "nuweb.w"
|
||||
extern Name *collect_file_name(void);
|
||||
extern Name *collect_macro_name(void);
|
||||
extern Arglist *collect_scrap_name(int current_scrap);
|
||||
extern Name *name_add(Name **rt, char *spelling, unsigned char sector);
|
||||
extern Name *prefix_add(Name **rt, char *spelling, unsigned char sector);
|
||||
extern char *save_string(char *);
|
||||
extern void reverse_lists(Name *names);
|
||||
|
||||
#line 5260 "nuweb.w"
|
||||
extern int robs_strcmp(char*, char*);
|
||||
extern Name *install_args();
|
||||
extern void search();
|
||||
|
||||
#line 5579 "nuweb.w"
|
||||
extern Name *install_args(Name * name, int argc, char *arg[0]);
|
||||
|
||||
#line 6000 "nuweb.w"
|
||||
extern void search(void);
|
||||
|
||||
#line 6247 "nuweb.w"
|
||||
extern void format_uses_refs(FILE *, int);
|
||||
|
||||
#line 6302 "nuweb.w"
|
||||
extern void format_defs_refs(FILE *, int);
|
||||
|
||||
#line 6413 "nuweb.w"
|
||||
void write_label(char label_name[], FILE * file);
|
||||
extern void *arena_getmem();
|
||||
extern void arena_free();
|
||||
|
||||
#line 6506 "nuweb.w"
|
||||
extern void *arena_getmem(size_t n);
|
||||
extern void arena_free(void);
|
||||
|
||||
#line 830 "nuweb.w"
|
||||
|
||||
/* Operating System Dependencies */
|
||||
|
||||
#line 972 "nuweb.w"
|
||||
|
||||
#if defined(VMS)
|
||||
#define PATH_SEP(c) (c==']'||c==':')
|
||||
#define PATH_SEP_CHAR ""
|
||||
@@ -155,4 +263,5 @@ extern void arena_free();
|
||||
#define PATH_SEP_CHAR "/"
|
||||
#define DEFAULT_PATH "."
|
||||
#endif
|
||||
typedef int *Parameters;
|
||||
|
||||
#line 831 "nuweb.w"
|
||||
|
||||
Reference in New Issue
Block a user