aboutsummaryrefslogtreecommitdiff
path: root/src/interp
diff options
context:
space:
mode:
authordos-reis <gdr@axiomatics.org>2013-05-15 18:51:51 +0000
committerdos-reis <gdr@axiomatics.org>2013-05-15 18:51:51 +0000
commit32bebda8ae3e2b11cb198796f9e0b35711dbffa4 (patch)
tree82b46b7380569ac24b88e65b99c8b58ceb2648fe /src/interp
parent974674143225554b96178718d83134946c58beb3 (diff)
downloadopen-axiom-32bebda8ae3e2b11cb198796f9e0b35711dbffa4.tar.gz
Add DB documentation accessor
Diffstat (limited to 'src/interp')
-rw-r--r--src/interp/daase.lisp3
1 files changed, 3 insertions, 0 deletions
diff --git a/src/interp/daase.lisp b/src/interp/daase.lisp
index d8175d90..526c53b3 100644
--- a/src/interp/daase.lisp
+++ b/src/interp/daase.lisp
@@ -310,6 +310,9 @@
(defmacro |dbLookupFunction| (db)
`(database-lookup-function ,db))
+(defmacro |dbDocumentation| (db)
+ `(database-documentaion ,db))
+
(defun |makeDB| (c &optional (k nil) (a nil))
(let ((db (make-database)))
(|makeConstructor| c k a)