summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
-rw-r--r--data.c5
-rw-r--r--data.h8
-rw-r--r--lex.c2
-rw-r--r--steer.c4
4 files changed, 12 insertions, 7 deletions
diff --git a/data.c b/data.c
index b2a1bea..5814759 100644
--- a/data.c
+++ b/data.c
@@ -1313,3 +1313,8 @@ double r;
/* end of MIRANDA DATA REPRESENTATIONS */
+word current_file;
+word files;
+word *hd,*tl;
+char *tag;
+
diff --git a/data.h b/data.h
index 6975f37..2130896 100644
--- a/data.h
+++ b/data.h
@@ -128,8 +128,8 @@ see also reset_pns(), make_pn(), sto_pn() in lex.c */
/* works for both pnames and ids */
extern int compiling,polyshowerror;
-word *hd,*tl;
-char *tag;
+extern word *hd,*tl;
+extern char *tag;
char *getstring();
double get_dbl(word);
void dieclean(void);
@@ -161,14 +161,14 @@ extern word idsused;
/* limit on length of shell commands (for /e, !, System) */
#define pnlim 1024
/* limit on length of pathnames */
-word files; /* a cons list of elements, each of which is of the form
+extern word files; /* a cons list of elements, each of which is of the form
cons(cons(fileinfo(filename,mtime),share),definienda)
where share (=0,1) says if repeated instances are shareable.
Current script at the front followed by subsidiary files
due to %insert and %include -- elements due to %insert have
NIL definienda (they are attributed to the inserting script)
*/
-word current_file; /*pointer to current element of `files' during compilation*/
+extern word current_file; /*pointer to current element of `files' during compilation*/
#define make_fil(name,time,share,defs) cons(cons(fileinfo(name,time),\
cons(share,NIL)),defs)
#define get_fil(fil) ((char *)hd[hd[hd[fil]]])
diff --git a/lex.c b/lex.c
index 0eb44c9..33efccd 100644
--- a/lex.c
+++ b/lex.c
@@ -43,7 +43,7 @@ word atnl=1,line_no=0;
word lastline;
word litstack=NIL,linostack=NIL;
word c=' ', lastc;
-word commandmode;
+extern word commandmode;
word common_stdin,common_stdinb,cook_stdin;
word litmain=0,literate=0; /* flags "literate" comment convention */
char *dic,*dicp,*dicq;
diff --git a/steer.c b/steer.c
index 422efbb..ba15a26 100644
--- a/steer.c
+++ b/steer.c
@@ -14,7 +14,7 @@
#include <sys/stat.h>
#include <fcntl.h> /* creat() */
/* #include <sys/wait.h> /* seems not needed, oct 05 */
-struct stat buf; /* see man(2) stat - gets file status */
+extern struct stat buf; /* see man(2) stat - gets file status */
#include "data.h"
#include "big.h"
@@ -135,7 +135,7 @@ extern char *dicp,*dicq;
char linebuf[BUFSIZE]; /* used for assorted purposes */
/* NB cannot share with linebuf in lex.c, or !! goes wrong */
static char ebuf[pnlim];
-word col;
+extern word col;
char home_rc[pnlim+8];
char lib_rc[pnlim+8];
char *rc_error=NULL;