@sml_check_flag=external local_unnamed_addr global i32
@_SMLZ8Overflow=external unnamed_addr constant i8*
@_SMLZ3Div=external unnamed_addr constant i8*
@a=private unnamed_addr constant<{[4x i8],i32,i8*,void(...)*,void(...)*,i32}><{[4x i8]zeroinitializer,i32 -805306344,i8*null,void(...)*bitcast(i32(i8*)*@_SMLFN6Word327compareE to void(...)*),void(...)*bitcast(i8*(i8*,i8*)*@_SMLLN11Word__common7compareE_88 to void(...)*),i32 -2147483647}>,align 8
@b=private unnamed_addr constant<{[4x i8],i32,i8*,void(...)*,void(...)*,i32}><{[4x i8]zeroinitializer,i32 -805306344,i8*null,void(...)*bitcast(i32(i8*)*@_SMLFN6Word323minE to void(...)*),void(...)*bitcast(i8*(i8*,i8*)*@_SMLLN11Word__common3minE_89 to void(...)*),i32 -2147483647}>,align 8
@c=private unnamed_addr constant<{[4x i8],i32,i8*,void(...)*,void(...)*,i32}><{[4x i8]zeroinitializer,i32 -805306344,i8*null,void(...)*bitcast(i32(i8*)*@_SMLFN6Word323maxE to void(...)*),void(...)*bitcast(i8*(i8*,i8*)*@_SMLLN11Word__common3maxE_90 to void(...)*),i32 -2147483647}>,align 8
@d=private unnamed_addr constant<{[4x i8],i32,[43x i8]}><{[4x i8]zeroinitializer,i32 -2147483605,[43x i8]c"src/basis/main/Word_common.sml:89.31(2106)\00"}>,align 8
@e=private unnamed_addr constant<{[4x i8],i32,[2x i8]}><{[4x i8]zeroinitializer,i32 -2147483646,[2x i8]c"0\00"}>,align 8
@f=private unnamed_addr constant<{[4x i8],i32,i8*,void(...)*,void(...)*,i32}><{[4x i8]zeroinitializer,i32 -805306344,i8*null,void(...)*bitcast(i8*(i32)*@_SMLFN6Word323fmtE to void(...)*),void(...)*bitcast(i8*(i8*,i8*)*@_SMLLN11Word__common3fmtE_92 to void(...)*),i32 -2147483647}>,align 8
@g=private unnamed_addr constant<{[4x i8],i32,[44x i8]}><{[4x i8]zeroinitializer,i32 -2147483604,[44x i8]c"src/basis/main/Word_common.sml:103.38(2584)\00"}>,align 8
@h=private unnamed_addr constant<{[4x i8],i32,[44x i8]}><{[4x i8]zeroinitializer,i32 -2147483604,[44x i8]c"src/basis/main/Word_common.sml:108.58(2779)\00"}>,align 8
@i=private unnamed_addr constant<{[4x i8],i32,[44x i8]}><{[4x i8]zeroinitializer,i32 -2147483604,[44x i8]c"src/basis/main/Word_common.sml:110.53(2871)\00"}>,align 8
@_SMLZN6Word328wordSizeE=local_unnamed_addr constant i32 32
@j=private unnamed_addr constant<{[4x i8],i32,i8*,void(...)*,void(...)*,i32}><{[4x i8]zeroinitializer,i32 -805306344,i8*null,void(...)*bitcast(i8*(i32)*@_SMLFN6Word3210toLargeIntE to void(...)*),void(...)*bitcast(i8*(i8*,i8*)*@_SMLLN6Word3210toLargeIntE_96 to void(...)*),i32 -2147483647}>,align 8
@_SMLZN6Word3210toLargeIntE=local_unnamed_addr constant i8*bitcast(i8**getelementptr inbounds(<{[4x i8],i32,i8*,void(...)*,void(...)*,i32}>,<{[4x i8],i32,i8*,void(...)*,void(...)*,i32}>*@j,i64 0,i32 2)to i8*)
@k=private unnamed_addr constant<{[4x i8],i32,i8*,void(...)*,void(...)*,i32}><{[4x i8]zeroinitializer,i32 -805306344,i8*null,void(...)*bitcast(i8*(i32)*@_SMLFN6Word3211toLargeIntXE to void(...)*),void(...)*bitcast(i8*(i8*,i8*)*@_SMLLN6Word3211toLargeIntXE_97 to void(...)*),i32 -2147483647}>,align 8
@_SMLZN6Word3211toLargeIntXE=local_unnamed_addr constant i8*bitcast(i8**getelementptr inbounds(<{[4x i8],i32,i8*,void(...)*,void(...)*,i32}>,<{[4x i8],i32,i8*,void(...)*,void(...)*,i32}>*@k,i64 0,i32 2)to i8*)
@l=private unnamed_addr constant<{[4x i8],i32,i8*,void(...)*,void(...)*,i32}><{[4x i8]zeroinitializer,i32 -805306344,i8*null,void(...)*bitcast(i32(i8*)*@_SMLFN6Word3212fromLargeIntE to void(...)*),void(...)*bitcast(i8*(i8*,i8*)*@_SMLLN6Word3212fromLargeIntE_98 to void(...)*),i32 -2147483647}>,align 8
@_SMLZN6Word3212fromLargeIntE=local_unnamed_addr constant i8*bitcast(i8**getelementptr inbounds(<{[4x i8],i32,i8*,void(...)*,void(...)*,i32}>,<{[4x i8],i32,i8*,void(...)*,void(...)*,i32}>*@l,i64 0,i32 2)to i8*)
@_SMLZN6Word327compareE=local_unnamed_addr constant i8*bitcast(i8**getelementptr inbounds(<{[4x i8],i32,i8*,void(...)*,void(...)*,i32}>,<{[4x i8],i32,i8*,void(...)*,void(...)*,i32}>*@a,i64 0,i32 2)to i8*)
@_SMLZN6Word323minE=local_unnamed_addr constant i8*bitcast(i8**getelementptr inbounds(<{[4x i8],i32,i8*,void(...)*,void(...)*,i32}>,<{[4x i8],i32,i8*,void(...)*,void(...)*,i32}>*@b,i64 0,i32 2)to i8*)
@_SMLZN6Word323maxE=local_unnamed_addr constant i8*bitcast(i8**getelementptr inbounds(<{[4x i8],i32,i8*,void(...)*,void(...)*,i32}>,<{[4x i8],i32,i8*,void(...)*,void(...)*,i32}>*@c,i64 0,i32 2)to i8*)
@_SMLZN6Word323fmtE=local_unnamed_addr constant i8*bitcast(i8**getelementptr inbounds(<{[4x i8],i32,i8*,void(...)*,void(...)*,i32}>,<{[4x i8],i32,i8*,void(...)*,void(...)*,i32}>*@f,i64 0,i32 2)to i8*)
@m=private unnamed_addr constant<{[4x i8],i32,i8*,void(...)*,void(...)*,i32}><{[4x i8]zeroinitializer,i32 -805306344,i8*null,void(...)*bitcast(i8*(i32)*@_SMLFN6Word328toStringE to void(...)*),void(...)*bitcast(i8*(i8*,i8*)*@_SMLLN6Word328toStringE_99 to void(...)*),i32 -2147483647}>,align 8
@_SMLZN6Word328toStringE=local_unnamed_addr constant i8*bitcast(i8**getelementptr inbounds(<{[4x i8],i32,i8*,void(...)*,void(...)*,i32}>,<{[4x i8],i32,i8*,void(...)*,void(...)*,i32}>*@m,i64 0,i32 2)to i8*)
@n=private unnamed_addr constant<{[4x i8],i32,i8*,void(...)*,void(...)*,i32}><{[4x i8]zeroinitializer,i32 -805306344,i8*null,void(...)*bitcast(i8*(i32,i32)*@_SMLFN6Word324scanE to void(...)*),void(...)*bitcast(i8*(i8*,i8*,i8*)*@_SMLLN6Word324scanE_101 to void(...)*),i32 -2147483647}>,align 8
@_SMLZN6Word324scanE=local_unnamed_addr constant i8*bitcast(i8**getelementptr inbounds(<{[4x i8],i32,i8*,void(...)*,void(...)*,i32}>,<{[4x i8],i32,i8*,void(...)*,void(...)*,i32}>*@n,i64 0,i32 2)to i8*)
@o=private unnamed_addr constant<{[4x i8],i32,i8*,void(...)*,void(...)*,i32}><{[4x i8]zeroinitializer,i32 -805306344,i8*null,void(...)*bitcast(i8*(i8*)*@_SMLFN6Word3210fromStringE to void(...)*),void(...)*bitcast(i8*(i8*,i8*)*@_SMLLN6Word3210fromStringE_102 to void(...)*),i32 -2147483647}>,align 8
@_SMLZN6Word3210fromStringE=local_unnamed_addr constant i8*bitcast(i8**getelementptr inbounds(<{[4x i8],i32,i8*,void(...)*,void(...)*,i32}>,<{[4x i8],i32,i8*,void(...)*,void(...)*,i32}>*@o,i64 0,i32 2)to i8*)
@_SML_ftabf19563e8df97169c_Word32=external global i8
@p=private unnamed_addr global i8 0
declare void@llvm.gcroot(i8**,i8*)#0
declare i8*@prim_IntInf_fromWord(i32)local_unnamed_addr
declare i32@prim_IntInf_toWord(i8*)local_unnamed_addr
declare i8*@sml_alloc(i32 inreg)local_unnamed_addr#0
declare void@sml_check(i32 inreg)local_unnamed_addr
declare void@sml_gcroot(i8*,void()*,i8*,i8*)local_unnamed_addr#0
declare i32@sml_personality(...)#0
declare void@sml_raise(i8*inreg)local_unnamed_addr#1
declare i8*@sml_save()local_unnamed_addr#0
declare void@sml_unsave()local_unnamed_addr#0
declare i8*@sml_unsave_exn(i8*inreg)local_unnamed_addr#0
declare i8*@_SMLFN10CharVector8fromListE(i8*inreg)local_unnamed_addr#2 gc"smlsharp"
declare i8@_SMLFN17SMLSharp__ScanChar10intToDigitE(i32 inreg)local_unnamed_addr#2 gc"smlsharp"
declare i32@_SMLFN17SMLSharp__ScanChar10radixToIntE(i32 inreg)local_unnamed_addr#2 gc"smlsharp"
declare i8*@_SMLFN17SMLSharp__ScanChar8scanWordE(i32 inreg,i32 inreg)local_unnamed_addr#2 gc"smlsharp"
declare i8*@_SMLFN6IntInf7fromIntE(i32 inreg)local_unnamed_addr#2 gc"smlsharp"
declare i8*@_SMLFN9StringCvt10scanStringE(i32 inreg,i32 inreg)local_unnamed_addr#2 gc"smlsharp"
declare void@_SML_main5c37eb24573fc5f9_StringCvt()local_unnamed_addr#2 gc"smlsharp"
declare void@_SML_main5d4c3ea7bd6f9540_IntInf()local_unnamed_addr#2 gc"smlsharp"
declare void@_SML_main4fb8d2c1f12728b2_SMLSharp_ScanChar()local_unnamed_addr#2 gc"smlsharp"
declare void@_SML_mainadbb5309e852b68c_CharVector()local_unnamed_addr#2 gc"smlsharp"
declare void@_SML_load5c37eb24573fc5f9_StringCvt(i8*)local_unnamed_addr
declare void@_SML_load5d4c3ea7bd6f9540_IntInf(i8*)local_unnamed_addr
declare void@_SML_load4fb8d2c1f12728b2_SMLSharp_ScanChar(i8*)local_unnamed_addr
declare void@_SML_loadadbb5309e852b68c_CharVector(i8*)local_unnamed_addr
define private void@_SML_tabbf19563e8df97169c_Word32()#3{
unreachable
}
define void@_SML_loadf19563e8df97169c_Word32(i8*%a)local_unnamed_addr#0{
%b=load i8,i8*@p,align 1
%c=icmp eq i8%b,0
br i1%c,label%e,label%d
d:
ret void
e:
store i8 1,i8*@p,align 1
tail call void@_SML_load5c37eb24573fc5f9_StringCvt(i8*%a)#0
tail call void@_SML_load5d4c3ea7bd6f9540_IntInf(i8*%a)#0
tail call void@_SML_load4fb8d2c1f12728b2_SMLSharp_ScanChar(i8*%a)#0
tail call void@_SML_loadadbb5309e852b68c_CharVector(i8*%a)#0
tail call void@sml_gcroot(i8*%a,void()*@_SML_tabbf19563e8df97169c_Word32,i8*@_SML_ftabf19563e8df97169c_Word32,i8*null)#0
ret void
}
define void@_SML_mainf19563e8df97169c_Word32()local_unnamed_addr#2 gc"smlsharp"{
%a=load i8,i8*@p,align 1
%b=and i8%a,2
%c=icmp eq i8%b,0
br i1%c,label%e,label%d
d:
ret void
e:
store i8 3,i8*@p,align 1
tail call void@_SML_main5c37eb24573fc5f9_StringCvt()#2
tail call void@_SML_main5d4c3ea7bd6f9540_IntInf()#2
tail call void@_SML_main4fb8d2c1f12728b2_SMLSharp_ScanChar()#2
tail call void@_SML_mainadbb5309e852b68c_CharVector()#2
br label%d
}
define fastcc i32@_SMLFN6Word327compareE(i8*inreg%a)#4 gc"smlsharp"{
%b=bitcast i8*%a to i32*
%c=load i32,i32*%b,align 4
%d=getelementptr inbounds i8,i8*%a,i64 4
%e=bitcast i8*%d to i32*
%f=load i32,i32*%e,align 4
%g=icmp eq i32%c,%f
%h=icmp ult i32%c,%f
%i=select i1%h,i32 2,i32 1
%j=select i1%g,i32 0,i32%i
ret i32%j
}
define fastcc i32@_SMLFN6Word323minE(i8*inreg%a)#4 gc"smlsharp"{
%b=bitcast i8*%a to i32*
%c=load i32,i32*%b,align 4
%d=getelementptr inbounds i8,i8*%a,i64 4
%e=bitcast i8*%d to i32*
%f=load i32,i32*%e,align 4
%g=icmp ult i32%c,%f
%h=select i1%g,i32%c,i32%f
ret i32%h
}
define fastcc i32@_SMLFN6Word323maxE(i8*inreg%a)#4 gc"smlsharp"{
%b=bitcast i8*%a to i32*
%c=load i32,i32*%b,align 4
%d=getelementptr inbounds i8,i8*%a,i64 4
%e=bitcast i8*%d to i32*
%f=load i32,i32*%e,align 4
%g=icmp ugt i32%c,%f
%h=select i1%g,i32%c,i32%f
ret i32%h
}
define internal fastcc i8*@_SMLL4loop_59(i8*inreg%a,i8*inreg%b)#2 gc"smlsharp"{
i:
%c=alloca i8*,align 8
%d=alloca i8*,align 8
%e=alloca i8*,align 8
call void@llvm.gcroot(i8**%c,i8*null)#0
call void@llvm.gcroot(i8**%d,i8*null)#0
call void@llvm.gcroot(i8**%e,i8*null)#0
store i8*%a,i8**%d,align 8
%f=bitcast i8**%d to i32**
br label%g
g:
%h=phi i8*[%ag,%T],[%b,%i]
store i8*%h,i8**%c,align 8
%j=load atomic i32,i32*@sml_check_flag unordered,align 4
%k=icmp eq i32%j,0
br i1%k,label%n,label%l
l:
call void@sml_check(i32 inreg%j)
%m=load i8*,i8**%c,align 8
br label%n
n:
%o=phi i8*[%m,%l],[%h,%g]
%p=bitcast i8*%o to i32*
%q=load i32,i32*%p,align 4
%r=getelementptr inbounds i8,i8*%o,i64 8
%s=bitcast i8*%r to i8**
%t=load i8*,i8**%s,align 8
store i8*%t,i8**%c,align 8
%u=icmp eq i32%q,0
br i1%u,label%v,label%x
v:
%w=tail call fastcc i8*@_SMLFN10CharVector8fromListE(i8*inreg%t)
ret i8*%w
x:
%y=load i32*,i32**%f,align 8
%z=load i32,i32*%y,align 4
%A=icmp eq i32%z,0
br i1%A,label%B,label%T
B:
store i8*null,i8**%d,align 8
%C=load i8*,i8**@_SMLZ3Div,align 8
store i8*%C,i8**%c,align 8
%D=call i8*@sml_alloc(i32 inreg 20)#0
%E=getelementptr inbounds i8,i8*%D,i64 -4
%F=bitcast i8*%E to i32*
store i32 1342177296,i32*%F,align 4
store i8*%D,i8**%d,align 8
%G=load i8*,i8**%c,align 8
store i8*null,i8**%c,align 8
%H=bitcast i8*%D to i8**
store i8*%G,i8**%H,align 8
%I=getelementptr inbounds i8,i8*%D,i64 8
%J=bitcast i8*%I to i8**
store i8*getelementptr inbounds(<{[4x i8],i32,[43x i8]}>,<{[4x i8],i32,[43x i8]}>*@d,i64 0,i32 2,i64 0),i8**%J,align 8
%K=getelementptr inbounds i8,i8*%D,i64 16
%L=bitcast i8*%K to i32*
store i32 3,i32*%L,align 4
%M=call i8*@sml_alloc(i32 inreg 60)#0
%N=getelementptr inbounds i8,i8*%M,i64 -4
%O=bitcast i8*%N to i32*
store i32 1342177336,i32*%O,align 4
%P=getelementptr inbounds i8,i8*%M,i64 56
%Q=bitcast i8*%P to i32*
store i32 1,i32*%Q,align 4
%R=load i8*,i8**%d,align 8
%S=bitcast i8*%M to i8**
store i8*%R,i8**%S,align 8
call void@sml_raise(i8*inreg%M)#1
unreachable
T:
%U=udiv i32%q,%z
%V=urem i32%q,%z
%W=call fastcc i8@_SMLFN17SMLSharp__ScanChar10intToDigitE(i32 inreg%V)
%X=call i8*@sml_alloc(i32 inreg 20)#0
%Y=getelementptr inbounds i8,i8*%X,i64 -4
%Z=bitcast i8*%Y to i32*
store i32 1342177296,i32*%Z,align 4
store i8*%X,i8**%e,align 8
%aa=getelementptr inbounds i8,i8*%X,i64 1
call void@llvm.memset.p0i8.i32(i8*%aa,i8 0,i32 7,i1 false)
store i8%W,i8*%X,align 1
%ab=load i8*,i8**%c,align 8
store i8*null,i8**%c,align 8
%ac=getelementptr inbounds i8,i8*%X,i64 8
%ad=bitcast i8*%ac to i8**
store i8*%ab,i8**%ad,align 8
%ae=getelementptr inbounds i8,i8*%X,i64 16
%af=bitcast i8*%ae to i32*
store i32 2,i32*%af,align 4
%ag=call i8*@sml_alloc(i32 inreg 20)#0
%ah=bitcast i8*%ag to i32*
%ai=getelementptr inbounds i8,i8*%ag,i64 -4
%aj=bitcast i8*%ai to i32*
store i32 1342177296,i32*%aj,align 4
%ak=getelementptr inbounds i8,i8*%ag,i64 4
%al=bitcast i8*%ak to i32*
store i32 0,i32*%al,align 1
store i32%U,i32*%ah,align 4
%am=load i8*,i8**%e,align 8
store i8*null,i8**%e,align 8
%an=getelementptr inbounds i8,i8*%ag,i64 8
%ao=bitcast i8*%an to i8**
store i8*%am,i8**%ao,align 8
%ap=getelementptr inbounds i8,i8*%ag,i64 16
%aq=bitcast i8*%ap to i32*
store i32 2,i32*%aq,align 4
br label%g
}
define internal fastcc i8*@_SMLLN11Word__common3fmtE_63(i8*inreg%a,i32 inreg%b)#2 gc"smlsharp"{
%c=alloca i8*,align 8
call void@llvm.gcroot(i8**%c,i8*null)#0
store i8*%a,i8**%c,align 8
%d=load atomic i32,i32*@sml_check_flag unordered,align 4
%e=icmp eq i32%d,0
br i1%e,label%f,label%h
f:
%g=bitcast i8*%a to i32*
br label%k
h:
call void@sml_check(i32 inreg%d)
%i=bitcast i8**%c to i32**
%j=load i32*,i32**%i,align 8
br label%k
k:
%l=phi i32*[%j,%h],[%g,%f]
store i8*null,i8**%c,align 8
%m=load i32,i32*%l,align 4
%n=call fastcc i32@_SMLFN17SMLSharp__ScanChar10radixToIntE(i32 inreg%m)
%o=call i8*@sml_alloc(i32 inreg 12)#0
%p=bitcast i8*%o to i32*
%q=getelementptr inbounds i8,i8*%o,i64 -4
%r=bitcast i8*%q to i32*
store i32 1342177288,i32*%r,align 4
store i8*%o,i8**%c,align 8
store i32%n,i32*%p,align 4
%s=getelementptr inbounds i8,i8*%o,i64 8
%t=bitcast i8*%s to i32*
store i32 0,i32*%t,align 4
%u=call i8*@sml_alloc(i32 inreg 28)#0
%v=getelementptr inbounds i8,i8*%u,i64 -4
%w=bitcast i8*%v to i32*
store i32 1342177304,i32*%w,align 4
%x=load i8*,i8**%c,align 8
%y=bitcast i8*%u to i8**
store i8*%x,i8**%y,align 8
%z=getelementptr inbounds i8,i8*%u,i64 8
%A=bitcast i8*%z to void(...)**
store void(...)*bitcast(i8*(i8*,i8*)*@_SMLL4loop_59 to void(...)*),void(...)**%A,align 8
%B=getelementptr inbounds i8,i8*%u,i64 16
%C=bitcast i8*%B to void(...)**
store void(...)*bitcast(i8*(i8*,i8*)*@_SMLL4loop_59 to void(...)*),void(...)**%C,align 8
%D=getelementptr inbounds i8,i8*%u,i64 24
%E=bitcast i8*%D to i32*
store i32 -2147483647,i32*%E,align 4
%F=icmp eq i32%b,0
br i1%F,label%G,label%H
G:
ret i8*getelementptr inbounds(<{[4x i8],i32,[2x i8]}>,<{[4x i8],i32,[2x i8]}>*@e,i64 0,i32 2,i64 0)
H:
%I=call i8*@sml_alloc(i32 inreg 20)#0
%J=bitcast i8*%I to i32*
%K=getelementptr inbounds i8,i8*%I,i64 -4
%L=bitcast i8*%K to i32*
store i32 1342177296,i32*%L,align 4
%M=getelementptr inbounds i8,i8*%I,i64 4
%N=bitcast i8*%M to i32*
store i32 0,i32*%N,align 1
store i32%b,i32*%J,align 4
%O=getelementptr inbounds i8,i8*%I,i64 8
%P=bitcast i8*%O to i8**
store i8*null,i8**%P,align 8
%Q=getelementptr inbounds i8,i8*%I,i64 16
%R=bitcast i8*%Q to i32*
store i32 2,i32*%R,align 4
%S=load i8*,i8**%c,align 8
%T=tail call fastcc i8*@_SMLL4loop_59(i8*inreg%S,i8*inreg%I)
ret i8*%T
}
define fastcc i8*@_SMLFN6Word323fmtE(i32 inreg%a)#4 gc"smlsharp"{
%b=alloca i8*,align 8
call void@llvm.gcroot(i8**%b,i8*null)#0
%c=call i8*@sml_alloc(i32 inreg 12)#0
%d=bitcast i8*%c to i32*
%e=getelementptr inbounds i8,i8*%c,i64 -4
%f=bitcast i8*%e to i32*
store i32 1342177288,i32*%f,align 4
store i8*%c,i8**%b,align 8
store i32%a,i32*%d,align 4
%g=getelementptr inbounds i8,i8*%c,i64 8
%h=bitcast i8*%g to i32*
store i32 0,i32*%h,align 4
%i=call i8*@sml_alloc(i32 inreg 28)#0
%j=getelementptr inbounds i8,i8*%i,i64 -4
%k=bitcast i8*%j to i32*
store i32 1342177304,i32*%k,align 4
%l=load i8*,i8**%b,align 8
%m=bitcast i8*%i to i8**
store i8*%l,i8**%m,align 8
%n=getelementptr inbounds i8,i8*%i,i64 8
%o=bitcast i8*%n to void(...)**
store void(...)*bitcast(i8*(i8*,i32)*@_SMLLN11Word__common3fmtE_63 to void(...)*),void(...)**%o,align 8
%p=getelementptr inbounds i8,i8*%i,i64 16
%q=bitcast i8*%p to void(...)**
store void(...)*bitcast(i8*(i8*,i8*)*@_SMLLN11Word__common3fmtE_91 to void(...)*),void(...)**%q,align 8
%r=getelementptr inbounds i8,i8*%i,i64 24
%s=bitcast i8*%r to i32*
store i32 -2147483647,i32*%s,align 4
ret i8*%i
}
define internal fastcc i8*@_SMLL4loop_67(i8*inreg%a,i32 inreg%b,i8*inreg%c)#2 gc"smlsharp"{
h:
%d=alloca i8*,align 8
%e=alloca i8*,align 8
call void@llvm.gcroot(i8**%d,i8*null)#0
call void@llvm.gcroot(i8**%e,i8*null)#0
store i8*%a,i8**%d,align 8
br label%f
f:
%g=phi i8*[%q,%bn],[%a,%h]
%i=phi i8*[%bq,%bn],[%c,%h]
%j=phi i32[%aL,%bn],[%b,%h]
store i8*%i,i8**%e,align 8
%k=load atomic i32,i32*@sml_check_flag unordered,align 4
%l=icmp eq i32%k,0
br i1%l,label%p,label%m
m:
call void@sml_check(i32 inreg%k)
%n=load i8*,i8**%e,align 8
%o=load i8*,i8**%d,align 8
br label%p
p:
%q=phi i8*[%o,%m],[%g,%f]
%r=phi i8*[%n,%m],[%i,%f]
%s=getelementptr inbounds i8,i8*%q,i64 20
%t=bitcast i8*%s to i32*
%u=load i32,i32*%t,align 4
%v=getelementptr inbounds i8,i8*%q,i64 16
%w=bitcast i8*%v to i32*
%x=load i32,i32*%w,align 4
%y=icmp eq i8*%r,null
br i1%y,label%z,label%az
z:
%A=add i32%u,3
%B=sub i32 0,%u
%C=and i32%A,%B
%D=add i32%u,7
%E=add i32%D,%C
%F=and i32%E,-8
%G=lshr i32%C,3
%H=shl i32%x,%G
%I=or i32%F,4
%J=icmp eq i32%x,0
br i1%J,label%N,label%K
K:
%L=bitcast i8*%q to i8**
%M=load i8*,i8**%L,align 8
br label%Y
N:
%O=call i8*@sml_alloc(i32 inreg%u)#0
%P=getelementptr inbounds i8,i8*%O,i64 -4
%Q=bitcast i8*%P to i32*
store i32%u,i32*%Q,align 4
%R=load i8*,i8**%d,align 8
call void@llvm.memcpy.p0i8.p0i8.i32(i8*%O,i8*%R,i32%u,i1 false)
%S=getelementptr inbounds i8,i8*%R,i64 20
%T=bitcast i8*%S to i32*
%U=load i32,i32*%T,align 4
%V=getelementptr inbounds i8,i8*%R,i64 16
%W=bitcast i8*%V to i32*
%X=load i32,i32*%W,align 4
br label%Y
Y:
%Z=phi i32[%X,%N],[%x,%K]
%aa=phi i32[%U,%N],[%u,%K]
%ab=phi i8*[%O,%N],[%M,%K]
store i8*%ab,i8**%e,align 8
store i8*null,i8**%d,align 8
%ac=call i8*@sml_alloc(i32 inreg%I)#0
%ad=or i32%F,1342177280
%ae=getelementptr inbounds i8,i8*%ac,i64 -4
%af=bitcast i8*%ae to i32*
store i32%ad,i32*%af,align 4
store i8*%ac,i8**%d,align 8
call void@llvm.memset.p0i8.i32(i8*%ac,i8 0,i32%I,i1 false)
%ag=bitcast i8*%ac to i32*
store i32%j,i32*%ag,align 4
%ah=icmp eq i32%Z,0
%ai=load i8*,i8**%e,align 8
store i8*null,i8**%e,align 8
%aj=sext i32%C to i64
%ak=getelementptr inbounds i8,i8*%ac,i64%aj
br i1%ah,label%an,label%al
al:
%am=bitcast i8*%ak to i8**
store i8*%ai,i8**%am,align 8
br label%ao
an:
call void@llvm.memcpy.p0i8.p0i8.i32(i8*%ak,i8*%ai,i32%aa,i1 false)
br label%ao
ao:
%ap=sext i32%F to i64
%aq=getelementptr inbounds i8,i8*%ac,i64%ap
%ar=bitcast i8*%aq to i32*
store i32%H,i32*%ar,align 4
%as=call i8*@sml_alloc(i32 inreg 12)#0
%at=getelementptr inbounds i8,i8*%as,i64 -4
%au=bitcast i8*%at to i32*
store i32 1342177288,i32*%au,align 4
%av=load i8*,i8**%d,align 8
%aw=bitcast i8*%as to i8**
store i8*%av,i8**%aw,align 8
%ax=getelementptr inbounds i8,i8*%as,i64 8
%ay=bitcast i8*%ax to i32*
store i32 1,i32*%ay,align 4
ret i8*%as
az:
%aA=getelementptr inbounds i8,i8*%q,i64 12
%aB=bitcast i8*%aA to i32*
%aC=load i32,i32*%aB,align 4
%aD=icmp ugt i32%j,%aC
br i1%aD,label%aN,label%aE
aE:
%aF=bitcast i8*%r to i32*
%aG=load i32,i32*%aF,align 4
%aH=getelementptr inbounds i8,i8*%q,i64 8
%aI=bitcast i8*%aH to i32*
%aJ=load i32,i32*%aI,align 4
%aK=mul i32%aJ,%j
%aL=add i32%aK,%aG
%aM=icmp ult i32%aL,%aK
br i1%aM,label%a5,label%bn
aN:
%aO=load i8*,i8**@_SMLZ8Overflow,align 8
store i8*%aO,i8**%d,align 8
%aP=call i8*@sml_alloc(i32 inreg 20)#0
%aQ=getelementptr inbounds i8,i8*%aP,i64 -4
%aR=bitcast i8*%aQ to i32*
store i32 1342177296,i32*%aR,align 4
store i8*%aP,i8**%e,align 8
%aS=load i8*,i8**%d,align 8
store i8*null,i8**%d,align 8
%aT=bitcast i8*%aP to i8**
store i8*%aS,i8**%aT,align 8
%aU=getelementptr inbounds i8,i8*%aP,i64 8
%aV=bitcast i8*%aU to i8**
store i8*getelementptr inbounds(<{[4x i8],i32,[44x i8]}>,<{[4x i8],i32,[44x i8]}>*@h,i64 0,i32 2,i64 0),i8**%aV,align 8
%aW=getelementptr inbounds i8,i8*%aP,i64 16
%aX=bitcast i8*%aW to i32*
store i32 3,i32*%aX,align 4
%aY=call i8*@sml_alloc(i32 inreg 60)#0
%aZ=getelementptr inbounds i8,i8*%aY,i64 -4
%a0=bitcast i8*%aZ to i32*
store i32 1342177336,i32*%a0,align 4
%a1=getelementptr inbounds i8,i8*%aY,i64 56
%a2=bitcast i8*%a1 to i32*
store i32 1,i32*%a2,align 4
%a3=load i8*,i8**%e,align 8
%a4=bitcast i8*%aY to i8**
store i8*%a3,i8**%a4,align 8
call void@sml_raise(i8*inreg%aY)#1
unreachable
a5:
%a6=load i8*,i8**@_SMLZ8Overflow,align 8
store i8*%a6,i8**%d,align 8
%a7=call i8*@sml_alloc(i32 inreg 20)#0
%a8=getelementptr inbounds i8,i8*%a7,i64 -4
%a9=bitcast i8*%a8 to i32*
store i32 1342177296,i32*%a9,align 4
store i8*%a7,i8**%e,align 8
%ba=load i8*,i8**%d,align 8
store i8*null,i8**%d,align 8
%bb=bitcast i8*%a7 to i8**
store i8*%ba,i8**%bb,align 8
%bc=getelementptr inbounds i8,i8*%a7,i64 8
%bd=bitcast i8*%bc to i8**
store i8*getelementptr inbounds(<{[4x i8],i32,[44x i8]}>,<{[4x i8],i32,[44x i8]}>*@i,i64 0,i32 2,i64 0),i8**%bd,align 8
%be=getelementptr inbounds i8,i8*%a7,i64 16
%bf=bitcast i8*%be to i32*
store i32 3,i32*%bf,align 4
%bg=call i8*@sml_alloc(i32 inreg 60)#0
%bh=getelementptr inbounds i8,i8*%bg,i64 -4
%bi=bitcast i8*%bh to i32*
store i32 1342177336,i32*%bi,align 4
%bj=getelementptr inbounds i8,i8*%bg,i64 56
%bk=bitcast i8*%bj to i32*
store i32 1,i32*%bk,align 4
%bl=load i8*,i8**%e,align 8
%bm=bitcast i8*%bg to i8**
store i8*%bl,i8**%bm,align 8
call void@sml_raise(i8*inreg%bg)#1
unreachable
bn:
%bo=getelementptr inbounds i8,i8*%r,i64 8
%bp=bitcast i8*%bo to i8**
%bq=load i8*,i8**%bp,align 8
br label%f
}
define internal fastcc i8*@_SMLLN11Word__common4scanE_70(i8*inreg%a,i8*inreg%b)#2 gc"smlsharp"{
l:
%c=alloca i8*,align 8
%d=alloca i8*,align 8
%e=alloca i8*,align 8
call void@llvm.gcroot(i8**%c,i8*null)#0
call void@llvm.gcroot(i8**%d,i8*null)#0
call void@llvm.gcroot(i8**%e,i8*null)#0
store i8*%a,i8**%e,align 8
store i8*%b,i8**%c,align 8
%f=load atomic i32,i32*@sml_check_flag unordered,align 4
%g=icmp eq i32%f,0
br i1%g,label%j,label%h
h:
call void@sml_check(i32 inreg%f)
%i=load i8*,i8**%e,align 8
br label%j
j:
%k=phi i8*[%i,%h],[%a,%l]
%m=getelementptr inbounds i8,i8*%k,i64 12
%n=bitcast i8*%m to i32*
%o=load i32,i32*%n,align 4
%p=getelementptr inbounds i8,i8*%k,i64 16
%q=bitcast i8*%p to i32*
%r=load i32,i32*%q,align 4
%s=add i32%r,7
%t=sub i32 0,%r
%u=and i32%s,%t
%v=call fastcc i8*@_SMLFN17SMLSharp__ScanChar8scanWordE(i32 inreg%o,i32 inreg%r)
%w=getelementptr inbounds i8,i8*%v,i64 16
%x=bitcast i8*%w to i8*(i8*,i8*)**
%y=load i8*(i8*,i8*)*,i8*(i8*,i8*)**%x,align 8
%z=bitcast i8*%v to i8**
%A=load i8*,i8**%z,align 8
store i8*%A,i8**%d,align 8
%B=load i8*,i8**%e,align 8
%C=getelementptr inbounds i8,i8*%B,i64 8
%D=bitcast i8*%C to i32*
%E=load i32,i32*%D,align 4
%F=call i8*@sml_alloc(i32 inreg 4)#0
%G=bitcast i8*%F to i32*
%H=getelementptr inbounds i8,i8*%F,i64 -4
%I=bitcast i8*%H to i32*
store i32 4,i32*%I,align 4
store i32%E,i32*%G,align 4
%J=load i8*,i8**%d,align 8
store i8*null,i8**%d,align 8
%K=call fastcc i8*%y(i8*inreg%J,i8*inreg%F)
%L=getelementptr inbounds i8,i8*%K,i64 16
%M=bitcast i8*%L to i8*(i8*,i8*)**
%N=load i8*(i8*,i8*)*,i8*(i8*,i8*)**%M,align 8
%O=bitcast i8*%K to i8**
%P=load i8*,i8**%O,align 8
%Q=bitcast i8**%e to i8***
%R=load i8**,i8***%Q,align 8
%S=load i8*,i8**%R,align 8
%T=call fastcc i8*%N(i8*inreg%P,i8*inreg%S)
%U=getelementptr inbounds i8,i8*%T,i64 16
%V=bitcast i8*%U to i8*(i8*,i8*)**
%W=load i8*(i8*,i8*)*,i8*(i8*,i8*)**%V,align 8
%X=bitcast i8*%T to i8**
%Y=load i8*,i8**%X,align 8
%Z=load i8*,i8**%c,align 8
store i8*null,i8**%c,align 8
%aa=call fastcc i8*%W(i8*inreg%Y,i8*inreg%Z)
%ab=icmp eq i8*%aa,null
br i1%ab,label%ac,label%ad
ac:
ret i8*null
ad:
%ae=bitcast i8*%aa to i8**
%af=load i8*,i8**%ae,align 8
store i8*%af,i8**%c,align 8
%ag=load i8*,i8**%e,align 8
%ah=getelementptr inbounds i8,i8*%ag,i64 12
%ai=bitcast i8*%ah to i32*
%aj=load i32,i32*%ai,align 4
%ak=icmp eq i32%aj,0
br i1%ak,label%aq,label%al
al:
%am=sext i32%u to i64
%an=getelementptr inbounds i8,i8*%af,i64%am
%ao=bitcast i8*%an to i8**
%ap=load i8*,i8**%ao,align 8
br label%aA
aq:
%ar=getelementptr inbounds i8,i8*%ag,i64 16
%as=bitcast i8*%ar to i32*
%at=load i32,i32*%as,align 4
%au=call i8*@sml_alloc(i32 inreg%at)#0
%av=getelementptr inbounds i8,i8*%au,i64 -4
%aw=bitcast i8*%av to i32*
store i32%at,i32*%aw,align 4
%ax=load i8*,i8**%c,align 8
%ay=sext i32%u to i64
%az=getelementptr inbounds i8,i8*%ax,i64%ay
call void@llvm.memcpy.p0i8.p0i8.i32(i8*%au,i8*%az,i32%at,i1 false)
br label%aA
aA:
%aB=phi i8*[%ax,%aq],[%af,%al]
%aC=phi i8*[%au,%aq],[%ap,%al]
%aD=bitcast i8*%aB to i8**
store i8*%aC,i8**%d,align 8
%aE=load i8*,i8**%aD,align 8
%aF=getelementptr inbounds i8,i8*%aE,i64 8
%aG=bitcast i8*%aF to i32*
%aH=load i32,i32*%aG,align 4
%aI=icmp eq i32%aH,0
br i1%aI,label%aX,label%aJ
aJ:
%aK=udiv i32 -1,%aH
%aL=load i8*,i8**%e,align 8
%aM=getelementptr inbounds i8,i8*%aL,i64 16
%aN=bitcast i8*%aM to i32*
%aO=load i32,i32*%aN,align 4
%aP=getelementptr inbounds i8,i8*%aL,i64 12
%aQ=bitcast i8*%aP to i32*
%aR=load i32,i32*%aQ,align 4
store i8*null,i8**%e,align 8
%aS=call i8*@sml_alloc(i32 inreg 28)#0
%aT=getelementptr inbounds i8,i8*%aS,i64 -4
%aU=bitcast i8*%aT to i32*
store i32 1342177304,i32*%aU,align 4
store i8*%aS,i8**%e,align 8
%aV=icmp eq i32%aR,0
%aW=load i8*,i8**%d,align 8
store i8*null,i8**%d,align 8
br i1%aV,label%bh,label%bf
aX:
store i8*null,i8**%d,align 8
store i8*null,i8**%e,align 8
%aY=load i8*,i8**@_SMLZ3Div,align 8
store i8*%aY,i8**%c,align 8
%aZ=call i8*@sml_alloc(i32 inreg 20)#0
%a0=getelementptr inbounds i8,i8*%aZ,i64 -4
%a1=bitcast i8*%a0 to i32*
store i32 1342177296,i32*%a1,align 4
store i8*%aZ,i8**%d,align 8
%a2=load i8*,i8**%c,align 8
store i8*null,i8**%c,align 8
%a3=bitcast i8*%aZ to i8**
store i8*%a2,i8**%a3,align 8
%a4=getelementptr inbounds i8,i8*%aZ,i64 8
%a5=bitcast i8*%a4 to i8**
store i8*getelementptr inbounds(<{[4x i8],i32,[44x i8]}>,<{[4x i8],i32,[44x i8]}>*@g,i64 0,i32 2,i64 0),i8**%a5,align 8
%a6=getelementptr inbounds i8,i8*%aZ,i64 16
%a7=bitcast i8*%a6 to i32*
store i32 3,i32*%a7,align 4
%a8=call i8*@sml_alloc(i32 inreg 60)#0
%a9=getelementptr inbounds i8,i8*%a8,i64 -4
%ba=bitcast i8*%a9 to i32*
store i32 1342177336,i32*%ba,align 4
%bb=getelementptr inbounds i8,i8*%a8,i64 56
%bc=bitcast i8*%bb to i32*
store i32 1,i32*%bc,align 4
%bd=load i8*,i8**%d,align 8
%be=bitcast i8*%a8 to i8**
store i8*%bd,i8**%be,align 8
call void@sml_raise(i8*inreg%a8)#1
unreachable
bf:
%bg=bitcast i8*%aS to i8**
store i8*%aW,i8**%bg,align 8
br label%bi
bh:
call void@llvm.memcpy.p0i8.p0i8.i32(i8*%aS,i8*%aW,i32%aO,i1 false)
br label%bi
bi:
%bj=getelementptr inbounds i8,i8*%aS,i64 8
%bk=bitcast i8*%bj to i32*
store i32%aH,i32*%bk,align 4
%bl=getelementptr inbounds i8,i8*%aS,i64 12
%bm=bitcast i8*%bl to i32*
store i32%aK,i32*%bm,align 4
%bn=getelementptr inbounds i8,i8*%aS,i64 16
%bo=bitcast i8*%bn to i32*
store i32%aR,i32*%bo,align 4
%bp=getelementptr inbounds i8,i8*%aS,i64 20
%bq=bitcast i8*%bp to i32*
store i32%aO,i32*%bq,align 4
%br=getelementptr inbounds i8,i8*%aS,i64 24
%bs=bitcast i8*%br to i32*
store i32%o,i32*%bs,align 4
%bt=call i8*@sml_alloc(i32 inreg 28)#0
%bu=getelementptr inbounds i8,i8*%bt,i64 -4
%bv=bitcast i8*%bu to i32*
store i32 1342177304,i32*%bv,align 4
%bw=load i8*,i8**%e,align 8
%bx=bitcast i8*%bt to i8**
store i8*%bw,i8**%bx,align 8
%by=getelementptr inbounds i8,i8*%bt,i64 8
%bz=bitcast i8*%by to void(...)**
store void(...)*bitcast(i8*(i8*,i32,i8*)*@_SMLL4loop_67 to void(...)*),void(...)**%bz,align 8
%bA=getelementptr inbounds i8,i8*%bt,i64 16
%bB=bitcast i8*%bA to void(...)**
store void(...)*bitcast(i8*(i8*,i8*,i8*)*@_SMLL4loop_93 to void(...)*),void(...)**%bB,align 8
%bC=getelementptr inbounds i8,i8*%bt,i64 24
%bD=bitcast i8*%bC to i32*
store i32 -2147483647,i32*%bD,align 4
%bE=bitcast i8**%c to i8****
%bF=load i8***,i8****%bE,align 8
%bG=load i8**,i8***%bF,align 8
%bH=load i8*,i8**%bG,align 8
%bI=tail call fastcc i8*@_SMLL4loop_67(i8*inreg%bw,i32 inreg 0,i8*inreg%bH)
ret i8*%bI
}
define internal fastcc i8*@_SMLLN11Word__common4scanE_71(i8*inreg%a,i8*inreg%b)#4 gc"smlsharp"{
%c=alloca i8*,align 8
%d=alloca i8*,align 8
call void@llvm.gcroot(i8**%c,i8*null)#0
call void@llvm.gcroot(i8**%d,i8*null)#0
store i8*%b,i8**%c,align 8
%e=bitcast i8*%a to i32*
%f=load i32,i32*%e,align 4
%g=getelementptr inbounds i8,i8*%a,i64 4
%h=bitcast i8*%g to i32*
%i=load i32,i32*%h,align 4
%j=getelementptr inbounds i8,i8*%a,i64 8
%k=bitcast i8*%j to i32*
%l=load i32,i32*%k,align 4
%m=call i8*@sml_alloc(i32 inreg 28)#0
%n=getelementptr inbounds i8,i8*%m,i64 -4
%o=bitcast i8*%n to i32*
store i32 1342177304,i32*%o,align 4
store i8*%m,i8**%d,align 8
%p=load i8*,i8**%c,align 8
store i8*null,i8**%c,align 8
%q=bitcast i8*%m to i8**
store i8*%p,i8**%q,align 8
%r=getelementptr inbounds i8,i8*%m,i64 8
%s=bitcast i8*%r to i32*
store i32%f,i32*%s,align 4
%t=getelementptr inbounds i8,i8*%m,i64 12
%u=bitcast i8*%t to i32*
store i32%i,i32*%u,align 4
%v=getelementptr inbounds i8,i8*%m,i64 16
%w=bitcast i8*%v to i32*
store i32%l,i32*%w,align 4
%x=getelementptr inbounds i8,i8*%m,i64 24
%y=bitcast i8*%x to i32*
store i32 1,i32*%y,align 4
%z=call i8*@sml_alloc(i32 inreg 28)#0
%A=getelementptr inbounds i8,i8*%z,i64 -4
%B=bitcast i8*%A to i32*
store i32 1342177304,i32*%B,align 4
%C=load i8*,i8**%d,align 8
%D=bitcast i8*%z to i8**
store i8*%C,i8**%D,align 8
%E=getelementptr inbounds i8,i8*%z,i64 8
%F=bitcast i8*%E to void(...)**
store void(...)*bitcast(i8*(i8*,i8*)*@_SMLLN11Word__common4scanE_70 to void(...)*),void(...)**%F,align 8
%G=getelementptr inbounds i8,i8*%z,i64 16
%H=bitcast i8*%G to void(...)**
store void(...)*bitcast(i8*(i8*,i8*)*@_SMLLN11Word__common4scanE_70 to void(...)*),void(...)**%H,align 8
%I=getelementptr inbounds i8,i8*%z,i64 24
%J=bitcast i8*%I to i32*
store i32 1,i32*%J,align 4
ret i8*%z
}
define internal fastcc i8*@_SMLLN11Word__common4scanE_72(i8*inreg%a,i32 inreg%b)#4 gc"smlsharp"{
%c=alloca i8*,align 8
call void@llvm.gcroot(i8**%c,i8*null)#0
%d=bitcast i8*%a to i32*
%e=load i32,i32*%d,align 4
%f=getelementptr inbounds i8,i8*%a,i64 4
%g=bitcast i8*%f to i32*
%h=load i32,i32*%g,align 4
%i=call i8*@sml_alloc(i32 inreg 20)#0
%j=bitcast i8*%i to i32*
%k=getelementptr inbounds i8,i8*%i,i64 -4
%l=bitcast i8*%k to i32*
store i32 1342177296,i32*%l,align 4
store i8*%i,i8**%c,align 8
store i32%b,i32*%j,align 4
%m=getelementptr inbounds i8,i8*%i,i64 4
%n=bitcast i8*%m to i32*
store i32%e,i32*%n,align 4
%o=getelementptr inbounds i8,i8*%i,i64 8
%p=bitcast i8*%o to i32*
store i32%h,i32*%p,align 4
%q=getelementptr inbounds i8,i8*%i,i64 16
%r=bitcast i8*%q to i32*
store i32 0,i32*%r,align 4
%s=call i8*@sml_alloc(i32 inreg 28)#0
%t=getelementptr inbounds i8,i8*%s,i64 -4
%u=bitcast i8*%t to i32*
store i32 1342177304,i32*%u,align 4
%v=load i8*,i8**%c,align 8
%w=bitcast i8*%s to i8**
store i8*%v,i8**%w,align 8
%x=getelementptr inbounds i8,i8*%s,i64 8
%y=bitcast i8*%x to void(...)**
store void(...)*bitcast(i8*(i8*,i8*)*@_SMLLN11Word__common4scanE_71 to void(...)*),void(...)**%y,align 8
%z=getelementptr inbounds i8,i8*%s,i64 16
%A=bitcast i8*%z to void(...)**
store void(...)*bitcast(i8*(i8*,i8*)*@_SMLLN11Word__common4scanE_71 to void(...)*),void(...)**%A,align 8
%B=getelementptr inbounds i8,i8*%s,i64 24
%C=bitcast i8*%B to i32*
store i32 -2147483647,i32*%C,align 4
ret i8*%s
}
define internal fastcc i8*@_SMLLN11Word__common4scanE_73(i32 inreg%a,i32 inreg%b)unnamed_addr#4 gc"smlsharp"{
%c=alloca i8*,align 8
call void@llvm.gcroot(i8**%c,i8*null)#0
%d=call i8*@sml_alloc(i32 inreg 12)#0
%e=bitcast i8*%d to i32*
%f=getelementptr inbounds i8,i8*%d,i64 -4
%g=bitcast i8*%f to i32*
store i32 1342177288,i32*%g,align 4
store i8*%d,i8**%c,align 8
store i32%a,i32*%e,align 4
%h=getelementptr inbounds i8,i8*%d,i64 4
%i=bitcast i8*%h to i32*
store i32%b,i32*%i,align 4
%j=getelementptr inbounds i8,i8*%d,i64 8
%k=bitcast i8*%j to i32*
store i32 0,i32*%k,align 4
%l=call i8*@sml_alloc(i32 inreg 28)#0
%m=getelementptr inbounds i8,i8*%l,i64 -4
%n=bitcast i8*%m to i32*
store i32 1342177304,i32*%n,align 4
%o=load i8*,i8**%c,align 8
%p=bitcast i8*%l to i8**
store i8*%o,i8**%p,align 8
%q=getelementptr inbounds i8,i8*%l,i64 8
%r=bitcast i8*%q to void(...)**
store void(...)*bitcast(i8*(i8*,i32)*@_SMLLN11Word__common4scanE_72 to void(...)*),void(...)**%r,align 8
%s=getelementptr inbounds i8,i8*%l,i64 16
%t=bitcast i8*%s to void(...)**
store void(...)*bitcast(i8*(i8*,i8*)*@_SMLLN11Word__common4scanE_94 to void(...)*),void(...)**%t,align 8
%u=getelementptr inbounds i8,i8*%l,i64 24
%v=bitcast i8*%u to i32*
store i32 -2147483647,i32*%v,align 4
ret i8*%l
}
define fastcc i8*@_SMLFN6Word3210toLargeIntE(i32 inreg%a)#2 gc"smlsharp"personality i32(...)*@sml_personality{
%b=load atomic i32,i32*@sml_check_flag unordered,align 4
%c=icmp eq i32%b,0
br i1%c,label%e,label%d
d:
tail call void@sml_check(i32 inreg%b)
br label%e
e:
%f=tail call i8*@sml_save()#0
%g=invoke i8*@prim_IntInf_fromWord(i32%a)
to label%h unwind label%i
h:
tail call void@sml_unsave()#0
ret i8*%g
i:
%j=landingpad{i8*,i8*}
cleanup
%k=extractvalue{i8*,i8*}%j,1
tail call void@sml_unsave()#0
%l=tail call i8*@sml_unsave_exn(i8*inreg%k)#0
resume{i8*,i8*}%j
}
define fastcc i8*@_SMLFN6Word3211toLargeIntXE(i32 inreg%a)#2 gc"smlsharp"{
%b=load atomic i32,i32*@sml_check_flag unordered,align 4
%c=icmp eq i32%b,0
br i1%c,label%e,label%d
d:
tail call void@sml_check(i32 inreg%b)
br label%e
e:
%f=tail call fastcc i8*@_SMLFN6IntInf7fromIntE(i32 inreg%a)
ret i8*%f
}
define fastcc i32@_SMLFN6Word3212fromLargeIntE(i8*inreg%a)#2 gc"smlsharp"{
i:
%b=alloca i8*,align 8
call void@llvm.gcroot(i8**%b,i8*null)#0
store i8*%a,i8**%b,align 8
%c=load atomic i32,i32*@sml_check_flag unordered,align 4
%d=icmp eq i32%c,0
br i1%d,label%g,label%e
e:
call void@sml_check(i32 inreg%c)
%f=load i8*,i8**%b,align 8
br label%g
g:
%h=phi i8*[%f,%e],[%a,%i]
%j=call i32@prim_IntInf_toWord(i8*%h)
ret i32%j
}
define fastcc i8*@_SMLFN6Word328toStringE(i32 inreg%a)#2 gc"smlsharp"{
%b=alloca i8*,align 8
call void@llvm.gcroot(i8**%b,i8*null)#0
%c=load atomic i32,i32*@sml_check_flag unordered,align 4
%d=icmp eq i32%c,0
br i1%d,label%f,label%e
e:
call void@sml_check(i32 inreg%c)
br label%f
f:
%g=call fastcc i8*@_SMLFN6Word323fmtE(i32 inreg 2)
%h=getelementptr inbounds i8,i8*%g,i64 16
%i=bitcast i8*%h to i8*(i8*,i8*)**
%j=load i8*(i8*,i8*)*,i8*(i8*,i8*)**%i,align 8
%k=bitcast i8*%g to i8**
%l=load i8*,i8**%k,align 8
store i8*%l,i8**%b,align 8
%m=call i8*@sml_alloc(i32 inreg 4)#0
%n=bitcast i8*%m to i32*
%o=getelementptr inbounds i8,i8*%m,i64 -4
%p=bitcast i8*%o to i32*
store i32 4,i32*%p,align 4
store i32%a,i32*%n,align 4
%q=load i8*,i8**%b,align 8
%r=tail call fastcc i8*%j(i8*inreg%q,i8*inreg%m)
ret i8*%r
}
define internal fastcc i8*@_SMLLN6Word324scanE_83(i8*inreg%a,i32 inreg%b)#2 gc"smlsharp"{
j:
%c=alloca i8*,align 8
call void@llvm.gcroot(i8**%c,i8*null)#0
store i8*%a,i8**%c,align 8
%d=load atomic i32,i32*@sml_check_flag unordered,align 4
%e=icmp eq i32%d,0
br i1%e,label%h,label%f
f:
call void@sml_check(i32 inreg%d)
%g=load i8*,i8**%c,align 8
br label%h
h:
%i=phi i8*[%g,%f],[%a,%j]
%k=bitcast i8*%i to i32*
%l=load i32,i32*%k,align 4
store i8*null,i8**%c,align 8
%m=getelementptr inbounds i8,i8*%i,i64 4
%n=bitcast i8*%m to i32*
%o=load i32,i32*%n,align 4
%p=call fastcc i8*@_SMLLN11Word__common4scanE_73(i32 inreg%l,i32 inreg%o)
%q=getelementptr inbounds i8,i8*%p,i64 16
%r=bitcast i8*%q to i8*(i8*,i8*)**
%s=load i8*(i8*,i8*)*,i8*(i8*,i8*)**%r,align 8
%t=bitcast i8*%p to i8**
%u=load i8*,i8**%t,align 8
store i8*%u,i8**%c,align 8
%v=call i8*@sml_alloc(i32 inreg 4)#0
%w=bitcast i8*%v to i32*
%x=getelementptr inbounds i8,i8*%v,i64 -4
%y=bitcast i8*%x to i32*
store i32 4,i32*%y,align 4
store i32%b,i32*%w,align 4
%z=load i8*,i8**%c,align 8
store i8*null,i8**%c,align 8
%A=call fastcc i8*%s(i8*inreg%z,i8*inreg%v)
ret i8*%A
}
define fastcc i8*@_SMLFN6Word324scanE(i32 inreg%a,i32 inreg%b)#4 gc"smlsharp"{
%c=alloca i8*,align 8
call void@llvm.gcroot(i8**%c,i8*null)#0
%d=call i8*@sml_alloc(i32 inreg 12)#0
%e=bitcast i8*%d to i32*
%f=getelementptr inbounds i8,i8*%d,i64 -4
%g=bitcast i8*%f to i32*
store i32 1342177288,i32*%g,align 4
store i8*%d,i8**%c,align 8
store i32%a,i32*%e,align 4
%h=getelementptr inbounds i8,i8*%d,i64 4
%i=bitcast i8*%h to i32*
store i32%b,i32*%i,align 4
%j=getelementptr inbounds i8,i8*%d,i64 8
%k=bitcast i8*%j to i32*
store i32 0,i32*%k,align 4
%l=call i8*@sml_alloc(i32 inreg 28)#0
%m=getelementptr inbounds i8,i8*%l,i64 -4
%n=bitcast i8*%m to i32*
store i32 1342177304,i32*%n,align 4
%o=load i8*,i8**%c,align 8
%p=bitcast i8*%l to i8**
store i8*%o,i8**%p,align 8
%q=getelementptr inbounds i8,i8*%l,i64 8
%r=bitcast i8*%q to void(...)**
store void(...)*bitcast(i8*(i8*,i32)*@_SMLLN6Word324scanE_83 to void(...)*),void(...)**%r,align 8
%s=getelementptr inbounds i8,i8*%l,i64 16
%t=bitcast i8*%s to void(...)**
store void(...)*bitcast(i8*(i8*,i8*)*@_SMLLN6Word324scanE_100 to void(...)*),void(...)**%t,align 8
%u=getelementptr inbounds i8,i8*%l,i64 24
%v=bitcast i8*%u to i32*
store i32 -2147483647,i32*%v,align 4
ret i8*%l
}
define fastcc i8*@_SMLFN6Word3210fromStringE(i8*inreg%a)#2 gc"smlsharp"{
%b=alloca i8*,align 8
%c=alloca i8*,align 8
%d=alloca i8*,align 8
call void@llvm.gcroot(i8**%b,i8*null)#0
call void@llvm.gcroot(i8**%c,i8*null)#0
call void@llvm.gcroot(i8**%d,i8*null)#0
store i8*%a,i8**%b,align 8
%e=load atomic i32,i32*@sml_check_flag unordered,align 4
%f=icmp eq i32%e,0
br i1%f,label%h,label%g
g:
call void@sml_check(i32 inreg%e)
br label%h
h:
%i=call fastcc i8*@_SMLFN9StringCvt10scanStringE(i32 inreg 0,i32 inreg 4)
%j=getelementptr inbounds i8,i8*%i,i64 16
%k=bitcast i8*%j to i8*(i8*,i8*)**
%l=load i8*(i8*,i8*)*,i8*(i8*,i8*)**%k,align 8
%m=bitcast i8*%i to i8**
%n=load i8*,i8**%m,align 8
store i8*%n,i8**%d,align 8
%o=call fastcc i8*@_SMLLN11Word__common4scanE_73(i32 inreg 0,i32 inreg 4)
%p=getelementptr inbounds i8,i8*%o,i64 16
%q=bitcast i8*%p to i8*(i8*,i8*)**
%r=load i8*(i8*,i8*)*,i8*(i8*,i8*)**%q,align 8
%s=bitcast i8*%o to i8**
%t=load i8*,i8**%s,align 8
store i8*%t,i8**%c,align 8
%u=call i8*@sml_alloc(i32 inreg 4)#0
%v=bitcast i8*%u to i32*
%w=getelementptr inbounds i8,i8*%u,i64 -4
%x=bitcast i8*%w to i32*
store i32 4,i32*%x,align 4
store i32 2,i32*%v,align 4
%y=load i8*,i8**%c,align 8
store i8*null,i8**%c,align 8
%z=call fastcc i8*%r(i8*inreg%y,i8*inreg%u)
%A=load i8*,i8**%d,align 8
store i8*null,i8**%d,align 8
%B=call fastcc i8*%l(i8*inreg%A,i8*inreg%z)
%C=getelementptr inbounds i8,i8*%B,i64 16
%D=bitcast i8*%C to i8*(i8*,i8*)**
%E=load i8*(i8*,i8*)*,i8*(i8*,i8*)**%D,align 8
%F=bitcast i8*%B to i8**
%G=load i8*,i8**%F,align 8
%H=load i8*,i8**%b,align 8
%I=tail call fastcc i8*%E(i8*inreg%G,i8*inreg%H)
ret i8*%I
}
define internal fastcc i8*@_SMLLN11Word__common7compareE_88(i8*inreg%a,i8*inreg%b)#4 gc"smlsharp"{
%c=bitcast i8*%b to i32*
%d=load i32,i32*%c,align 4
%e=getelementptr inbounds i8,i8*%b,i64 4
%f=bitcast i8*%e to i32*
%g=load i32,i32*%f,align 4
%h=icmp eq i32%d,%g
%i=icmp ult i32%d,%g
%j=select i1%i,i32 2,i32 1
%k=select i1%h,i32 0,i32%j
%l=tail call i8*@sml_alloc(i32 inreg 4)#0
%m=bitcast i8*%l to i32*
%n=getelementptr inbounds i8,i8*%l,i64 -4
%o=bitcast i8*%n to i32*
store i32 4,i32*%o,align 4
store i32%k,i32*%m,align 4
ret i8*%l
}
define internal fastcc i8*@_SMLLN11Word__common3minE_89(i8*inreg%a,i8*inreg%b)#4 gc"smlsharp"{
%c=bitcast i8*%b to i32*
%d=load i32,i32*%c,align 4
%e=getelementptr inbounds i8,i8*%b,i64 4
%f=bitcast i8*%e to i32*
%g=load i32,i32*%f,align 4
%h=icmp ult i32%d,%g
%i=select i1%h,i32%d,i32%g
%j=tail call i8*@sml_alloc(i32 inreg 4)#0
%k=bitcast i8*%j to i32*
%l=getelementptr inbounds i8,i8*%j,i64 -4
%m=bitcast i8*%l to i32*
store i32 4,i32*%m,align 4
store i32%i,i32*%k,align 4
ret i8*%j
}
define internal fastcc i8*@_SMLLN11Word__common3maxE_90(i8*inreg%a,i8*inreg%b)#4 gc"smlsharp"{
%c=bitcast i8*%b to i32*
%d=load i32,i32*%c,align 4
%e=getelementptr inbounds i8,i8*%b,i64 4
%f=bitcast i8*%e to i32*
%g=load i32,i32*%f,align 4
%h=icmp ugt i32%d,%g
%i=select i1%h,i32%d,i32%g
%j=tail call i8*@sml_alloc(i32 inreg 4)#0
%k=bitcast i8*%j to i32*
%l=getelementptr inbounds i8,i8*%j,i64 -4
%m=bitcast i8*%l to i32*
store i32 4,i32*%m,align 4
store i32%i,i32*%k,align 4
ret i8*%j
}
define internal fastcc i8*@_SMLLN11Word__common3fmtE_91(i8*inreg%a,i8*inreg%b)#2 gc"smlsharp"{
%c=bitcast i8*%b to i32*
%d=load i32,i32*%c,align 4
%e=tail call fastcc i8*@_SMLLN11Word__common3fmtE_63(i8*inreg%a,i32 inreg%d)
ret i8*%e
}
define internal fastcc i8*@_SMLLN11Word__common3fmtE_92(i8*inreg%a,i8*inreg%b)#4 gc"smlsharp"{
%c=bitcast i8*%b to i32*
%d=load i32,i32*%c,align 4
%e=tail call fastcc i8*@_SMLFN6Word323fmtE(i32 inreg%d)
ret i8*%e
}
define internal fastcc i8*@_SMLL4loop_93(i8*inreg%a,i8*inreg%b,i8*inreg%c)#2 gc"smlsharp"{
%d=bitcast i8*%b to i32*
%e=load i32,i32*%d,align 4
%f=tail call fastcc i8*@_SMLL4loop_67(i8*inreg%a,i32 inreg%e,i8*inreg%c)
ret i8*%f
}
define internal fastcc i8*@_SMLLN11Word__common4scanE_94(i8*inreg%a,i8*inreg%b)#4 gc"smlsharp"{
%c=bitcast i8*%b to i32*
%d=load i32,i32*%c,align 4
%e=tail call fastcc i8*@_SMLLN11Word__common4scanE_72(i8*inreg%a,i32 inreg%d)
ret i8*%e
}
define internal fastcc i8*@_SMLLN6Word3210toLargeIntE_96(i8*inreg%a,i8*inreg%b)#2 gc"smlsharp"{
%c=bitcast i8*%b to i32*
%d=load i32,i32*%c,align 4
%e=tail call fastcc i8*@_SMLFN6Word3210toLargeIntE(i32 inreg%d)
ret i8*%e
}
define internal fastcc i8*@_SMLLN6Word3211toLargeIntXE_97(i8*inreg%a,i8*inreg%b)#2 gc"smlsharp"{
%c=bitcast i8*%b to i32*
%d=load i32,i32*%c,align 4
%e=tail call fastcc i8*@_SMLFN6Word3211toLargeIntXE(i32 inreg%d)
ret i8*%e
}
define internal fastcc i8*@_SMLLN6Word3212fromLargeIntE_98(i8*inreg%a,i8*inreg%b)#2 gc"smlsharp"{
%c=tail call fastcc i32@_SMLFN6Word3212fromLargeIntE(i8*inreg%b)
%d=tail call i8*@sml_alloc(i32 inreg 4)#0
%e=bitcast i8*%d to i32*
%f=getelementptr inbounds i8,i8*%d,i64 -4
%g=bitcast i8*%f to i32*
store i32 4,i32*%g,align 4
store i32%c,i32*%e,align 4
ret i8*%d
}
define internal fastcc i8*@_SMLLN6Word328toStringE_99(i8*inreg%a,i8*inreg%b)#2 gc"smlsharp"{
%c=bitcast i8*%b to i32*
%d=load i32,i32*%c,align 4
%e=tail call fastcc i8*@_SMLFN6Word328toStringE(i32 inreg%d)
ret i8*%e
}
define internal fastcc i8*@_SMLLN6Word324scanE_100(i8*inreg%a,i8*inreg%b)#2 gc"smlsharp"{
%c=bitcast i8*%b to i32*
%d=load i32,i32*%c,align 4
%e=tail call fastcc i8*@_SMLLN6Word324scanE_83(i8*inreg%a,i32 inreg%d)
ret i8*%e
}
define internal fastcc i8*@_SMLLN6Word324scanE_101(i8*inreg%a,i8*inreg%b,i8*inreg%c)#4 gc"smlsharp"{
%d=bitcast i8*%b to i32*
%e=load i32,i32*%d,align 4
%f=bitcast i8*%c to i32*
%g=load i32,i32*%f,align 4
%h=tail call fastcc i8*@_SMLFN6Word324scanE(i32 inreg%e,i32 inreg%g)
ret i8*%h
}
define internal fastcc i8*@_SMLLN6Word3210fromStringE_102(i8*inreg%a,i8*inreg%b)#2 gc"smlsharp"{
%c=tail call fastcc i8*@_SMLFN6Word3210fromStringE(i8*inreg%b)
ret i8*%c
}
declare void@llvm.memcpy.p0i8.p0i8.i32(i8*,i8*,i32,i1)#0
declare void@llvm.memset.p0i8.i32(i8*,i8,i32,i1)#0
attributes#0={nounwind}
attributes#1={noreturn}
attributes#2={uwtable}
attributes#3={noreturn nounwind}
attributes#4={nounwind uwtable}
