Hi everyone. I have a test of a user-related function that I don't can see
why don't work :
#lang racket
(require rackunit)
(require "../../main.rkt")
(check-equal?
(with-output-to-string (lambda ()
(with-input-from-string
"exit 0"
(lambda ()
(refine-main)))))
""
"Consigo sair antes de comecar o tutorial")
I think that this will call refine-main and, when refine-main do a
readline, will receive "exit 0" as string, and when display something, will
appear as return of with-output-to-string, but this code don't work :(
--
You received this message because you are subscribed to the Google Groups
"Racket Users" group.
To unsubscribe from this group and stop receiving emails from it, send an email
to racket-users+unsubscr...@googlegroups.com.
For more options, visit https://groups.google.com/d/optout.
