Commit 16a5aa75 authored by Daniel Kochmański's avatar Daniel Kochmański
Browse files

restruct: move format tests to separate directory


Signed-off-by: Daniel Kochmański's avatarDaniel Kochmański <daniel@turtleware.eu>
parent 938dcb58
;-*- Mode: Lisp -*-
;;;; Author: Paul Dietz
;;;; Created: Mon Feb 23 05:08:17 2004
;;;; Contains: Tests of FORMAT
(in-package :cl-test)
(defun def-format-test (name args result)
`(deftest ,name
(equalt
(with-standard-io-syntax
(with-output-to-string (s) (format s ,@args)))
result)
t))
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment