Mercurial > hg > Members > kono > nitros9-code
comparison level2/modules/kernel/fdelimg.asm @ 3123:039ddb7c8ad7
l2 kernel: Remove tabs and trailing whitespace, align comments
No functional change (no change to generated binaries).
author | Neal Crook <foofoobedoo@gmail.com> |
---|---|
date | Mon, 28 Nov 2016 08:31:26 +0000 (2016-11-28) |
parents | 1da8ab9ba433 |
children |
comparison
equal
deleted
inserted
replaced
3122:35fb39e4b218 | 3123:039ddb7c8ad7 |
---|---|
15 ldd R$D,u get start block & block count | 15 ldd R$D,u get start block & block count |
16 leau <P$DATImg,x point to DAT image | 16 leau <P$DATImg,x point to DAT image |
17 lsla 2 bytes per block entry | 17 lsla 2 bytes per block entry |
18 leau a,u Point U to block entry | 18 leau a,u Point U to block entry |
19 * Block count in B | 19 * Block count in B |
20 L0B55 | 20 L0B55 |
21 IFNE H6309 | 21 IFNE H6309 |
22 ldw ,u Get block # | 22 ldw ,u Get block # |
23 addw <D.BlkMap Add it to map ptr | 23 addw <D.BlkMap Add it to map ptr |
24 aim #^RAMinUse,0,w | 24 aim #^RAMinUse,0,w |
25 ldw #DAT.Free get empty block marker | 25 ldw #DAT.Free get empty block marker |
45 puls x | 45 puls x |
46 lda P$State,x | 46 lda P$State,x |
47 ora #ImgChg | 47 ora #ImgChg |
48 sta P$State,x | 48 sta P$State,x |
49 ENDC | 49 ENDC |
50 clrb | 50 clrb |
51 rts | 51 rts |
52 |