Ver código fonte

Added prototyping stuff

ceriel 30 anos atrás
pai
commit
48a8bc1bd1
53 arquivos alterados com 226 adições e 55 exclusões
  1. 1 0
      modules/src/em_code/bhcst.c
  2. 1 0
      modules/src/em_code/bhdlb.c
  3. 1 0
      modules/src/em_code/bhdnam.c
  4. 1 0
      modules/src/em_code/bhfcon.c
  5. 1 0
      modules/src/em_code/bhicon.c
  6. 1 0
      modules/src/em_code/bhilb.c
  7. 1 0
      modules/src/em_code/bhpnam.c
  8. 1 0
      modules/src/em_code/bhucon.c
  9. 1 0
      modules/src/em_code/crcst.c
  10. 1 0
      modules/src/em_code/crdlb.c
  11. 1 0
      modules/src/em_code/crdnam.c
  12. 1 0
      modules/src/em_code/crilb.c
  13. 1 0
      modules/src/em_code/crpnam.c
  14. 1 0
      modules/src/em_code/crscon.c
  15. 1 0
      modules/src/em_code/crxcon.c
  16. 1 0
      modules/src/em_code/cst.c
  17. 1 0
      modules/src/em_code/dfdlb.c
  18. 1 0
      modules/src/em_code/dfdnam.c
  19. 1 0
      modules/src/em_code/dfilb.c
  20. 1 0
      modules/src/em_code/dlb.c
  21. 1 0
      modules/src/em_code/dnam.c
  22. 62 21
      modules/src/em_code/em.c
  23. 58 0
      modules/src/em_code/em.nogen
  24. 31 31
      modules/src/em_code/em_code.3X
  25. 22 0
      modules/src/em_code/em_private.h
  26. 1 0
      modules/src/em_code/end.c
  27. 1 0
      modules/src/em_code/endarg.c
  28. 1 0
      modules/src/em_code/exc.c
  29. 1 0
      modules/src/em_code/failed.c
  30. 1 0
      modules/src/em_code/fcon.c
  31. 1 0
      modules/src/em_code/getid.c
  32. 1 0
      modules/src/em_code/icon.c
  33. 1 0
      modules/src/em_code/ilb.c
  34. 3 0
      modules/src/em_code/insert.c
  35. 1 0
      modules/src/em_code/internerr.c
  36. 1 0
      modules/src/em_code/msend.c
  37. 1 0
      modules/src/em_code/msstart.c
  38. 1 0
      modules/src/em_code/op.c
  39. 1 0
      modules/src/em_code/opcst.c
  40. 1 0
      modules/src/em_code/opdlb.c
  41. 1 0
      modules/src/em_code/opdnam.c
  42. 1 0
      modules/src/em_code/opilb.c
  43. 1 0
      modules/src/em_code/opnarg.c
  44. 1 0
      modules/src/em_code/oppnam.c
  45. 1 0
      modules/src/em_code/pnam.c
  46. 1 0
      modules/src/em_code/pro.c
  47. 1 0
      modules/src/em_code/pronarg.c
  48. 3 3
      modules/src/em_code/proto.make
  49. 1 0
      modules/src/em_code/psdlb.c
  50. 1 0
      modules/src/em_code/psdnam.c
  51. 1 0
      modules/src/em_code/pspnam.c
  52. 1 0
      modules/src/em_code/scon.c
  53. 1 0
      modules/src/em_code/ucon.c

+ 1 - 0
modules/src/em_code/bhcst.c

@@ -2,6 +2,7 @@
 
 /* $Header$ */
 
+void
 CC_bhcst(op, n, w, i)
 	arith n;
 	arith w;

+ 1 - 0
modules/src/em_code/bhdlb.c

@@ -2,6 +2,7 @@
 
 /* $Header$ */
 
+void
 CC_bhdlb(op, n, s, off, i)
 	arith n;
 	label s;

+ 1 - 0
modules/src/em_code/bhdnam.c

