@sml_check_flag=external local_unnamed_addr global i32
@_SMLZ8Overflow=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(i32)*@_SMLFN5Int327fromIntE to void(...)*),void(...)*bitcast(i8*(i8*,i8*)*@_SMLLLN3Int9fromInt32E_102 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(i32)*@_SMLFN5Int325toIntE to void(...)*),void(...)*bitcast(i8*(i8*,i8*)*@_SMLLLN3Int7toInt32E_103 to void(...)*),i32 -2147483647}>,align 8
@c=private unnamed_addr constant<{[4x i8],i32,i32,[4x i8],i32}><{[4x i8]zeroinitializer,i32 -805306360,i32 32,[4x i8]zeroinitializer,i32 0}>,align 8
@d=private unnamed_addr constant<{[4x i8],i32,i32,[4x i8],i32}><{[4x i8]zeroinitializer,i32 -805306360,i32 -2147483648,[4x i8]zeroinitializer,i32 0}>,align 8
@e=private unnamed_addr constant<{[4x i8],i32,i32,[4x i8],i32}><{[4x i8]zeroinitializer,i32 -805306360,i32 2147483647,[4x i8]zeroinitializer,i32 0}>,align 8
@f=private unnamed_addr constant<{[4x i8],i32,i8*,void(...)*,void(...)*,i32}><{[4x i8]zeroinitializer,i32 -805306344,i8*null,void(...)*bitcast(i32(i8*)*@_SMLFN5Int327compareE to void(...)*),void(...)*bitcast(i8*(i8*,i8*)*@_SMLLLN10Int__common7compareE_104 to void(...)*),i32 -2147483647}>,align 8
@g=private unnamed_addr constant<{[4x i8],i32,i8*,void(...)*,void(...)*,i32}><{[4x i8]zeroinitializer,i32 -805306344,i8*null,void(...)*bitcast(i32(i8*)*@_SMLFN5Int323minE to void(...)*),void(...)*bitcast(i8*(i8*,i8*)*@_SMLLLN10Int__common3minE_105 to void(...)*),i32 -2147483647}>,align 8
@h=private unnamed_addr constant<{[4x i8],i32,i8*,void(...)*,void(...)*,i32}><{[4x i8]zeroinitializer,i32 -805306344,i8*null,void(...)*bitcast(i32(i8*)*@_SMLFN5Int323maxE to void(...)*),void(...)*bitcast(i8*(i8*,i8*)*@_SMLLLN10Int__common3maxE_106 to void(...)*),i32 -2147483647}>,align 8
@i=private unnamed_addr constant<{[4x i8],i32,i8*,void(...)*,void(...)*,i32}><{[4x i8]zeroinitializer,i32 -805306344,i8*null,void(...)*bitcast(i32(i32)*@_SMLFN5Int324signE to void(...)*),void(...)*bitcast(i8*(i8*,i8*)*@_SMLLLN10Int__common4signE_107 to void(...)*),i32 -2147483647}>,align 8
@j=private unnamed_addr constant<{[4x i8],i32,i8*,void(...)*,void(...)*,i32}><{[4x i8]zeroinitializer,i32 -805306344,i8*null,void(...)*bitcast(i32(i8*)*@_SMLFN5Int328sameSignE to void(...)*),void(...)*bitcast(i8*(i8*,i8*)*@_SMLLLN10Int__common8sameSignE_108 to void(...)*),i32 -2147483647}>,align 8
@k=private unnamed_addr constant<{[4x i8],i32,[42x i8]}><{[4x i8]zeroinitializer,i32 -2147483606,[42x i8]c"src/basis/main/Int_common.sml:73.66(1968)\00"}>,align 8
@l=private unnamed_addr constant<{[4x i8],i32,[2x i8]}><{[4x i8]zeroinitializer,i32 -2147483646,[2x i8]c"0\00"}>,align 8
@m=private unnamed_addr constant<{[4x i8],i32,i8*,void(...)*,void(...)*,i32}><{[4x i8]zeroinitializer,i32 -805306344,i8*null,void(...)*bitcast(i8*(i32)*@_SMLFN5Int323fmtE to void(...)*),void(...)*bitcast(i8*(i8*,i8*)*@_SMLLLN10Int__common3fmtE_111 to void(...)*),i32 -2147483647}>,align 8
@n=private unnamed_addr constant<{[4x i8],i32,[42x i8]}><{[4x i8]zeroinitializer,i32 -2147483606,[42x i8]c"src/basis/main/Int_common.sml:91.44(2564)\00"}>,align 8
@o=private unnamed_addr constant<{[4x i8],i32,[42x i8]}><{[4x i8]zeroinitializer,i32 -2147483606,[42x i8]c"src/basis/main/Int_common.sml:91.48(2568)\00"}>,align 8
@p=private unnamed_addr constant<{[4x i8],i32,[42x i8]}><{[4x i8]zeroinitializer,i32 -2147483606,[42x i8]c"src/basis/main/Int_common.sml:93.44(2678)\00"}>,align 8
@q=private unnamed_addr constant<{[4x i8],i32,[42x i8]}><{[4x i8]zeroinitializer,i32 -2147483606,[42x i8]c"src/basis/main/Int_common.sml:93.48(2682)\00"}>,align 8
@r=private unnamed_addr constant<{[4x i8],i32,i8*,void(...)*,void(...)*,i32}><{[4x i8]zeroinitializer,i32 -805306344,i8*null,void(...)*bitcast(i8*(i32)*@_SMLFN5Int328toStringE to void(...)*),void(...)*bitcast(i8*(i8*,i8*)*@_SMLLLN10Int__common8toStringE_113 to void(...)*),i32 -2147483647}>,align 8
@s=private unnamed_addr constant<{[4x i8],i32,i8*,void(...)*,void(...)*,i32}><{[4x i8]zeroinitializer,i32 -805306344,i8*null,void(...)*bitcast(i8*(i8*)*@_SMLFN5Int3210fromStringE to void(...)*),void(...)*bitcast(i8*(i8*,i8*)*@_SMLLLN10Int__common10fromStringE_114 to void(...)*),i32 -2147483647}>,align 8
@t=private unnamed_addr constant<{[4x i8],i32,i8*,void(...)*,void(...)*,i32}><{[4x i8]zeroinitializer,i32 -805306344,i8*null,void(...)*bitcast(i8*(i32,i32)*@_SMLFN5Int324scanE to void(...)*),void(...)*bitcast(i8*(i8*,i8*,i8*)*@_SMLLLN5Int324scanE_116 to void(...)*),i32 -2147483647}>,align 8
@_SMLZN5Int325toIntE=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*)
@_SMLZN5Int327fromIntE=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*)
@_SMLZN5Int329precisionE=local_unnamed_addr constant i8*bitcast(i32*getelementptr inbounds(<{[4x i8],i32,i32,[4x i8],i32}>,<{[4x i8],i32,i32,[4x i8],i32}>*@c,i64 0,i32 2)to i8*)
@_SMLZN5Int326minIntE=local_unnamed_addr constant i8*bitcast(i32*getelementptr inbounds(<{[4x i8],i32,i32,[4x i8],i32}>,<{[4x i8],i32,i32,[4x i8],i32}>*@d,i64 0,i32 2)to i8*)
@_SMLZN5Int326maxIntE=local_unnamed_addr constant i8*bitcast(i32*getelementptr inbounds(<{[4x i8],i32,i32,[4x i8],i32}>,<{[4x i8],i32,i32,[4x i8],i32}>*@e,i64 0,i32 2)to i8*)
@_SMLZN5Int327compareE=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*)
@_SMLZN5Int323minE=local_unnamed_addr constant i8*bitcast(i8**getelementptr inbounds(<{[4x i8],i32,i8*,void(...)*,void(...)*,i32}>,<{[4x i8],i32,i8*,void(...)*,void(...)*,i32}>*@g,i64 0,i32 2)to i8*)
@_SMLZN5Int323maxE=local_unnamed_addr constant i8*bitcast(i8**getelementptr inbounds(<{[4x i8],i32,i8*,void(...)*,void(...)*,i32}>,<{[4x i8],i32,i8*,void(...)*,void(...)*,i32}>*@h,i64 0,i32 2)to i8*)
@_SMLZN5Int324signE=local_unnamed_addr constant i8*bitcast(i8**getelementptr inbounds(<{[4x i8],i32,i8*,void(...)*,void(...)*,i32}>,<{[4x i8],i32,i8*,void(...)*,void(...)*,i32}>*@i,i64 0,i32 2)to i8*)
@_SMLZN5Int328sameSignE=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*)
@_SMLZN5Int323fmtE=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*)
@_SMLZN5Int328toStringE=local_unnamed_addr constant i8*bitcast(i8**getelementptr inbounds(<{[4x i8],i32,i8*,void(...)*,void(...)*,i32}>,<{[4x i8],i32,i8*,void(...)*,void(...)*,i32}>*@r,i64 0,i32 2)to i8*)
@_SMLZN5Int324scanE=local_unnamed_addr constant i8*bitcast(i8**getelementptr inbounds(<{[4x i8],i32,i8*,void(...)*,void(...)*,i32}>,<{[4x i8],i32,i8*,void(...)*,void(...)*,i32}>*@t,i64 0,i32 2)to i8*)
@_SMLZN5Int3210fromStringE=local_unnamed_addr constant i8*bitcast(i8**getelementptr inbounds(<{[4x i8],i32,i8*,void(...)*,void(...)*,i32}>,<{[4x i8],i32,i8*,void(...)*,void(...)*,i32}>*@s,i64 0,i32 2)to i8*)
@_SML_ftab5148a836b3728be9_Int32=external global i8
@u=private unnamed_addr global i8 0
declare void@llvm.gcroot(i8**,i8*)#0
declare{i32,i1}@llvm.sadd.with.overflow.i32(i32,i32)#0
declare{i32,i1}@llvm.smul.with.overflow.i32(i32,i32)#0
declare{i32,i1}@llvm.ssub.with.overflow.i32(i32,i32)#0
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 void@sml_raise(i8*inreg)local_unnamed_addr#1
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__ScanChar7scanIntE(i32 inreg,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_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_load4fb8d2c1f12728b2_SMLSharp_ScanChar(i8*)local_unnamed_addr
declare void@_SML_loadadbb5309e852b68c_CharVector(i8*)local_unnamed_addr
define private void@_SML_tabb5148a836b3728be9_Int32()#3{
unreachable
}
define void@_SML_load5148a836b3728be9_Int32(i8*%a)local_unnamed_addr#0{
%b=load i8,i8*@u,align 1
%c=icmp eq i8%b,0
br i1%c,label%e,label%d
d:
ret void
e:
store i8 1,i8*@u,align 1
tail call void@_SML_load5c37eb24573fc5f9_StringCvt(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_tabb5148a836b3728be9_Int32,i8*@_SML_ftab5148a836b3728be9_Int32,i8*null)#0
ret void
}
define void@_SML_main5148a836b3728be9_Int32()local_unnamed_addr#2 gc"smlsharp"{
%a=load i8,i8*@u,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*@u,align 1
tail call void@_SML_main5c37eb24573fc5f9_StringCvt()#2
tail call void@_SML_main4fb8d2c1f12728b2_SMLSharp_ScanChar()#2
tail call void@_SML_mainadbb5309e852b68c_CharVector()#2
br label%d
}
define fastcc i32@_SMLFN5Int327fromIntE(i32 inreg%a)#4 gc"smlsharp"{
ret i32%a
}
define fastcc i32@_SMLFN5Int325toIntE(i32 inreg%a)#4 gc"smlsharp"{
ret i32%a
}
define fastcc i32@_SMLFN5Int327compareE(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 slt i32%c,%f
%h=icmp ne i32%c,%f
%i=zext i1%h to i32
%j=select i1%g,i32 2,i32%i
ret i32%j
}
define fastcc i32@_SMLFN5Int323minE(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 slt i32%c,%f
%h=select i1%g,i32%c,i32%f
ret i32%h
}
define fastcc i32@_SMLFN5Int323maxE(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 sgt i32%c,%f
%h=select i1%g,i32%c,i32%f
ret i32%h
}
define fastcc i32@_SMLFN5Int324signE(i32 inreg%a)#4 gc"smlsharp"{
%b=icmp sgt i32%a,-1
%c=icmp ne i32%a,0
%d=zext i1%c to i32
%e=select i1%b,i32%d,i32 -1
ret i32%e
}
define fastcc i32@_SMLFN5Int328sameSignE(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 sgt i32%c,-1
%h=icmp ne i32%c,0
%i=zext i1%h to i32
%j=select i1%g,i32%i,i32 -1
%k=icmp sgt i32%f,-1
%l=icmp ne i32%f,0
%m=zext i1%l to i32
%n=select i1%k,i32%m,i32 -1
%o=icmp eq i32%j,%n
%p=zext i1%o to i32
ret i32%p
}
define internal fastcc i8*@_SMLLLN10Int__common3fmtE_82(i32 inreg%a,i32 inreg%b)unnamed_addr#2 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
%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 i32@_SMLFN17SMLSharp__ScanChar10radixToIntE(i32 inreg%a)
%j=icmp eq i32%b,0
br i1%j,label%k,label%l
k:
ret i8*getelementptr inbounds(<{[4x i8],i32,[2x i8]}>,<{[4x i8],i32,[2x i8]}>*@l,i64 0,i32 2,i64 0)
l:
%m=icmp slt i32%b,1
br i1%m,label%av,label%n
n:
%o=sub nsw i32 0,%b
%p=call i8*@sml_alloc(i32 inreg 20)#0
%q=bitcast i8*%p to i32*
%r=getelementptr inbounds i8,i8*%p,i64 -4
%s=bitcast i8*%r to i32*
store i32 1342177296,i32*%s,align 4
%t=getelementptr inbounds i8,i8*%p,i64 4
%u=bitcast i8*%t to i32*
store i32 0,i32*%u,align 1
store i32%o,i32*%q,align 4
br label%v
v:
%w=phi i8*[%W,%K],[%p,%n]
%x=phi i8*[%ac,%K],[null,%n]
%y=phi i32[%I,%K],[%o,%n]
%z=getelementptr inbounds i8,i8*%w,i64 8
%A=bitcast i8*%z to i8**
store i8*%x,i8**%A,align 8
%B=getelementptr inbounds i8,i8*%w,i64 16
%C=bitcast i8*%B to i32*
store i32 2,i32*%C,align 4
store i8*%x,i8**%c,align 8
%D=icmp slt i32%y,0
br i1%D,label%G,label%E
E:
%F=tail call fastcc i8*@_SMLFN10CharVector8fromListE(i8*inreg%x)
ret i8*%F
G:
%H=srem i32%y,%i
%I=sdiv i32%y,%i
%J=icmp eq i32%H,-2147483648
br i1%J,label%ad,label%K
K:
%L=sub nsw i32 0,%H
%M=call fastcc i8@_SMLFN17SMLSharp__ScanChar10intToDigitE(i32 inreg%L)
%N=call i8*@sml_alloc(i32 inreg 20)#0
%O=getelementptr inbounds i8,i8*%N,i64 -4
%P=bitcast i8*%O to i32*
store i32 1342177296,i32*%P,align 4
store i8*%N,i8**%d,align 8
%Q=getelementptr inbounds i8,i8*%N,i64 1
call void@llvm.memset.p0i8.i32(i8*%Q,i8 0,i32 7,i1 false)
store i8%M,i8*%N,align 1
%R=load i8*,i8**%c,align 8
store i8*null,i8**%c,align 8
%S=getelementptr inbounds i8,i8*%N,i64 8
%T=bitcast i8*%S to i8**
store i8*%R,i8**%T,align 8
%U=getelementptr inbounds i8,i8*%N,i64 16
%V=bitcast i8*%U to i32*
store i32 2,i32*%V,align 4
%W=call i8*@sml_alloc(i32 inreg 20)#0
%X=bitcast i8*%W to i32*
%Y=getelementptr inbounds i8,i8*%W,i64 -4
%Z=bitcast i8*%Y to i32*
store i32 1342177296,i32*%Z,align 4
%aa=getelementptr inbounds i8,i8*%W,i64 4
%ab=bitcast i8*%aa to i32*
store i32 0,i32*%ab,align 1
store i32%I,i32*%X,align 4
%ac=load i8*,i8**%d,align 8
store i8*null,i8**%d,align 8
br label%v
ad:
%ae=load i8*,i8**@_SMLZ8Overflow,align 8
store i8*%ae,i8**%c,align 8
%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
store i8*%af,i8**%d,align 8
%ai=load i8*,i8**%c,align 8
store i8*null,i8**%c,align 8
%aj=bitcast i8*%af to i8**
store i8*%ai,i8**%aj,align 8
%ak=getelementptr inbounds i8,i8*%af,i64 8
%al=bitcast i8*%ak to i8**
store i8*getelementptr inbounds(<{[4x i8],i32,[42x i8]}>,<{[4x i8],i32,[42x i8]}>*@k,i64 0,i32 2,i64 0),i8**%al,align 8
%am=getelementptr inbounds i8,i8*%af,i64 16
%an=bitcast i8*%am to i32*
store i32 3,i32*%an,align 4
%ao=call i8*@sml_alloc(i32 inreg 60)#0
%ap=getelementptr inbounds i8,i8*%ao,i64 -4
%aq=bitcast i8*%ap to i32*
store i32 1342177336,i32*%aq,align 4
%ar=getelementptr inbounds i8,i8*%ao,i64 56
%as=bitcast i8*%ar to i32*
store i32 1,i32*%as,align 4
%at=load i8*,i8**%d,align 8
%au=bitcast i8*%ao to i8**
store i8*%at,i8**%au,align 8
call void@sml_raise(i8*inreg%ao)#1
unreachable
av:
%aw=call i8*@sml_alloc(i32 inreg 20)#0
%ax=bitcast i8*%aw to i32*
%ay=getelementptr inbounds i8,i8*%aw,i64 -4
%az=bitcast i8*%ay to i32*
store i32 1342177296,i32*%az,align 4
%aA=getelementptr inbounds i8,i8*%aw,i64 4
%aB=bitcast i8*%aA to i32*
store i32 0,i32*%aB,align 1
store i32%b,i32*%ax,align 4
br label%aC
aC:
%aD=phi i8*[%bc,%a0],[%aw,%av]
%aE=phi i8*[%bi,%a0],[null,%av]
%aF=phi i32[%aY,%a0],[%b,%av]
%aG=getelementptr inbounds i8,i8*%aD,i64 8
%aH=bitcast i8*%aG to i8**
store i8*%aE,i8**%aH,align 8
%aI=getelementptr inbounds i8,i8*%aD,i64 16
%aJ=bitcast i8*%aI to i32*
store i32 2,i32*%aJ,align 4
store i8*%aE,i8**%c,align 8
%aK=icmp slt i32%aF,0
br i1%aK,label%aW,label%aL
aL:
store i8*%aE,i8**%c,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
%aP=getelementptr inbounds i8,i8*%aM,i64 1
call void@llvm.memset.p0i8.i32(i8*%aP,i8 0,i32 7,i1 false)
store i8 126,i8*%aM,align 1
%aQ=load i8*,i8**%c,align 8
%aR=getelementptr inbounds i8,i8*%aM,i64 8
%aS=bitcast i8*%aR to i8**
store i8*%aQ,i8**%aS,align 8
%aT=getelementptr inbounds i8,i8*%aM,i64 16
%aU=bitcast i8*%aT to i32*
store i32 2,i32*%aU,align 4
%aV=tail call fastcc i8*@_SMLFN10CharVector8fromListE(i8*inreg%aM)
ret i8*%aV
aW:
%aX=srem i32%aF,%i
%aY=sdiv i32%aF,%i
%aZ=icmp eq i32%aX,-2147483648
br i1%aZ,label%bj,label%a0
a0:
%a1=sub nsw i32 0,%aX
%a2=call fastcc i8@_SMLFN17SMLSharp__ScanChar10intToDigitE(i32 inreg%a1)
%a3=call i8*@sml_alloc(i32 inreg 20)#0
%a4=getelementptr inbounds i8,i8*%a3,i64 -4
%a5=bitcast i8*%a4 to i32*
store i32 1342177296,i32*%a5,align 4
store i8*%a3,i8**%d,align 8
%a6=getelementptr inbounds i8,i8*%a3,i64 1
call void@llvm.memset.p0i8.i32(i8*%a6,i8 0,i32 7,i1 false)
store i8%a2,i8*%a3,align 1
%a7=load i8*,i8**%c,align 8
store i8*null,i8**%c,align 8
%a8=getelementptr inbounds i8,i8*%a3,i64 8
%a9=bitcast i8*%a8 to i8**
store i8*%a7,i8**%a9,align 8
%ba=getelementptr inbounds i8,i8*%a3,i64 16
%bb=bitcast i8*%ba to i32*
store i32 2,i32*%bb,align 4
%bc=call i8*@sml_alloc(i32 inreg 20)#0
%bd=bitcast i8*%bc to i32*
%be=getelementptr inbounds i8,i8*%bc,i64 -4
%bf=bitcast i8*%be to i32*
store i32 1342177296,i32*%bf,align 4
%bg=getelementptr inbounds i8,i8*%bc,i64 4
%bh=bitcast i8*%bg to i32*
store i32 0,i32*%bh,align 1
store i32%aY,i32*%bd,align 4
%bi=load i8*,i8**%d,align 8
store i8*null,i8**%d,align 8
br label%aC
bj:
%bk=load i8*,i8**@_SMLZ8Overflow,align 8
store i8*%bk,i8**%c,align 8
%bl=call i8*@sml_alloc(i32 inreg 20)#0
%bm=getelementptr inbounds i8,i8*%bl,i64 -4
%bn=bitcast i8*%bm to i32*
store i32 1342177296,i32*%bn,align 4
store i8*%bl,i8**%d,align 8
%bo=load i8*,i8**%c,align 8
store i8*null,i8**%c,align 8
%bp=bitcast i8*%bl to i8**
store i8*%bo,i8**%bp,align 8
%bq=getelementptr inbounds i8,i8*%bl,i64 8
%br=bitcast i8*%bq to i8**
store i8*getelementptr inbounds(<{[4x i8],i32,[42x i8]}>,<{[4x i8],i32,[42x i8]}>*@k,i64 0,i32 2,i64 0),i8**%br,align 8
%bs=getelementptr inbounds i8,i8*%bl,i64 16
%bt=bitcast i8*%bs to i32*
store i32 3,i32*%bt,align 4
%bu=call i8*@sml_alloc(i32 inreg 60)#0
%bv=getelementptr inbounds i8,i8*%bu,i64 -4
%bw=bitcast i8*%bv to i32*
store i32 1342177336,i32*%bw,align 4
%bx=getelementptr inbounds i8,i8*%bu,i64 56
%by=bitcast i8*%bx to i32*
store i32 1,i32*%by,align 4
%bz=load i8*,i8**%d,align 8
%bA=bitcast i8*%bu to i8**
store i8*%bz,i8**%bA,align 8
call void@sml_raise(i8*inreg%bu)#1
unreachable
}
define internal fastcc i8*@_SMLLLN10Int__common3fmtE_84(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]
%m=load i32,i32*%l,align 4
%n=tail call fastcc i8*@_SMLLLN10Int__common3fmtE_82(i32 inreg%m,i32 inreg%b)
ret i8*%n
}
define fastcc i8*@_SMLFN5Int323fmtE(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)*@_SMLLLN10Int__common3fmtE_84 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*)*@_SMLLLN10Int__common3fmtE_110 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*@_SMLLLN10Int__common4scanE_91(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=add i32%o,7
%q=sub i32 0,%o
%r=and i32%p,%q
%s=add i32%o,3
%t=and i32%s,%q
%u=add i32%p,%t
%v=and i32%u,-8
%w=lshr i32%t,3
%x=getelementptr inbounds i8,i8*%k,i64 8
%y=bitcast i8*%x to i32*
%z=load i32,i32*%y,align 4
%A=shl i32%z,%w
%B=or i32%v,4
%C=call fastcc i8*@_SMLFN17SMLSharp__ScanChar7scanIntE(i32 inreg%z,i32 inreg%o)
%D=getelementptr inbounds i8,i8*%C,i64 16
%E=bitcast i8*%D to i8*(i8*,i8*)**
%F=load i8*(i8*,i8*)*,i8*(i8*,i8*)**%E,align 8
%G=bitcast i8*%C to i8**
%H=load i8*,i8**%G,align 8
store i8*%H,i8**%d,align 8
%I=load i8*,i8**%e,align 8
%J=getelementptr inbounds i8,i8*%I,i64 16
%K=bitcast i8*%J to i32*
%L=load i32,i32*%K,align 4
%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%L,i32*%N,align 4
%Q=load i8*,i8**%d,align 8
store i8*null,i8**%d,align 8
%R=call fastcc i8*%F(i8*inreg%Q,i8*inreg%M)
%S=getelementptr inbounds i8,i8*%R,i64 16
%T=bitcast i8*%S to i8*(i8*,i8*)**
%U=load i8*(i8*,i8*)*,i8*(i8*,i8*)**%T,align 8
%V=bitcast i8*%R to i8**
%W=load i8*,i8**%V,align 8
%X=bitcast i8**%e to i8***
%Y=load i8**,i8***%X,align 8
%Z=load i8*,i8**%Y,align 8
%aa=call fastcc i8*%U(i8*inreg%W,i8*inreg%Z)
%ab=getelementptr inbounds i8,i8*%aa,i64 16
%ac=bitcast i8*%ab to i8*(i8*,i8*)**
%ad=load i8*(i8*,i8*)*,i8*(i8*,i8*)**%ac,align 8
%ae=bitcast i8*%aa to i8**
%af=load i8*,i8**%ae,align 8
%ag=load i8*,i8**%c,align 8
store i8*null,i8**%c,align 8
%ah=call fastcc i8*%ad(i8*inreg%af,i8*inreg%ag)
%ai=icmp eq i8*%ah,null
br i1%ai,label%aj,label%ak
aj:
ret i8*null
ak:
%al=bitcast i8*%ah to i8**
%am=load i8*,i8**%al,align 8
store i8*%am,i8**%c,align 8
%an=bitcast i8*%am to i8**
%ao=load i8*,i8**%an,align 8
%ap=bitcast i8*%ao to i8**
%aq=load i8*,i8**%ap,align 8
store i8*%aq,i8**%d,align 8
%ar=getelementptr inbounds i8,i8*%ao,i64 8
%as=bitcast i8*%ar to i32*
%at=load i32,i32*%as,align 4
%au=getelementptr inbounds i8,i8*%ao,i64 12
%av=bitcast i8*%au to i32*
%aw=load i32,i32*%av,align 4
%ax=load i8*,i8**%e,align 8
%ay=getelementptr inbounds i8,i8*%ax,i64 8
%az=bitcast i8*%ay to i32*
%aA=load i32,i32*%az,align 4
%aB=icmp eq i32%aA,0
br i1%aB,label%aH,label%aC
aC:
store i8*null,i8**%c,align 8
%aD=sext i32%r to i64
%aE=getelementptr inbounds i8,i8*%am,i64%aD
%aF=bitcast i8*%aE to i8**
%aG=load i8*,i8**%aF,align 8
br label%aS
aH:
%aI=getelementptr inbounds i8,i8*%ax,i64 12
%aJ=bitcast i8*%aI to i32*
%aK=load i32,i32*%aJ,align 4
%aL=call i8*@sml_alloc(i32 inreg%aK)#0
%aM=getelementptr inbounds i8,i8*%aL,i64 -4
%aN=bitcast i8*%aM to i32*
store i32%aK,i32*%aN,align 4
%aO=load i8*,i8**%c,align 8
store i8*null,i8**%c,align 8
%aP=sext i32%r to i64
%aQ=getelementptr inbounds i8,i8*%aO,i64%aP
call void@llvm.memcpy.p0i8.p0i8.i32(i8*%aL,i8*%aQ,i32%aK,i1 false)
%aR=load i8*,i8**%d,align 8
br label%aS
aS:
%aT=phi i8*[%aR,%aH],[%aq,%aC]
%aU=phi i8*[%aL,%aH],[%aG,%aC]
store i8*%aU,i8**%c,align 8
%aV=icmp eq i32%at,0
store i8*null,i8**%d,align 8
br i1%aV,label%ci,label%aW
aW:
%aX=phi i32[%bZ,%bS],[0,%aS]
%aY=phi i8*[%bV,%bS],[%aT,%aS]
%aZ=icmp eq i8*%aY,null
br i1%aZ,label%a0,label%bv
a0:
%a1=load i8*,i8**%e,align 8
%a2=getelementptr inbounds i8,i8*%a1,i64 12
%a3=bitcast i8*%a2 to i32*
%a4=load i32,i32*%a3,align 4
store i8*null,i8**%e,align 8
%a5=getelementptr inbounds i8,i8*%a1,i64 8
%a6=bitcast i8*%a5 to i32*
%a7=load i32,i32*%a6,align 4
%a8=call i8*@sml_alloc(i32 inreg%B)#0
%a9=or i32%v,1342177280
%ba=getelementptr inbounds i8,i8*%a8,i64 -4
%bb=bitcast i8*%ba to i32*
store i32%a9,i32*%bb,align 4
store i8*%a8,i8**%d,align 8
call void@llvm.memset.p0i8.i32(i8*%a8,i8 0,i32%B,i1 false)
%bc=bitcast i8*%a8 to i32*
store i32%aX,i32*%bc,align 4
%bd=icmp eq i32%a7,0
%be=load i8*,i8**%c,align 8
store i8*null,i8**%c,align 8
%bf=sext i32%t to i64
%bg=getelementptr inbounds i8,i8*%a8,i64%bf
br i1%bd,label%bh,label%bi
bh:
call void@llvm.memcpy.p0i8.p0i8.i32(i8*%bg,i8*%be,i32%a4,i1 false)
br label%bk
bi:
%bj=bitcast i8*%bg to i8**
store i8*%be,i8**%bj,align 8
br label%bk
bk:
%bl=sext i32%v to i64
%bm=getelementptr inbounds i8,i8*%a8,i64%bl
%bn=bitcast i8*%bm to i32*
store i32%A,i32*%bn,align 4
%bo=call i8*@sml_alloc(i32 inreg 12)#0
%bp=getelementptr inbounds i8,i8*%bo,i64 -4
%bq=bitcast i8*%bp to i32*
store i32 1342177288,i32*%bq,align 4
%br=load i8*,i8**%d,align 8
%bs=bitcast i8*%bo to i8**
store i8*%br,i8**%bs,align 8
%bt=getelementptr inbounds i8,i8*%bo,i64 8
%bu=bitcast i8*%bt to i32*
store i32 1,i32*%bu,align 4
ret i8*%bo
bv:
%bw=bitcast i8*%aY to i32*
%bx=load i32,i32*%bw,align 4
%by=call{i32,i1}@llvm.smul.with.overflow.i32(i32%aX,i32%aw)#0
%bz=extractvalue{i32,i1}%by,1
br i1%bz,label%bA,label%bS
bA:
store i8*null,i8**%e,align 8
%bB=load i8*,i8**@_SMLZ8Overflow,align 8
store i8*%bB,i8**%c,align 8
%bC=call i8*@sml_alloc(i32 inreg 20)#0
%bD=getelementptr inbounds i8,i8*%bC,i64 -4
%bE=bitcast i8*%bD to i32*
store i32 1342177296,i32*%bE,align 4
store i8*%bC,i8**%d,align 8
%bF=load i8*,i8**%c,align 8
store i8*null,i8**%c,align 8
%bG=bitcast i8*%bC to i8**
store i8*%bF,i8**%bG,align 8
%bH=getelementptr inbounds i8,i8*%bC,i64 8
%bI=bitcast i8*%bH to i8**
store i8*getelementptr inbounds(<{[4x i8],i32,[42x i8]}>,<{[4x i8],i32,[42x i8]}>*@p,i64 0,i32 2,i64 0),i8**%bI,align 8
%bJ=getelementptr inbounds i8,i8*%bC,i64 16
%bK=bitcast i8*%bJ to i32*
store i32 3,i32*%bK,align 4
%bL=call i8*@sml_alloc(i32 inreg 60)#0
%bM=getelementptr inbounds i8,i8*%bL,i64 -4
%bN=bitcast i8*%bM to i32*
store i32 1342177336,i32*%bN,align 4
%bO=getelementptr inbounds i8,i8*%bL,i64 56
%bP=bitcast i8*%bO to i32*
store i32 1,i32*%bP,align 4
%bQ=load i8*,i8**%d,align 8
%bR=bitcast i8*%bL to i8**
store i8*%bQ,i8**%bR,align 8
call void@sml_raise(i8*inreg%bL)#1
unreachable
bS:
%bT=getelementptr inbounds i8,i8*%aY,i64 8
%bU=bitcast i8*%bT to i8**
%bV=load i8*,i8**%bU,align 8
%bW=mul nsw i32%aX,%aw
%bX=call{i32,i1}@llvm.ssub.with.overflow.i32(i32%bW,i32%bx)#0
%bY=extractvalue{i32,i1}%bX,1
%bZ=sub nsw i32%bW,%bx
br i1%bY,label%b0,label%aW
b0:
store i8*null,i8**%e,align 8
%b1=load i8*,i8**@_SMLZ8Overflow,align 8
store i8*%b1,i8**%c,align 8
%b2=call i8*@sml_alloc(i32 inreg 20)#0
%b3=getelementptr inbounds i8,i8*%b2,i64 -4
%b4=bitcast i8*%b3 to i32*
store i32 1342177296,i32*%b4,align 4
store i8*%b2,i8**%d,align 8
%b5=load i8*,i8**%c,align 8
store i8*null,i8**%c,align 8
%b6=bitcast i8*%b2 to i8**
store i8*%b5,i8**%b6,align 8
%b7=getelementptr inbounds i8,i8*%b2,i64 8
%b8=bitcast i8*%b7 to i8**
store i8*getelementptr inbounds(<{[4x i8],i32,[42x i8]}>,<{[4x i8],i32,[42x i8]}>*@q,i64 0,i32 2,i64 0),i8**%b8,align 8
%b9=getelementptr inbounds i8,i8*%b2,i64 16
%ca=bitcast i8*%b9 to i32*
store i32 3,i32*%ca,align 4
%cb=call i8*@sml_alloc(i32 inreg 60)#0
%cc=getelementptr inbounds i8,i8*%cb,i64 -4
%cd=bitcast i8*%cc to i32*
store i32 1342177336,i32*%cd,align 4
%ce=getelementptr inbounds i8,i8*%cb,i64 56
%cf=bitcast i8*%ce to i32*
store i32 1,i32*%cf,align 4
%cg=load i8*,i8**%d,align 8
%ch=bitcast i8*%cb to i8**
store i8*%cg,i8**%ch,align 8
call void@sml_raise(i8*inreg%cb)#1
unreachable
ci:
%cj=phi i32[%dl,%de],[0,%aS]
%ck=phi i8*[%dh,%de],[%aT,%aS]
%cl=icmp eq i8*%ck,null
br i1%cl,label%cm,label%cR
cm:
%cn=load i8*,i8**%e,align 8
%co=getelementptr inbounds i8,i8*%cn,i64 12
%cp=bitcast i8*%co to i32*
%cq=load i32,i32*%cp,align 4
store i8*null,i8**%e,align 8
%cr=getelementptr inbounds i8,i8*%cn,i64 8
%cs=bitcast i8*%cr to i32*
%ct=load i32,i32*%cs,align 4
%cu=call i8*@sml_alloc(i32 inreg%B)#0
%cv=or i32%v,1342177280
%cw=getelementptr inbounds i8,i8*%cu,i64 -4
%cx=bitcast i8*%cw to i32*
store i32%cv,i32*%cx,align 4
store i8*%cu,i8**%d,align 8
call void@llvm.memset.p0i8.i32(i8*%cu,i8 0,i32%B,i1 false)
%cy=bitcast i8*%cu to i32*
store i32%cj,i32*%cy,align 4
%cz=icmp eq i32%ct,0
%cA=load i8*,i8**%c,align 8
store i8*null,i8**%c,align 8
%cB=sext i32%t to i64
%cC=getelementptr inbounds i8,i8*%cu,i64%cB
br i1%cz,label%cD,label%cE
cD:
call void@llvm.memcpy.p0i8.p0i8.i32(i8*%cC,i8*%cA,i32%cq,i1 false)
br label%cG
cE:
%cF=bitcast i8*%cC to i8**
store i8*%cA,i8**%cF,align 8
br label%cG
cG:
%cH=sext i32%v to i64
%cI=getelementptr inbounds i8,i8*%cu,i64%cH
%cJ=bitcast i8*%cI to i32*
store i32%A,i32*%cJ,align 4
%cK=call i8*@sml_alloc(i32 inreg 12)#0
%cL=getelementptr inbounds i8,i8*%cK,i64 -4
%cM=bitcast i8*%cL to i32*
store i32 1342177288,i32*%cM,align 4
%cN=load i8*,i8**%d,align 8
%cO=bitcast i8*%cK to i8**
store i8*%cN,i8**%cO,align 8
%cP=getelementptr inbounds i8,i8*%cK,i64 8
%cQ=bitcast i8*%cP to i32*
store i32 1,i32*%cQ,align 4
ret i8*%cK
cR:
%cS=bitcast i8*%ck to i32*
%cT=load i32,i32*%cS,align 4
%cU=call{i32,i1}@llvm.smul.with.overflow.i32(i32%cj,i32%aw)#0
%cV=extractvalue{i32,i1}%cU,1
br i1%cV,label%cW,label%de
cW:
store i8*null,i8**%e,align 8
%cX=load i8*,i8**@_SMLZ8Overflow,align 8
store i8*%cX,i8**%c,align 8
%cY=call i8*@sml_alloc(i32 inreg 20)#0
%cZ=getelementptr inbounds i8,i8*%cY,i64 -4
%c0=bitcast i8*%cZ to i32*
store i32 1342177296,i32*%c0,align 4
store i8*%cY,i8**%d,align 8
%c1=load i8*,i8**%c,align 8
store i8*null,i8**%c,align 8
%c2=bitcast i8*%cY to i8**
store i8*%c1,i8**%c2,align 8
%c3=getelementptr inbounds i8,i8*%cY,i64 8
%c4=bitcast i8*%c3 to i8**
store i8*getelementptr inbounds(<{[4x i8],i32,[42x i8]}>,<{[4x i8],i32,[42x i8]}>*@n,i64 0,i32 2,i64 0),i8**%c4,align 8
%c5=getelementptr inbounds i8,i8*%cY,i64 16
%c6=bitcast i8*%c5 to i32*
store i32 3,i32*%c6,align 4
%c7=call i8*@sml_alloc(i32 inreg 60)#0
%c8=getelementptr inbounds i8,i8*%c7,i64 -4
%c9=bitcast i8*%c8 to i32*
store i32 1342177336,i32*%c9,align 4
%da=getelementptr inbounds i8,i8*%c7,i64 56
%db=bitcast i8*%da to i32*
store i32 1,i32*%db,align 4
%dc=load i8*,i8**%d,align 8
%dd=bitcast i8*%c7 to i8**
store i8*%dc,i8**%dd,align 8
call void@sml_raise(i8*inreg%c7)#1
unreachable
de:
%df=getelementptr inbounds i8,i8*%ck,i64 8
%dg=bitcast i8*%df to i8**
%dh=load i8*,i8**%dg,align 8
%di=mul nsw i32%cj,%aw
%dj=call{i32,i1}@llvm.sadd.with.overflow.i32(i32%di,i32%cT)#0
%dk=extractvalue{i32,i1}%dj,1
%dl=add nsw i32%cT,%di
br i1%dk,label%dm,label%ci
dm:
store i8*null,i8**%e,align 8
%dn=load i8*,i8**@_SMLZ8Overflow,align 8
store i8*%dn,i8**%c,align 8
%do=call i8*@sml_alloc(i32 inreg 20)#0
%dp=getelementptr inbounds i8,i8*%do,i64 -4
%dq=bitcast i8*%dp to i32*
store i32 1342177296,i32*%dq,align 4
store i8*%do,i8**%d,align 8
%dr=load i8*,i8**%c,align 8
store i8*null,i8**%c,align 8
%ds=bitcast i8*%do to i8**
store i8*%dr,i8**%ds,align 8
%dt=getelementptr inbounds i8,i8*%do,i64 8
%du=bitcast i8*%dt to i8**
store i8*getelementptr inbounds(<{[4x i8],i32,[42x i8]}>,<{[4x i8],i32,[42x i8]}>*@o,i64 0,i32 2,i64 0),i8**%du,align 8
%dv=getelementptr inbounds i8,i8*%do,i64 16
%dw=bitcast i8*%dv to i32*
store i32 3,i32*%dw,align 4
%dx=call i8*@sml_alloc(i32 inreg 60)#0
%dy=getelementptr inbounds i8,i8*%dx,i64 -4
%dz=bitcast i8*%dy to i32*
store i32 1342177336,i32*%dz,align 4
%dA=getelementptr inbounds i8,i8*%dx,i64 56
%dB=bitcast i8*%dA to i32*
store i32 1,i32*%dB,align 4
%dC=load i8*,i8**%d,align 8
%dD=bitcast i8*%dx to i8**
store i8*%dC,i8**%dD,align 8
call void@sml_raise(i8*inreg%dx)#1
unreachable
}
define internal fastcc i8*@_SMLLLN10Int__common4scanE_92(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*)*@_SMLLLN10Int__common4scanE_91 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*)*@_SMLLLN10Int__common4scanE_91 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*@_SMLLLN10Int__common4scanE_93(i32 inreg%a,i32 inreg%b,i32 inreg%c)unnamed_addr#4 gc"smlsharp"{
%d=alloca i8*,align 8
call void@llvm.gcroot(i8**%d,i8*null)#0
%e=call i8*@sml_alloc(i32 inreg 20)#0
%f=bitcast i8*%e to i32*
%g=getelementptr inbounds i8,i8*%e,i64 -4
%h=bitcast i8*%g to i32*
store i32 1342177296,i32*%h,align 4
store i8*%e,i8**%d,align 8
store i32%a,i32*%f,align 4
%i=getelementptr inbounds i8,i8*%e,i64 4
%j=bitcast i8*%i to i32*
store i32%b,i32*%j,align 4
%k=getelementptr inbounds i8,i8*%e,i64 8
%l=bitcast i8*%k to i32*
store i32%c,i32*%l,align 4
%m=getelementptr inbounds i8,i8*%e,i64 16
%n=bitcast i8*%m to i32*
store i32 0,i32*%n,align 4
%o=call i8*@sml_alloc(i32 inreg 28)#0
%p=getelementptr inbounds i8,i8*%o,i64 -4
%q=bitcast i8*%p to i32*
store i32 1342177304,i32*%q,align 4
%r=load i8*,i8**%d,align 8
%s=bitcast i8*%o to i8**
store i8*%r,i8**%s,align 8
%t=getelementptr inbounds i8,i8*%o,i64 8
%u=bitcast i8*%t to void(...)**
store void(...)*bitcast(i8*(i8*,i8*)*@_SMLLLN10Int__common4scanE_92 to void(...)*),void(...)**%u,align 8
%v=getelementptr inbounds i8,i8*%o,i64 16
%w=bitcast i8*%v to void(...)**
store void(...)*bitcast(i8*(i8*,i8*)*@_SMLLLN10Int__common4scanE_92 to void(...)*),void(...)**%w,align 8
%x=getelementptr inbounds i8,i8*%o,i64 24
%y=bitcast i8*%x to i32*
store i32 -2147483647,i32*%y,align 4
ret i8*%o
}
define fastcc i8*@_SMLFN5Int328toStringE(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*@_SMLLLN10Int__common3fmtE_82(i32 inreg 1,i32 inreg%a)
ret i8*%f
}
define fastcc i8*@_SMLFN5Int3210fromStringE(i8*inreg%a)#2 gc"smlsharp"{
%b=alloca i8*,align 8
%c=alloca i8*,align 8
call void@llvm.gcroot(i8**%b,i8*null)#0
call void@llvm.gcroot(i8**%c,i8*null)#0
store i8*%a,i8**%b,align 8
%d=load atomic i32,i32*@sml_check_flag unordered,align 4
%e=icmp eq i32%d,0
br i1%e,label%g,label%f
f:
call void@sml_check(i32 inreg%d)
br label%g
g:
%h=call fastcc i8*@_SMLFN9StringCvt10scanStringE(i32 inreg 0,i32 inreg 4)
%i=getelementptr inbounds i8,i8*%h,i64 16
%j=bitcast i8*%i to i8*(i8*,i8*)**
%k=load i8*(i8*,i8*)*,i8*(i8*,i8*)**%j,align 8
%l=bitcast i8*%h to i8**
%m=load i8*,i8**%l,align 8
store i8*%m,i8**%c,align 8
%n=call fastcc i8*@_SMLLLN10Int__common4scanE_93(i32 inreg 0,i32 inreg 4,i32 inreg 1)
%o=load i8*,i8**%c,align 8
store i8*null,i8**%c,align 8
%p=call fastcc i8*%k(i8*inreg%o,i8*inreg%n)
%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
%v=load i8*,i8**%b,align 8
%w=tail call fastcc i8*%s(i8*inreg%u,i8*inreg%v)
ret i8*%w
}
define internal fastcc i8*@_SMLLLN5Int324scanE_99(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
%m=getelementptr inbounds i8,i8*%i,i64 4
%n=bitcast i8*%m to i32*
%o=load i32,i32*%n,align 4
%p=tail call fastcc i8*@_SMLLLN10Int__common4scanE_93(i32 inreg%l,i32 inreg%o,i32 inreg%b)
ret i8*%p
}
define fastcc i8*@_SMLFN5Int324scanE(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)*@_SMLLLN5Int324scanE_99 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*)*@_SMLLLN5Int324scanE_115 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 internal fastcc i8*@_SMLLLN3Int9fromInt32E_102(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 i8*@sml_alloc(i32 inreg 4)#0
%f=bitcast i8*%e to i32*
%g=getelementptr inbounds i8,i8*%e,i64 -4
%h=bitcast i8*%g to i32*
store i32 4,i32*%h,align 4
store i32%d,i32*%f,align 4
ret i8*%e
}
define internal fastcc i8*@_SMLLLN3Int7toInt32E_103(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 i8*@sml_alloc(i32 inreg 4)#0
%f=bitcast i8*%e to i32*
%g=getelementptr inbounds i8,i8*%e,i64 -4
%h=bitcast i8*%g to i32*
store i32 4,i32*%h,align 4
store i32%d,i32*%f,align 4
ret i8*%e
}
define internal fastcc i8*@_SMLLLN10Int__common7compareE_104(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 slt i32%d,%g
%i=icmp ne i32%d,%g
%j=zext i1%i to i32
%k=select i1%h,i32 2,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*@_SMLLLN10Int__common3minE_105(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 slt 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*@_SMLLLN10Int__common3maxE_106(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 sgt 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*@_SMLLLN10Int__common4signE_107(i8*inreg%a,i8*inreg%b)#4 gc"smlsharp"{
%c=bitcast i8*%b to i32*
%d=load i32,i32*%c,align 4
%e=icmp sgt i32%d,-1
%f=icmp ne i32%d,0
%g=zext i1%f to i32
%h=select i1%e,i32%g,i32 -1
%i=tail call i8*@sml_alloc(i32 inreg 4)#0
%j=bitcast i8*%i to i32*
%k=getelementptr inbounds i8,i8*%i,i64 -4
%l=bitcast i8*%k to i32*
store i32 4,i32*%l,align 4
store i32%h,i32*%j,align 4
ret i8*%i
}
define internal fastcc i8*@_SMLLLN10Int__common8sameSignE_108(i8*inreg%a,i8*inreg%b)#4 gc"smlsharp"{
%c=tail call fastcc i32@_SMLFN5Int328sameSignE(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*@_SMLLLN10Int__common3fmtE_110(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*@_SMLLLN10Int__common3fmtE_84(i8*inreg%a,i32 inreg%d)
ret i8*%e
}
define internal fastcc i8*@_SMLLLN10Int__common3fmtE_111(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*@_SMLFN5Int323fmtE(i32 inreg%d)
ret i8*%e
}
define internal fastcc i8*@_SMLLLN10Int__common8toStringE_113(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*@_SMLFN5Int328toStringE(i32 inreg%d)
ret i8*%e
}
define internal fastcc i8*@_SMLLLN10Int__common10fromStringE_114(i8*inreg%a,i8*inreg%b)#2 gc"smlsharp"{
%c=tail call fastcc i8*@_SMLFN5Int3210fromStringE(i8*inreg%b)
ret i8*%c
}
define internal fastcc i8*@_SMLLLN5Int324scanE_115(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*@_SMLLLN5Int324scanE_99(i8*inreg%a,i32 inreg%d)
ret i8*%e
}
define internal fastcc i8*@_SMLLLN5Int324scanE_116(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*@_SMLFN5Int324scanE(i32 inreg%e,i32 inreg%g)
ret i8*%h
}
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}
