Reset the stdin console when a program starts.

2025-02-24 09:29:07 +00:00 · 2013-12-24 15:26:05 -05:00 · 2013-12-24 15:26:05 -05:00 · 6f72758587
commit 6f72758587
parent 0dc8a278c7
1 changed files with 17 additions and 2 deletions
--- a/libsrc/atmos/read.s
+++ b/libsrc/atmos/read.s
@ -7,6 +7,7 @@
 ;

        .export         _read
+        .constructor    initstdin

        .import         popax
        .importzp       ptr1, ptr2, ptr3
@ -63,8 +64,22 @@ L9:     lda     ptr3

 .endproc

-.data
+
+;--------------------------------------------------------------------------
+; initstdin:  Reset the stdin console.
+
+.segment        "INIT"
+
+initstdin:
+        ldx     #<-1
+        stx     text_count
+        rts
+
+
+;--------------------------------------------------------------------------
+
+.bss

 text_count:
-        .byte   <-1
+        .res    1