/[gcl]/gcl/cmpnew/gcl_cmpvar.lsp
ViewVC logotype

Diff of /gcl/cmpnew/gcl_cmpvar.lsp

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 1.4 by camm, Mon Dec 1 17:00:53 2003 UTC revision 1.5 by camm, Tue Dec 2 14:58:38 2003 UTC
# Line 258  Line 258 
258  ;; outside frame.  CM 20031201  ;; outside frame.  CM 20031201
259  (defmacro bignum-expansion-storage ()  (defmacro bignum-expansion-storage ()
260    `(if (and (boundp '*unwind-exit*) (member 'frame *unwind-exit*))    `(if (and (boundp '*unwind-exit*) (member 'frame *unwind-exit*))
261         "malloc"         "gcl_gmp_alloc"
262       "alloca"))       "alloca"))
263    
264  (defun set-var (loc var ccb)  (defun set-var (loc var ccb)

Legend:
Removed from v.1.4  
changed lines
  Added in v.1.5

savannah-hackers-public@gnu.org
ViewVC Help
Powered by ViewVC 1.1.26