src/final.lisp: Slightly tweak `clear-the-decks' usage.

[sod] / src / builtin.lisp

diff --git a/src/builtin.lisp b/src/builtin.lisp
index 0787b8dec7ccee1ef79a47a86899f4172e1bcfbb..97075785ee569b5e695ae527ee5a7da7612021b3 100644 (file)
--- a/src/builtin.lisp
+++ b/src/builtin.lisp
@@ -564,8 +564,6 @@ (defun make-builtin-module ()
                                                    :case :common)
                               :state nil)))
     (with-module-environment (module)
                                                    :case :common)
                               :state nil)))
     (with-module-environment (module)

-      (dolist (name '("va_list" "size_t" "ptrdiff_t" "wchar_t"))
-       (add-to-module module (make-instance 'type-item :name name)))

       (flet ((header-name (name)
               (concatenate 'string "\"" (string-downcase name) ".h\""))
             (add-includes (reason &rest names)
       (flet ((header-name (name)
               (concatenate 'string "\"" (string-downcase name) ".h\""))
             (add-includes (reason &rest names)