Changeset 5948

Timestamp:

Feb 19, 2007, 3:50:41 AM (18 years ago)

Author:

Gary Byers

Message:

Use keywords more consistently.

(Note: there seems to be a bug which is keeping the cdb data structures
from getting defined correctly at load time; the workaround is to
compile foreign-types.lisp - which defines them - in the same session as
and before db-io - which uses them - is compiled.)

File:

• trunk/ccl/lib/foreign-types.lisp (modified) (1 diff)

trunk/ccl/lib/foreign-types.lisp

@@ -1702 +1702 @@
     (def-foreign-type nil
         (struct :cdb-datum
-                (data (* t))
-                (size (:unsigned 32))))
+                (:data (* t))
+                (:size (:unsigned 32))))
     (def-foreign-type nil
-        (:struct dbm-constant
+        (:struct :dbm-constant
                  (:class (:unsigned 32))
                  (:pad (:unsigned 32))