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
96
97
98
99
100
101
102
103
104
105
106
107
108
|
; ModuleID = 'LFortran'
source_filename = "LFortran"
%string_descriptor = type <{ i8*, i64 }>
@"ERROR STOP" = private unnamed_addr constant [11 x i8] c"ERROR STOP\00", align 1
@0 = private unnamed_addr constant [2 x i8] c"\0A\00", align 1
@1 = private unnamed_addr constant [5 x i8] c"%s%s\00", align 1
@2 = private unnamed_addr constant [2 x i8] c"\0A\00", align 1
@3 = private unnamed_addr constant [5 x i8] c"%s%s\00", align 1
@4 = private unnamed_addr constant [2 x i8] c"\0A\00", align 1
@5 = private unnamed_addr constant [5 x i8] c"%s%s\00", align 1
@6 = private unnamed_addr constant [2 x i8] c"\0A\00", align 1
@serialization_info = private unnamed_addr constant [9 x i8] c"I4,I4,I4\00", align 1
@7 = private unnamed_addr constant [5 x i8] c"%s%s\00", align 1
define i32 @main(i32 %0, i8** %1) {
.entry:
%ia0 = alloca i32, align 4
store i32 48, i32* %ia0, align 4
%ia5 = alloca i32, align 4
store i32 53, i32* %ia5, align 4
%ia9 = alloca i32, align 4
store i32 57, i32* %ia9, align 4
call void @_lpython_call_initial_functions(i32 %0, i8** %1)
%ia01 = alloca i32, align 4
store i32 48, i32* %ia01, align 4
%ia52 = alloca i32, align 4
store i32 53, i32* %ia52, align 4
%ia93 = alloca i32, align 4
store i32 57, i32* %ia93, align 4
br i1 false, label %then, label %else
then: ; preds = %.entry
call void (i8*, ...) @_lcompilers_print_error(i8* getelementptr inbounds ([5 x i8], [5 x i8]* @1, i32 0, i32 0), i8* getelementptr inbounds ([11 x i8], [11 x i8]* @"ERROR STOP", i32 0, i32 0), i8* getelementptr inbounds ([2 x i8], [2 x i8]* @0, i32 0, i32 0))
call void @exit(i32 1)
br label %ifcont
else: ; preds = %.entry
br label %ifcont
ifcont: ; preds = %else, %then
br i1 false, label %then4, label %else5
then4: ; preds = %ifcont
call void (i8*, ...) @_lcompilers_print_error(i8* getelementptr inbounds ([5 x i8], [5 x i8]* @3, i32 0, i32 0), i8* getelementptr inbounds ([11 x i8], [11 x i8]* @"ERROR STOP", i32 0, i32 0), i8* getelementptr inbounds ([2 x i8], [2 x i8]* @2, i32 0, i32 0))
call void @exit(i32 1)
br label %ifcont6
else5: ; preds = %ifcont
br label %ifcont6
ifcont6: ; preds = %else5, %then4
br i1 false, label %then7, label %else8
then7: ; preds = %ifcont6
call void (i8*, ...) @_lcompilers_print_error(i8* getelementptr inbounds ([5 x i8], [5 x i8]* @5, i32 0, i32 0), i8* getelementptr inbounds ([11 x i8], [11 x i8]* @"ERROR STOP", i32 0, i32 0), i8* getelementptr inbounds ([2 x i8], [2 x i8]* @4, i32 0, i32 0))
call void @exit(i32 1)
br label %ifcont9
else8: ; preds = %ifcont6
br label %ifcont9
ifcont9: ; preds = %else8, %then7
%2 = alloca i64, align 8
%3 = alloca i32, align 4
store i32 48, i32* %3, align 4
%4 = alloca i32, align 4
store i32 53, i32* %4, align 4
%5 = alloca i32, align 4
store i32 57, i32* %5, align 4
%6 = call i8* (i8*, i64, i8*, i64*, i32, i32, ...) @_lcompilers_string_format_fortran(i8* null, i64 0, i8* getelementptr inbounds ([9 x i8], [9 x i8]* @serialization_info, i32 0, i32 0), i64* %2, i32 0, i32 0, i32* %3, i32* %4, i32* %5)
%7 = load i64, i64* %2, align 4
%stringFormat_desc = alloca %string_descriptor, align 8
%8 = getelementptr %string_descriptor, %string_descriptor* %stringFormat_desc, i32 0, i32 0
store i8* %6, i8** %8, align 8
%9 = getelementptr %string_descriptor, %string_descriptor* %stringFormat_desc, i32 0, i32 1
store i64 %7, i64* %9, align 4
%10 = getelementptr %string_descriptor, %string_descriptor* %stringFormat_desc, i32 0, i32 0
%11 = load i8*, i8** %10, align 8
%12 = getelementptr %string_descriptor, %string_descriptor* %stringFormat_desc, i32 0, i32 1
%13 = load i64, i64* %12, align 4
%14 = trunc i64 %13 to i32
call void @_lfortran_printf(i8* getelementptr inbounds ([5 x i8], [5 x i8]* @7, i32 0, i32 0), i8* %11, i32 %14, i8* getelementptr inbounds ([2 x i8], [2 x i8]* @6, i32 0, i32 0), i32 1)
call void @_lfortran_free(i8* %6)
call void @_lpython_free_argv()
br label %return
return: ; preds = %ifcont9
br label %FINALIZE_SYMTABLE_string_13
FINALIZE_SYMTABLE_string_13: ; preds = %return
ret i32 0
}
declare void @_lpython_call_initial_functions(i32, i8**)
declare void @_lcompilers_print_error(i8*, ...)
declare void @exit(i32)
declare i8* @_lcompilers_string_format_fortran(i8*, i64, i8*, i64*, i32, i32, ...)
declare void @_lfortran_printf(i8*, i8*, i32, i8*, i32)
declare void @_lfortran_free(i8*)
declare void @_lpython_free_argv()
|
