@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*)*@_SMLFN5Word87compareE 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(i8(i8*)*@_SMLFN5Word83minE 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(i8(i8*)*@_SMLFN5Word83maxE 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)*@_SMLFN5Word83fmtE 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
@_SMLZN5Word88wordSizeE=local_unnamed_addr constant i32 8
@j=private unnamed_addr constant<{[4x i8],i32,i8*,void(...)*,void(...)*,i32}><{[4x i8]zeroinitializer,i32 -805306344,i8*null,void(...)*bitcast(i8*(i8)*@_SMLFN5Word810toLargeIntE to void(...)*),void(...)*bitcast(i8*(i8*,i8*)*@_SMLLN5Word810toLargeIntE_96 to void(...)*),i32 -2147483647}>,align 8
@_SMLZN5Word810toLargeIntE=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*(i8)*@_SMLFN5Word811toLargeIntXE to void(...)*),void(...)*bitcast(i8*(i8*,i8*)*@_SMLLN5Word811toLargeIntXE_97 to void(...)*),i32 -2147483647}>,align 8
@_SMLZN5Word811toLargeIntXE=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(i8(i8*)*@_SMLFN5Word812fromLargeIntE to void(...)*),void(...)*bitcast(i8*(i8*,i8*)*@_SMLLN5Word812fromLargeIntE_98 to void(...)*),i32 -2147483647}>,align 8
@_SMLZN5Word812fromLargeIntE=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*)
@_SMLZN5Word87compareE=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*)
@_SMLZN5Word83minE=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*)
@_SMLZN5Word83maxE=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*)
@_SMLZN5Word83fmtE=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*(i8)*@_SMLFN5Word88toStringE to void(...)*),void(...)*bitcast(i8*(i8*,i8*)*@_SMLLN5Word88toStringE_99 to void(...)*),i32 -2147483647}>,align 8
@_SMLZN5Word88toStringE=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)*@_SMLFN5Word84scanE to void(...)*),void(...)*bitcast(i8*(i8*,i8*,i8*)*@_SMLLN5Word84scanE_101 to void(...)*),i32 -2147483647}>,align 8
@_SMLZN5Word84scanE=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*)*@_SMLFN5Word810fromStringE to void(...)*),void(...)*bitcast(i8*(i8*,i8*)*@_SMLLN5Word810fromStringE_102 to void(...)*),i32 -2147483647}>,align 8
@_SMLZN5Word810fromStringE=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_ftabde8a5f2391cb3913_Word8=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_tabbde8a5f2391cb3913_Word8()#3{
unreachable
}
define void@_SML_loadde8a5f2391cb3913_Word8(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_tabbde8a5f2391cb3913_Word8,i8*@_SML_ftabde8a5f2391cb3913_Word8,i8*null)#0
ret void
}
define void@_SML_mainde8a5f2391cb3913_Word8()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@_SMLFN5Word87compareE(i8*inreg%a)#4 gc"smlsharp"{
%b=load i8,i8*%a,align 1
%c=getelementptr inbounds i8,i8*%a,i64 1
%d=load i8,i8*%c,align 1
%e=icmp eq i8%b,%d
%f=icmp ult i8%b,%d
%g=select i1%f,i32 2,i32 1
%h=select i1%e,i32 0,i32%g
ret i32%h
}
define fastcc i8@_SMLFN5Word83minE(i8*inreg%a)#4 gc"smlsharp"{
%b=load i8,i8*%a,align 1
%c=getelementptr inbounds i8,i8*%a,i64 1
%d=load i8,i8*%c,align 1
%e=icmp ult i8%b,%d
%f=select i1%e,i8%b,i8%d
ret i8%f
}
define fastcc i8@_SMLFN5Word83maxE(i8*inreg%a)#4 gc"smlsharp"{
%b=load i8,i8*%a,align 1
%c=getelementptr inbounds i8,i8*%a,i64 1
%d=load i8,i8*%c,align 1
%e=icmp ugt i8%b,%d
%f=select i1%e,i8%b,i8%d
ret i8%f
}
define internal fastcc i8*@_SMLL4loop_59(i8*inreg%a,i8*inreg%b)#2 gc"smlsharp"{
h:
%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
br label%f
f:
%g=phi i8*[%af,%R],[%b,%h]
store i8*%g,i8**%c,align 8
%i=load atomic i32,i32*@sml_check_flag unordered,align 4
%j=icmp eq i32%i,0
br i1%j,label%m,label%k
k:
call void@sml_check(i32 inreg%i)
%l=load i8*,i8**%c,align 8
br label%m
m:
%n=phi i8*[%l,%k],[%g,%f]
%o=load i8,i8*%n,align 1
%p=getelementptr inbounds i8,i8*%n,i64 8
%q=bitcast i8*%p to i8**
%r=load i8*,i8**%q,align 8
store i8*%r,i8**%c,align 8
%s=icmp eq i8%o,0
br i1%s,label%t,label%v
t:
%u=tail call fastcc i8*@_SMLFN10CharVector8fromListE(i8*inreg%r)
ret i8*%u
v:
%w=load i8*,i8**%d,align 8
%x=load i8,i8*%w,align 1
%y=icmp eq i8%x,0
br i1%y,label%z,label%R
z:
store i8*null,i8**%d,align 8
%A=load i8*,i8**@_SMLZ3Div,align 8
store i8*%A,i8**%c,align 8
%B=call i8*@sml_alloc(i32 inreg 20)#0
%C=getelementptr inbounds i8,i8*%B,i64 -4
%D=bitcast i8*%C to i32*
store i32 1342177296,i32*%D,align 4
store i8*%B,i8**%d,align 8
%E=load i8*,i8**%c,align 8
store i8*null,i8**%c,align 8
%F=bitcast i8*%B to i8**
store i8*%E,i8**%F,align 8
%G=getelementptr inbounds i8,i8*%B,i64 8
%H=bitcast i8*%G to i8**
store i8*getelementptr inbounds(<{[4x i8],i32,[43x i8]}>,<{[4x i8],i32,[43x i8]}>*@d,i64 0,i32 2,i64 0),i8**%H,align 8
%I=getelementptr inbounds i8,i8*%B,i64 16
%J=bitcast i8*%I to i32*
store i32 3,i32*%J,align 4
%K=call i8*@sml_alloc(i32 inreg 60)#0
%L=getelementptr inbounds i8,i8*%K,i64 -4
%M=bitcast i8*%L to i32*
store i32 1342177336,i32*%M,align 4
%N=getelementptr inbounds i8,i8*%K,i64 56
%O=bitcast i8*%N to i32*
store i32 1,i32*%O,align 4
%P=load i8*,i8**%d,align 8
%Q=bitcast i8*%K to i8**
store i8*%P,i8**%Q,align 8
call void@sml_raise(i8*inreg%K)#1
unreachable
R:
%S=udiv i8%o,%x
%T=urem i8%o,%x
%U=zext i8%T to i32
%V=call fastcc i8@_SMLFN17SMLSharp__ScanChar10intToDigitE(i32 inreg%U)
%W=call i8*@sml_alloc(i32 inreg 20)#0
%X=getelementptr inbounds i8,i8*%W,i64 -4
%Y=bitcast i8*%X to i32*
store i32 1342177296,i32*%Y,align 4
store i8*%W,i8**%e,align 8
%Z=getelementptr inbounds i8,i8*%W,i64 1
call void@llvm.memset.p0i8.i32(i8*%Z,i8 0,i32 7,i1 false)
store i8%V,i8*%W,align 1
%aa=load i8*,i8**%c,align 8
store i8*null,i8**%c,align 8
%ab=getelementptr inbounds i8,i8*%W,i64 8
%ac=bitcast i8*%ab to i8**
store i8*%aa,i8**%ac,align 8
%ad=getelementptr inbounds i8,i8*%W,i64 16
%ae=bitcast i8*%ad to i32*
store i32 2,i32*%ae,align 4
%af=call i8*@sml_alloc(i32 inreg 20)#0
%ag=getelementptr inbounds i8,i8*%af,i64 -4
%ah=bitcast i8*%ag to i32*
store i32 1342177296,i32*%ah,align 4
%ai=getelementptr inbounds i8,i8*%af,i64 1
call void@llvm.memset.p0i8.i32(i8*%ai,i8 0,i32 7,i1 false)
store i8%S,i8*%af,align 1
%aj=load i8*,i8**%e,align 8
store i8*null,i8**%e,align 8
%ak=getelementptr inbounds i8,i8*%af,i64 8
%al=bitcast i8*%ak to i8**
store i8*%aj,i8**%al,align 8
%am=getelementptr inbounds i8,i8*%af,i64 16
%an=bitcast i8*%am to i32*
store i32 2,i32*%an,align 4
br label%f
}
define internal fastcc i8*@_SMLLN11Word__common3fmtE_63(i8*inreg%a,i8 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=trunc i32%n to i8
%p=call i8*@sml_alloc(i32 inreg 12)#0
%q=getelementptr inbounds i8,i8*%p,i64 -4
%r=bitcast i8*%q to i32*
store i32 1342177288,i32*%r,align 4
store i8*%p,i8**%c,align 8
store i8%o,i8*%p,align 1
%s=getelementptr inbounds i8,i8*%p,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 i8%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=getelementptr inbounds i8,i8*%I,i64 -4
%K=bitcast i8*%J to i32*
store i32 1342177296,i32*%K,align 4
%L=getelementptr inbounds i8,i8*%I,i64 1
call void@llvm.memset.p0i8.i32(i8*%L,i8 0,i32 7,i1 false)
store i8%b,i8*%I,align 1
%M=getelementptr inbounds i8,i8*%I,i64 8
%N=bitcast i8*%M to i8**
store i8*null,i8**%N,align 8
%O=getelementptr inbounds i8,i8*%I,i64 16
%P=bitcast i8*%O to i32*
store i32 2,i32*%P,align 4
%Q=load i8*,i8**%c,align 8
%R=tail call fastcc i8*@_SMLL4loop_59(i8*inreg%Q,i8*inreg%I)
ret i8*%R
}
define fastcc i8*@_SMLFN5Word83fmtE(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*,i8)*@_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,i8 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,%bk],[%a,%h]
%i=phi i8*[%bn,%bk],[%c,%h]
%j=phi i8[%aI,%bk],[%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 12
%t=bitcast i8*%s to i32*
%u=load i32,i32*%t,align 4
%v=getelementptr inbounds i8,i8*%q,i64 8
%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%ax
z:
%A=sub i32 0,%u
%B=and i32%u,%A
%C=add i32%u,7
%D=add i32%C,%B
%E=and i32%D,-8
%F=lshr i32%B,3
%G=shl i32%x,%F
%H=or i32%E,4
%I=icmp eq i32%x,0
br i1%I,label%M,label%J
J:
%K=bitcast i8*%q to i8**
%L=load i8*,i8**%K,align 8
br label%X
M:
%N=call i8*@sml_alloc(i32 inreg%u)#0
%O=getelementptr inbounds i8,i8*%N,i64 -4
%P=bitcast i8*%O to i32*
store i32%u,i32*%P,align 4
%Q=load i8*,i8**%d,align 8
call void@llvm.memcpy.p0i8.p0i8.i32(i8*%N,i8*%Q,i32%u,i1 false)
%R=getelementptr inbounds i8,i8*%Q,i64 12
%S=bitcast i8*%R to i32*
%T=load i32,i32*%S,align 4
%U=getelementptr inbounds i8,i8*%Q,i64 8
%V=bitcast i8*%U to i32*
%W=load i32,i32*%V,align 4
br label%X
X:
%Y=phi i32[%W,%M],[%x,%J]
%Z=phi i32[%T,%M],[%u,%J]
%aa=phi i8*[%N,%M],[%L,%J]
store i8*%aa,i8**%e,align 8
store i8*null,i8**%d,align 8
%ab=call i8*@sml_alloc(i32 inreg%H)#0
%ac=or i32%E,1342177280
%ad=getelementptr inbounds i8,i8*%ab,i64 -4
%ae=bitcast i8*%ad to i32*
store i32%ac,i32*%ae,align 4
store i8*%ab,i8**%d,align 8
call void@llvm.memset.p0i8.i32(i8*%ab,i8 0,i32%H,i1 false)
store i8%j,i8*%ab,align 1
%af=icmp eq i32%Y,0
%ag=load i8*,i8**%e,align 8
store i8*null,i8**%e,align 8
%ah=sext i32%B to i64
%ai=getelementptr inbounds i8,i8*%ab,i64%ah
br i1%af,label%al,label%aj
aj:
%ak=bitcast i8*%ai to i8**
store i8*%ag,i8**%ak,align 8
br label%am
al:
call void@llvm.memcpy.p0i8.p0i8.i32(i8*%ai,i8*%ag,i32%Z,i1 false)
br label%am
am:
%an=sext i32%E to i64
%ao=getelementptr inbounds i8,i8*%ab,i64%an
%ap=bitcast i8*%ao to i32*
store i32%G,i32*%ap,align 4
%aq=call i8*@sml_alloc(i32 inreg 12)#0
%ar=getelementptr inbounds i8,i8*%aq,i64 -4
%as=bitcast i8*%ar to i32*
store i32 1342177288,i32*%as,align 4
%at=load i8*,i8**%d,align 8
%au=bitcast i8*%aq to i8**
store i8*%at,i8**%au,align 8
%av=getelementptr inbounds i8,i8*%aq,i64 8
%aw=bitcast i8*%av to i32*
store i32 1,i32*%aw,align 4
ret i8*%aq
ax:
%ay=getelementptr inbounds i8,i8*%q,i64 17
%az=load i8,i8*%ay,align 1
%aA=icmp ugt i8%j,%az
br i1%aA,label%aK,label%aB
aB:
%aC=bitcast i8*%r to i32*
%aD=load i32,i32*%aC,align 4
%aE=trunc i32%aD to i8
%aF=getelementptr inbounds i8,i8*%q,i64 16
%aG=load i8,i8*%aF,align 1
%aH=mul i8%aG,%j
%aI=add i8%aH,%aE
%aJ=icmp ult i8%aI,%aH
br i1%aJ,label%a2,label%bk
aK:
%aL=load i8*,i8**@_SMLZ8Overflow,align 8
store i8*%aL,i8**%d,align 8
%aM=call i8*@sml_alloc(i32 inreg 20)#0
%aN=getelementptr inbounds i8,i8*%aM,i64 -4
%aO=bitcast i8*%aN to i32*
store i32 1342177296,i32*%aO,align 4
store i8*%aM,i8**%e,align 8
%aP=load i8*,i8**%d,align 8
store i8*null,i8**%d,align 8
%aQ=bitcast i8*%aM to i8**
store i8*%aP,i8**%aQ,align 8
%aR=getelementptr inbounds i8,i8*%aM,i64 8
%aS=bitcast i8*%aR to i8**
store i8*getelementptr inbounds(<{[4x i8],i32,[44x i8]}>,<{[4x i8],i32,[44x i8]}>*@h,i64 0,i32 2,i64 0),i8**%aS,align 8
%aT=getelementptr inbounds i8,i8*%aM,i64 16
%aU=bitcast i8*%aT to i32*
store i32 3,i32*%aU,align 4
%aV=call i8*@sml_alloc(i32 inreg 60)#0
%aW=getelementptr inbounds i8,i8*%aV,i64 -4
%aX=bitcast i8*%aW to i32*
store i32 1342177336,i32*%aX,align 4
%aY=getelementptr inbounds i8,i8*%aV,i64 56
%aZ=bitcast i8*%aY to i32*
store i32 1,i32*%aZ,align 4
%a0=load i8*,i8**%e,align 8
%a1=bitcast i8*%aV to i8**
store i8*%a0,i8**%a1,align 8
call void@sml_raise(i8*inreg%aV)#1
unreachable
a2:
%a3=load i8*,i8**@_SMLZ8Overflow,align 8
store i8*%a3,i8**%d,align 8
%a4=call i8*@sml_alloc(i32 inreg 20)#0
%a5=getelementptr inbounds i8,i8*%a4,i64 -4
%a6=bitcast i8*%a5 to i32*
store i32 1342177296,i32*%a6,align 4
store i8*%a4,i8**%e,align 8
%a7=load i8*,i8**%d,align 8
store i8*null,i8**%d,align 8
%a8=bitcast i8*%a4 to i8**
store i8*%a7,i8**%a8,align 8
%a9=getelementptr inbounds i8,i8*%a4,i64 8
%ba=bitcast i8*%a9 to i8**
store i8*getelementptr inbounds(<{[4x i8],i32,[44x i8]}>,<{[4x i8],i32,[44x i8]}>*@i,i64 0,i32 2,i64 0),i8**%ba,align 8
%bb=getelementptr inbounds i8,i8*%a4,i64 16
%bc=bitcast i8*%bb to i32*
store i32 3,i32*%bc,align 4
%bd=call i8*@sml_alloc(i32 inreg 60)#0
%be=getelementptr inbounds i8,i8*%bd,i64 -4
%bf=bitcast i8*%be to i32*
store i32 1342177336,i32*%bf,align 4
%bg=getelementptr inbounds i8,i8*%bd,i64 56
%bh=bitcast i8*%bg to i32*
store i32 1,i32*%bh,align 4
%bi=load i8*,i8**%e,align 8
%bj=bitcast i8*%bd to i8**
store i8*%bi,i8**%bj,align 8
call void@sml_raise(i8*inreg%bd)#1
unreachable
bk:
%bl=getelementptr inbounds i8,i8*%r,i64 8
%bm=bitcast i8*%bl to i8**
%bn=load i8*,i8**%bm,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=trunc i32%aH to i8
%aJ=icmp eq i8%aI,0
br i1%aJ,label%aY,label%aK
aK:
%aL=udiv i8 -1,%aI
%aM=load i8*,i8**%e,align 8
%aN=getelementptr inbounds i8,i8*%aM,i64 16
%aO=bitcast i8*%aN to i32*
%aP=load i32,i32*%aO,align 4
%aQ=getelementptr inbounds i8,i8*%aM,i64 12
%aR=bitcast i8*%aQ to i32*
%aS=load i32,i32*%aR,align 4
store i8*null,i8**%e,align 8
%aT=call i8*@sml_alloc(i32 inreg 28)#0
%aU=getelementptr inbounds i8,i8*%aT,i64 -4
%aV=bitcast i8*%aU to i32*
store i32 1342177304,i32*%aV,align 4
store i8*%aT,i8**%e,align 8
%aW=icmp eq i32%aS,0
%aX=load i8*,i8**%d,align 8
store i8*null,i8**%d,align 8
br i1%aW,label%bi,label%bg
aY:
store i8*null,i8**%d,align 8
store i8*null,i8**%e,align 8
%aZ=load i8*,i8**@_SMLZ3Div,align 8
store i8*%aZ,i8**%c,align 8
%a0=call i8*@sml_alloc(i32 inreg 20)#0
%a1=getelementptr inbounds i8,i8*%a0,i64 -4
%a2=bitcast i8*%a1 to i32*
store i32 1342177296,i32*%a2,align 4
store i8*%a0,i8**%d,align 8
%a3=load i8*,i8**%c,align 8
store i8*null,i8**%c,align 8
%a4=bitcast i8*%a0 to i8**
store i8*%a3,i8**%a4,align 8
%a5=getelementptr inbounds i8,i8*%a0,i64 8
%a6=bitcast i8*%a5 to i8**
store i8*getelementptr inbounds(<{[4x i8],i32,[44x i8]}>,<{[4x i8],i32,[44x i8]}>*@g,i64 0,i32 2,i64 0),i8**%a6,align 8
%a7=getelementptr inbounds i8,i8*%a0,i64 16
%a8=bitcast i8*%a7 to i32*
store i32 3,i32*%a8,align 4
%a9=call i8*@sml_alloc(i32 inreg 60)#0
%ba=getelementptr inbounds i8,i8*%a9,i64 -4
%bb=bitcast i8*%ba to i32*
store i32 1342177336,i32*%bb,align 4
%bc=getelementptr inbounds i8,i8*%a9,i64 56
%bd=bitcast i8*%bc to i32*
store i32 1,i32*%bd,align 4
%be=load i8*,i8**%d,align 8
%bf=bitcast i8*%a9 to i8**
store i8*%be,i8**%bf,align 8
call void@sml_raise(i8*inreg%a9)#1
unreachable
bg:
%bh=bitcast i8*%aT to i8**
store i8*%aX,i8**%bh,align 8
br label%bj
bi:
call void@llvm.memcpy.p0i8.p0i8.i32(i8*%aT,i8*%aX,i32%aP,i1 false)
br label%bj
bj:
%bk=getelementptr inbounds i8,i8*%aT,i64 8
%bl=bitcast i8*%bk to i32*
store i32%aS,i32*%bl,align 4
%bm=getelementptr inbounds i8,i8*%aT,i64 12
%bn=bitcast i8*%bm to i32*
store i32%aP,i32*%bn,align 4
%bo=getelementptr inbounds i8,i8*%aT,i64 16
store i8%aI,i8*%bo,align 1
%bp=getelementptr inbounds i8,i8*%aT,i64 17
store i8%aL,i8*%bp,align 1
%bq=getelementptr inbounds i8,i8*%aT,i64 24
%br=bitcast i8*%bq to i32*
store i32%o,i32*%br,align 4
%bs=call i8*@sml_alloc(i32 inreg 28)#0
%bt=getelementptr inbounds i8,i8*%bs,i64 -4
%bu=bitcast i8*%bt to i32*
store i32 1342177304,i32*%bu,align 4
%bv=load i8*,i8**%e,align 8
%bw=bitcast i8*%bs to i8**
store i8*%bv,i8**%bw,align 8
%bx=getelementptr inbounds i8,i8*%bs,i64 8
%by=bitcast i8*%bx to void(...)**
store void(...)*bitcast(i8*(i8*,i8,i8*)*@_SMLL4loop_67 to void(...)*),void(...)**%by,align 8
%bz=getelementptr inbounds i8,i8*%bs,i64 16
%bA=bitcast i8*%bz to void(...)**
store void(...)*bitcast(i8*(i8*,i8*,i8*)*@_SMLL4loop_93 to void(...)*),void(...)**%bA,align 8
%bB=getelementptr inbounds i8,i8*%bs,i64 24
%bC=bitcast i8*%bB to i32*
store i32 -2147483647,i32*%bC,align 4
%bD=bitcast i8**%c to i8****
%bE=load i8***,i8****%bD,align 8
%bF=load i8**,i8***%bE,align 8
%bG=load i8*,i8**%bF,align 8
%bH=tail call fastcc i8*@_SMLL4loop_67(i8*inreg%bv,i8 inreg 0,i8*inreg%bG)
ret i8*%bH
}
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*@_SMLFN5Word810toLargeIntE(i8 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=zext i8%a to i32
%g=tail call i8*@sml_save()#0
%h=invoke i8*@prim_IntInf_fromWord(i32%f)
to label%i unwind label%j
i:
tail call void@sml_unsave()#0
ret i8*%h
j:
%k=landingpad{i8*,i8*}
cleanup
%l=extractvalue{i8*,i8*}%k,1
tail call void@sml_unsave()#0
%m=tail call i8*@sml_unsave_exn(i8*inreg%l)#0
resume{i8*,i8*}%k
}
define fastcc i8*@_SMLFN5Word811toLargeIntXE(i8 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=sext i8%a to i32
%g=tail call fastcc i8*@_SMLFN6IntInf7fromIntE(i32 inreg%f)
ret i8*%g
}
define fastcc i8@_SMLFN5Word812fromLargeIntE(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)
%k=trunc i32%j to i8
ret i8%k
}
define fastcc i8*@_SMLFN5Word88toStringE(i8 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*@_SMLFN5Word83fmtE(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 1)#0
%n=getelementptr inbounds i8,i8*%m,i64 -4
%o=bitcast i8*%n to i32*
store i32 1,i32*%o,align 4
store i8%a,i8*%m,align 1
%p=load i8*,i8**%b,align 8
%q=tail call fastcc i8*%j(i8*inreg%p,i8*inreg%m)
ret i8*%q
}
define internal fastcc i8*@_SMLLN5Word84scanE_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*@_SMLFN5Word84scanE(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)*@_SMLLN5Word84scanE_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*)*@_SMLLN5Word84scanE_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*@_SMLFN5Word810fromStringE(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 1)
%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=load i8,i8*%b,align 1
%d=getelementptr inbounds i8,i8*%b,i64 1
%e=load i8,i8*%d,align 1
%f=icmp eq i8%c,%e
%g=icmp ult i8%c,%e
%h=select i1%g,i32 2,i32 1
%i=select i1%f,i32 0,i32%h
%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__common3minE_89(i8*inreg%a,i8*inreg%b)#4 gc"smlsharp"{
%c=load i8,i8*%b,align 1
%d=getelementptr inbounds i8,i8*%b,i64 1
%e=load i8,i8*%d,align 1
%f=icmp ult i8%c,%e
%g=select i1%f,i8%c,i8%e
%h=tail call i8*@sml_alloc(i32 inreg 1)#0
%i=getelementptr inbounds i8,i8*%h,i64 -4
%j=bitcast i8*%i to i32*
store i32 1,i32*%j,align 4
store i8%g,i8*%h,align 1
ret i8*%h
}
define internal fastcc i8*@_SMLLN11Word__common3maxE_90(i8*inreg%a,i8*inreg%b)#4 gc"smlsharp"{
%c=load i8,i8*%b,align 1
%d=getelementptr inbounds i8,i8*%b,i64 1
%e=load i8,i8*%d,align 1
%f=icmp ugt i8%c,%e
%g=select i1%f,i8%c,i8%e
%h=tail call i8*@sml_alloc(i32 inreg 1)#0
%i=getelementptr inbounds i8,i8*%h,i64 -4
%j=bitcast i8*%i to i32*
store i32 1,i32*%j,align 4
store i8%g,i8*%h,align 1
ret i8*%h
}
define internal fastcc i8*@_SMLLN11Word__common3fmtE_91(i8*inreg%a,i8*inreg%b)#2 gc"smlsharp"{
%c=load i8,i8*%b,align 1
%d=tail call fastcc i8*@_SMLLN11Word__common3fmtE_63(i8*inreg%a,i8 inreg%c)
ret i8*%d
}
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*@_SMLFN5Word83fmtE(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=load i8,i8*%b,align 1
%e=tail call fastcc i8*@_SMLL4loop_67(i8*inreg%a,i8 inreg%d,i8*inreg%c)
ret i8*%e
}
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*@_SMLLN5Word810toLargeIntE_96(i8*inreg%a,i8*inreg%b)#2 gc"smlsharp"{
%c=load i8,i8*%b,align 1
%d=tail call fastcc i8*@_SMLFN5Word810toLargeIntE(i8 inreg%c)
ret i8*%d
}
define internal fastcc i8*@_SMLLN5Word811toLargeIntXE_97(i8*inreg%a,i8*inreg%b)#2 gc"smlsharp"{
%c=load i8,i8*%b,align 1
%d=tail call fastcc i8*@_SMLFN5Word811toLargeIntXE(i8 inreg%c)
ret i8*%d
}
define internal fastcc i8*@_SMLLN5Word812fromLargeIntE_98(i8*inreg%a,i8*inreg%b)#2 gc"smlsharp"{
%c=tail call fastcc i8@_SMLFN5Word812fromLargeIntE(i8*inreg%b)
%d=tail call i8*@sml_alloc(i32 inreg 1)#0
%e=getelementptr inbounds i8,i8*%d,i64 -4
%f=bitcast i8*%e to i32*
store i32 1,i32*%f,align 4
store i8%c,i8*%d,align 1
ret i8*%d
}
define internal fastcc i8*@_SMLLN5Word88toStringE_99(i8*inreg%a,i8*inreg%b)#2 gc"smlsharp"{
%c=load i8,i8*%b,align 1
%d=tail call fastcc i8*@_SMLFN5Word88toStringE(i8 inreg%c)
ret i8*%d
}
define internal fastcc i8*@_SMLLN5Word84scanE_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*@_SMLLN5Word84scanE_83(i8*inreg%a,i32 inreg%d)
ret i8*%e
}
define internal fastcc i8*@_SMLLN5Word84scanE_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*@_SMLFN5Word84scanE(i32 inreg%e,i32 inreg%g)
ret i8*%h
}
define internal fastcc i8*@_SMLLN5Word810fromStringE_102(i8*inreg%a,i8*inreg%b)#2 gc"smlsharp"{
%c=tail call fastcc i8*@_SMLFN5Word810fromStringE(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}