@@ -2,6 +2,7 @@
 
 /* $Header$ */
 
+void
 CC_bhdnam(op, n, s, off, i)
 	arith n;
 	char *s;

+ 1 - 0
modules/src/em_code/bhfcon.c

@@ -2,6 +2,7 @@
 
 /* $Header$ */
 
+void
 CC_bhfcon(op, n, s, sz, i)
 	arith n;
 	char *s;

+ 1 - 0
modules/src/em_code/bhicon.c

@@ -2,6 +2,7 @@
 
 /* $Header$ */
 
+void
 CC_bhicon(op, n, s, sz, i)
 	arith n;
 	char *s;

+ 1 - 0
modules/src/em_code/bhilb.c

@@ -2,6 +2,7 @@
 
 /* $Header$ */
 
+void
 CC_bhilb(op, n, l, i)
 	arith n;
 	label l;

+ 1 - 0
modules/src/em_code/bhpnam.c

@@ -2,6 +2,7 @@
 
 /* $Header$ */
 
+void
 CC_bhpnam(op, n, p, i)
 	arith n;
 	char *p;

+ 1 - 0
modules/src/em_code/bhucon.c

@@ -2,6 +2,7 @@
 
 /* $Header$ */
 
+void
 CC_bhucon(op, n, s, sz, i)
 	arith n;
 	char *s;

+ 1 - 0
modules/src/em_code/crcst.c

@@ -2,6 +2,7 @@
 
 /* $Header$ */
 
