Mercurial > hg > Members > kono > nitros9-code

comparison level1/cmds/makdir.asm @ 200:e9ce43cc215e

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Made major changes to headers for consistency and identification
author boisy
date Mon, 15 Jul 2002 03:42:42 +0000
parents 6641a883d6b0
children 1810b051d07e
comparison
equal deleted inserted replaced
199:9a72b8091dff 200:e9ce43cc215e
3 * 3 *
4 * $Id$ 4 * $Id$
5 * 5 *
6 * Ed. Comments Who YY/MM/DD 6 * Ed. Comments Who YY/MM/DD
7 * ------------------------------------------------------------------ 7 * ------------------------------------------------------------------
8 * 2 Original Microware distribution version 8 * 4 From Tandy OS-9 Level One VR 02.00.00
9 9
10 nam Makdir 10 nam Makdir
11 ttl Create directory file 11 ttl Create directory file
12 12
13 * Disassembled 02/04/03 23:05:28 by Disasm v1.6 (C) 1988 by RML 13 * Disassembled 02/04/03 23:05:28 by Disasm v1.6 (C) 1988 by RML
17 endc 17 endc
18 18
19 tylg set Prgrm+Objct 19 tylg set Prgrm+Objct
20 atrv set ReEnt+rev 20 atrv set ReEnt+rev
21 rev set $01 21 rev set $01
22 edition set 4
22 23
23 mod eom,name,tylg,atrv,start,size 24 mod eom,name,tylg,atrv,start,size
24 25
25 u0000 rmb 450 26 u0000 rmb 450
26 size equ . 27 size equ .
27 28
28 name fcs /Makdir/ 29 name fcs /Makdir/
29 fcb $04 30 fcb edition
30 31
31 start ldb #DIR.+PREAD.+PWRIT.+PEXEC.+READ.+WRITE.+EXEC. 32 start ldb #DIR.+PREAD.+PWRIT.+PEXEC.+READ.+WRITE.+EXEC.
32 os9 I$MakDir 33 os9 I$MakDir
33 bcs L001C 34 bcs L001C
34 clrb 35 clrb