RosettaCodeData/Task/Variable-size-Get/Common-Lisp/variable-size-get-1.lisp

7 lines
170 B
Common Lisp
Raw Permalink Normal View History

2013-04-11 01:07:29 -07:00
(let ((a (cons 1 2))
(b (make-array 10))
(c "a string"))
(list (hcl:find-object-size a)
(hcl:find-object-size b)
(hcl:find-object-size c)))