fbas.s

c编译器实现

/* d閎ut de module */
.module

.data
 /* Variable initialis閑: vm_instr_str */
 .align 4
vm_instr_str:
 .int @S1
 .int @S2
 .int @S3
 .int @S4
 .int @S5
 .int @S6
 .int @S7
 .int @S8
 .int @S9
 .int @S10
 .int @S11
 .int @S12
 .int @S13
 .int @S14
 .int @S15
 .int @S16
 .int @S17
 .int @S18
 .int @S19
 .int @S20
 .int @S21
 .int @S22
 .int @S23
 .int @S24
 .int @S25
 .int @S26
 .int @S27
 .int @S28
 .int @S29
 .int @S30
 .int @S31
 .int @S32
 .int @S33
 .int @S34
 .int @S35
 .int @S36
 .int @S37
 .int @S38
 .int @S39
 .int @S40
 .int @S41
 .int @S42
 .int @S43
 .int @S44
 .int @S45
 .int @S46
 .int @S47
 .int @S48
 .int @S49
 .int @S50
 .int @S51
 .int @S52
 .int @S53
 .int 0
@S1:
 .byte 122
 .byte 101
 .byte 114
 .byte 111
 .byte 0
@S2:
 .byte 108
 .byte 100
 .byte 95
 .byte 98
 .byte 0
@S3:
 .byte 108
 .byte 100
 .byte 95
 .byte 117
 .byte 98
 .byte 0
@S4:
 .byte 108
 .byte 100
 .byte 95
 .byte 119
 .byte 0
@S5:
 .byte 108
 .byte 100
 .byte 95
 .byte 117
 .byte 119
 .byte 0
@S6:
 .byte 108
 .byte 100
 .byte 95
 .byte 105
 .byte 0
@S7:
 .byte 115
 .byte 116
 .byte 95
 .byte 98
 .byte 0
@S8:
 .byte 115
 .byte 116
 .byte 95
 .byte 119
 .byte 0
@S9:
 .byte 115
 .byte 116
 .byte 95
 .byte 105
 .byte 0
@S10:
 .byte 97
 .byte 100
 .byte 100
 .byte 95
 .byte 105
 .byte 0
@S11:
 .byte 115
 .byte 117
 .byte 98
 .byte 95
 .byte 105
 .byte 0
@S12:
 .byte 109
 .byte 117
 .byte 108
 .byte 95
 .byte 105
 .byte 0
@S13:
 .byte 109
 .byte 117
 .byte 108
 .byte 95
 .byte 117
 .byte 105
 .byte 0
@S14:
 .byte 100
 .byte 105
 .byte 118
 .byte 95
 .byte 105
 .byte 0
@S15:
 .byte 100
 .byte 105
 .byte 118
 .byte 95
 .byte 117
 .byte 105
 .byte 0
@S16:
 .byte 109
 .byte 111
 .byte 100
 .byte 95
 .byte 105
 .byte 0
@S17:
 .byte 109
 .byte 111
 .byte 100
 .byte 95
 .byte 117
 .byte 105
 .byte 0
@S18:
 .byte 110
 .byte 101
 .byte 103
 .byte 95
 .byte 105
 .byte 0
@S19:
 .byte 99
 .byte 109
 .byte 112
 .byte 108
 .byte 116
 .byte 95
 .byte 105
 .byte 0
@S20:
 .byte 99
 .byte 109
 .byte 112
 .byte 108
 .byte 101
 .byte 95
 .byte 105
 .byte 0
@S21:
 .byte 99
 .byte 109
 .byte 112
 .byte 103
 .byte 101
 .byte 95
 .byte 105
 .byte 0
@S22:
 .byte 99
 .byte 109
 .byte 112
 .byte 103
 .byte 116
 .byte 95
 .byte 105
 .byte 0
@S23:
 .byte 99
 .byte 109
 .byte 112
 .byte 101
 .byte 113
 .byte 95
 .byte 105
 .byte 0
