ViewVC Help
View File | Revision Log | Show Annotations | Download File
/cvs/microscheme/scheme.c
(Generate patch)

Comparing microscheme/scheme.c (file contents):
Revision 1.26 by root, Sat Nov 28 05:12:53 2015 UTC vs.
Revision 1.27 by root, Sat Nov 28 05:13:08 2015 UTC

… …
4709 4709
4710 case OP_QUIT: /* quit */ 4710 case OP_QUIT: /* quit */
4711 if (is_pair (args)) 4711 if (is_pair (args))
4712 SCHEME_V->retcode = ivalue (a); 4712 SCHEME_V->retcode = ivalue (a);
4713 4713
4714 exit(0);//D
4715 return -1; 4714 return -1;
4716 4715
4717 case OP_GC: /* gc */ 4716 case OP_GC: /* gc */
4718 gc (SCHEME_A_ NIL, NIL); 4717 gc (SCHEME_A_ NIL, NIL);
4719 s_return (S_T); 4718 s_return (S_T);

Diff Legend

– Removed lines
+ Added lines
< Changed lines
> Changed lines