[Commit] nickle ChangeLog, 1.4, 1.5 compile.c, 1.142, 1.143 version.m4, 1.3, 1.4

[Keith Packard]

Committed by: keithp

Update of /local/src/CVS/nickle
In directory evo:/local/src/nickle

Modified Files:
	ChangeLog compile.c version.m4 
Log Message:
	* compile.c: (CompileLvalue):
	* version.m4:
	Couple of valgrind problems:
	Initialize branch.offset field in all instructions so that
	CompileIsReachable can blindly fetch them before the real
	offset is set.
	Set the static link offset to zero for names contained in
	declarations; it was otherwise uninitialized.


Index: ChangeLog
===================================================================
RCS file: /local/src/CVS/nickle/ChangeLog,v
retrieving revision 1.4
retrieving revision 1.5
diff -u -d -r1.4 -r1.5
--- ChangeLog	13 May 2003 18:18:05 -0000	1.4
+++ ChangeLog	25 Oct 2003 00:05:37 -0000	1.5
@@ -1,3 +1,14 @@
+2003-10-24  Keith Packard  <keithp at keithp.com>
+
+	* compile.c: (CompileLvalue):
+	* version.m4:
+	Couple of valgrind problems:
+	Initialize branch.offset field in all instructions so that
+	CompileIsReachable can blindly fetch them before the real
+	offset is set.
+	Set the static link offset to zero for names contained in
+	declarations; it was otherwise uninitialized.
+
 1.99.0:	First semi-public test release
 2.00:	Stable enough for Debian package
 2.20:   Things are pretty good now

Index: compile.c
===================================================================
RCS file: /local/src/CVS/nickle/compile.c,v
retrieving revision 1.142
retrieving revision 1.143
diff -u -d -r1.142 -r1.143
--- compile.c	25 Jul 2003 23:47:54 -0000	1.142
+++ compile.c	25 Oct 2003 00:05:37 -0000	1.143
@@ -175,6 +175,12 @@
 	obj->used_stat--;
 }
 
+/*
+ * Set branch offsets to zero so that CompileIsReachable can
+ * use them before the real values get filled in.  This is correct
+ * because the reachability targets are always in nested blocks which
+ * can never be the target for this instruction
+ */
 #define NewInst(_o,_op,_i,_stat) \
 {\
     InstPtr __inst__; \
@@ -183,6 +189,7 @@
     __inst__ = ObjCode (_o, _i); \
     __inst__->base.opCode = (_op); \
     __inst__->base.flags = 0; \
+    __inst__->branch.offset = 0; \
 }
 
 #define BuildInst(_o,_op,_inst,_stat) \
@@ -191,6 +198,7 @@
     (_inst) = ObjCode(_o, ObjLast(_o)); \
     (_inst)->base.opCode = (_op); \
     (_inst)->base.flags = 0; \
+    (_inst)->branch.offset = 0; \
 }
 
 #define SetFlag(_o,_f) ((_o)->used ? (ObjCode((_o), \
@@ -464,6 +472,8 @@
 	    for (decl = expr->decl.decl; decl; decl = decl->next)
 		s = decl->symbol;
 	}
+	/* the symbol was compiled in this frame */
+	depth = 0;
         goto isName;
     case NAME:
 	s = CompileCheckSymbol (obj, stat, expr, code,

Index: version.m4
===================================================================
RCS file: /local/src/CVS/nickle/version.m4,v
retrieving revision 1.3
retrieving revision 1.4
diff -u -d -r1.3 -r1.4
--- version.m4	15 Oct 2003 19:28:14 -0000	1.3
+++ version.m4	25 Oct 2003 00:05:37 -0000	1.4
@@ -1,7 +1,7 @@
 dnl This file is maintained automatically by update-version.sh
 dnl The file format is finicky, so do not hand-edit lightly.
-dnl Last updated Wed Oct 15 12:27:06 PDT 2003
+dnl Last updated Fri Oct 24 17:00:06 PDT 2003
 dnl CURHEADER $Header$
-dnl OLDHEADER <Header: /local/src/CVS/nickle/version.m4,v 1.2 2003/10/14 01:43:55 bart Exp >
-dnl CURVERSION 2.22
-define([VERSION_NUMBER],[2.22])
+dnl OLDHEADER <Header: /local/src/CVS/nickle/version.m4,v 1.3 2003/10/15 19:28:14 bart Exp >
+dnl CURVERSION 2.23
+define([VERSION_NUMBER],[2.23])