Mercurial > hg > Members > kono > nitros9-code

annotate level1/cmds/makdir.asm @ 532:72f3c79b0674

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Mainly section structures added.
author roug
date Sat, 12 Oct 2002 12:03:22 +0000
parents e9ce43cc215e
children 1810b051d07e
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
rev   line source
0
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
1 ********************************************************************
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
2 * Makdir - Create directory file
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
3 *
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
4 * $Id$
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
5 *
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
6 * Ed. Comments Who YY/MM/DD
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
7 * ------------------------------------------------------------------
200
e9ce43cc215e Made major changes to headers for consistency and identification
boisy
parents: 0
diff changeset
8 * 4 From Tandy OS-9 Level One VR 02.00.00
0
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
9
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
10 nam Makdir
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
11 ttl Create directory file
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
12
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
13 * Disassembled 02/04/03 23:05:28 by Disasm v1.6 (C) 1988 by RML
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
14
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
15 ifp1
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
16 use defsfile
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
17 endc
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
18
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
19 tylg set Prgrm+Objct
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
20 atrv set ReEnt+rev
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
21 rev set $01
200
e9ce43cc215e Made major changes to headers for consistency and identification
boisy
parents: 0
diff changeset
22 edition set 4
0
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
23
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
24 mod eom,name,tylg,atrv,start,size
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
25
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
26 u0000 rmb 450
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
27 size equ .
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
28
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
29 name fcs /Makdir/
200
e9ce43cc215e Made major changes to headers for consistency and identification
boisy
parents: 0
diff changeset
30 fcb edition
0
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
31
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
32 start ldb #DIR.+PREAD.+PWRIT.+PEXEC.+READ.+WRITE.+EXEC.
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
33 os9 I$MakDir
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
34 bcs L001C
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
35 clrb
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
36 L001C os9 F$Exit
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
37
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
38 emod
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
39 eom equ *
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
40 end
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
41