godzil/tack
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

Some more bug fixes

Browse Source
This commit is contained in:
ceriel
1987-04-06 17:59:57 +00:00
parent f6f3a93bc4
commit fd0a1da0a7
3 changed files with 8 additions and 6 deletions
Download Patch File Download Diff File Expand all files Collapse all files

10
mach/mantra/int/mloop9
View File

@@ -200,7 +200,7 @@ rck_1W: move.l (sp)+,a0
!--------------------------------------------------------------------------
nop_z:
lblnop: lea nopln+16,a0 ; move.l (a6),d1
lblnop: lea nopln+16,a0 ; clr.l d1; mov (a6),d1
bsr itoa
lea nopln+33,a0 ; move.l sp,d1
bsr itoa
@@ -244,7 +244,7 @@ fil_l: adroff ; move.w (a5),d0
0: jmp (a4)
!-----------------------------------------------------------------------------
lni_z: add.l #1,(a6)
lni_z: add #1,(a6)
#if count+flow+prof
add.l #1,countptr
#if prof
@@ -255,8 +255,8 @@ lni_z: add.l #1,(a6)
lin_l: adroff ; move.w (a5),d0 ; bra 1f
lin_q: move.l (sp)+,d0 ; bra 1f
lin_s0: move.l #0,d0 ; move.b (a3)+,d0
1: cmp.l (a6),d0 ; beq 9f
move.l d0,(a6)
1: cmp (a6),d0 ; beq 9f
mov d0,(a6)
#if count+flow+prof
move.l countfld,d1
add.l d0,d1
@@ -271,7 +271,7 @@ lin_s0: move.l #0,d0 ; move.b (a3)+,d0
#if last
bsr nexttab ;
move.l 4(a6),(a1)+ !store new line
move.l (a6),(a1) !number in buffer lasttable
mov (a6),(a1) !number in buffer lasttable
#endif
#if count
move.l countptr,d1 !LINE NUMBER IN d1