xobj_database   xtlang


Defined in:  https://github.com/digego/extempore/tree/v0.8.9/libs/core/xobject.xtm

Implementation

(bind-func xobj_database
  (let ((aa:i8* (alloc))
        (db (xlist (xpair "____" (xlist (xpair "____" (cast null i8*)))))))
    ;; (xinsert db 1 (xpair "class_test" (xlist (xpair "method_test" (cast null i8*)))))
    (lambda ()
      db)))


Back to Index

Similar Entries