Fcalva/cyclone
1
0
Fork 0
mirror of https://github.com/justinethier/cyclone.git synced 2025-05-24 20:45:06 +02:00
Code Issues Projects Releases Packages Wiki Activity Actions

Suppress unneeded write

Browse source
This commit is contained in:
Justin Ethier 2015-12-24 02:21:16 -05:00
parent 1f21b4688a
commit 680149a066
1 changed files with 1 additions and 1 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

2
test.scm
View file

@ -25,7 +25,7 @@
;(write tmp) ;(write tmp)
(cond (cond
((> (length tmp) 1000) ((> (length tmp) 1000)
(write "resetting tmp") ;(write "resetting tmp")
(set! tmp '())) (set! tmp '()))
(else #f)) (else #f))
(loop)))) (loop))))