|
|
1.1 root 1: stime = 25
2: .globl _stime
3: .globl cerror
4:
5: _stime:
6: linkw a6,#0
7: movl sp@(8),a0
8: movl a0@,sp@(8) | copy time to set
9: pea stime
10: trap #0
11: bcc noerror
12: jmp cerror
13: noerror:
14: clrl d0
15: unlk a6
16: rts
This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.