Return to unisoft CVS log

Up to [CSRG BSD Unix] / 43BSD / ucb / lisp / lisplib / autorun

Annotation of 43BSD/ucb/lisp/lisplib/autorun/unisoft, revision 1.1.1.1

1.1       root        1: ; $Header: unisoft 1.2 83/07/25 11:39:17 layer Exp $
                      2: 
                      3: "
                      4: OFFSET = 0xOFF
                      5: start: movl    a7@(4),a0
                      6: clrl   a0@(-4)
                      7: movl   a7,a0
                      8: subql  #0x8,a7
                      9: movl   a0@,a7@
                     10: addql  #0x4,a0
                     11: movl   a0,a7@(4)
                     12: LL0:   tstl    a0@+
                     13: bnes   LL0
                     14: movl   a7@(4),a1
                     15: cmpl   a1@,a0
                     16: blts   LL1
                     17: subql  #0x4,a0
                     18: LL1:   movl    a0,a7@(8)
                     19: movl   a0,a1
                     20: movl   #OFFSET+file,a2
                     21: movl   a2,sp@(4)       | setup new argv[0]
                     22: movl   a2,a0           | file to execute
                     23: movl   #OFFSET+flag,a2
                     24: movl   a2,sp@(8)       | setup new argv[1]
                     25: lea    sp@(4),a2
                     26: movl   a2,d1
                     27: movw   #0x3B,d0
                     28: trap   #0x0
                     29: file:  .asciz  \"/usr/ucb/lisp\"
                     30: flag:  .asciz  \"-f\"
                     31: .even
                     32: "

This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.