Переглянути джерело

A fix for stabs, and define NDEBUG

ceriel 31 роки тому
батько
коміт
c0a8a2c36f

+ 1 - 0
lang/cem/cemcom.ansi/BigPars

@@ -84,6 +84,7 @@
 
 !File: debug.h
 /*#define DEBUG		1	/* perform various self-tests		*/
+#define NDEBUG		1	/* disable assertions			*/
 
 
 !File: use_tmp.h

+ 1 - 0
lang/cem/cemcom.ansi/SmallPars

@@ -84,6 +84,7 @@
 
 !File: debug.h
 /*#define DEBUG		1	/* perform various self-tests		*/
+#define NDEBUG		1	/* disable assertions			*/
 
 
 !File: use_tmp.h

+ 2 - 1
lang/cem/cemcom.ansi/domacro.c

@@ -30,6 +30,7 @@
 #include	"dbsymtab.h"
 #ifdef DBSYMTAB
 #include	<stb.h>
+#include	<em.h>
 int		IncludeLevel = 0;
 #endif
 
@@ -347,7 +348,7 @@ do_include()
 #ifdef DBSYMTAB
 			IncludeLevel++;
 			if (options['g']) {
-				C_ms_std(FileName, N_BINCL, 0);
+				C_ms_stb_cst(FileName, N_BINCL, 0, (arith) 0);
 			}
 #endif /* DBSYMTAB */
 			if (result != filenm) free(filenm);

+ 3 - 2
lang/cem/cemcom.ansi/input.c

@@ -20,7 +20,8 @@ struct file_info	finfo;
 #include	"lint.h"
 #ifndef NOPP
 #ifdef DBSYMTAB
-#include        <stb.h>
+#include <stb.h>
+#include <em.h>
 extern int      IncludeLevel;
 extern char	options[];
 #endif
@@ -77,7 +78,7 @@ AtEoIF()
 	nestlevel = nestlow;
 #ifdef DBSYMTAB
 	if (options['g'] && IncludeLevel > 0) {
-		C_ms_std(FileName, N_EINCL, 0);
+		C_ms_stb_cst(FileName, N_EINCL, 0, (arith) 0);
 	}
 	IncludeLevel--;
 #endif