(defpackage #:alien (:use #:cl) (:export #:call)) (defpackage #:queue (:use #:cl) (:export #:new #:add #:sub #:peek #:to-list #:from-list)) (defpackage #:str (:use #:cl) (:export #:split #:from-list #:read-file)) (defpackage #:small-cl (:import-from #:cl #:block #:catch #:eval-when #:flet #:function #:go #:if #:labels #:let #:let* #:load-time-value #:locally #:macrolet #:multiple-value-call #:multiple-value-prog1 #:progn #:progv #:quote #:return-from #:setq #:symbol-macrolet #:tagbody #:the #:throw #:unwind-protect) (:export #:block #:catch #:eval-when #:flet #:function #:go #:if #:labels #:let #:let* #:load-time-value #:locally #:macrolet #:multiple-value-call #:multiple-value-prog1 #:progn #:progv #:quote #:return-from #:setq #:symbol-macrolet #:tagbody #:the #:throw #:unwind-protect))