Work on file usr/src/ucb/lisp/lisplib/autorun/unisoft
Synthesized-from: CSRG/cd2/4.3tahoe
--- /dev/null
+; $Header: unisoft 1.2 83/07/25 11:39:17 layer Exp $
+
+"
+OFFSET = 0xOFF
+start: movl a7@(4),a0
+clrl a0@(-4)
+movl a7,a0
+subql #0x8,a7
+movl a0@,a7@
+addql #0x4,a0
+movl a0,a7@(4)
+LL0: tstl a0@+
+bnes LL0
+movl a7@(4),a1
+cmpl a1@,a0
+blts LL1
+subql #0x4,a0
+LL1: movl a0,a7@(8)
+movl a0,a1
+movl #OFFSET+file,a2
+movl a2,sp@(4) | setup new argv[0]
+movl a2,a0 | file to execute
+movl #OFFSET+flag,a2
+movl a2,sp@(8) | setup new argv[1]
+lea sp@(4),a2
+movl a2,d1
+movw #0x3B,d0
+trap #0x0
+file: .asciz \"/usr/ucb/lisp\"
+flag: .asciz \"-f\"
+.even
+"