|
|
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: pea access
12: trap #0
13: bcc noerror
14: jmp cerror
15: noerror:
16: rts
This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.