Commit | Line | Data |
---|---|---|
67a1dfd8 C |
1 | "start:movl sp@,d2 |
2 | lea sp@(4),a3 | |
3 | movl d2,d1 | |
4 | asll #2,d1 | |
5 | lea a3@(4,d1:l),a4 | |
6 | movl #flag+0x8000,a3@- | |
7 | movl #lisp+0x8000,a3@- | |
8 | movl a3,sp | |
9 | pea a4@ | |
10 | pea a3@ | |
11 | movl #lisp+0x8000,sp@- | |
12 | jsr execve | |
13 | execve: pea 0x3b:w | |
14 | trap #0 | |
15 | addw #12,a7 | |
16 | pea 0:w | |
17 | jsr _exit | |
18 | _exit: pea 1:w | |
19 | trap #0 | |
20 | flag: .asciz \"-f\" | |
21 | lisp: .asciz \"/usr/ucb/lisp\" | |
22 | .even | |
23 | " |