summaryrefslogtreecommitdiff
path: root/Lisp/data-types.lisp
diff options
context:
space:
mode:
authorMatthias Benkard <code@mail.matthias.benkard.de>2007-09-16 23:12:45 +0200
committerMatthias Benkard <code@mail.matthias.benkard.de>2007-09-16 23:12:45 +0200
commit69e4519cc42f43814ae617dd2d7fb8bf06599e5c (patch)
treebeeb51a291d5222317c8d93fdc25515d5ac62e42 /Lisp/data-types.lisp
parenta136324b6f1cd33a37ec902d46451e97290fa3da (diff)
PRIMITIVE-INVOKE: Simplify memory allocation.
darcs-hash:c123cb0cf9d6d6264904dde03970cd44bb7d3a01
Diffstat (limited to 'Lisp/data-types.lisp')
-rw-r--r--Lisp/data-types.lisp4
1 files changed, 4 insertions, 0 deletions
diff --git a/Lisp/data-types.lisp b/Lisp/data-types.lisp
index 1095e38..25bbc21 100644
--- a/Lisp/data-types.lisp
+++ b/Lisp/data-types.lisp
@@ -218,3 +218,7 @@ an __exception__, you can simply send it the `self' message.
;;;; (@* "Convenience types")
(deftype c-pointer ()
'(satisfies pointerp))
+
+
+(deftype argument-number ()
+ `(integer 0 ,call-arguments-limit))