Changeset 9828


Ignore:
Timestamp:
Jun 24, 2008, 7:12:41 PM (11 years ago)
Author:
gz
Message:

From Len Livshin: fix for null pc case in arg-names-from-map

File:
1 edited

Legend:

Unmodified
Added
Removed
  • branches/working-0711/ccl/lib/arglist.lisp

    r9177 r9828  
    209209              (keys))
    210210      (let* ((rest nil)
    211              (map (if (> pc target::arg-check-trap-pc-limit)
     211             (map (if (and pc (> pc target::arg-check-trap-pc-limit))
    212212                    (car (function-symbol-map lfun)))))
    213213        (if (and map pc)
Note: See TracChangeset for help on using the changeset viewer.