Changeset 13824

Timestamp:

Jun 14, 2010, 3:16:46 AM (14 years ago)

Author:

Gary Byers

Message:

Remove some of the foreign-type-ordinal stuff, which never fixed any
bootstrapping issues and just made things worse.

File:

• branches/arm/level-0/l0-misc.lisp (modified) (1 diff)

branches/arm/level-0/l0-misc.lisp

@@ -1136 +1136 @@
 
 
-;;; Useless for anything but using RLET in early level-1 code without
-;;; having to bootstrap canonical type ordinals.
-(%fhave 'parse-foreign-type (lambda (spec) (declare (ignore spec))))
-(%fhave 'foreign-type-ordinal (lambda (thing) (declare (ignore thing)) 0))
-(%fhave '%foreign-type-or-record (lambda (x) (declare (ignore x))))