+void
 CC_crcst(op, v)
 	arith v;
 {

+ 1 - 0
modules/src/em_code/crdlb.c

@@ -2,6 +2,7 @@
 
 /* $Header$ */
 
+void
 CC_crdlb(op, v, off)
 	label v;
 	arith off;

+ 1 - 0
modules/src/em_code/crdnam.c

@@ -2,6 +2,7 @@
 
 /* $Header$ */
 
+void
 CC_crdnam(op, s, off)
 	char *s;
 	arith off;

+ 1 - 0
modules/src/em_code/crilb.c

@@ -2,6 +2,7 @@
 
 /* $Header$ */
 
+void
 CC_crilb(op, l)
 	label l;
 {

+ 1 - 0
modules/src/em_code/crpnam.c

@@ -2,6 +2,7 @@
 
 /* $Header$ */
 
+void
 CC_crpnam(op, p)
 	char *p;
 {

+ 1 - 0
modules/src/em_code/crscon.c

@@ -2,6 +2,7 @@
 
 /* $Header$ */
 
+void
 CC_crscon(op, v, s)
 	char *v;
 	arith s;

+ 1 - 0
modules/src/em_code/crxcon.c

@@ -2,6 +2,7 @@
 
 /* $Header$ */
 
+void
 CC_crxcon(op, spec, v, s)
 	char *v;
 	arith s;

+ 1 - 0
modules/src/em_code/cst.c

@@ -2,6 +2,7 @@
 
 /* $Header$ */
 
+void
 CC_cst(l)
 	arith l;
 {

+ 1 - 0
modules/src/em_code/dfdlb.c

@@ -2,6 +2,7 @@
 
 /* $Header$ */
 
+void
 CC_dfdlb(l)
 	label l;
 {

+ 1 - 0
modules/src/em_code/dfdnam.c

@@ -2,6 +2,7 @@
 
 /* $Header$ */
 
+void
 CC_dfdnam(s)
 	char *s;
 {

+ 1 - 0
modules/src/em_code/dfilb.c

@@ -2,6 +2,7 @@
 
 /* $Header$ */
 
+void
 CC_dfilb(l)
 	label l;
 {

+ 1 - 0
modules/src/em_code/dlb.c

@@ -2,6 +2,7 @@
 
 /* $Header$ */
 
+void
 CC_dlb(l, val)
 	label l;
 	arith val;

+ 1 - 0
modules/src/em_code/dnam.c

@@ -2,6 +2,7 @@
 
 /* $Header$ */
 
+void
 CC_dnam(str, val)
 	char *str;
 	arith val;

+ 62 - 21
modules/src/em_code/em.c

@@ -46,6 +46,7 @@ char		*C_current_out = obuf;
 char		*C_opp = obuf;
 #endif
 
+void
 C_flush() {
 #ifdef INCORE
 	static unsigned int bufsiz;
@@ -78,6 +79,7 @@ C_flush() {
 #define Xputbyte(c) put(c)
 #endif
 
+void
 C_putbyte(c)
 	int c;
 {
@@ -89,11 +91,13 @@ C_putbyte(c)
 #endif
 
 /*ARGSUSED*/
+void
 C_init(w, p)
 	arith w, p;
 {
 }
 
+int
 C_open(nm)
 	char *nm;
 {
@@ -108,6 +112,7 @@ C_open(nm)
 	return 1;
 }
 
+void
 C_close()
 {
 	/*	Finish the code-generation.
@@ -142,6 +147,7 @@ C_close()
 	C_ofp = 0;
 }
 
+int
 C_busy()
 {
 	return C_ofp != 0; /* true if code is being generated */
@@ -156,6 +162,7 @@ C_busy()
 	names.
 */
 
+void
 C_magic()
 {
 }
@@ -171,12 +178,14 @@ wrs(s)
 	}
 }
 
+void
 C_pt_dnam(s)
 	char *s;
 {
 	wrs(s);
 }
 
+void
 C_pt_ilb(l)
 	label l;
 {
@@ -189,6 +198,7 @@ C_pt_ilb(l)
 extern char em_mnem[][4];
 extern char em_pseu[][4];
 
+void
 C_pt_op(x)
 {
 	C_putbyte(' ');
@@ -196,6 +206,7 @@ C_pt_op(x)
 	C_putbyte(' ');
 }
 
+void
 C_pt_cst(l)
 	arith l;
 {
@@ -205,6 +216,7 @@ C_pt_cst(l)
 	wrs(buf);
 }
 
+void
 C_pt_scon(x, y)
 	char *x;
 	arith y;
@@ -224,6 +236,7 @@ C_pt_scon(x, y)
 	C_putbyte('\'');
 }
 
+void
 C_pt_ps(x)
 {
 	C_putbyte(' ');
@@ -231,6 +244,7 @@ C_pt_ps(x)
 	C_putbyte(' ');
 }
 
+void
 C_pt_dlb(l)
 	label l;
 {
@@ -240,6 +254,7 @@ C_pt_dlb(l)
 	wrs(buf);
 }
 
+void
 C_pt_doff(l, v)
 	label l;
 	arith v;
@@ -253,6 +268,7 @@ C_pt_doff(l, v)
 	}
 }
 
+void
 C_pt_noff(s, v)
 	char *s;
 	arith v;
@@ -266,6 +282,7 @@ C_pt_noff(s, v)
 	}
 }
 
+void
 C_pt_pnam(s)
 	char *s;
 {
@@ -273,6 +290,7 @@ C_pt_pnam(s)
 	wrs(s);
 }
 
+void
 C_pt_dfilb(l)
 	label l;
 {
@@ -282,6 +300,7 @@ C_pt_dfilb(l)
 	wrs(buf);
 }
 
+void
 C_pt_wcon(sp, v, sz)	/* sp_icon, sp_ucon or sp_fcon with int repr	*/
 	int sp;
 	char *v;
@@ -294,9 +313,20 @@ C_pt_wcon(sp, v, sz)	/* sp_icon, sp_ucon or sp_fcon with int repr	*/
 	C_pt_cst(sz);
 }
 
-C_pt_nl() { C_putbyte('\n'); }
-C_pt_comma() { C_putbyte(','); }
-C_pt_ccend() { C_putbyte('?'); }
+void
+C_pt_nl() {
+	C_putbyte('\n');
+}
+
+void
+C_pt_comma() {
+	C_putbyte(',');
+}
+
+void
+C_pt_ccend() { 
+	C_putbyte('?');
+}
 
 #else /* READABLE_EM */
 
@@ -312,6 +342,7 @@ C_pt_ccend() { C_putbyte('?'); }
 	names.
 */
 
+void
 C_magic()
 {
 	put16(sp_magic);
@@ -321,6 +352,7 @@ C_magic()
 #define	fit16i(x)	((x) >= (long)0xFFFF8000 && (x) <= (long)0x00007FFF)
 #define	fit8u(x)	((x) <= 0xFF)		/* x is already unsigned */
 
+void
 C_pt_ilb(l)
 	register label l;
 {
@@ -334,6 +366,7 @@ C_pt_ilb(l)
 	}
 }
 
+void
 C_pt_dlb(l)
 	register label l;
 {
@@ -347,6 +380,7 @@ C_pt_dlb(l)
 	}
 }
 
+void
 C_pt_cst(l)
 	register arith l;
 {
@@ -367,6 +401,7 @@ C_pt_cst(l)
 	}
 }
 
+void
 C_pt_doff(l, v)
 	label l;
 	arith v;
@@ -381,6 +416,27 @@ C_pt_doff(l, v)
 	}
 }
 
