Return to init.s CVS log

Up to [Research Unix] / researchv10no / cmd / lcc / gen2 / mc-sun / tst

Annotation of researchv10no/cmd/lcc/gen2/mc-sun/tst/init.s, revision 1.1

1.1     ! root        1: .data
        !             2: .globl _words
        !             3: .align 2; _words:.long 1
        !             4: .long 2
        !             5: .long 3
        !             6: .ascii "if\000"
        !             7: .skip 3
        !             8: .long 4
        !             9: .long 5
        !            10: .skip 4
        !            11: .ascii "for"
        !            12: .skip 3
        !            13: .long 6
        !            14: .long 7
        !            15: .long 8
        !            16: .ascii "else\000"
        !            17: .skip 1
        !            18: .long 9
        !            19: .long 10
        !            20: .long 11
        !            21: .ascii "whil"
        !            22: .byte 101
        !            23: .skip 1
        !            24: .long 0
        !            25: .skip 8
        !            26: .skip 6
        !            27: .globl _wordlist
        !            28: .align 2; _wordlist:.long _words
        !            29: .globl _x
        !            30: .align 2; _x:.long 1
        !            31: .long 2
        !            32: .long 3
        !            33: .long 4
        !            34: .long 0
        !            35: .long 5
        !            36: .long 6
        !            37: .skip 12
        !            38: .long 7
        !            39: .skip 16
        !            40: .globl _y
        !            41: .align 2; _y:.long _x
        !            42: .long _x+20
        !            43: .long _x+40
        !            44: .long 0x0
        !            45: .text
        !            46: .globl _main
        !            47: .align 2
        !            48: _main:link a6,#-20
        !            49: moveml #0x4c0,a6@(-12)
        !            50: clrl d6
        !            51: jra L8
        !            52: L5:
        !            53: clrl d7
        !            54: jra L12
        !            55: L9:
        !            56: movl #L13,sp@
        !            57: movl @(_y:l,d6:l:4),a2
        !            58: movl a2@(0,d7:l:4),sp@(4)
        !            59: jbsr _printf:l
        !            60: L10:
        !            61: addql #1,d7
        !            62: L12:
        !            63: movl @(_y:l,d6:l:4),a2
        !            64: tstl a2@(0,d7:l:4); jne L9
        !            65: movl #L14,sp@
        !            66: jbsr _printf:l
        !            67: L6:
        !            68: addql #1,d6
        !            69: L8:
        !            70: tstl @(_y:l,d6:l:4); jne L5
        !            71: jbsr _f:l
        !            72: movl _wordlist:l,sp@
        !            73: jbsr _g:l
        !            74: clrl d0
        !            75: L4:
        !            76: moveml a6@(-12),#0x4c0
        !            77: unlk a6
        !            78: rts
        !            79: .data
        !            80: .align 2; L16:.long L17
        !            81: .long L18
        !            82: .long L19
        !            83: .long L20
        !            84: .long 0x0
        !            85: .text
        !            86: .globl _f
        !            87: .align 2
        !            88: _f:link a6,#-12
        !            89: moveml #0x2000,a6@(-4)
        !            90: lea L16:l,a5
        !            91: jra L24
        !            92: L21:
        !            93: movl #L25,sp@
        !            94: movl a5@,sp@(4)
        !            95: jbsr _printf:l
        !            96: L22:
        !            97: addql #4,a5
        !            98: L24:
        !            99: tstl a5@; jne L21
        !           100: L15:
        !           101: moveml a6@(-4),#0x2000
        !           102: unlk a6
        !           103: rts
        !           104: .globl _g
        !           105: .align 2
        !           106: _g:link a6,#-20
        !           107: moveml #0x2480,a6@(-12)
        !           108: movl a6@(8),a5
        !           109: jra L30
        !           110: L27:
        !           111: clrl d7
        !           112: jra L34
        !           113: L31:
        !           114: movl #L35,sp@
        !           115: movl a5@(0,d7:l:4),sp@(4)
        !           116: jbsr _printf:l
        !           117: L32:
        !           118: addql #1,d7
        !           119: L34:
        !           120: cmpl #3,d7; jcs L31
        !           121: movl #L25,sp@
        !           122: lea a5@(12),a2
        !           123: movl a2,sp@(4)
        !           124: jbsr _printf:l
        !           125: L28:
        !           126: addl #18,a5
        !           127: L30:
        !           128: tstl a5@; jne L27
        !           129: jbsr _h:l
        !           130: L26:
        !           131: moveml a6@(-12),#0x2480
        !           132: unlk a6
        !           133: rts
        !           134: .globl _h
        !           135: .align 2
        !           136: _h:link a6,#-32
        !           137: moveml #0x490,a6@(-12)
        !           138: clrl d7
        !           139: jra L40
        !           140: L37:
        !           141: movl #L41,sp@
        !           142: movl #18,d4
        !           143: mulsl d7,d4
        !           144: movl @(_words:l,d4:l:1),sp@(4)
        !           145: movl @(_words+4:l,d4:l:1),sp@(8)
        !           146: movl @(_words+8:l,d4:l:1),sp@(12)
        !           147: lea @(_words+12:l,d4:l:1),a2
        !           148: movl a2,sp@(16)
        !           149: jbsr _printf:l
        !           150: L38:
        !           151: addql #1,d7
        !           152: L40:
        !           153: cmpl #5,d7; jcs L37
        !           154: L36:
        !           155: moveml a6@(-12),#0x490
        !           156: unlk a6
        !           157: rts
        !           158: .text
        !           159: .align 2; L41:.ascii "%d %d %d %s\012\000"
        !           160: .align 2; L35:.ascii "%d \000"
        !           161: .align 2; L25:.byte 37,115,10,0
        !           162: .align 2; L20:.ascii "while\000"
        !           163: .align 2; L19:.ascii "else\000"
        !           164: .align 2; L18:.ascii "for\000"
        !           165: .align 2; L17:.ascii "if\000"
        !           166: .align 2; L14:.byte 10,0
        !           167: .align 2; L13:.ascii " %d\000"

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