comment out `read-history` test

This commit is contained in:
Sunrim KIM (keen) 2014-08-09 03:53:53 +09:00
parent cc35671a0a
commit 9583cfa4e0
1 changed files with 3 additions and 3 deletions

View File

@ -19,7 +19,7 @@
;; (readline "prompt")
(define testfile "./picrin_readline_test_file")
(define testfile "picrin_readline_test_file")
(test-begin)
(test 0 (history-length))
@ -49,11 +49,11 @@
(test 7 (history-length))
(clear-history)
(test 0 (history-length))
(read-history testfile)
;(read-history testfile)
(test 7 (history-length))
(clear-history)
(truncate-file testfile 5)
(read-history testfile)
;(read-history testfile)
(test 5 (history-length))
(test-end)