+void
+C_pt_str(s)
+	register char *s;
+{
+	register int len;
+
+	C_pt_cst((arith) (len = strlen(s)));
+	while (--len >= 0) {
+		put8(*s++);
+	}
+}
+
+void
+C_pt_dnam(s)
+	char *s;
+{
+	put8(sp_dnam);
+	C_pt_str(s);
+}
+
+void
 C_pt_noff(s, v)
 	char *s;
 	arith v;
@@ -395,13 +451,7 @@ C_pt_noff(s, v)
 	}
 }
 
-C_pt_dnam(s)
-	char *s;
-{
-	put8(sp_dnam);
-	C_pt_str(s);
-}
-
+void
 C_pt_pnam(s)
 	char *s;
 {
@@ -409,6 +459,7 @@ C_pt_pnam(s)
 	C_pt_str(s);
 }
 
+void
 C_pt_wcon(sp, v, sz)	/* sp_icon, sp_ucon or sp_fcon with int repr	*/
 	int sp;
 	char *v;
@@ -420,17 +471,7 @@ C_pt_wcon(sp, v, sz)	/* sp_icon, sp_ucon or sp_fcon with int repr	*/
 	C_pt_str(v);
 }
 
-C_pt_str(s)
-	register char *s;
-{
-	register int len;
-
-	C_pt_cst((arith) (len = strlen(s)));
-	while (--len >= 0) {
-		put8(*s++);
-	}
-}
-
+void
 C_pt_scon(b, n)
 	register char *b;
 	register arith n;

+ 58 - 0
modules/src/em_code/em.nogen

@@ -87,3 +87,61 @@
 #ifndef sp_icon
 #include <em_spec.h>
 #endif
