(defpackage #:cbuiltins (:use #:common-lisp) (:export #:connect #:bt-quit #:help #:look) ) (in-package #:cbuiltins) (defun connect () (format *standard-output* "TODO: connect~%")) (defun bt-quit () (format *standard-output* "TODO: quit~%")) (defun help () (format *standard-output* "TODO: help~%")) (defun look () (format *standard-output* "TODO: look~%")) (provide "cbuiltins")