hg.stevelosh.com > cl-losh

src/base.lisp @ 6bf064d46006 

Add rb-clear and (rb-contents ... :result-type 'vector)
author Steve Losh <steve@stevelosh.com>
date Sat, 10 Apr 2021 13:26:30 -0400
parents e9553a14c887
children (none) 
(in-package :losh.base)

(defun mkstr (&rest args)
  ;;; From On Lisp, page 58.
  (with-output-to-string (s)
    (dolist (a args)
      (princ a s))))

(defun symb (&rest args)
  ;;; From On Lisp, page 58.
  (values (intern (apply #'mkstr args))))