tests/format.lisp

   1 (test (string= "a" (format nil "a")))
   2
   3 (test (string= "~" (format nil "~~")))
   4
   5 (test (string= "a~a" (format nil "a~~a")))
   6
   7 (test (string= "a
   8 a" (format nil "a~%a")))
   9
  10 (test (string= "this is foo" (format nil "this is ~a" "foo")))
  11
  12 (test (string= "this is \"foo\"" (format nil "this is ~S" "foo")))