@S24:
 .byte 99
 .byte 109
 .byte 112
 .byte 110
 .byte 101
 .byte 95
 .byte 105
 .byte 0
@S25:
 .byte 99
 .byte 109
 .byte 112
 .byte 108
 .byte 116
 .byte 95
 .byte 117
 .byte 105
 .byte 0
@S26:
 .byte 99
 .byte 109
 .byte 112
 .byte 108
 .byte 101
 .byte 95
 .byte 117
 .byte 105
 .byte 0
@S27:
 .byte 99
 .byte 109
 .byte 112
 .byte 103
 .byte 101
 .byte 95
 .byte 117
 .byte 105
 .byte 0
@S28:
 .byte 99
 .byte 109
 .byte 112
 .byte 103
 .byte 116
 .byte 95
 .byte 117
 .byte 105
 .byte 0
@S29:
 .byte 97
 .byte 110
 .byte 100
 .byte 95
 .byte 105
 .byte 0
@S30:
 .byte 111
 .byte 114
 .byte 95
 .byte 105
 .byte 0
@S31:
 .byte 120
 .byte 111
 .byte 114
 .byte 95
 .byte 105
 .byte 0
@S32:
 .byte 110
 .byte 111
 .byte 116
 .byte 95
 .byte 105
 .byte 0
@S33:
 .byte 115
 .byte 104
 .byte 108
 .byte 95
 .byte 105
 .byte 0
@S34:
 .byte 115
 .byte 104
 .byte 114
 .byte 95
 .byte 105
 .byte 0
@S35:
 .byte 115
 .byte 104
 .byte 114
 .byte 95
 .byte 117
 .byte 105
 .byte 0
@S36:
 .byte 99
 .byte 118
 .byte 116
 .byte 95
 .byte 105
 .byte 95
 .byte 98
 .byte 0
@S37:
 .byte 99
 .byte 118
 .byte 116
 .byte 95
 .byte 105
 .byte 95
 .byte 117
 .byte 98
 .byte 0
@S38:
 .byte 99
 .byte 118
 .byte 116
 .byte 95
 .byte 105
 .byte 95
 .byte 119
 .byte 0
@S39:
 .byte 99
 .byte 118
 .byte 116
 .byte 95
 .byte 105
 .byte 95
 .byte 117
 .byte 119
 .byte 0
@S40:
 .byte 99
 .byte 118
 .byte 116
 .byte 95
 .byte 98
 .byte 95
 .byte 105
 .byte 0
@S41:
 .byte 99
 .byte 118
 .byte 116
 .byte 95
 .byte 119
 .byte 95
 .byte 105
 .byte 0
@S42:
 .byte 108
 .byte 105
 .byte 95
 .byte 105
 .byte 0
@S43:
 .byte 108
 .byte 105
 .byte 98
 .byte 112
 .byte 95
 .byte 105
 .byte 0
@S44:
 .byte 106
 .byte 101
 .byte 113
 .byte 95
 .byte 105
 .byte 0
@S45:
 .byte 106
 .byte 110
 .byte 101
 .byte 95
 .byte 105
 .byte 0
@S46:
 .byte 115
 .byte 119
 .byte 105
 .byte 116
 .byte 99
 .byte 104
 .byte 95
 .byte 105
 .byte 0
@S47:
 .byte 106
 .byte 109
 .byte 112
 .byte 0
@S48:
 .byte 106
 .byte 115
 .byte 114
 .byte 0
@S49:
 .byte 114
 .byte 116
 .byte 115
 .byte 0
@S50:
 .byte 100
 .byte 117
 .byte 112
 .byte 0
@S51:
 .byte 112
 .byte 111
 .byte 112
 .byte 0
@S52:
 .byte 97
 .byte 100
 .byte 100
 .byte 115
 .byte 112
 .byte 0
