remove useless display from example

master
nixo 2021-01-18 10:23:55 +01:00
parent 2afa2625c2
commit bbc3a6bb9a
1 changed files with 0 additions and 2 deletions

View File

@ -18,5 +18,3 @@ Fc Match String: ~A
(let ((pattern (make-pattern '())))
(format #t "There are a total of ~A fonts!\n" (length (pattern-list pattern))))
(display (make-pattern))