Mercurial > hg > Members > kono > nitros9-code
annotate level1/cmds/link.asm @ 1678:40322608e006
tmode is now made from xmode, dsave modified to handle new tmode parameter
author | boisy |
---|---|
date | Thu, 29 Jul 2004 19:04:12 +0000 |
parents | 84ea83668304 |
children |
rev | line source |
---|---|
0 | 1 ******************************************************************** |
2 * Link - Link to a module | |
3 * | |
4 * $Id$ | |
5 * | |
1325
84ea83668304
Redid comments, reset all rev nibbles that weren't explictly set to 0
boisy
parents:
924
diff
changeset
|
6 * Edt/Rev YYYY/MM/DD Modified by |
84ea83668304
Redid comments, reset all rev nibbles that weren't explictly set to 0
boisy
parents:
924
diff
changeset
|
7 * Comment |
0 | 8 * ------------------------------------------------------------------ |
1325
84ea83668304
Redid comments, reset all rev nibbles that weren't explictly set to 0
boisy
parents:
924
diff
changeset
|
9 * 5 ????/??/?? |
84ea83668304
Redid comments, reset all rev nibbles that weren't explictly set to 0
boisy
parents:
924
diff
changeset
|
10 * From Tandy OS-9 Level One VR 02.00.00. |
0 | 11 |
12 nam Link | |
13 ttl Link to a module | |
14 | |
15 * Disassembled 98/09/10 23:13:54 by Disasm v1.6 (C) 1988 by RML | |
16 | |
17 ifp1 | |
18 use defsfile | |
19 endc | |
20 | |
21 tylg set Prgrm+Objct | |
22 atrv set ReEnt+rev | |
1325
84ea83668304
Redid comments, reset all rev nibbles that weren't explictly set to 0
boisy
parents:
924
diff
changeset
|
23 rev set $00 |
0 | 24 edition set 5 |
25 | |
26 mod eom,name,tylg,atrv,start,size | |
27 | |
924 | 28 org 0 |
0 | 29 u0000 rmb 450 |
30 size equ . | |
31 | |
32 name fcs /Link/ | |
33 fcb edition | |
34 | |
35 start clra | |
36 clrb | |
37 os9 F$Link | |
38 bcs L0026 | |
39 lda ,x+ | |
40 cmpa #C$COMA | |
41 beq start | |
42 lda ,-x | |
43 cmpa #C$CR | |
44 bne start | |
45 clrb | |
46 L0026 os9 F$Exit | |
47 | |
48 emod | |
49 eom equ * | |
50 end | |
51 |