Changeset 8748


Ignore:
Timestamp:
Mar 13, 2008, 3:59:18 AM (11 years ago)
Author:
rme
Message:

CCL::BUG for x8632.

File:
1 edited

Legend:

Unmodified
Added
Removed
  • branches/ia32/level-0/l0-misc.lisp

    r6917 r8748  
    8484(defun bug (arg)
    8585  (if (typep arg 'simple-base-string)
    86     #+x8664-target
     86    #+x86-target
    8787    (debug-trap-with-string arg)
    88     #-x8664-target
     88    #-x86-target
    8989    (let* ((len (length arg)))
    9090      (%stack-block ((buf (1+ len)))
Note: See TracChangeset for help on using the changeset viewer.