@S53:
 .byte 108
 .byte 105
 .byte 98
 .byte 99
 .byte 97
 .byte 108
 .byte 108
 .byte 0
 .globl vm_instr_str
.data
 /* variable non initialis閑: lex_linenum */
 .align 4
lex_linenum:
 .zero 4
 .globl lex_linenum
.data
 /* variable non initialis閑: seg_cur */
 .align 4
seg_cur:
 .zero 4
 .globl seg_cur
.data
 /* variable non initialis閑: seg_data */
 .align 4
seg_data:
 .zero 8
 .globl seg_data
.data
 /* variable non initialis閑: seg_maxsize */
 .align 4
seg_maxsize:
 .zero 8
 .globl seg_maxsize
.data
 /* variable non initialis閑: seg_offset */
 .align 4
seg_offset:
 .zero 8
 .globl seg_offset
.data
 /* variable non initialis閑: hash_tab */
 .align 4
hash_tab:
 .zero 4004
 .globl hash_tab
.data
 /* Variable initialis閑: yytranslate */
 .align 4
yytranslate:
 .byte 0
 .byte 2
 .byte 2
 .byte 2
 .byte 2
 .byte 2
 .byte 2
 .byte 2
 .byte 2
 .byte 2
 .byte 2
 .byte 2
 .byte 2
 .byte 2
 .byte 2
 .byte 2
 .byte 2
 .byte 2
 .byte 2
 .byte 2
 .byte 2
 .byte 2
 .byte 2
 .byte 2
 .byte 2
 .byte 2
 .byte 2
 .byte 2
 .byte 2
 .byte 2
 .byte 2
 .byte 2
 .byte 2
 .byte 2
 .byte 2
 .byte 2
 .byte 2
 .byte 2
 .byte 2
 .byte 2
 .byte 2
 .byte 2
 .byte 2
 .byte 19
 .byte 17
 .byte 2
 .byte 2
 .byte 2
 .byte 2
 .byte 2
 .byte 2
 .byte 2
 .byte 2
 .byte 2
 .byte 2
 .byte 2
 .byte 2
 .byte 2
 .byte 18
 .byte 2
 .byte 2
 .byte 2
 .byte 2
 .byte 2
 .byte 2
 .byte 2
 .byte 2
 .byte 2
 .byte 2
 .byte 2
 .byte 2
 .byte 2
 .byte 2
 .byte 2
 .byte 2
 .byte 2
 .byte 2
 .byte 2
 .byte 2
 .byte 2
 .byte 2
 .byte 2
 .byte 2
 .byte 2
 .byte 2
 .byte 2
 .byte 2
 .byte 2
 .byte 2
 .byte 2
 .byte 2
 .byte 2
 .byte 2
 .byte 2
 .byte 2
 .byte 2
 .byte 2
 .byte 2
 .byte 2
 .byte 2
 .byte 2
 .byte 2
 .byte 2
 .byte 2
 .byte 2
 .byte 2
 .byte 2
 .byte 2
 .byte 2
 .byte 2
 .byte 2
 .byte 2
 .byte 2
 .byte 2
 .byte 2
 .byte 2
 .byte 2
 .byte 2
 .byte 2
 .byte 2
 .byte 2
 .byte 2
 .byte 2
 .byte 2
 .byte 2
 .byte 2
 .byte 2
 .byte 2
 .byte 2
 .byte 2
 .byte 2
 .byte 2
 .byte 2
 .byte 2
 .byte 2
 .byte 2
 .byte 2
 .byte 2
 .byte 2
 .byte 2
 .byte 2
 .byte 2
 .byte 2
 .byte 2
 .byte 2
 .byte 2
 .byte 2
 .byte 2
 .byte 2
 .byte 2
 .byte 2
 .byte 2
 .byte 2
 .byte 2
 .byte 2
 .byte 2
 .byte 2
 .byte 2
 .byte 2
 .byte 2
 .byte 2
 .byte 2
 .byte 2
 .byte 2
 .byte 2
 .byte 2
 .byte 2
 .byte 2
 .byte 2
 .byte 2
 .byte 2
 .byte 2
 .byte 2
 .byte 2
 .byte 2
 .byte 2
 .byte 2
 .byte 2
 .byte 2
 .byte 2
 .byte 2
 .byte 2
 .byte 2
 .byte 2
 .byte 2
 .byte 2
 .byte 2
 .byte 2
 .byte 2
 .byte 2
 .byte 2
 .byte 2
 .byte 2
 .byte 2
 .byte 2
 .byte 2
 .byte 2
 .byte 2
 .byte 2
 .byte 2
 .byte 2
 .byte 2
 .byte 2
 .byte 2
 .byte 2
 .byte 2
 .byte 2
 .byte 2
 .byte 2
 .byte 2
 .byte 2
 .byte 2
 .byte 2
 .byte 2
 .byte 2
 .byte 2
 .byte 2
 .byte 2
 .byte 2
 .byte 2
 .byte 2
 .byte 2
 .byte 2
 .byte 2
 .byte 2
 .byte 2
 .byte 2
 .byte 2
 .byte 2
 .byte 2
 .byte 2
 .byte 2
 .byte 2
 .byte 2
 .byte 2
 .byte 2
 .byte 2
 .byte 2
 .byte 2
 .byte 2
 .byte 2
 .byte 2
 .byte 2
 .byte 2
 .byte 2
 .byte 2
 .byte 2
 .byte 2
 .byte 2
 .byte 2
 .byte 2
 .byte 2
 .byte 2
 .byte 2
 .byte 2
 .byte 2
 .byte 1
 .byte 2
 .byte 3
 .byte 4
 .byte 5
 .byte 6
 .byte 7
 .byte 8
 .byte 9
 .byte 10
 .byte 11
 .byte 12
 .byte 13
 .byte 14
 .byte 15
 .byte 16
