-
Notifications
You must be signed in to change notification settings - Fork 1
/
Copy path100l.s
95 lines (95 loc) · 1.61 KB
/
100l.s
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
.file "100l.f"
.text
.section .rodata
.LC0:
.string "100l.f"
.LC1:
.ascii "I must not talk in class"
.text
.type MAIN__, @function
MAIN__:
.LFB0:
.cfi_startproc
pushq %rbp
.cfi_def_cfa_offset 16
.cfi_offset 6, -16
movq %rsp, %rbp
.cfi_def_cfa_register 6
subq $544, %rsp
movl $1, -4(%rbp)
.L3:
cmpl $100, -4(%rbp)
setg %al
movzbl %al, %eax
testl %eax, %eax
jne .L4
leaq .LC0(%rip), %rax
movq %rax, -536(%rbp)
movl $5, -528(%rbp)
movl $128, -544(%rbp)
movl $6, -540(%rbp)
leaq -544(%rbp), %rax
movq %rax, %rdi
call _gfortran_st_write@PLT
leaq -544(%rbp), %rax
movl $25, %edx
leaq .LC1(%rip), %rsi
movq %rax, %rdi
call _gfortran_transfer_character_write@PLT
leaq -544(%rbp), %rax
movq %rax, %rdi
call _gfortran_st_write_done@PLT
addl $1, -4(%rbp)
jmp .L3
.L4:
nop
nop
leave
.cfi_def_cfa 7, 8
ret
.cfi_endproc
.LFE0:
.size MAIN__, .-MAIN__
.globl main
.type main, @function
main:
.LFB1:
.cfi_startproc
pushq %rbp
.cfi_def_cfa_offset 16
.cfi_offset 6, -16
movq %rsp, %rbp
.cfi_def_cfa_register 6
subq $16, %rsp
movl %edi, -4(%rbp)
movq %rsi, -16(%rbp)
movq -16(%rbp), %rdx
movl -4(%rbp), %eax
movq %rdx, %rsi
movl %eax, %edi
call _gfortran_set_args@PLT
leaq options.1.3882(%rip), %rsi
movl $7, %edi
call _gfortran_set_options@PLT
call MAIN__
movl $0, %eax
leave
.cfi_def_cfa 7, 8
ret
.cfi_endproc
.LFE1:
.size main, .-main
.section .rodata
.align 16
.type options.1.3882, @object
.size options.1.3882, 28
options.1.3882:
.long 2116
.long 4095
.long 0
.long 1
.long 1
.long 0
.long 31
.ident "GCC: (Ubuntu 9.3.0-17ubuntu1~20.04) 9.3.0"
.section .note.GNU-stack,"",@progbits