Mercurial > hg > Members > kono > nitros9-code
annotate level1/modules/piper.asm @ 1286:d5839bc79972
Set rev to 0
author | boisy |
---|---|
date | Wed, 27 Aug 2003 23:58:52 +0000 |
parents | 132859392c04 |
children |
rev | line source |
---|---|
0 | 1 ******************************************************************** |
2 * Piper - Pipe device driver | |
3 * | |
4 * $Id$ | |
5 * | |
1283 | 6 * Edt/Rev YYYY/MM/DD Modified by |
7 * Comment | |
0 | 8 * ------------------------------------------------------------------ |
1283 | 9 * 2 ????/??/?? ??? |
10 * Original OS-9/Tandy distribution | |
0 | 11 |
12 nam Piper | |
13 ttl Pipe device driver | |
14 | |
15 ifp1 | |
16 use defsfile | |
17 endc | |
18 | |
19 tylg set Drivr+Objct | |
20 atrv set ReEnt+rev | |
1283 | 21 rev set $00 |
0 | 22 edition set 2 |
23 | |
1283 | 24 mod eom,name,tylg,atrv,start,size |
0 | 25 |
26 u0000 rmb 6 | |
27 size equ . | |
256 | 28 |
1283 | 29 fcb READ.+WRITE. |
0 | 30 |
31 name fcs /Piper/ | |
32 fcb edition | |
33 | |
1283 | 34 start equ * |
0 | 35 Init clrb |
36 rts | |
37 nop | |
38 Read clrb | |
39 rts | |
40 nop | |
41 Write clrb | |
42 rts | |
43 nop | |
44 GetStat clrb | |
45 rts | |
46 nop | |
47 SetStat clrb | |
48 rts | |
49 nop | |
50 Term clrb | |
51 rts | |
52 | |
53 emod | |
54 eom equ * | |
1213
4e235f213651
Lots of changes: bootscripts and bootlists added, sources massaged...
boisy
parents:
256
diff
changeset
|
55 end |