+
+/* prototypes, also hand written. */
+_PROTOTYPE(void CC_bhcst, (int, arith, arith, int));
+_PROTOTYPE(void CC_bhdlb, (int, arith, label, arith, int));
+_PROTOTYPE(void CC_bhdnam, (int, arith, char *, arith, int));
+_PROTOTYPE(void CC_bhfcon, (int, arith, char *, arith, int));
+_PROTOTYPE(void CC_bhicon, (int, arith, char *, arith, int));
+_PROTOTYPE(void CC_bhilb, (int, arith, label, int));
+_PROTOTYPE(void CC_bhpnam, (int, arith, char *, int));
+_PROTOTYPE(void CC_bhucon, (int, arith, char *, arith, int));
+_PROTOTYPE(void CC_crcst, (int, arith));
+_PROTOTYPE(void CC_crdlb, (int, label, arith));
+_PROTOTYPE(void CC_crdnam, (int, char *, arith));
+_PROTOTYPE(void CC_crilb, (int, label));
+_PROTOTYPE(void CC_crpnam, (int, char *));
+_PROTOTYPE(void CC_crscon, (int, char *, arith));
+_PROTOTYPE(void CC_crxcon, (int, int, char *, arith));
+_PROTOTYPE(void CC_cst, (arith));
+_PROTOTYPE(void CC_dfdlb, (label));
+_PROTOTYPE(void CC_dfdnam, (char *));
+_PROTOTYPE(void CC_dfilb, (label));
+_PROTOTYPE(void CC_dlb, (label, arith));
+_PROTOTYPE(void CC_dnam, (char *, arith));
+_PROTOTYPE(void CC_end, (arith));
+_PROTOTYPE(void CC_endnarg, (void));
+_PROTOTYPE(void CC_exc, (arith, arith));
+_PROTOTYPE(void CC_fcon, (char *, arith));
+_PROTOTYPE(void CC_icon, (char *, arith));
+_PROTOTYPE(void CC_ilb, (label));
+_PROTOTYPE(void CC_msend, (void));
+_PROTOTYPE(void CC_msstart, (int));
+_PROTOTYPE(void CC_op, (int));
+_PROTOTYPE(void CC_opcst, (int, arith));
+_PROTOTYPE(void CC_opdlb, (int, label, arith));
+_PROTOTYPE(void CC_opdnam, (int, char *, arith));
+_PROTOTYPE(void CC_opilb, (int, label));
+_PROTOTYPE(void CC_opnarg, (int));
+_PROTOTYPE(void CC_oppnam, (int, char *));
+_PROTOTYPE(void CC_pnam, (char *));
+_PROTOTYPE(void CC_pro, (char *, arith));
+_PROTOTYPE(void CC_pronarg, (char *));
+_PROTOTYPE(void CC_psdlb, (int, label));
+_PROTOTYPE(void CC_psdnam, (int, char *));
+_PROTOTYPE(void CC_pspnam, (int, char *));
+_PROTOTYPE(void CC_scon, (char *, arith));
+_PROTOTYPE(void CC_ucon, (char *, arith));
+
+_PROTOTYPE(void C_init, (arith, arith));
+_PROTOTYPE(void C_failed, (void));
+_PROTOTYPE(void C_internal_error, (void));
+_PROTOTYPE(int C_open, (char *));
+_PROTOTYPE(void C_close, (void));
+_PROTOTYPE(int C_busy, (void));
+_PROTOTYPE(void C_magic, (void));
+_PROTOTYPE(int C_getid, (void));
+_PROTOTYPE(void C_insertpart, (int));
+_PROTOTYPE(void C_beginpart, (int));
+_PROTOTYPE(void C_endpart, (int));

+ 31 - 31
modules/src/em_code/em_code.3X

@@ -6,61 +6,61 @@ emcode \- EM code interface for compilers
 .nf
 .B #include <em.h>
 .PP
-.B C_init(wsize, psize)
+.B void C_init(wsize, psize)
 .B arith wsize, psize;
 .PP
 .B int C_open(filename)
-.B C_close()
+.B void C_close()
 .B int C_busy()
 .B char *filename;
 .PP
-.B C_magic()
+.B void C_magic()
 .PP
-.B C_df_dlb(l)
-.B C_df_dnam(s)
-.B C_df_ilb(l)
+.B void C_df_dlb(l)
+.B void C_df_dnam(s)
+.B void C_df_ilb(l)
 .B label l; char *s;
 .PP
-.B C_pro(s, l)
-.B C_pro_narg(s)
-.B C_end(l)
-.B C_end_narg()
+.B void C_pro(s, l)
+.B void C_pro_narg(s)
+.B void C_end(l)
+.B void C_end_narg()
 .B char *s; arith l;
 .PP
-.B C_exa_dlb(l)
-.B C_exa_dnam(s)
-.B C_exp(s)
-.B C_ina_dlb(l)
-.B C_ina_dnam(s)
-.B C_inp(s)
+.B void C_exa_dlb(l)
+.B void C_exa_dnam(s)
+.B void C_exp(s)
+.B void C_ina_dlb(l)
+.B void C_ina_dnam(s)
+.B void C_inp(s)
 .B char *s; label l;
 .PP
