about summary refs log tree commit diff stats
diff options
context:
space:
mode:
-rw-r--r--x.rkt12
1 files changed, 4 insertions, 8 deletions
diff --git a/x.rkt b/x.rkt
index ef5ad28b..aecc714a 100644
--- a/x.rkt
+++ b/x.rkt
@@ -3,12 +3,8 @@
 (open-charterm)
 (charterm-clear-screen)
 (charterm-cursor 5 5)
-(displayln-color "Hello" #:fg 'green)  ; works
-(charterm-cursor 25 5)
-(displayln-color " Hello" #:fg 'green)  ; works
-;? ;? (charterm-cursor 1 6) ;? 2
-;? ;? (display-color "Hello" #:fg 'green)  ; err: cursor moves to start of line ;? 1
-;? (charterm-newline)  ; doesn't work after display; somehow runs before it ;? 1
-;? ;? (charterm-clear-line) ;? 3
-;? (displayln-color "World" #:fg 'green) ;? 1
+(display-color "Hello" #:fg 'green)
+(flush-output)
+(charterm-newline)
+(display-color "Hello" #:fg 'green)
 (close-charterm)