.data
 /* Variable initialis閑: yyr1 */
 .align 4
yyr1:
 .short 0
 .short 20
 .short 20
 .short 21
 .short 21
 .short 21
 .short 21
 .short 21
 .short 21
 .short 21
 .short 21
 .short 21
 .short 21
 .short 21
 .short 21
 .short 22
 .short 21
 .short 23
 .short 23
 .short 23
.data
 /* Variable initialis閑: yyr2 */
 .align 4
yyr2:
 .short 0
 .short 1
 .short 2
 .short 1
 .short 1
 .short 2
 .short 2
 .short 2
 .short 2
 .short 2
 .short 4
 .short 2
 .short 2
 .short 1
 .short 1
 .short 0
 .short 3
 .short 1
 .short 1
 .short 3
.data
 /* Variable initialis閑: yydefact */
 .align 4
yydefact:
 .short 0
 .short 3
 .short 4
 .short 0
 .short 0
 .short 0
 .short 0
 .short 0
 .short 0
 .short 0
 .short 13
 .short 14
 .short 15
 .short 0
 .short 0
 .short 1
 .short 5
 .short 12
 .short 18
 .short 17
 .short 7
 .short 6
 .short 8
 .short 9
 .short 0
 .short 0
 .short 11
 .short 2
 .short 0
 .short 0
 .short 16
 .short 19
 .short 10
 .short 0
 .short 0
.data
 /* Variable initialis閑: yydefgoto */
 .align 4
yydefgoto:
 .short 14
 .short 15
 .short 25
 .short 20
.data
 /* Variable initialis閑: yypact */
 .align 4
yypact:
 .short 13
 .short 32768
 .short 32768
 .short 14
 .short 16
 .short 65522
 .short 17
 .short 18
 .short 19
 .short 21
 .short 32768
 .short 32768
 .short 32768
 .short 11
 .short 0
 .short 32768
 .short 32768
 .short 32768
 .short 20
 .short 32768
 .short 32768
 .short 32768
 .short 32768
 .short 32768
 .short 15
 .short 65522
 .short 32768
 .short 32768
 .short 22
 .short 24
 .short 32768
 .short 32768
 .short 32768
 .short 37
 .short 32768
