[Commit] nickle compile.c,1.135,1.136
Keith Packard
commit@keithp.com
Thu, 29 May 2003 09:38:01 -0700
- Previous message: [Commit] rrserver protocol,1.12,1.13 show.5c,1.2,1.3
- Next message: [Commit] rrserver clients.5c,NONE,1.1 send.5c,NONE,1.1 dispatch.5c,1.4,1.5 games.5c,1.2,1.3 lex.5c,1.2,1.3 net.5c,1.1,1.2 readreq.5c,1.2,1.3 server.5c,1.2,1.3 connect.5c,1.2,NONE
- Messages sorted by:
[ date ]
[ thread ]
[ subject ]
[ author ]
Committed by: keithp
Update of /local/src/CVS/nickle
In directory home.keithp.com:/tmp/cvs-serv21769
Modified Files:
compile.c
Log Message:
Missing NonLocal around twixt body
Index: compile.c
===================================================================
RCS file: /local/src/CVS/nickle/compile.c,v
retrieving revision 1.135
retrieving revision 1.136
diff -u -d -r1.135 -r1.136
--- compile.c 29 May 2003 06:13:09 -0000 1.135
+++ compile.c 29 May 2003 16:37:59 -0000 1.136
@@ -1077,8 +1077,12 @@
/* here's where the twixt instruction goes */
NewInst (obj, OpTwixt, twixt_inst, stat);
+ obj->nonLocal = NewNonLocal (obj->nonLocal, NonLocalTwixt, 0);
+
/* Compile the body */
obj = _CompileStat (obj, expr->tree.right->tree.left, False, code);
+
+ obj->nonLocal = obj->nonLocal->prev;
BuildInst (obj, OpTwixtDone, inst, stat);
- Previous message: [Commit] rrserver protocol,1.12,1.13 show.5c,1.2,1.3
- Next message: [Commit] rrserver clients.5c,NONE,1.1 send.5c,NONE,1.1 dispatch.5c,1.4,1.5 games.5c,1.2,1.3 lex.5c,1.2,1.3 net.5c,1.1,1.2 readreq.5c,1.2,1.3 server.5c,1.2,1.3 connect.5c,1.2,NONE
- Messages sorted by:
[ date ]
[ thread ]
[ subject ]
[ author ]