Changeset 13089


Ignore:
Timestamp:
Oct 22, 2009, 9:55:24 PM (10 years ago)
Author:
gz
Message:

Fix build (bootstrapping)

File:
1 edited

Legend:

Unmodified
Added
Removed
  • branches/working-0711/ccl/library/core-files.lisp

    r13084 r13089  
    756756
    757757(defun core-package-names (pkg-ptr)
    758   (assert (core-uvtypep pkg-ptr 'package))
     758  (assert (core-uvtypep pkg-ptr :package))
    759759  (copy-from-core (core-uvref pkg-ptr pkg.names) :depth 2))
    760760
    761761(defun core-package-name (pkg-ptr)
    762   (assert (core-uvtypep pkg-ptr 'package)) 
     762  (assert (core-uvtypep pkg-ptr :package)) 
    763763  (copy-from-core (core-car (core-uvref pkg-ptr pkg.names)) :depth 1))
    764764
Note: See TracChangeset for help on using the changeset viewer.