Untitled

mail@pastecode.io avatar
unknown
lisp
a year ago
260 B
4
Indexable
Never
(defpackage :package-test
  (:use #:cl #:make-hash)
  (:export :foo))

(in-package :package-test)

(defparameter *letter-table*
  (make-hash:make-hash :initial-contents '(a 1 b 2 c 3 d 4 e 5 f 6 g 7 h 8 i 9)))

(defun foo (sym)
  (gethash sym *letter-table*))