Parent Directory | Revision Log | Patch
revision 1.1.2.1 by camm, Sun Sep 14 02:30:33 2003 UTC | revision 1.1.2.2 by camm, Mon Dec 1 16:49:59 2003 UTC | |
---|---|---|
# | Line 50 | Line 50 |
50 | (INTEGER | (INTEGER |
51 | (wt-nl "SETQ_IO(V" (var-loc var)"," | (wt-nl "SETQ_IO(V" (var-loc var)"," |
52 | "V" (var-loc var)"alloc,") | "V" (var-loc var)"alloc,") |
53 | (wt "(") (wt-vs (var-ref var)) (wt "));")) | (wt "(") (wt-vs (var-ref var)) (wt "),") |
54 | (wt (bignum-expansion-storage) ");")) | |
55 | (t | (t |
56 | (wt-nl "V" (var-loc var) "=") | (wt-nl "V" (var-loc var) "=") |
57 | (case (var-kind var) | (case (var-kind var) |
|
savannah-hackers-public@gnu.org | ViewVC Help |
Powered by ViewVC 1.1.26 |