.data
 /* Variable initialis閑: yypgoto */
 .align 4
yypgoto:
 .short 32768
 .short 27
 .short 32768
 .short 23
.data
 /* Variable initialis閑: yytable */
 .align 4
yytable:
 .short 33
 .short 18
 .short 19
 .short 1
 .short 2
 .short 3
 .short 4
 .short 5
 .short 6
 .short 7
 .short 8
 .short 9
 .short 10
 .short 11
 .short 12
 .short 13
 .short 1
 .short 2
 .short 3
 .short 4
 .short 5
 .short 6
 .short 7
 .short 8
 .short 9
 .short 10
 .short 11
 .short 12
 .short 13
 .short 26
 .short 16
 .short 17
 .short 29
 .short 21
 .short 22
 .short 23
 .short 24
 .short 34
 .short 31
 .short 28
 .short 32
 .short 27
 .short 0
 .short 0
 .short 0
 .short 0
 .short 0
 .short 0
 .short 30
.data
 /* Variable initialis閑: yycheck */
 .align 4
yycheck:
 .short 0
 .short 15
 .short 16
 .short 3
 .short 4
 .short 5
 .short 6
 .short 7
 .short 8
 .short 9
 .short 10
 .short 11
 .short 12
 .short 13
 .short 14
 .short 15
 .short 3
 .short 4
 .short 5
 .short 6
 .short 7
 .short 8
 .short 9
 .short 10
 .short 11
 .short 12
 .short 13
 .short 14
 .short 15
 .short 18
 .short 16
 .short 15
 .short 17
 .short 16
 .short 16
 .short 16
 .short 15
 .short 0
 .short 16
 .short 19
 .short 16
 .short 14
 .short 65535
 .short 65535
 .short 65535
 .short 65535
 .short 65535
 .short 65535
 .short 25
.data
 /* variable non initialis閑: yychar */
 .align 4
yychar:
 .zero 4
 .globl yychar
.data
 /* variable non initialis閑: yylval */
 .align 4
yylval:
 .zero 4
 .globl yylval
.data
 /* variable non initialis閑: yynerrs */
 .align 4
yynerrs:
 .zero 4
 .globl yynerrs
.text
 /* d閒inition de la fonction __yy_bcopy */
__yy_bcopy:
 addsp @S55
/* variable locale 'f' stack offset=4 */
 libp_i -12
 ld_i
 libp_i 4
 st_i
 pop
/* variable locale 't' stack offset=8 */
 libp_i -16
 ld_i
 libp_i 8
 st_i
 pop
/* variable locale 'i' stack offset=12 */
 libp_i -20
 ld_i
 libp_i 12
 st_i
 pop
@L1:
 libp_i 12
 ld_i
 li_i 1
 sub_i
 libp_i 12
 st_i
 li_i 1
 add_i
 li_i 0
 cmpgt_i
 jeq_i @L2
 libp_i 4
 ld_i
 li_i 1
 add_i
 libp_i 4
 st_i
 li_i 1
 sub_i
 ld_b
 libp_i 8
 ld_i
 li_i 1
 add_i
 libp_i 8
 st_i
 li_i 1
 sub_i
 st_b
 pop
 jmp @L1
@L2:
 li_i 0
 rts
 .equ @S55,12
/* fin de la fonction */
.text
 /* d閒inition de la fonction yyparse */
yyparse:
 .globl yyparse
 addsp @S56
/* variable locale 'yystate' stack offset=4 */
/* variable locale 'yyn' stack offset=8 */
/* variable locale 'yyssp' stack offset=12 */
/* variable locale 'yyvsp' stack offset=16 */
/* variable locale 'yyerrstatus' stack offset=20 */
/* variable locale 'yychar1' stack offset=24 */
 li_i 0
 libp_i 24
 st_i
 pop
