|
|
1.1 root 1: # access(file, request)
2: # test ability to access file in all indicated ways
3: # 1 - read
4: # 2 - write
5: # 4 - execute
6:
7: access = 33
8: .globl _access
9:
10: _access:
11: linkw a6,#0
12: pea access
13: trap #0
14: bcc noerror
15: jmp cerror
16: noerror:
17: unlk a6
18: rts
This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.