src/method-impl.lisp: Initialize `suppliedp' flags properly.

[sod] / src / sod.asd.in

diff --git a/src/sod.asd.in b/src/sod.asd.in
index d710fb19f3afd972bc2847d86265f532d7f9eee3..9f36e1ca78c81fe29f1eabcb152102759f1821a4 100644 (file)
--- a/src/sod.asd.in
+++ b/src/sod.asd.in
@@ -7,7 +7,7 @@
 
 ;;;----- Licensing notice ---------------------------------------------------
 ;;;
-;;; This file is part of the Sensble Object Design, an object system for C.
+;;; This file is part of the Sensible Object Design, an object system for C.
 ;;;
 ;;; SOD is free software; you can redistribute it and/or modify
 ;;; it under the terms of the GNU General Public License as published by
@@ -29,7 +29,9 @@
 
 (cl:in-package #:sod-sysdef)
 
-#|@-auto-@|# (load "auto.lisp")
+#|@-auto-@|# (load (merge-pathnames "auto.lisp" *load-pathname*))
+
+#+cmu (require :gray-streams)
 
 ;;;--------------------------------------------------------------------------
 ;;; Definition.
@@ -110,12 +112,12 @@
 
    ;; C type representation protocol.
    (:file "c-types-proto" :depends-on ("package"))
-   (:file "c-types-impl" :depends-on ("c-types-proto"))
+   (:file "c-types-impl" :depends-on ("c-types-proto" "codegen-proto"))
    (:file "c-types-parse" :depends-on
          ("c-types-proto" "c-types-class-impl" "fragment-parse"))
 
    ;; Property set protocol.
-   (:file "pset-proto" :depends-on ("package"))
+   (:file "pset-proto" :depends-on ("package" "c-types-proto"))
    (:file "pset-impl" :depends-on ("pset-proto"))
    (:file "pset-parse" :depends-on ("pset-proto" "lexer-proto"))
 
@@ -129,7 +131,7 @@
          ("module-proto" "pset-proto" "c-types-class-impl" "builtin"))
    (:file "builtin" :depends-on
          ("module-proto" "pset-proto" "c-types-impl" "c-types-class-impl"
-          "classes" "class-layout-proto"))
+          "classes" "class-layout-proto" "method-proto"))
    (:file "module-parse" :depends-on
          ("class-make-proto" "class-finalize-proto"
           "fragment-parse" "lexer-proto" "module-impl"))