/* variable locale 'yyssa' stack offset=28 */
/* variable locale 'yyvsa' stack offset=428 */
/* variable locale 'yyss' stack offset=1228 */
 libp_i 28
 libp_i 1228
 st_i
 pop
/* variable locale 'yyvs' stack offset=1232 */
 libp_i 428
 libp_i 1232
 st_i
 pop
/* variable locale 'yystacksize' stack offset=1236 */
 li_i 200
 libp_i 1236
 st_i
 pop
/* variable locale 'yyval' stack offset=1240 */
/* variable locale 'yylen' stack offset=1244 */
 li_i 0
 libp_i 4
 st_i
 pop
 li_i 0
 libp_i 20
 st_i
 pop
 li_i 0
 li_i yynerrs
 st_i
 pop
 li_i -2
 li_i yychar
 st_i
 pop
 libp_i 1228
 ld_i
 li_i 2
 sub_i
 libp_i 12
 st_i
 pop
 libp_i 1232
 ld_i
 libp_i 16
 st_i
 pop
@L3:
 libp_i 4
 ld_i
 cvt_w_i
 libp_i 12
 ld_i
 li_i 2
 add_i
 libp_i 12
 st_i
 st_w
 pop
 libp_i 12
 ld_i
 libp_i 1228
 ld_i
 libp_i 1236
 ld_i
 li_i 2
 mul_i
 add_i
 li_i 1
 li_i 2
 mul_i
 sub_i
 cmpge_i
 jeq_i @L4
/* variable locale 'yyvs1' stack offset=1248 */
 libp_i 1232
 ld_i
 libp_i 1248
 st_i
 pop
/* variable locale 'yyss1' stack offset=1252 */
 libp_i 1228
 ld_i
 libp_i 1252
 st_i
 pop
/* variable locale 'size' stack offset=1256 */
 libp_i 12
 ld_i
 libp_i 1228
 ld_i
 sub_i
 li_i 2
 div_i
 li_i 1
 add_i
 libp_i 1256
 st_i
 pop
 libp_i 1236
 ld_i
 li_i 10000
 cmpge_i
 jeq_i @L6
.data
@S57:
 .byte 112
 .byte 97
 .byte 114
 .byte 115
 .byte 101
 .byte 114
 .byte 32
 .byte 115
 .byte 116
 .byte 97
 .byte 99
 .byte 107
 .byte 32
 .byte 111
 .byte 118
 .byte 101
 .byte 114
 .byte 102
 .byte 108
 .byte 111
 .byte 119
 .byte 0
.text
 li_i @S57
 li_i yyerror
 jsr 4
 pop
 li_i 2
 rts
@L6:
 libp_i 1236
 ld_i
 li_i 2
 mul_i
 libp_i 1236
 st_i
 pop
 libp_i 1236
 ld_i
 li_i 10000
 cmpgt_i
 jeq_i @L8
 li_i 10000
 libp_i 1236
 st_i
 pop
@L8:
 libp_i 1236
 ld_i
 li_i 2
 mul_i
 li_i malloc
 jsr 4
 libp_i 1228
 st_i
 pop
 libp_i 1256
 ld_i
 li_i 2
 mul_i
 libp_i 1228
 ld_i
 libp_i 1252
 ld_i
 li_i __yy_bcopy
 jsr 12
 pop
 libp_i 1236
 ld_i
 li_i 4
 mul_i
 li_i malloc
 jsr 4
 libp_i 1232
 st_i
 pop
 libp_i 1256
 ld_i
 li_i 4
 mul_i
 libp_i 1232
 ld_i
 libp_i 1248
 ld_i
 li_i __yy_bcopy
 jsr 12
 pop
 libp_i 1228
 ld_i
 libp_i 1256
 ld_i
 li_i 2
 mul_i
 add_i
 li_i 2
 sub_i
 libp_i 12
 st_i
 pop
 libp_i 1232
 ld_i