Apple-2-SW/emailler
1
0
Fork 0
mirror of https://github.com/bobbimanners/emailler.git synced 2025-03-03 07:29:58 +00:00
Code Issues Projects Releases Wiki Activity

fixed bug affecting printing of strings that crossed a page boundary

Browse Source 
git-svn-id: http://svn.code.sf.net/p/netboot65/code@5 93682198-c243-4bdb-bd91-e943c89aac3b
This commit is contained in:
jonnosan 2009-01-10 12:45:57 +00:00
parent b035d8a091
commit 90aa476625
2 changed files with 9 additions and 7 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

12
clients/utherboot.s
View File

@ -34,7 +34,7 @@
.import __CODE_LOAD__
.import __CODE_RUN__
.import __CODE_SIZE__
.bss
@ -62,6 +62,11 @@ bin_file_jmp: .res 3
ldax #$0800
jsr startup_copymem
lda $c08b ;enable language : card read RAM, write RAM, BANK 1
lda $c08b ;this soft switch needs to be read twice
;relocate the CODE segment
ldax #__CODE_LOAD__
stax copy_src
@ -87,9 +92,6 @@ bin_file_jmp: .res 3
ldax #__DATA_SIZE__
jsr startup_copymem
lda $c08b ;enable language : card read RAM, write RAM, BANK 1
lda $c08b ;this soft switch needs to be read twice
jmp init
; copy memory
@ -208,7 +210,7 @@ download:
jsr print
clc
rts
.rodata
downloading_msg: .asciiz "DOWNLOADING "

4
inc/commonprint.i
View File

@ -88,9 +88,9 @@ print:
beq @done_print
jsr print_a
inc pptr
bcc @print_loop
bne @print_loop
inc pptr+1
bcc @print_loop ;if we ever get to $fff, we've probably gone far enough ;-)
bne @print_loop ;if we ever get to $ffff, we've probably gone far enough ;-)
@done_print:
rts