remove useless display from example
This commit is contained in:
parent
2afa2625c2
commit
bbc3a6bb9a
|
@ -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))
|
||||
|
|
Loading…
Reference in New Issue