Plaster
New
List
Login
common-lisp
default
anonymous
2020.06.13 17:52:33
* (ql:quickload :aeai-pattern) To load "aeai-pattern": Load 1 ASDF system: aeai-pattern ; Loading "aeai-pattern" . Switching to the BALLAND2006 optimizer (:AEAI-PATTERN) * (in-package :aeai-pattern) #<PACKAGE "AEAI-PATTERN"> * (peek-db) NIL * (put-db 1 2) 2 * (put-db 3 4) 4 * (peek-db) NIL
Raw
Annotate
Repaste
Edit
Annotations
common-lisp
default
anonymous
2020.06.13 17:55:25
* (inspect #'put-db) The object is a CLOSURE named PUT-DB. 0. Lambda-list: (KEY VAL) 1. Ftype: (FUNCTION (T T) (VALUES T &OPTIONAL)) 2. Closed over values: (#<HASH-TABLE :TEST EQUAL :COUNT 2 {1001F6FB33}>) > * (inspect #'peek-db) The object is a CLOSURE named PEEK-DB. 0. Lambda-list: NIL 1. Ftype: (FUNCTION NIL (VALUES NULL &OPTIONAL)) 2. Closed over values: (#<HASH-TABLE :TEST EQUAL :COUNT 0 {1001F61B73}>)
Raw
Repaste
Edit