blob: fa78407df15dc1c7e384769f65dc68ff6da4c0de (
plain) (
tree)
|
|
(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")
|