aboutsummaryrefslogtreecommitdiff
path: root/src/interp/daase.lisp
diff options
context:
space:
mode:
authordos-reis <gdr@axiomatics.org>2013-06-15 15:07:51 +0000
committerdos-reis <gdr@axiomatics.org>2013-06-15 15:07:51 +0000
commit22a6f56b6009ac7cdbc4d38ef4ab6f7bfa46dc44 (patch)
tree9e468affbeb1d8a5ec341a5c17cf6483ab2058fc /src/interp/daase.lisp
parentb8f356b0f9492f8a32bc1951b3b598e3ec1e9d4e (diff)
downloadopen-axiom-22a6f56b6009ac7cdbc4d38ef4ab6f7bfa46dc44.tar.gz
Store category defaults constructor as part of category constructor DB.
Diffstat (limited to 'src/interp/daase.lisp')
-rw-r--r--src/interp/daase.lisp3
1 files changed, 2 insertions, 1 deletions
diff --git a/src/interp/daase.lisp b/src/interp/daase.lisp
index 64541852..7ce0b1d3 100644
--- a/src/interp/daase.lisp
+++ b/src/interp/daase.lisp
@@ -231,7 +231,8 @@
capsule-definitions ; capsule-level definitions
template ; for a category, this is the generic instance.
; for a functor, this is the template.
- lookup-function ; for a functor, lookup function.
+ lookup-function ; for a functor, lookup function. For category
+ ; constructor, default package constructor.
) ; database structure
(deftype |%Database| nil 'database)