Mercurial > hg > Members > kono > nitros9-code

comparison level1/cmds/unlink.asm @ 0:6641a883d6b0

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Initial revision
author boisy
date Thu, 04 Apr 2002 16:34:12 +0000
parents
children e9ce43cc215e
comparison
equal deleted inserted replaced
-1:000000000000 0:6641a883d6b0
1 ********************************************************************
2 * Unlink - Unlink memory module
3 *
4 * $Id$
5 *
6 * Ed. Comments Who YY/MM/DD
7 * ------------------------------------------------------------------
8 * 2 Original Microware distribution version
9
10 nam Unlink
11 ttl Unlink memory module
12
13 * Disassembled 02/04/03 22:32:26 by Disasm v1.6 (C) 1988 by RML
14
15 ifp1
16 use defsfile
17 endc
18
19 tylg set Prgrm+Objct
20 atrv set ReEnt+rev
21 rev set $01
22
23 mod eom,name,tylg,atrv,start,size
24
25 u0000 rmb 512
26 size equ .
27
28 name fcs /Unlink/
29 fcb $02
30
31 start clra
32 clrb
33 os9 F$Link
34 bcs L0032
35 os9 F$UnLink
36 bcs L0032
37 os9 F$UnLink
38 bcs L0032
39 lda ,x+
40 cmpa #C$COMA
41 beq start
42 lda ,-x
43 cmpa #C$CR
44 bne start
45 clrb
46 L0032 os9 F$Exit
47
48 emod
49 eom equ *
50 end
51