From 0fdcbf0a159c9ee4df69bad2c617de01dcb0fd3c Mon Sep 17 00:00:00 2001
From: Teddy Wing
Date: Sun, 16 Apr 2023 19:55:53 +0200
Subject: Add test system

Write a test for the `write-xfdf` function.

Worked out how to create the test system from:

- https://lispcookbook.github.io/cl-cookbook/testing.html
- https://github.com/sjl/cl-digraph/blob/master/cl-digraph.test.asd
- https://github.com/fukamachi/dexador/blob/master/dexador-test.asd

Add the test string to the `write-xfdf` function to pass the test and
check that the test runner is set up correctly.
---
 scratch.lisp | 1 +
 1 file changed, 1 insertion(+)
 create mode 100644 scratch.lisp

(limited to 'scratch.lisp')

diff --git a/scratch.lisp b/scratch.lisp
new file mode 100644
index 0000000..7e2d577
--- /dev/null
+++ b/scratch.lisp
@@ -0,0 +1 @@
+(ql:quickload "xfdf-test")
-- 
cgit v1.2.3