-.BI C_bss_ cstp ()
-.BI C_hol_ cstp ()
-.BI C_con_ cstp ()
-.BI C_rom_ cstp ()
+.BI "void C_bss_" cstp ()
+.BI "void C_hol_" cstp ()
+.BI "void C_con_" cstp ()
+.BI "void C_rom_" cstp ()
 .PP
 .B #include <em_mes.h>
-.B C_mes_begin(ms)
-.BI C_ cstp ()
-.B C_mes_end()
+.B void C_mes_begin(ms)
+.BI "void C_" cstp ()
+.B void C_mes_end()
 .B int ms;
 .PP
-.B C_exc(c1, c2)
+.B void C_exc(c1, c2)
 .B arith c1, c2;
 .PP
-.BI C_ mnem ()
-.BI C_ mnem _dlb()
-.BI C_ mnem _dnam()
-.BI C_ mnem _narg()
+.BI "void C_" mnem ()
+.BI "void C_" mnem _dlb()
+.BI "void C_" mnem _dnam()
+.BI "void C_" mnem _narg()
 .PP
-.B C_insertpart(id)
+.B void C_insertpart(id)
 .B int id;
 .PP
-.B C_beginpart(id)
+.B void C_beginpart(id)
 .B int id;
 .PP
-.B C_endpart(id)
+.B void C_endpart(id)
 .B int id;
 .PP
 .B int C_getid()

+ 22 - 0
modules/src/em_code/em_private.h

@@ -14,6 +14,10 @@
 #include	<em_mnem.h>
 #include	<em_reg.h>
 
+#include	<ansi.h>
+
+#include	"em_codeEK.h"
+
 #ifdef READABLE_EM
 /* macros used in the definitions of the interface functions C_* */
 #define	OP(x)		C_pt_op(x)
@@ -64,3 +68,21 @@
 #define	C_pt_op(x)	C_putbyte(x)
 #define	C_pt_ps(x)	C_putbyte(x)
 #endif /* READABLE_EM */
+
+_PROTOTYPE(void C_pt_dnam, (char *));
+_PROTOTYPE(void C_pt_ilb, (label));
+_PROTOTYPE(void C_pt_op, (int));
+_PROTOTYPE(void C_pt_cst, (arith));
+_PROTOTYPE(void C_pt_scon, (char *, arith));
+_PROTOTYPE(void C_pt_ps, (int));
+_PROTOTYPE(void C_pt_dlb, (label));
+_PROTOTYPE(void C_pt_doff, (label, arith));
+_PROTOTYPE(void C_pt_noff, (char *, arith));
+_PROTOTYPE(void C_pt_pnam, (char *));
+_PROTOTYPE(void C_pt_dfilb, (label));
+_PROTOTYPE(void C_pt_wcon, (int, char *, arith));
+#ifdef READABLE_EM
+_PROTOTYPE(void C_pt_nl, (void));
+_PROTOTYPE(void C_pt_comma, (void));
+_PROTOTYPE(void C_pt_ccend, (void));
+#endif /* READABLE_EM */

+ 1 - 0
modules/src/em_code/end.c

@@ -2,6 +2,7 @@
 
 /* $Header$ */
 
+void
 CC_end(l)
 	arith l;
 {

+ 1 - 0
modules/src/em_code/endarg.c

@@ -2,6 +2,7 @@
 
 /* $Header$ */
 
+void
 CC_endnarg()
 {
 	/*	END pseudo of procedure with unknown # of locals

+ 1 - 0
modules/src/em_code/exc.c

@@ -2,6 +2,7 @@
 
 /* $Header$ */
 
+void
 CC_exc(c1,c2)
 	arith c1,c2;
 {

+ 1 - 0
modules/src/em_code/failed.c

@@ -5,6 +5,7 @@
  */
 #include <system.h>
 
+void
 C_failed()
 {
 	sys_write(STDERR,"read, write, or open failed\n",28);

+ 1 - 0
modules/src/em_code/fcon.c

@@ -2,6 +2,7 @@
 
 /* $Header$ */
 
+void
 CC_fcon(val, siz)
 	char *val;
 	arith siz;

+ 1 - 0
modules/src/em_code/getid.c

@@ -3,6 +3,7 @@
 /*	Get a unique id for C_insertpart, etc.
 */
 
+int
 C_getid()
 {
 	static int id = 0;

+ 1 - 0
modules/src/em_code/icon.c

@@ -2,6 +2,7 @@
 
 /* $Header$ */
 
+void
 CC_icon(val, siz)
 	char *val;
 	arith siz;

+ 1 - 0
modules/src/em_code/ilb.c

@@ -2,6 +2,7 @@
 
 /* $Header$ */
 
+void
 CC_ilb(l)
 	label l;
 {

+ 3 - 0
modules/src/em_code/insert.c

@@ -302,6 +302,7 @@ resume(p)
 	pp->pp_begin = C_current_out - C_BASE;
 }
 
+void
 C_insertpart(part)
 	int part;
 {
@@ -340,6 +341,7 @@ C_insertpart(part)
 	resume(p);
 }
 
+void
 C_beginpart(part)
 	int part;
 {
@@ -359,6 +361,7 @@ C_beginpart(part)
 	resume(p);
 }
 
+void
 C_endpart(part)
 	int part;
 {

+ 1 - 0
modules/src/em_code/internerr.c

@@ -5,6 +5,7 @@
  */
 #include <system.h>
 
+void
 C_internal_error()
 {
 	sys_write(STDERR,"internal error\n",15);

+ 1 - 0
modules/src/em_code/msend.c

@@ -2,6 +2,7 @@
 
 /* $Header$ */
 
+void
 CC_msend()
 {
 	CEND();

+ 1 - 0
modules/src/em_code/msstart.c

@@ -2,6 +2,7 @@
 
 /* $Header$ */
 
+void
 CC_msstart(cst)
 	int cst;
 {

+ 1 - 0
modules/src/em_code/op.c

@@ -2,6 +2,7 @@
 
 /* $Header$ */
 
+void
 CC_op(opcode)
 {
 	/*	Instruction that never has an argument

+ 1 - 0
modules/src/em_code/opcst.c

@@ -2,6 +2,7 @@
 
 /* $Header$ */
 
+void
 CC_opcst(opcode, cst)
 	arith cst;
 {

+ 1 - 0
modules/src/em_code/opdlb.c

@@ -2,6 +2,7 @@
 
 /* $Header$ */
 
+void
 CC_opdlb(opcode, dlb, offset)
 	label dlb;
 	arith offset;

+ 1 - 0
modules/src/em_code/opdnam.c

@@ -2,6 +2,7 @@
 
 /* $Header$ */
 
+void
 CC_opdnam(opcode, dnam, offset)
 	char *dnam;
 	arith offset;

+ 1 - 0
modules/src/em_code/opilb.c

@@ -2,6 +2,7 @@
 
 /* $Header$ */
 
+void
 CC_opilb(opcode, ilb)
 	label ilb;
 {

+ 1 - 0
modules/src/em_code/opnarg.c

@@ -2,6 +2,7 @@
 
 /* $Header$ */
 
+void
 CC_opnarg(opcode)
 {
 	/*	Instruction with optional argument, but now without one

+ 1 - 0
modules/src/em_code/oppnam.c

@@ -2,6 +2,7 @@
 
 /* $Header$ */
 
+void
 CC_oppnam(opcode, pnam)
 	char *pnam;
 {

+ 1 - 0
modules/src/em_code/pnam.c

@@ -2,6 +2,7 @@
 
 /* $Header$ */
 
+void
 CC_pnam(str)
 	char *str;
 {

+ 1 - 0
modules/src/em_code/pro.c

@@ -2,6 +2,7 @@
 
 /* $Header$ */
 
+void
 CC_pro(pnam, l)
 	char *pnam;
 	arith l;

+ 1 - 0
modules/src/em_code/pronarg.c

@@ -2,6 +2,7 @@
 
 /* $Header$ */
 
+void
 CC_pronarg(pnam)
 	char *pnam;
 {

+ 3 - 3
modules/src/em_code/proto.make

@@ -6,7 +6,7 @@ ETC = $(SRC_HOME)/etc
 SRC_DIR = $(SRC_HOME)/modules/src/em_code
 MOD_DIR = $(TARGET_HOME)/modules
 
-INCLUDES = -I$(TARGET_HOME)/h -I$(TARGET_HOME)/config -I$(MOD_DIR)/h -I$(SRC_HOME)/modules/src/read_em -I$(SRC_DIR)
+INCLUDES = -I. -I$(TARGET_HOME)/h -I$(TARGET_HOME)/config -I$(MOD_DIR)/h -I$(SRC_HOME)/modules/src/read_em -I$(SRC_DIR)
 CFLAGS = $(INCLUDES) $(COPTIONS)
 SRC =	$(SRC_DIR)/bhcst.c\
 	$(SRC_DIR)/bhdlb.c\
@@ -64,11 +64,12 @@ OBS = failed.$(SUF) insert.$(SUF) internerr.$(SUF) getid.$(SUF)
 all:		em_codeEK.h libeme.$(LIBSUF) libemk.$(LIBSUF) em_code.3
 
 install:	all
+		-mkdir $(MOD_DIR)/lib
+		-mkdir $(MOD_DIR)/h
 		cp libeme.$(LIBSUF) $(MOD_DIR)/lib/libeme.$(LIBSUF)
 		$(RANLIB) $(MOD_DIR)/lib/libeme.$(LIBSUF)
 		cp libemk.$(LIBSUF) $(MOD_DIR)/lib/libemk.$(LIBSUF)
 		$(RANLIB) $(MOD_DIR)/lib/libemk.$(LIBSUF)
-		cp em_code.3 $(MOD_DIR)/man/em_code.3
 		cp em_codeEK.h $(MOD_DIR)/h/em_codeEK.h
 		if [ $(DO_MACHINE_INDEP) = y ] ; \
 		then	mk_manpage em_code.3 $(TARGET_HOME) ; \
@@ -78,7 +79,6 @@ cmp:	all
 		-cmp libeme.$(LIBSUF) $(MOD_DIR)/lib/libeme.$(LIBSUF)
 		-cmp libemk.$(LIBSUF) $(MOD_DIR)/lib/libemk.$(LIBSUF)
 		-cmp em_codeEK.h $(MOD_DIR)/h/em_codeEK.h
-		-cmp em_code.3 $(MOD_DIR)/man/em_code.3
 
 em_code.3:	$(SRC_DIR)/em_code.3X
 		-sh -c 'tbl < $(SRC_DIR)/em_code.3X > em_code.3'

+ 1 - 0
modules/src/em_code/psdlb.c

@@ -2,6 +2,7 @@
 
 /* $Header$ */
 
+void
 CC_psdlb(op, dlb)
 	label dlb;
 {

+ 1 - 0
modules/src/em_code/psdnam.c

@@ -2,6 +2,7 @@
 
 /* $Header$ */
 
+void
 CC_psdnam(op, dnam)
 	char *dnam;
 {

+ 1 - 0
modules/src/em_code/pspnam.c

@@ -2,6 +2,7 @@
 
 /* $Header$ */
 
+void
 CC_pspnam(op, pnam)
 	char *pnam;
 {

+ 1 - 0
modules/src/em_code/scon.c

@@ -2,6 +2,7 @@
 
 /* $Header$ */
 
+void
 CC_scon(str, siz)
 	char *str;
 	arith siz;

+ 1 - 0
modules/src/em_code/ucon.c

@@ -2,6 +2,7 @@
 
 /* $Header$ */
 
+void
 CC_ucon(val,siz)
 	char *val;
 	arith siz;