File tree Expand file tree Collapse file tree 1 file changed +4
-8
lines changed Expand file tree Collapse file tree 1 file changed +4
-8
lines changed Original file line number Diff line number Diff line change @@ -669,19 +669,17 @@ ti_PutC:
669
669
; sp + 6 : Slot number
670
670
; return:
671
671
; Character written if no failure
672
- pop de
673
672
pop hl
673
+ pop de
674
674
pop bc
675
675
push bc
676
- push hl
677
676
push de
678
- ld a , l
677
+ push hl
678
+ ld a , e
679
679
ld (char_in) , a
680
680
call util_is_slot_open
681
681
jp nz , util_ret_neg_one
682
- push hl
683
682
call util_is_in_ram
684
- pop hl
685
683
jp c , util_ret_neg_one
686
684
_PutChar:
687
685
call util_get_slot_size
@@ -1144,15 +1142,13 @@ ti_GetName:
1144
1142
; sp + 6 : slot index
1145
1143
; return:
1146
1144
; n/a
1147
- pop de
1148
1145
pop hl
1146
+ pop de
1149
1147
pop bc
1150
1148
push bc
1151
- push hl
1152
1149
push de
1153
1150
push hl
1154
1151
call util_is_slot_open
1155
- pop de
1156
1152
ret nz
1157
1153
call util_get_vat_ptr
1158
1154
ld hl , (hl)
You can’t perform that action at this time.
0 commit comments