Changeset 5136


Ignore:
Timestamp:
Sep 5, 2006, 9:49:09 PM (18 years ago)
Author:
Gary Byers
Message:

In DO-GC-AREAS, don't use comma before call to AREA-SUCC. (Cross-compilation/
word-size issue.)

File:
1 edited

Legend:

Unmodified
Added
Removed

  • trunk/ccl/lib/macros.lisp

    r5044 r5136  
    31703170       (declare (fixnum ,initial-area ,area))
    31713171       (loop
    3172          (setq ,area (%fixnum-ref ,area ,(area-succ)))
     3172         (setq ,area (%fixnum-ref ,area (area-succ)))
    31733173         (when (eql ,area ,initial-area)
    31743174           (return))
Note: See TracChangeset for help on using the changeset viewer.