Mercurial > hg > Members > kono > nitros9-code

annotate 3rdparty/packages/cc/sources/abort.a @ 2609:9dd4f422aac7

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Added NitrOS-9 ROM Kit from Cloud-9
author Boisy Pitre <boisy.pitre@nuance.com>
date Tue, 31 Jan 2012 13:57:35 -0600
parents 0198655f2552
children
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
rev   line source
867
0198655f2552 Added sources
boisy
parents:
diff changeset
1 use ..../defs/os9defs.a
0198655f2552 Added sources
boisy
parents:
diff changeset
2
0198655f2552 Added sources
boisy
parents:
diff changeset
3 psect abort,0,0,1,0,0
0198655f2552 Added sources
boisy
parents:
diff changeset
4 abort: pshs d,x,y,u
0198655f2552 Added sources
boisy
parents:
diff changeset
5 leax core,pcr
0198655f2552 Added sources
boisy
parents:
diff changeset
6 ldb #3
0198655f2552 Added sources
boisy
parents:
diff changeset
7 clra
0198655f2552 Added sources
boisy
parents:
diff changeset
8 pshs d
0198655f2552 Added sources
boisy
parents:
diff changeset
9 pshs x
0198655f2552 Added sources
boisy
parents:
diff changeset
10 lbsr creat
0198655f2552 Added sources
boisy
parents:
diff changeset
11
0198655f2552 Added sources
boisy
parents:
diff changeset
12 cmpd #-1
0198655f2552 Added sources
boisy
parents:
diff changeset
13 bne abort10
0198655f2552 Added sources
boisy
parents:
diff changeset
14 ldd errno,y
0198655f2552 Added sources
boisy
parents:
diff changeset
15 os9 F$EXIT
0198655f2552 Added sources
boisy
parents:
diff changeset
16
0198655f2552 Added sources
boisy
parents:
diff changeset
17 abort10 leas 4,s
0198655f2552 Added sources
boisy
parents:
diff changeset
18 pshs b
0198655f2552 Added sources
boisy
parents:
diff changeset
19
0198655f2552 Added sources
boisy
parents:
diff changeset
20 leax 1,s
0198655f2552 Added sources
boisy
parents:
diff changeset
21 ldd #16
0198655f2552 Added sources
boisy
parents:
diff changeset
22 bsr doabort
0198655f2552 Added sources
boisy
parents:
diff changeset
23
0198655f2552 Added sources
boisy
parents:
diff changeset
24 leax _cstart,pcr
0198655f2552 Added sources
boisy
parents:
diff changeset
25 ldd #etext
0198655f2552 Added sources
boisy
parents:
diff changeset
26 subd #_cstart
0198655f2552 Added sources
boisy
parents:
diff changeset
27 bsr doabort
0198655f2552 Added sources
boisy
parents:
diff changeset
28
0198655f2552 Added sources
boisy
parents:
diff changeset
29 tfr dp,a
0198655f2552 Added sources
boisy
parents:
diff changeset
30 clrb
0198655f2552 Added sources
boisy
parents:
diff changeset
31 tfr d,x
0198655f2552 Added sources
boisy
parents:
diff changeset
32 subd memend,x
0198655f2552 Added sources
boisy
parents:
diff changeset
33 nega
0198655f2552 Added sources
boisy
parents:
diff changeset
34 negb
0198655f2552 Added sources
boisy
parents:
diff changeset
35 sbca #0
0198655f2552 Added sources
boisy
parents:
diff changeset
36 bsr doabort
0198655f2552 Added sources
boisy
parents:
diff changeset
37
0198655f2552 Added sources
boisy
parents:
diff changeset
38 ldb #255
0198655f2552 Added sources
boisy
parents:
diff changeset
39 os9 F$EXIT
0198655f2552 Added sources
boisy
parents:
diff changeset
40
0198655f2552 Added sources
boisy
parents:
diff changeset
41 core fcc "core "
0198655f2552 Added sources
boisy
parents:
diff changeset
42 fcb $0d
0198655f2552 Added sources
boisy
parents:
diff changeset
43
0198655f2552 Added sources
boisy
parents:
diff changeset
44 doabort pshs d,x
0198655f2552 Added sources
boisy
parents:
diff changeset
45 lda 6,s
0198655f2552 Added sources
boisy
parents:
diff changeset
46 leax 2,s
0198655f2552 Added sources
boisy
parents:
diff changeset
47 ldy #2
0198655f2552 Added sources
boisy
parents:
diff changeset
48 os9 I$WRITE
0198655f2552 Added sources
boisy
parents:
diff changeset
49
0198655f2552 Added sources
boisy
parents:
diff changeset
50 leax 0,s
0198655f2552 Added sources
boisy
parents:
diff changeset
51 lda 6,s
0198655f2552 Added sources
boisy
parents:
diff changeset
52 ldy #2
0198655f2552 Added sources
boisy
parents:
diff changeset
53 os9 I$WRITE
0198655f2552 Added sources
boisy
parents:
diff changeset
54
0198655f2552 Added sources
boisy
parents:
diff changeset
55 puls y
0198655f2552 Added sources
boisy
parents:
diff changeset
56 puls x
0198655f2552 Added sources
boisy
parents:
diff changeset
57 cmpy #0
0198655f2552 Added sources
boisy
parents:
diff changeset
58 beq abort20
0198655f2552 Added sources
boisy
parents:
diff changeset
59 lda 2,s
0198655f2552 Added sources
boisy
parents:
diff changeset
60 os9 I$WRITE
0198655f2552 Added sources
boisy
parents:
diff changeset
61 abort20 rts
0198655f2552 Added sources
boisy
parents:
diff changeset
62 endsect