projects
/
sbcl.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
1.0.24.19: COMPILE-TIME reports timings at millisecond accuracy
[sbcl.git]
/
src
/
compiler
/
globaldb.lisp
diff --git
a/src/compiler/globaldb.lisp
b/src/compiler/globaldb.lisp
index
6c11677
..
7930502
100644
(file)
--- a/
src/compiler/globaldb.lisp
+++ b/
src/compiler/globaldb.lisp
@@
-1173,6
+1173,19
@@
:default (let ((class (find-classoid name nil)))
(when class (classoid-layout class))))
:default (let ((class (find-classoid name nil)))
(when class (classoid-layout class))))
+;;; DEFTYPE lambda-list
+(define-info-type
+ :class :type
+ :type :lambda-list
+ :type-spec list
+ :default nil)
+
+(define-info-type
+ :class :type
+ :type :source-location
+ :type-spec t
+ :default nil)
+
(define-info-class :typed-structure)
(define-info-type
:class :typed-structure
(define-info-class :typed-structure)
(define-info-type
:class :typed-structure