@sml_check_flag=external local_unnamed_addr global i32
@_SMLZ9Subscript=external unnamed_addr constant i8*
@_SMLZ4Size=external unnamed_addr constant i8*
@_SMLZ8Overflow=external unnamed_addr constant i8*
@a=private unnamed_addr constant<{[4x i8],i32,[44x i8]}><{[4x i8]zeroinitializer,i32 -2147483604,[44x i8]c"src/basis/main/Array_common.sml:53.18(1576)\00"}>,align 8
@b=private unnamed_addr constant<{[4x i8],i32,[44x i8]}><{[4x i8]zeroinitializer,i32 -2147483604,[44x i8]c"src/basis/main/Array_common.sml:81.19(2422)\00"}>,align 8
@c=private unnamed_addr constant<{[4x i8],i32,[45x i8]}><{[4x i8]zeroinitializer,i32 -2147483603,[45x i8]c"src/basis/main/Array_common.sml:305.42(8575)\00"}>,align 8
@d=private unnamed_addr constant<{[4x i8],i32,[45x i8]}><{[4x i8]zeroinitializer,i32 -2147483603,[45x i8]c"src/basis/main/Array_common.sml:306.61(8654)\00"}>,align 8
@e=private unnamed_addr constant<{[4x i8],i32,[45x i8]}><{[4x i8]zeroinitializer,i32 -2147483603,[45x i8]c"src/basis/main/Array_common.sml:307.18(8677)\00"}>,align 8
@f=private unnamed_addr constant<{[4x i8],i32,[45x i8]}><{[4x i8]zeroinitializer,i32 -2147483603,[45x i8]c"src/basis/main/Array_common.sml:319.18(8980)\00"}>,align 8
@_SMLZN5Array6maxLenE=local_unnamed_addr constant i32 268435455
@g=private unnamed_addr constant<{[4x i8],i32,i8*,void(...)*,void(...)*,i32}><{[4x i8]zeroinitializer,i32 -805306344,i8*null,void(...)*bitcast(i8*(i32,i32)*@_SMLFN5Array5arrayE to void(...)*),void(...)*bitcast(i8*(i8*,i8*,i8*)*@_SMLLN5Array5arrayE_342 to void(...)*),i32 -2147483647}>,align 8
@_SMLZN5Array5arrayE=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*)
@h=private unnamed_addr constant<{[4x i8],i32,i8*,void(...)*,void(...)*,i32}><{[4x i8]zeroinitializer,i32 -805306344,i8*null,void(...)*bitcast(i8*(i32,i32)*@_SMLFN5Array8fromListE to void(...)*),void(...)*bitcast(i8*(i8*,i8*,i8*)*@_SMLLN5Array8fromListE_343 to void(...)*),i32 -2147483647}>,align 8
@_SMLZN5Array8fromListE=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*)
@i=private unnamed_addr constant<{[4x i8],i32,i8*,void(...)*,void(...)*,i32}><{[4x i8]zeroinitializer,i32 -805306344,i8*null,void(...)*bitcast(i8*(i32,i32)*@_SMLFN5Array8tabulateE to void(...)*),void(...)*bitcast(i8*(i8*,i8*,i8*)*@_SMLLN5Array8tabulateE_344 to void(...)*),i32 -2147483647}>,align 8
@_SMLZN5Array8tabulateE=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*)
@j=private unnamed_addr constant<{[4x i8],i32,i8*,void(...)*,void(...)*,i32}><{[4x i8]zeroinitializer,i32 -805306344,i8*null,void(...)*bitcast(i8*(i32,i32)*@_SMLFN5Array6vectorE to void(...)*),void(...)*bitcast(i8*(i8*,i8*,i8*)*@_SMLLN5Array6vectorE_345 to void(...)*),i32 -2147483647}>,align 8
@_SMLZN5Array6vectorE=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,i32)*@_SMLFN5Array7copyVecE to void(...)*),void(...)*bitcast(i8*(i8*,i8*,i8*)*@_SMLLN5Array7copyVecE_347 to void(...)*),i32 -2147483647}>,align 8
@_SMLZN5Array7copyVecE=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*(i32,i32)*@_SMLFN5Array4appiE to void(...)*),void(...)*bitcast(i8*(i8*,i8*,i8*)*@_SMLLN5Array4appiE_348 to void(...)*),i32 -2147483647}>,align 8
@_SMLZN5Array4appiE=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*)
@m=private unnamed_addr constant<{[4x i8],i32,i8*,void(...)*,void(...)*,i32}><{[4x i8]zeroinitializer,i32 -805306344,i8*null,void(...)*bitcast(i8*(i32,i32)*@_SMLFN5Array3appE to void(...)*),void(...)*bitcast(i8*(i8*,i8*,i8*)*@_SMLLN5Array3appE_349 to void(...)*),i32 -2147483647}>,align 8
@_SMLZN5Array3appE=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)*@_SMLFN5Array7modifyiE to void(...)*),void(...)*bitcast(i8*(i8*,i8*,i8*)*@_SMLLN5Array7modifyiE_350 to void(...)*),i32 -2147483647}>,align 8
@_SMLZN5Array7modifyiE=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*(i32,i32)*@_SMLFN5Array6modifyE to void(...)*),void(...)*bitcast(i8*(i8*,i8*,i8*)*@_SMLLN5Array6modifyE_351 to void(...)*),i32 -2147483647}>,align 8
@_SMLZN5Array6modifyE=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*)
@p=private unnamed_addr constant<{[4x i8],i32,i8*,void(...)*,void(...)*,i32}><{[4x i8]zeroinitializer,i32 -805306344,i8*null,void(...)*bitcast(i8*(i32,i32,i32,i32)*@_SMLFN5Array6foldliE to void(...)*),void(...)*bitcast(i8*(i8*,i8*,i8*,i8*,i8*)*@_SMLLN5Array6foldliE_352 to void(...)*),i32 -2147483647}>,align 8
@_SMLZN5Array6foldliE=local_unnamed_addr constant i8*bitcast(i8**getelementptr inbounds(<{[4x i8],i32,i8*,void(...)*,void(...)*,i32}>,<{[4x i8],i32,i8*,void(...)*,void(...)*,i32}>*@p,i64 0,i32 2)to i8*)
@q=private unnamed_addr constant<{[4x i8],i32,i8*,void(...)*,void(...)*,i32}><{[4x i8]zeroinitializer,i32 -805306344,i8*null,void(...)*bitcast(i8*(i32,i32,i32,i32)*@_SMLFN5Array6foldriE to void(...)*),void(...)*bitcast(i8*(i8*,i8*,i8*,i8*,i8*)*@_SMLLN5Array6foldriE_353 to void(...)*),i32 -2147483647}>,align 8
@_SMLZN5Array6foldriE=local_unnamed_addr constant i8*bitcast(i8**getelementptr inbounds(<{[4x i8],i32,i8*,void(...)*,void(...)*,i32}>,<{[4x i8],i32,i8*,void(...)*,void(...)*,i32}>*@q,i64 0,i32 2)to i8*)
@r=private unnamed_addr constant<{[4x i8],i32,i8*,void(...)*,void(...)*,i32}><{[4x i8]zeroinitializer,i32 -805306344,i8*null,void(...)*bitcast(i8*(i32,i32,i32,i32)*@_SMLFN5Array5foldlE to void(...)*),void(...)*bitcast(i8*(i8*,i8*,i8*,i8*,i8*)*@_SMLLN5Array5foldlE_354 to void(...)*),i32 -2147483647}>,align 8
@_SMLZN5Array5foldlE=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*)
@s=private unnamed_addr constant<{[4x i8],i32,i8*,void(...)*,void(...)*,i32}><{[4x i8]zeroinitializer,i32 -805306344,i8*null,void(...)*bitcast(i8*(i32,i32,i32,i32)*@_SMLFN5Array5foldrE to void(...)*),void(...)*bitcast(i8*(i8*,i8*,i8*,i8*,i8*)*@_SMLLN5Array5foldrE_355 to void(...)*),i32 -2147483647}>,align 8
@_SMLZN5Array5foldrE=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*)
@t=private unnamed_addr constant<{[4x i8],i32,i8*,void(...)*,void(...)*,i32}><{[4x i8]zeroinitializer,i32 -805306344,i8*null,void(...)*bitcast(i8*(i32,i32)*@_SMLFN5Array5findiE to void(...)*),void(...)*bitcast(i8*(i8*,i8*,i8*)*@_SMLLN5Array5findiE_356 to void(...)*),i32 -2147483647}>,align 8
@_SMLZN5Array5findiE=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*)
@u=private unnamed_addr constant<{[4x i8],i32,i8*,void(...)*,void(...)*,i32}><{[4x i8]zeroinitializer,i32 -805306344,i8*null,void(...)*bitcast(i8*(i32,i32)*@_SMLFN5Array4findE to void(...)*),void(...)*bitcast(i8*(i8*,i8*,i8*)*@_SMLLN5Array4findE_357 to void(...)*),i32 -2147483647}>,align 8
@_SMLZN5Array4findE=local_unnamed_addr constant i8*bitcast(i8**getelementptr inbounds(<{[4x i8],i32,i8*,void(...)*,void(...)*,i32}>,<{[4x i8],i32,i8*,void(...)*,void(...)*,i32}>*@u,i64 0,i32 2)to i8*)
@v=private unnamed_addr constant<{[4x i8],i32,i8*,void(...)*,void(...)*,i32}><{[4x i8]zeroinitializer,i32 -805306344,i8*null,void(...)*bitcast(i8*(i32,i32)*@_SMLFN5Array6existsE to void(...)*),void(...)*bitcast(i8*(i8*,i8*,i8*)*@_SMLLN5Array6existsE_358 to void(...)*),i32 -2147483647}>,align 8
@_SMLZN5Array6existsE=local_unnamed_addr constant i8*bitcast(i8**getelementptr inbounds(<{[4x i8],i32,i8*,void(...)*,void(...)*,i32}>,<{[4x i8],i32,i8*,void(...)*,void(...)*,i32}>*@v,i64 0,i32 2)to i8*)
@w=private unnamed_addr constant<{[4x i8],i32,i8*,void(...)*,void(...)*,i32}><{[4x i8]zeroinitializer,i32 -805306344,i8*null,void(...)*bitcast(i8*(i32,i32)*@_SMLFN5Array3allE to void(...)*),void(...)*bitcast(i8*(i8*,i8*,i8*)*@_SMLLN5Array3allE_359 to void(...)*),i32 -2147483647}>,align 8
@_SMLZN5Array3allE=local_unnamed_addr constant i8*bitcast(i8**getelementptr inbounds(<{[4x i8],i32,i8*,void(...)*,void(...)*,i32}>,<{[4x i8],i32,i8*,void(...)*,void(...)*,i32}>*@w,i64 0,i32 2)to i8*)
@x=private unnamed_addr constant<{[4x i8],i32,i8*,void(...)*,void(...)*,i32}><{[4x i8]zeroinitializer,i32 -805306344,i8*null,void(...)*bitcast(i8*(i32,i32)*@_SMLFN5Array4alliE to void(...)*),void(...)*bitcast(i8*(i8*,i8*,i8*)*@_SMLLN5Array4alliE_360 to void(...)*),i32 -2147483647}>,align 8
@_SMLZN5Array4alliE=local_unnamed_addr constant i8*bitcast(i8**getelementptr inbounds(<{[4x i8],i32,i8*,void(...)*,void(...)*,i32}>,<{[4x i8],i32,i8*,void(...)*,void(...)*,i32}>*@x,i64 0,i32 2)to i8*)
@y=private unnamed_addr constant<{[4x i8],i32,i8*,void(...)*,void(...)*,i32}><{[4x i8]zeroinitializer,i32 -805306344,i8*null,void(...)*bitcast(i8*(i32,i32)*@_SMLFN5Array7collateE to void(...)*),void(...)*bitcast(i8*(i8*,i8*,i8*)*@_SMLLN5Array7collateE_361 to void(...)*),i32 -2147483647}>,align 8
@_SMLZN5Array7collateE=local_unnamed_addr constant i8*bitcast(i8**getelementptr inbounds(<{[4x i8],i32,i8*,void(...)*,void(...)*,i32}>,<{[4x i8],i32,i8*,void(...)*,void(...)*,i32}>*@y,i64 0,i32 2)to i8*)
@_SML_ftabfd227ec42a85e2d0_Array=external global i8
@z=internal unnamed_addr global i1 false
declare void@llvm.gcroot(i8**,i8*)#0
declare{i32,i1}@llvm.sadd.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_copyary(i8**,i32,i8**,i32,i32)local_unnamed_addr#0
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 void@sml_write(i8*inreg,i8**inreg,i8*inreg)local_unnamed_addr#0
define private void@_SML_tabbfd227ec42a85e2d0_Array()#2{
unreachable
}
define void@_SML_loadfd227ec42a85e2d0_Array(i8*%a)local_unnamed_addr#0{
%b=load i1,i1*@z,align 1
br i1%b,label%c,label%d
c:
ret void
d:
store i1 true,i1*@z,align 1
tail call void@sml_gcroot(i8*%a,void()*@_SML_tabbfd227ec42a85e2d0_Array,i8*@_SML_ftabfd227ec42a85e2d0_Array,i8*null)#0
ret void
}
define void@_SML_mainfd227ec42a85e2d0_Array()local_unnamed_addr#3 gc"smlsharp"{
ret void
}
define internal fastcc void@_SMLL4loop_145(i8*inreg%a,i32 inreg%b)#4 gc"smlsharp"{
g:
%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*%a,i8**%d,align 8
br label%e
e:
%f=phi i32[%b,%g],[%af,%ae]
%h=load atomic i32,i32*@sml_check_flag unordered,align 4
%i=icmp eq i32%h,0
br i1%i,label%k,label%j
j:
call void@sml_check(i32 inreg%h)
br label%k
k:
%l=load i8*,i8**%d,align 8
%m=getelementptr inbounds i8,i8*%l,i64 16
%n=bitcast i8*%m to i32*
%o=load i32,i32*%n,align 4
%p=icmp slt i32%f,%o
br i1%p,label%r,label%q
q:
ret void
r:
%s=bitcast i8*%l to i8**
%t=load i8*,i8**%s,align 8
store i8*%t,i8**%c,align 8
%u=getelementptr inbounds i8,i8*%l,i64 20
%v=bitcast i8*%u to i32*
%w=load i32,i32*%v,align 4
%x=icmp eq i32%w,0
br i1%x,label%C,label%y
y:
%z=getelementptr inbounds i8,i8*%l,i64 8
%A=bitcast i8*%z to i8**
%B=load i8*,i8**%A,align 8
br label%P
C:
%D=getelementptr inbounds i8,i8*%l,i64 24
%E=bitcast i8*%D to i32*
%F=load i32,i32*%E,align 4
%G=call i8*@sml_alloc(i32 inreg%F)#0
%H=getelementptr inbounds i8,i8*%G,i64 -4
%I=bitcast i8*%H to i32*
store i32%F,i32*%I,align 4
%J=load i8*,i8**%d,align 8
%K=getelementptr inbounds i8,i8*%J,i64 8
call void@llvm.memcpy.p0i8.p0i8.i32(i8*%G,i8*%K,i32%F,i1 false)
%L=getelementptr inbounds i8,i8*%J,i64 20
%M=bitcast i8*%L to i32*
%N=load i32,i32*%M,align 4
%O=load i8*,i8**%c,align 8
br label%P
P:
%Q=phi i8*[%t,%y],[%O,%C]
%R=phi i32[%w,%y],[%N,%C]
%S=phi i8*[%l,%y],[%J,%C]
%T=phi i8*[%B,%y],[%G,%C]
%U=getelementptr inbounds i8,i8*%S,i64 24
%V=bitcast i8*%U to i32*
%W=load i32,i32*%V,align 4
%X=icmp eq i32%R,0
store i8*null,i8**%c,align 8
%Y=mul i32%W,%f
%Z=sext i32%Y to i64
%aa=getelementptr inbounds i8,i8*%Q,i64%Z
br i1%X,label%ad,label%ab
ab:
%ac=bitcast i8*%aa to i8**
call void@sml_write(i8*inreg%Q,i8**inreg%ac,i8*inreg%T)#0
br label%ae
ad:
call void@llvm.memcpy.p0i8.p0i8.i32(i8*%aa,i8*%T,i32%W,i1 false)
br label%ae
ae:
%af=add nsw i32%f,1
br label%e
}
define internal fastcc i8*@_SMLLN12Array__common5arrayE_146(i8*inreg%a,i8*inreg%b)#4 gc"smlsharp"{
m:
%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%k,label%h
h:
call void@sml_check(i32 inreg%f)
%i=load i8*,i8**%c,align 8
%j=load i8*,i8**%e,align 8
br label%k
k:
%l=phi i8*[%j,%h],[%a,%m]
%n=phi i8*[%i,%h],[%b,%m]
%o=bitcast i8*%l to i32*
%p=load i32,i32*%o,align 4
%q=shl i32%p,1
%r=or i32%q,1
%s=getelementptr inbounds i8,i8*%l,i64 4
%t=bitcast i8*%s to i32*
%u=load i32,i32*%t,align 4
%v=add i32%u,3
%w=sub i32 0,%u
%x=and i32%v,%w
%y=bitcast i8*%n to i32*
%z=load i32,i32*%y,align 4
%A=icmp eq i32%p,0
br i1%A,label%G,label%B
B:
%C=sext i32%x to i64
%D=getelementptr inbounds i8,i8*%n,i64%C
%E=bitcast i8*%D to i8**
%F=load i8*,i8**%E,align 8
br label%N
G:
%H=call i8*@sml_alloc(i32 inreg%u)#0
%I=getelementptr inbounds i8,i8*%H,i64 -4
%J=bitcast i8*%I to i32*
store i32%u,i32*%J,align 4
%K=load i8*,i8**%c,align 8
%L=sext i32%x to i64
%M=getelementptr inbounds i8,i8*%K,i64%L
call void@llvm.memcpy.p0i8.p0i8.i32(i8*%H,i8*%M,i32%u,i1 false)
br label%N
N:
%O=phi i8*[%H,%G],[%F,%B]
store i8*%O,i8**%d,align 8
%P=icmp slt i32%z,0
br i1%P,label%az,label%Q
Q:
%R=load i8*,i8**%e,align 8
%S=getelementptr inbounds i8,i8*%R,i64 4
%T=bitcast i8*%S to i32*
%U=load i32,i32*%T,align 4
%V=udiv i32 268435455,%U
%W=icmp sgt i32%z,%V
br i1%W,label%az,label%X
X:
%Y=bitcast i8*%R to i32*
%Z=load i32,i32*%Y,align 4
%aa=mul nsw i32%U,%z
%ab=call i8*@sml_alloc(i32 inreg%aa)#0
%ac=shl i32%Z,28
%ad=or i32%aa,%ac
%ae=or i32%ad,536870912
%af=getelementptr inbounds i8,i8*%ab,i64 -4
%ag=bitcast i8*%af to i32*
store i32%ae,i32*%ag,align 4
%ah=icmp eq i32%Z,0
br i1%ah,label%aj,label%ai
ai:
call void@llvm.memset.p0i8.i32(i8*%ab,i8 0,i32%aa,i1 false)
br label%aj
aj:
store i8*%ab,i8**%c,align 8
%ak=load i8*,i8**%e,align 8
%al=getelementptr inbounds i8,i8*%ak,i64 4
%am=bitcast i8*%al to i32*
%an=load i32,i32*%am,align 4
%ao=bitcast i8*%ak to i32*
%ap=load i32,i32*%ao,align 4
store i8*null,i8**%e,align 8
%aq=load i32,i32*%am,align 4
%ar=call i8*@sml_alloc(i32 inreg 36)#0
%as=getelementptr inbounds i8,i8*%ar,i64 -4
%at=bitcast i8*%as to i32*
store i32 1342177312,i32*%at,align 4
store i8*%ar,i8**%e,align 8
%au=load i8*,i8**%c,align 8
%av=bitcast i8*%ar to i8**
store i8*%au,i8**%av,align 8
%aw=icmp eq i32%ap,0
%ax=load i8*,i8**%d,align 8
store i8*null,i8**%d,align 8
%ay=getelementptr inbounds i8,i8*%ar,i64 8
br i1%aw,label%aT,label%aR
az:
store i8*null,i8**%d,align 8
store i8*null,i8**%e,align 8
%aA=load i8*,i8**@_SMLZ4Size,align 8
store i8*%aA,i8**%c,align 8
%aB=call i8*@sml_alloc(i32 inreg 20)#0
%aC=getelementptr inbounds i8,i8*%aB,i64 -4
%aD=bitcast i8*%aC to i32*
store i32 1342177296,i32*%aD,align 4
store i8*%aB,i8**%d,align 8
%aE=load i8*,i8**%c,align 8
store i8*null,i8**%c,align 8
%aF=bitcast i8*%aB to i8**
store i8*%aE,i8**%aF,align 8
%aG=getelementptr inbounds i8,i8*%aB,i64 8
%aH=bitcast i8*%aG to i8**
store i8*getelementptr inbounds(<{[4x i8],i32,[44x i8]}>,<{[4x i8],i32,[44x i8]}>*@a,i64 0,i32 2,i64 0),i8**%aH,align 8
%aI=getelementptr inbounds i8,i8*%aB,i64 16
%aJ=bitcast i8*%aI to i32*
store i32 3,i32*%aJ,align 4
%aK=call i8*@sml_alloc(i32 inreg 60)#0
%aL=getelementptr inbounds i8,i8*%aK,i64 -4
%aM=bitcast i8*%aL to i32*
store i32 1342177336,i32*%aM,align 4
%aN=getelementptr inbounds i8,i8*%aK,i64 56
%aO=bitcast i8*%aN to i32*
store i32 1,i32*%aO,align 4
%aP=load i8*,i8**%d,align 8
%aQ=bitcast i8*%aK to i8**
store i8*%aP,i8**%aQ,align 8
call void@sml_raise(i8*inreg%aK)#1
unreachable
aR:
%aS=bitcast i8*%ay to i8**
store i8*%ax,i8**%aS,align 8
br label%aU
aT:
call void@llvm.memcpy.p0i8.p0i8.i32(i8*%ay,i8*%ax,i32%an,i1 false)
br label%aU
aU:
%aV=getelementptr inbounds i8,i8*%ar,i64 16
%aW=bitcast i8*%aV to i32*
store i32%z,i32*%aW,align 4
%aX=getelementptr inbounds i8,i8*%ar,i64 20
%aY=bitcast i8*%aX to i32*
store i32%ap,i32*%aY,align 4
%aZ=getelementptr inbounds i8,i8*%ar,i64 24
%a0=bitcast i8*%aZ to i32*
store i32%aq,i32*%a0,align 4
%a1=getelementptr inbounds i8,i8*%ar,i64 32
%a2=bitcast i8*%a1 to i32*
store i32%r,i32*%a2,align 4
%a3=call i8*@sml_alloc(i32 inreg 28)#0
%a4=getelementptr inbounds i8,i8*%a3,i64 -4
%a5=bitcast i8*%a4 to i32*
store i32 1342177304,i32*%a5,align 4
%a6=load i8*,i8**%e,align 8
%a7=bitcast i8*%a3 to i8**
store i8*%a6,i8**%a7,align 8
%a8=getelementptr inbounds i8,i8*%a3,i64 8
%a9=bitcast i8*%a8 to void(...)**
store void(...)*bitcast(void(i8*,i32)*@_SMLL4loop_145 to void(...)*),void(...)**%a9,align 8
%ba=getelementptr inbounds i8,i8*%a3,i64 16
%bb=bitcast i8*%ba to void(...)**
store void(...)*bitcast(i8*(i8*,i8*)*@_SMLL4loop_300 to void(...)*),void(...)**%bb,align 8
%bc=getelementptr inbounds i8,i8*%a3,i64 24
%bd=bitcast i8*%bc to i32*
store i32 -2147483647,i32*%bd,align 4
store i8*null,i8**%e,align 8
call fastcc void@_SMLL4loop_145(i8*inreg%a6,i32 inreg 0)
%be=load i8*,i8**%c,align 8
ret i8*%be
}
define internal fastcc i8*@_SMLLN12Array__common6vectorE_149(i8*inreg%a,i8*inreg%b)#3 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*%a,i8**%d,align 8
store i8*%b,i8**%c,align 8
%e=getelementptr inbounds i8,i8*%b,i64 -4
%f=bitcast i8*%e to i32*
%g=load i32,i32*%f,align 4
%h=and i32%g,268435455
%i=getelementptr inbounds i8,i8*%a,i64 4
%j=bitcast i8*%i to i32*
%k=load i32,i32*%j,align 4
%l=udiv i32%h,%k
%m=bitcast i8*%a to i32*
%n=load i32,i32*%m,align 4
%o=mul nsw i32%l,%k
%p=call i8*@sml_alloc(i32 inreg%o)#0
%q=shl i32%n,28
%r=or i32%q,%o
%s=getelementptr inbounds i8,i8*%p,i64 -4
%t=bitcast i8*%s to i32*
store i32%r,i32*%t,align 4
%u=icmp eq i32%n,0
br i1%u,label%w,label%v
v:
call void@llvm.memset.p0i8.i32(i8*%p,i8 0,i32%o,i1 false)
br label%w
w:
%x=load i8*,i8**%d,align 8
%y=bitcast i8*%x to i32*
%z=load i32,i32*%y,align 4
%A=icmp eq i32%z,0
%B=load i8*,i8**%c,align 8
br i1%A,label%G,label%C
C:
%D=bitcast i8*%p to i8**
%E=bitcast i8*%B to i8**
%F=call i8*@sml_save()#0
call void@sml_copyary(i8**%E,i32 0,i8**%D,i32 0,i32%l)#0
call void@sml_unsave()#0
br label%L
G:
%H=getelementptr inbounds i8,i8*%x,i64 4
%I=bitcast i8*%H to i32*
%J=load i32,i32*%I,align 4
%K=mul nuw i32%J,%l
call void@llvm.memmove.p0i8.p0i8.i32(i8*%p,i8*%B,i32%K,i1 false)
br label%L
L:
ret i8*%p
}
define internal fastcc void@_SMLLN12Array__common7copyVecE_153(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
%e=bitcast i8*%b to i32*
%f=load i32,i32*%e,align 4
%g=getelementptr inbounds i8,i8*%b,i64 16
%h=bitcast i8*%g to i8**
%i=load i8*,i8**%h,align 8
%j=getelementptr inbounds i8,i8*%i,i64 -4
%k=bitcast i8*%j to i32*
%l=load i32,i32*%k,align 4
%m=and i32%l,268435455
%n=getelementptr inbounds i8,i8*%a,i64 4
%o=bitcast i8*%n to i32*
%p=load i32,i32*%o,align 4
%q=udiv i32%m,%p
%r=getelementptr inbounds i8,i8*%b,i64 8
%s=bitcast i8*%r to i8**
%t=load i8*,i8**%s,align 8
%u=getelementptr inbounds i8,i8*%t,i64 -4
%v=bitcast i8*%u to i32*
%w=load i32,i32*%v,align 4
%x=and i32%w,268435455
%y=udiv i32%x,%p
%z=icmp ult i32%y,%f
%A=sub nsw i32%y,%f
%B=icmp slt i32%A,%q
%C=or i1%z,%B
br i1%C,label%R,label%D
D:
%E=bitcast i8*%a to i32*
%F=load i32,i32*%E,align 4
%G=icmp eq i32%F,0
br i1%G,label%L,label%H
H:
%I=bitcast i8*%t to i8**
%J=bitcast i8*%i to i8**
%K=call i8*@sml_save()#0
call void@sml_copyary(i8**%J,i32 0,i8**%I,i32%f,i32%q)#0
call void@sml_unsave()#0
br label%Q
L:
%M=mul i32%p,%f
%N=sext i32%M to i64
%O=getelementptr inbounds i8,i8*%t,i64%N
%P=mul nuw i32%q,%p
call void@llvm.memmove.p0i8.p0i8.i32(i8*%O,i8*%i,i32%P,i1 false)
br label%Q
Q:
ret void
R:
%S=load i8*,i8**@_SMLZ9Subscript,align 8
store i8*%S,i8**%c,align 8
%T=call i8*@sml_alloc(i32 inreg 20)#0
%U=getelementptr inbounds i8,i8*%T,i64 -4
%V=bitcast i8*%U to i32*
store i32 1342177296,i32*%V,align 4
store i8*%T,i8**%d,align 8
%W=load i8*,i8**%c,align 8
store i8*null,i8**%c,align 8
%X=bitcast i8*%T to i8**
store i8*%W,i8**%X,align 8
%Y=getelementptr inbounds i8,i8*%T,i64 8
%Z=bitcast i8*%Y to i8**
store i8*getelementptr inbounds(<{[4x i8],i32,[44x i8]}>,<{[4x i8],i32,[44x i8]}>*@b,i64 0,i32 2,i64 0),i8**%Z,align 8
%aa=getelementptr inbounds i8,i8*%T,i64 16
%ab=bitcast i8*%aa to i32*
store i32 3,i32*%ab,align 4
%ac=call i8*@sml_alloc(i32 inreg 60)#0
%ad=getelementptr inbounds i8,i8*%ac,i64 -4
%ae=bitcast i8*%ad to i32*
store i32 1342177336,i32*%ae,align 4
%af=getelementptr inbounds i8,i8*%ac,i64 56
%ag=bitcast i8*%af to i32*
store i32 1,i32*%ag,align 4
%ah=load i8*,i8**%d,align 8
%ai=bitcast i8*%ac to i8**
store i8*%ah,i8**%ai,align 8
call void@sml_raise(i8*inreg%ac)#1
unreachable
}
define internal fastcc i8*@_SMLL4loop_156(i8*inreg%a,i8*inreg%b)#4 gc"smlsharp"{
j:
%c=alloca i8*,align 8
%d=alloca i8*,align 8
%e=alloca i8*,align 8
%f=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
call void@llvm.gcroot(i8**%f,i8*null)#0
store i8*%a,i8**%e,align 8
%g=bitcast i8**%e to i8***
br label%h
h:
%i=phi i8*[%bY,%ca],[%b,%j]
store i8*%i,i8**%c,align 8
%k=load atomic i32,i32*@sml_check_flag unordered,align 4
%l=icmp eq i32%k,0
br i1%l,label%o,label%m
m:
call void@sml_check(i32 inreg%k)
%n=load i8*,i8**%c,align 8
br label%o
o:
%p=phi i8*[%n,%m],[%i,%h]
%q=load i8*,i8**%e,align 8
%r=getelementptr inbounds i8,i8*%q,i64 24
%s=bitcast i8*%r to i32*
%t=load i32,i32*%s,align 4
%u=add i32%t,3
%v=sub i32 0,%t
%w=and i32%u,%v
%x=getelementptr inbounds i8,i8*%q,i64 32
%y=bitcast i8*%x to i32*
%z=load i32,i32*%y,align 4
%A=add i32%z,3
%B=sub i32 0,%z
%C=and i32%A,%B
%D=add i32%t,-1
%E=add i32%D,%z
%F=add i32%E,%C
%G=and i32%F,%v
%H=add i32%t,7
%I=add i32%H,%G
%J=and i32%I,-8
%K=lshr i32%G,3
%L=lshr i32%C,3
%M=sub nsw i32%K,%L
%N=getelementptr inbounds i8,i8*%q,i64 20
%O=bitcast i8*%N to i32*
%P=load i32,i32*%O,align 4
%Q=shl i32%P,%M
%R=getelementptr inbounds i8,i8*%q,i64 28
%S=bitcast i8*%R to i32*
%T=load i32,i32*%S,align 4
%U=or i32%Q,%T
%V=shl i32%U,%L
%W=or i32%J,4
%X=add i32%H,%w
%Y=and i32%X,-8
%Z=lshr i32%w,3
%aa=shl i32%P,%Z
%ab=or i32%Y,4
%ac=bitcast i8*%p to i32*
%ad=load i32,i32*%ac,align 4
%ae=icmp eq i32%P,0
br i1%ae,label%ak,label%af
af:
%ag=sext i32%w to i64
%ah=getelementptr inbounds i8,i8*%p,i64%ag
%ai=bitcast i8*%ah to i8**
%aj=load i8*,i8**%ai,align 8
br label%as
ak:
%al=call i8*@sml_alloc(i32 inreg%t)#0
%am=getelementptr inbounds i8,i8*%al,i64 -4
%an=bitcast i8*%am to i32*
store i32%t,i32*%an,align 4
%ao=load i8*,i8**%c,align 8
%ap=sext i32%w to i64
%aq=getelementptr inbounds i8,i8*%ao,i64%ap
call void@llvm.memcpy.p0i8.p0i8.i32(i8*%al,i8*%aq,i32%t,i1 false)
%ar=load i8*,i8**%e,align 8
br label%as
as:
%at=phi i8*[%ar,%ak],[%q,%af]
%au=phi i8*[%al,%ak],[%aj,%af]
%av=bitcast i8*%at to i8**
store i8*%au,i8**%d,align 8
%aw=getelementptr inbounds i8,i8*%at,i64 16
%ax=bitcast i8*%aw to i32*
%ay=load i32,i32*%ax,align 4
%az=icmp slt i32%ad,%ay
br i1%az,label%aB,label%aA
aA:
ret i8*%au
aB:
%aC=getelementptr inbounds i8,i8*%at,i64 8
%aD=bitcast i8*%aC to i8**
%aE=load i8*,i8**%aD,align 8
store i8*%aE,i8**%c,align 8
%aF=getelementptr inbounds i8,i8*%at,i64 32
%aG=bitcast i8*%aF to i32*
%aH=load i32,i32*%aG,align 4
%aI=getelementptr inbounds i8,i8*%at,i64 28
%aJ=bitcast i8*%aI to i32*
%aK=load i32,i32*%aJ,align 4
%aL=icmp eq i32%aK,0
br i1%aL,label%aS,label%aM
aM:
store i8*null,i8**%c,align 8
%aN=mul i32%aH,%ad
%aO=sext i32%aN to i64
%aP=getelementptr inbounds i8,i8*%aE,i64%aO
%aQ=bitcast i8*%aP to i8**
%aR=load i8*,i8**%aQ,align 8
br label%a8
aS:
%aT=call i8*@sml_alloc(i32 inreg%aH)#0
%aU=getelementptr inbounds i8,i8*%aT,i64 -4
%aV=bitcast i8*%aU to i32*
store i32%aH,i32*%aV,align 4
%aW=load i8*,i8**%c,align 8
store i8*null,i8**%c,align 8
%aX=mul i32%aH,%ad
%aY=sext i32%aX to i64
%aZ=getelementptr inbounds i8,i8*%aW,i64%aY
call void@llvm.memcpy.p0i8.p0i8.i32(i8*%aT,i8*%aZ,i32%aH,i1 false)
%a0=load i8**,i8***%g,align 8
%a1=bitcast i8**%a0 to i8*
%a2=getelementptr inbounds i8*,i8**%a0,i64 4
%a3=bitcast i8**%a2 to i32*
%a4=load i32,i32*%a3,align 4
%a5=getelementptr inbounds i8,i8*%a1,i64 28
%a6=bitcast i8*%a5 to i32*
%a7=load i32,i32*%a6,align 4
br label%a8
a8:
%a9=phi i32[%a7,%aS],[%aK,%aM]
%ba=phi i32[%a4,%aS],[%aH,%aM]
%bb=phi i8*[%a1,%aS],[%at,%aM]
%bc=phi i8**[%a0,%aS],[%av,%aM]
%bd=phi i8*[%aT,%aS],[%aR,%aM]
store i8*%bd,i8**%c,align 8
%be=add nsw i32%ad,1
%bf=load i8*,i8**%bc,align 8
%bg=getelementptr inbounds i8,i8*%bf,i64 16
%bh=bitcast i8*%bg to i8*(i8*,i8*)**
%bi=load i8*(i8*,i8*)*,i8*(i8*,i8*)**%bh,align 8
%bj=bitcast i8*%bf to i8**
%bk=load i8*,i8**%bj,align 8
store i8*%bk,i8**%f,align 8
%bl=getelementptr inbounds i8,i8*%bb,i64 24
%bm=bitcast i8*%bl to i32*
%bn=load i32,i32*%bm,align 4
%bo=getelementptr inbounds i8,i8*%bb,i64 20
%bp=bitcast i8*%bo to i32*
%bq=load i32,i32*%bp,align 4
%br=call i8*@sml_alloc(i32 inreg%W)#0
%bs=or i32%J,1342177280
%bt=bitcast i8*%br to i32*
%bu=getelementptr inbounds i8,i8*%br,i64 -4
%bv=bitcast i8*%bu to i32*
store i32%bs,i32*%bv,align 4
call void@llvm.memset.p0i8.i32(i8*%br,i8 0,i32%W,i1 false)
store i32%ad,i32*%bt,align 4
%bw=icmp eq i32%a9,0
%bx=load i8*,i8**%c,align 8
store i8*null,i8**%c,align 8
%by=sext i32%C to i64
%bz=getelementptr inbounds i8,i8*%br,i64%by
br i1%bw,label%bC,label%bA
bA:
%bB=bitcast i8*%bz to i8**
store i8*%bx,i8**%bB,align 8
br label%bD
bC:
call void@llvm.memcpy.p0i8.p0i8.i32(i8*%bz,i8*%bx,i32%ba,i1 false)
br label%bD
bD:
%bE=icmp eq i32%bq,0
%bF=load i8*,i8**%d,align 8
store i8*null,i8**%d,align 8
%bG=sext i32%G to i64
%bH=getelementptr inbounds i8,i8*%br,i64%bG
br i1%bE,label%bK,label%bI
bI:
%bJ=bitcast i8*%bH to i8**
store i8*%bF,i8**%bJ,align 8
br label%bL
bK:
call void@llvm.memcpy.p0i8.p0i8.i32(i8*%bH,i8*%bF,i32%bn,i1 false)
br label%bL
bL:
%bM=sext i32%J to i64
%bN=getelementptr inbounds i8,i8*%br,i64%bM
%bO=bitcast i8*%bN to i32*
store i32%V,i32*%bO,align 4
%bP=load i8*,i8**%f,align 8
store i8*null,i8**%f,align 8
%bQ=call fastcc i8*%bi(i8*inreg%bP,i8*inreg%br)
store i8*%bQ,i8**%c,align 8
%bR=load i8*,i8**%e,align 8
%bS=getelementptr inbounds i8,i8*%bR,i64 24
%bT=bitcast i8*%bS to i32*
%bU=load i32,i32*%bT,align 4
%bV=getelementptr inbounds i8,i8*%bR,i64 20
%bW=bitcast i8*%bV to i32*
%bX=load i32,i32*%bW,align 4
%bY=call i8*@sml_alloc(i32 inreg%ab)#0
%bZ=or i32%Y,1342177280
%b0=bitcast i8*%bY to i32*
%b1=getelementptr inbounds i8,i8*%bY,i64 -4
%b2=bitcast i8*%b1 to i32*
store i32%bZ,i32*%b2,align 4
call void@llvm.memset.p0i8.i32(i8*%bY,i8 0,i32%ab,i1 false)
store i32%be,i32*%b0,align 4
%b3=icmp eq i32%bX,0
%b4=load i8*,i8**%c,align 8
%b5=sext i32%w to i64
%b6=getelementptr inbounds i8,i8*%bY,i64%b5
br i1%b3,label%b9,label%b7
b7:
%b8=bitcast i8*%b6 to i8**
store i8*%b4,i8**%b8,align 8
br label%ca
b9:
call void@llvm.memcpy.p0i8.p0i8.i32(i8*%b6,i8*%b4,i32%bU,i1 false)
br label%ca
ca:
%cb=sext i32%Y to i64
%cc=getelementptr inbounds i8,i8*%bY,i64%cb
%cd=bitcast i8*%cc to i32*
store i32%aa,i32*%cd,align 4
br label%h
}
define internal fastcc i8*@_SMLLN12Array__common6foldliE_157(i8*inreg%a,i8*inreg%b)#4 gc"smlsharp"{
%c=alloca i8*,align 8
%d=alloca i8*,align 8
%e=alloca i8*,align 8
%f=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
call void@llvm.gcroot(i8**%f,i8*null)#0
store i8*%a,i8**%d,align 8
store i8*%b,i8**%c,align 8
%g=load atomic i32,i32*@sml_check_flag unordered,align 4
%h=icmp eq i32%g,0
br i1%h,label%i,label%k
i:
%j=bitcast i8*%b to i32*
br label%o
k:
call void@sml_check(i32 inreg%g)
%l=bitcast i8**%c to i32**
%m=load i32*,i32**%l,align 8
%n=load i8*,i8**%d,align 8
br label%o
o:
%p=phi i8*[%n,%k],[%a,%i]
%q=phi i32*[%m,%k],[%j,%i]
%r=getelementptr inbounds i8,i8*%p,i64 20
%s=bitcast i8*%r to i32*
%t=load i32,i32*%s,align 4
%u=add i32%t,3
%v=sub i32 0,%t
%w=and i32%u,%v
%x=add i32%t,7
%y=add i32%x,%w
%z=and i32%y,-8
%A=lshr i32%w,3
%B=getelementptr inbounds i8,i8*%p,i64 16
%C=bitcast i8*%B to i32*
%D=load i32,i32*%C,align 4
%E=shl i32%D,%A
%F=or i32%z,4
%G=getelementptr inbounds i32,i32*%q,i64 -1
%H=load i32,i32*%G,align 4
%I=and i32%H,268435455
%J=getelementptr inbounds i8,i8*%p,i64 28
%K=bitcast i8*%J to i32*
%L=load i32,i32*%K,align 4
%M=udiv i32%I,%L
%N=bitcast i8*%p to i8**
%O=load i8*,i8**%N,align 8
store i8*%O,i8**%e,align 8
%P=getelementptr inbounds i8,i8*%p,i64 24
%Q=bitcast i8*%P to i32*
%R=load i32,i32*%Q,align 4
%S=call i8*@sml_alloc(i32 inreg 44)#0
%T=getelementptr inbounds i8,i8*%S,i64 -4
%U=bitcast i8*%T to i32*
store i32 1342177320,i32*%U,align 4
store i8*%S,i8**%f,align 8
%V=load i8*,i8**%e,align 8
store i8*null,i8**%e,align 8
%W=bitcast i8*%S to i8**
store i8*%V,i8**%W,align 8
%X=load i8*,i8**%c,align 8
store i8*null,i8**%c,align 8
%Y=getelementptr inbounds i8,i8*%S,i64 8
%Z=bitcast i8*%Y to i8**
store i8*%X,i8**%Z,align 8
%aa=getelementptr inbounds i8,i8*%S,i64 16
%ab=bitcast i8*%aa to i32*
store i32%M,i32*%ab,align 4
%ac=getelementptr inbounds i8,i8*%S,i64 20
%ad=bitcast i8*%ac to i32*
store i32%D,i32*%ad,align 4
%ae=getelementptr inbounds i8,i8*%S,i64 24
%af=bitcast i8*%ae to i32*
store i32%t,i32*%af,align 4
%ag=getelementptr inbounds i8,i8*%S,i64 28
%ah=bitcast i8*%ag to i32*
store i32%R,i32*%ah,align 4
%ai=getelementptr inbounds i8,i8*%S,i64 32
%aj=bitcast i8*%ai to i32*
store i32%L,i32*%aj,align 4
%ak=getelementptr inbounds i8,i8*%S,i64 40
%al=bitcast i8*%ak to i32*
store i32 3,i32*%al,align 4
%am=call i8*@sml_alloc(i32 inreg 28)#0
%an=getelementptr inbounds i8,i8*%am,i64 -4
%ao=bitcast i8*%an to i32*
store i32 1342177304,i32*%ao,align 4
%ap=load i8*,i8**%f,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 void(...)**
store void(...)*bitcast(i8*(i8*,i8*)*@_SMLL4loop_156 to void(...)*),void(...)**%as,align 8
%at=getelementptr inbounds i8,i8*%am,i64 16
%au=bitcast i8*%at to void(...)**
store void(...)*bitcast(i8*(i8*,i8*)*@_SMLL4loop_156 to void(...)*),void(...)**%au,align 8
%av=getelementptr inbounds i8,i8*%am,i64 24
%aw=bitcast i8*%av to i32*
store i32 1,i32*%aw,align 4
%ax=load i8*,i8**%d,align 8
%ay=getelementptr inbounds i8,i8*%ax,i64 16
%az=bitcast i8*%ay to i32*
%aA=load i32,i32*%az,align 4
%aB=icmp eq i32%aA,0
br i1%aB,label%aG,label%aC
aC:
%aD=getelementptr inbounds i8,i8*%ax,i64 8
%aE=bitcast i8*%aD to i8**
%aF=load i8*,i8**%aE,align 8
br label%aS
aG:
%aH=getelementptr inbounds i8,i8*%ax,i64 20
%aI=bitcast i8*%aH to i32*
%aJ=load i32,i32*%aI,align 4
%aK=call i8*@sml_alloc(i32 inreg%aJ)#0
%aL=getelementptr inbounds i8,i8*%aK,i64 -4
%aM=bitcast i8*%aL to i32*
store i32%aJ,i32*%aM,align 4
%aN=load i8*,i8**%d,align 8
%aO=getelementptr inbounds i8,i8*%aN,i64 8
call void@llvm.memcpy.p0i8.p0i8.i32(i8*%aK,i8*%aO,i32%aJ,i1 false)
%aP=getelementptr inbounds i8,i8*%aN,i64 16
%aQ=bitcast i8*%aP to i32*
%aR=load i32,i32*%aQ,align 4
br label%aS
aS:
%aT=phi i32[%aR,%aG],[%aA,%aC]
%aU=phi i8*[%aN,%aG],[%ax,%aC]
%aV=phi i8*[%aK,%aG],[%aF,%aC]
store i8*%aV,i8**%c,align 8
%aW=getelementptr inbounds i8,i8*%aU,i64 20
%aX=bitcast i8*%aW to i32*
%aY=load i32,i32*%aX,align 4
store i8*null,i8**%d,align 8
%aZ=call i8*@sml_alloc(i32 inreg%F)#0
%a0=or i32%z,1342177280
%a1=bitcast i8*%aZ to i32*
%a2=getelementptr inbounds i8,i8*%aZ,i64 -4
%a3=bitcast i8*%a2 to i32*
store i32%a0,i32*%a3,align 4
call void@llvm.memset.p0i8.i32(i8*%aZ,i8 0,i32%F,i1 false)
store i32 0,i32*%a1,align 4
%a4=icmp eq i32%aT,0
%a5=load i8*,i8**%c,align 8
%a6=sext i32%w to i64
%a7=getelementptr inbounds i8,i8*%aZ,i64%a6
br i1%a4,label%ba,label%a8
a8:
%a9=bitcast i8*%a7 to i8**
store i8*%a5,i8**%a9,align 8
br label%bb
ba:
call void@llvm.memcpy.p0i8.p0i8.i32(i8*%a7,i8*%a5,i32%aY,i1 false)
br label%bb
bb:
%bc=sext i32%z to i64
%bd=getelementptr inbounds i8,i8*%aZ,i64%bc
%be=bitcast i8*%bd to i32*
store i32%E,i32*%be,align 4
%bf=load i8*,i8**%f,align 8
%bg=tail call fastcc i8*@_SMLL4loop_156(i8*inreg%bf,i8*inreg%aZ)
ret i8*%bg
}
define internal fastcc i8*@_SMLLN12Array__common6foldliE_158(i8*inreg%a,i8*inreg%b)#3 gc"smlsharp"{
%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*%b,i8**%c,align 8
%f=getelementptr inbounds i8,i8*%a,i64 8
%g=bitcast i8*%f to i32*
%h=load i32,i32*%g,align 4
%i=shl i32%h,1
%j=or i32%i,1
%k=bitcast i8*%a to i8**
%l=load i8*,i8**%k,align 8
store i8*%l,i8**%d,align 8
%m=getelementptr inbounds i8,i8*%a,i64 12
%n=bitcast i8*%m to i32*
%o=load i32,i32*%n,align 4
%p=getelementptr inbounds i8,i8*%a,i64 16
%q=bitcast i8*%p to i32*
%r=load i32,i32*%q,align 4
%s=getelementptr inbounds i8,i8*%a,i64 20
%t=bitcast i8*%s to i32*
%u=load i32,i32*%t,align 4
%v=call i8*@sml_alloc(i32 inreg 36)#0
%w=getelementptr inbounds i8,i8*%v,i64 -4
%x=bitcast i8*%w to i32*
store i32 1342177312,i32*%x,align 4
store i8*%v,i8**%e,align 8
%y=load i8*,i8**%d,align 8
store i8*null,i8**%d,align 8
%z=bitcast i8*%v to i8**
store i8*%y,i8**%z,align 8
%A=icmp eq i32%h,0
%B=load i8*,i8**%c,align 8
store i8*null,i8**%c,align 8
%C=getelementptr inbounds i8,i8*%v,i64 8
br i1%A,label%F,label%D
D:
%E=bitcast i8*%C to i8**
store i8*%B,i8**%E,align 8
br label%G
F:
call void@llvm.memcpy.p0i8.p0i8.i32(i8*%C,i8*%B,i32%o,i1 false)
br label%G
G:
%H=getelementptr inbounds i8,i8*%v,i64 16
%I=bitcast i8*%H to i32*
store i32%h,i32*%I,align 4
%J=getelementptr inbounds i8,i8*%v,i64 20
%K=bitcast i8*%J to i32*
store i32%o,i32*%K,align 4
%L=getelementptr inbounds i8,i8*%v,i64 24
%M=bitcast i8*%L to i32*
store i32%r,i32*%M,align 4
%N=getelementptr inbounds i8,i8*%v,i64 28
%O=bitcast i8*%N to i32*
store i32%u,i32*%O,align 4
%P=getelementptr inbounds i8,i8*%v,i64 32
%Q=bitcast i8*%P to i32*
store i32%j,i32*%Q,align 4
%R=call i8*@sml_alloc(i32 inreg 28)#0
%S=getelementptr inbounds i8,i8*%R,i64 -4
%T=bitcast i8*%S to i32*
store i32 1342177304,i32*%T,align 4
%U=load i8*,i8**%e,align 8
%V=bitcast i8*%R to i8**
store i8*%U,i8**%V,align 8
%W=getelementptr inbounds i8,i8*%R,i64 8
%X=bitcast i8*%W to void(...)**
store void(...)*bitcast(i8*(i8*,i8*)*@_SMLLN12Array__common6foldliE_157 to void(...)*),void(...)**%X,align 8
%Y=getelementptr inbounds i8,i8*%R,i64 16
%Z=bitcast i8*%Y to void(...)**
store void(...)*bitcast(i8*(i8*,i8*)*@_SMLLN12Array__common6foldliE_157 to void(...)*),void(...)**%Z,align 8
%aa=getelementptr inbounds i8,i8*%R,i64 24
%ab=bitcast i8*%aa to i32*
store i32 1,i32*%ab,align 4
ret i8*%R
}
define internal fastcc i8*@_SMLLN12Array__common6foldliE_159(i8*inreg%a,i8*inreg%b)#3 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=getelementptr inbounds i8,i8*%a,i64 12
%n=bitcast i8*%m to i32*
%o=load i32,i32*%n,align 4
%p=call i8*@sml_alloc(i32 inreg 28)#0
%q=getelementptr inbounds i8,i8*%p,i64 -4
%r=bitcast i8*%q to i32*
store i32 1342177304,i32*%r,align 4
store i8*%p,i8**%d,align 8
%s=load i8*,i8**%c,align 8
store i8*null,i8**%c,align 8
%t=bitcast i8*%p to i8**
store i8*%s,i8**%t,align 8
%u=getelementptr inbounds i8,i8*%p,i64 8
%v=bitcast i8*%u to i32*
store i32%f,i32*%v,align 4
%w=getelementptr inbounds i8,i8*%p,i64 12
%x=bitcast i8*%w to i32*
store i32%i,i32*%x,align 4
%y=getelementptr inbounds i8,i8*%p,i64 16
%z=bitcast i8*%y to i32*
store i32%l,i32*%z,align 4
%A=getelementptr inbounds i8,i8*%p,i64 20
%B=bitcast i8*%A to i32*
store i32%o,i32*%B,align 4
%C=getelementptr inbounds i8,i8*%p,i64 24
%D=bitcast i8*%C to i32*
store i32 1,i32*%D,align 4
%E=call i8*@sml_alloc(i32 inreg 28)#0
%F=getelementptr inbounds i8,i8*%E,i64 -4
%G=bitcast i8*%F to i32*
store i32 1342177304,i32*%G,align 4
%H=load i8*,i8**%d,align 8
%I=bitcast i8*%E to i8**
store i8*%H,i8**%I,align 8
%J=getelementptr inbounds i8,i8*%E,i64 8
%K=bitcast i8*%J to void(...)**
store void(...)*bitcast(i8*(i8*,i8*)*@_SMLLN12Array__common6foldliE_158 to void(...)*),void(...)**%K,align 8
%L=getelementptr inbounds i8,i8*%E,i64 16
%M=bitcast i8*%L to void(...)**
store void(...)*bitcast(i8*(i8*,i8*)*@_SMLLN12Array__common6foldliE_158 to void(...)*),void(...)**%M,align 8
%N=getelementptr inbounds i8,i8*%E,i64 24
%O=bitcast i8*%N to i32*
store i32 1,i32*%O,align 4
ret i8*%E
}
define internal fastcc i8*@_SMLL4loop_162(i8*inreg%a,i8*inreg%b)#4 gc"smlsharp"{
j:
%c=alloca i8*,align 8
%d=alloca i8*,align 8
%e=alloca i8*,align 8
%f=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
call void@llvm.gcroot(i8**%f,i8*null)#0
store i8*%a,i8**%e,align 8
%g=bitcast i8**%e to i8***
br label%h
h:
%i=phi i8*[%bV,%b7],[%b,%j]
store i8*%i,i8**%c,align 8
%k=load atomic i32,i32*@sml_check_flag unordered,align 4
%l=icmp eq i32%k,0
br i1%l,label%o,label%m
m:
call void@sml_check(i32 inreg%k)
%n=load i8*,i8**%c,align 8
br label%o
o:
%p=phi i8*[%n,%m],[%i,%h]
%q=load i8*,i8**%e,align 8
%r=getelementptr inbounds i8,i8*%q,i64 24
%s=bitcast i8*%r to i32*
%t=load i32,i32*%s,align 4
%u=add i32%t,3
%v=sub i32 0,%t
%w=and i32%u,%v
%x=getelementptr inbounds i8,i8*%q,i64 32
%y=bitcast i8*%x to i32*
%z=load i32,i32*%y,align 4
%A=add i32%z,-1
%B=sub i32 0,%z
%C=and i32%A,%B
%D=add i32%A,%t
%E=add i32%D,%C
%F=and i32%E,%v
%G=add i32%t,7
%H=add i32%G,%F
%I=and i32%H,-8
%J=lshr i32%F,3
%K=lshr i32%C,3
%L=sub nsw i32%J,%K
%M=getelementptr inbounds i8,i8*%q,i64 20
%N=bitcast i8*%M to i32*
%O=load i32,i32*%N,align 4
%P=shl i32%O,%L
%Q=getelementptr inbounds i8,i8*%q,i64 28
%R=bitcast i8*%Q to i32*
%S=load i32,i32*%R,align 4
%T=or i32%P,%S
%U=or i32%I,4
%V=add i32%G,%w
%W=and i32%V,-8
%X=lshr i32%w,3
%Y=shl i32%O,%X
%Z=or i32%W,4
%aa=bitcast i8*%p to i32*
%ab=load i32,i32*%aa,align 4
%ac=icmp eq i32%O,0
br i1%ac,label%ai,label%ad
ad:
%ae=sext i32%w to i64
%af=getelementptr inbounds i8,i8*%p,i64%ae
%ag=bitcast i8*%af to i8**
%ah=load i8*,i8**%ag,align 8
br label%aq
ai:
%aj=call i8*@sml_alloc(i32 inreg%t)#0
%ak=getelementptr inbounds i8,i8*%aj,i64 -4
%al=bitcast i8*%ak to i32*
store i32%t,i32*%al,align 4
%am=load i8*,i8**%c,align 8
%an=sext i32%w to i64
%ao=getelementptr inbounds i8,i8*%am,i64%an
call void@llvm.memcpy.p0i8.p0i8.i32(i8*%aj,i8*%ao,i32%t,i1 false)
%ap=load i8*,i8**%e,align 8
br label%aq
aq:
%ar=phi i8*[%ap,%ai],[%q,%ad]
%as=phi i8*[%aj,%ai],[%ah,%ad]
%at=bitcast i8*%ar to i8**
store i8*%as,i8**%d,align 8
%au=getelementptr inbounds i8,i8*%ar,i64 16
%av=bitcast i8*%au to i32*
%aw=load i32,i32*%av,align 4
%ax=icmp slt i32%ab,%aw
br i1%ax,label%az,label%ay
ay:
ret i8*%as
az:
%aA=getelementptr inbounds i8,i8*%ar,i64 8
%aB=bitcast i8*%aA to i8**
%aC=load i8*,i8**%aB,align 8
store i8*%aC,i8**%c,align 8
%aD=getelementptr inbounds i8,i8*%ar,i64 32
%aE=bitcast i8*%aD to i32*
%aF=load i32,i32*%aE,align 4
%aG=getelementptr inbounds i8,i8*%ar,i64 28
%aH=bitcast i8*%aG to i32*
%aI=load i32,i32*%aH,align 4
%aJ=icmp eq i32%aI,0
br i1%aJ,label%aQ,label%aK
aK:
store i8*null,i8**%c,align 8
%aL=mul i32%aF,%ab
%aM=sext i32%aL to i64
%aN=getelementptr inbounds i8,i8*%aC,i64%aM
%aO=bitcast i8*%aN to i8**
%aP=load i8*,i8**%aO,align 8
br label%a6
aQ:
%aR=call i8*@sml_alloc(i32 inreg%aF)#0
%aS=getelementptr inbounds i8,i8*%aR,i64 -4
%aT=bitcast i8*%aS to i32*
store i32%aF,i32*%aT,align 4
%aU=load i8*,i8**%c,align 8
store i8*null,i8**%c,align 8
%aV=mul i32%aF,%ab
%aW=sext i32%aV to i64
%aX=getelementptr inbounds i8,i8*%aU,i64%aW
call void@llvm.memcpy.p0i8.p0i8.i32(i8*%aR,i8*%aX,i32%aF,i1 false)
%aY=load i8**,i8***%g,align 8
%aZ=bitcast i8**%aY to i8*
%a0=getelementptr inbounds i8*,i8**%aY,i64 4
%a1=bitcast i8**%a0 to i32*
%a2=load i32,i32*%a1,align 4
%a3=getelementptr inbounds i8,i8*%aZ,i64 28
%a4=bitcast i8*%a3 to i32*
%a5=load i32,i32*%a4,align 4
br label%a6
a6:
%a7=phi i32[%a5,%aQ],[%aI,%aK]
%a8=phi i32[%a2,%aQ],[%aF,%aK]
%a9=phi i8*[%aZ,%aQ],[%ar,%aK]
%ba=phi i8**[%aY,%aQ],[%at,%aK]
%bb=phi i8*[%aR,%aQ],[%aP,%aK]
store i8*%bb,i8**%c,align 8
%bc=add nsw i32%ab,1
%bd=load i8*,i8**%ba,align 8
%be=getelementptr inbounds i8,i8*%bd,i64 16
%bf=bitcast i8*%be to i8*(i8*,i8*)**
%bg=load i8*(i8*,i8*)*,i8*(i8*,i8*)**%bf,align 8
%bh=bitcast i8*%bd to i8**
%bi=load i8*,i8**%bh,align 8
store i8*%bi,i8**%f,align 8
%bj=getelementptr inbounds i8,i8*%a9,i64 24
%bk=bitcast i8*%bj to i32*
%bl=load i32,i32*%bk,align 4
%bm=getelementptr inbounds i8,i8*%a9,i64 20
%bn=bitcast i8*%bm to i32*
%bo=load i32,i32*%bn,align 4
%bp=call i8*@sml_alloc(i32 inreg%U)#0
%bq=or i32%I,1342177280
%br=getelementptr inbounds i8,i8*%bp,i64 -4
%bs=bitcast i8*%br to i32*
store i32%bq,i32*%bs,align 4
call void@llvm.memset.p0i8.i32(i8*%bp,i8 0,i32%U,i1 false)
%bt=icmp eq i32%a7,0
%bu=load i8*,i8**%c,align 8
store i8*null,i8**%c,align 8
%bv=sext i32%C to i64
%bw=getelementptr inbounds i8,i8*%bp,i64%bv
br i1%bt,label%bz,label%bx
bx:
%by=bitcast i8*%bw to i8**
store i8*%bu,i8**%by,align 8
br label%bA
bz:
call void@llvm.memcpy.p0i8.p0i8.i32(i8*%bw,i8*%bu,i32%a8,i1 false)
br label%bA
bA:
%bB=icmp eq i32%bo,0
%bC=load i8*,i8**%d,align 8
store i8*null,i8**%d,align 8
%bD=sext i32%F to i64
%bE=getelementptr inbounds i8,i8*%bp,i64%bD
br i1%bB,label%bH,label%bF
bF:
%bG=bitcast i8*%bE to i8**
store i8*%bC,i8**%bG,align 8
br label%bI
bH:
call void@llvm.memcpy.p0i8.p0i8.i32(i8*%bE,i8*%bC,i32%bl,i1 false)
br label%bI
bI:
%bJ=sext i32%I to i64
%bK=getelementptr inbounds i8,i8*%bp,i64%bJ
%bL=bitcast i8*%bK to i32*
store i32%T,i32*%bL,align 4
%bM=load i8*,i8**%f,align 8
store i8*null,i8**%f,align 8
%bN=call fastcc i8*%bg(i8*inreg%bM,i8*inreg%bp)
store i8*%bN,i8**%c,align 8
%bO=load i8*,i8**%e,align 8
%bP=getelementptr inbounds i8,i8*%bO,i64 24
%bQ=bitcast i8*%bP to i32*
%bR=load i32,i32*%bQ,align 4
%bS=getelementptr inbounds i8,i8*%bO,i64 20
%bT=bitcast i8*%bS to i32*
%bU=load i32,i32*%bT,align 4
%bV=call i8*@sml_alloc(i32 inreg%Z)#0
%bW=or i32%W,1342177280
%bX=bitcast i8*%bV to i32*
%bY=getelementptr inbounds i8,i8*%bV,i64 -4
%bZ=bitcast i8*%bY to i32*
store i32%bW,i32*%bZ,align 4
call void@llvm.memset.p0i8.i32(i8*%bV,i8 0,i32%Z,i1 false)
store i32%bc,i32*%bX,align 4
%b0=icmp eq i32%bU,0
%b1=load i8*,i8**%c,align 8
%b2=sext i32%w to i64
%b3=getelementptr inbounds i8,i8*%bV,i64%b2
br i1%b0,label%b6,label%b4
b4:
%b5=bitcast i8*%b3 to i8**
store i8*%b1,i8**%b5,align 8
br label%b7
b6:
call void@llvm.memcpy.p0i8.p0i8.i32(i8*%b3,i8*%b1,i32%bR,i1 false)
br label%b7
b7:
%b8=sext i32%W to i64
%b9=getelementptr inbounds i8,i8*%bV,i64%b8
%ca=bitcast i8*%b9 to i32*
store i32%Y,i32*%ca,align 4
br label%h
}
define internal fastcc i8*@_SMLLN12Array__common5foldlE_163(i8*inreg%a,i8*inreg%b)#4 gc"smlsharp"{
%c=alloca i8*,align 8
%d=alloca i8*,align 8
%e=alloca i8*,align 8
%f=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
call void@llvm.gcroot(i8**%f,i8*null)#0
store i8*%a,i8**%d,align 8
store i8*%b,i8**%c,align 8
%g=load atomic i32,i32*@sml_check_flag unordered,align 4
%h=icmp eq i32%g,0
br i1%h,label%i,label%k
i:
%j=bitcast i8*%b to i32*
br label%o
k:
call void@sml_check(i32 inreg%g)
%l=bitcast i8**%c to i32**
%m=load i32*,i32**%l,align 8
%n=load i8*,i8**%d,align 8
br label%o
o:
%p=phi i8*[%n,%k],[%a,%i]
%q=phi i32*[%m,%k],[%j,%i]
%r=getelementptr inbounds i8,i8*%p,i64 20
%s=bitcast i8*%r to i32*
%t=load i32,i32*%s,align 4
%u=add i32%t,3
%v=sub i32 0,%t
%w=and i32%u,%v
%x=add i32%t,7
%y=add i32%x,%w
%z=and i32%y,-8
%A=lshr i32%w,3
%B=getelementptr inbounds i8,i8*%p,i64 16
%C=bitcast i8*%B to i32*
%D=load i32,i32*%C,align 4
%E=shl i32%D,%A
%F=or i32%z,4
%G=getelementptr inbounds i32,i32*%q,i64 -1
%H=load i32,i32*%G,align 4
%I=and i32%H,268435455
%J=getelementptr inbounds i8,i8*%p,i64 28
%K=bitcast i8*%J to i32*
%L=load i32,i32*%K,align 4
%M=udiv i32%I,%L
%N=bitcast i8*%p to i8**
%O=load i8*,i8**%N,align 8
store i8*%O,i8**%e,align 8
%P=getelementptr inbounds i8,i8*%p,i64 24
%Q=bitcast i8*%P to i32*
%R=load i32,i32*%Q,align 4
%S=call i8*@sml_alloc(i32 inreg 44)#0
%T=getelementptr inbounds i8,i8*%S,i64 -4
%U=bitcast i8*%T to i32*
store i32 1342177320,i32*%U,align 4
store i8*%S,i8**%f,align 8
%V=load i8*,i8**%e,align 8
store i8*null,i8**%e,align 8
%W=bitcast i8*%S to i8**
store i8*%V,i8**%W,align 8
%X=load i8*,i8**%c,align 8
store i8*null,i8**%c,align 8
%Y=getelementptr inbounds i8,i8*%S,i64 8
%Z=bitcast i8*%Y to i8**
store i8*%X,i8**%Z,align 8
%aa=getelementptr inbounds i8,i8*%S,i64 16
%ab=bitcast i8*%aa to i32*
store i32%M,i32*%ab,align 4
%ac=getelementptr inbounds i8,i8*%S,i64 20
%ad=bitcast i8*%ac to i32*
store i32%D,i32*%ad,align 4
%ae=getelementptr inbounds i8,i8*%S,i64 24
%af=bitcast i8*%ae to i32*
store i32%t,i32*%af,align 4
%ag=getelementptr inbounds i8,i8*%S,i64 28
%ah=bitcast i8*%ag to i32*
store i32%R,i32*%ah,align 4
%ai=getelementptr inbounds i8,i8*%S,i64 32
%aj=bitcast i8*%ai to i32*
store i32%L,i32*%aj,align 4
%ak=getelementptr inbounds i8,i8*%S,i64 40
%al=bitcast i8*%ak to i32*
store i32 3,i32*%al,align 4
%am=call i8*@sml_alloc(i32 inreg 28)#0
%an=getelementptr inbounds i8,i8*%am,i64 -4
%ao=bitcast i8*%an to i32*
store i32 1342177304,i32*%ao,align 4
%ap=load i8*,i8**%f,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 void(...)**
store void(...)*bitcast(i8*(i8*,i8*)*@_SMLL4loop_162 to void(...)*),void(...)**%as,align 8
%at=getelementptr inbounds i8,i8*%am,i64 16
%au=bitcast i8*%at to void(...)**
store void(...)*bitcast(i8*(i8*,i8*)*@_SMLL4loop_162 to void(...)*),void(...)**%au,align 8
%av=getelementptr inbounds i8,i8*%am,i64 24
%aw=bitcast i8*%av to i32*
store i32 1,i32*%aw,align 4
%ax=load i8*,i8**%d,align 8
%ay=getelementptr inbounds i8,i8*%ax,i64 16
%az=bitcast i8*%ay to i32*
%aA=load i32,i32*%az,align 4
%aB=icmp eq i32%aA,0
br i1%aB,label%aG,label%aC
aC:
%aD=getelementptr inbounds i8,i8*%ax,i64 8
%aE=bitcast i8*%aD to i8**
%aF=load i8*,i8**%aE,align 8
br label%aS
aG:
%aH=getelementptr inbounds i8,i8*%ax,i64 20
%aI=bitcast i8*%aH to i32*
%aJ=load i32,i32*%aI,align 4
%aK=call i8*@sml_alloc(i32 inreg%aJ)#0
%aL=getelementptr inbounds i8,i8*%aK,i64 -4
%aM=bitcast i8*%aL to i32*
store i32%aJ,i32*%aM,align 4
%aN=load i8*,i8**%d,align 8
%aO=getelementptr inbounds i8,i8*%aN,i64 8
call void@llvm.memcpy.p0i8.p0i8.i32(i8*%aK,i8*%aO,i32%aJ,i1 false)
%aP=getelementptr inbounds i8,i8*%aN,i64 16
%aQ=bitcast i8*%aP to i32*
%aR=load i32,i32*%aQ,align 4
br label%aS
aS:
%aT=phi i32[%aR,%aG],[%aA,%aC]
%aU=phi i8*[%aN,%aG],[%ax,%aC]
%aV=phi i8*[%aK,%aG],[%aF,%aC]
store i8*%aV,i8**%c,align 8
%aW=getelementptr inbounds i8,i8*%aU,i64 20
%aX=bitcast i8*%aW to i32*
%aY=load i32,i32*%aX,align 4
store i8*null,i8**%d,align 8
%aZ=call i8*@sml_alloc(i32 inreg%F)#0
%a0=or i32%z,1342177280
%a1=bitcast i8*%aZ to i32*
%a2=getelementptr inbounds i8,i8*%aZ,i64 -4
%a3=bitcast i8*%a2 to i32*
store i32%a0,i32*%a3,align 4
call void@llvm.memset.p0i8.i32(i8*%aZ,i8 0,i32%F,i1 false)
store i32 0,i32*%a1,align 4
%a4=icmp eq i32%aT,0
%a5=load i8*,i8**%c,align 8
%a6=sext i32%w to i64
%a7=getelementptr inbounds i8,i8*%aZ,i64%a6
br i1%a4,label%ba,label%a8
a8:
%a9=bitcast i8*%a7 to i8**
store i8*%a5,i8**%a9,align 8
br label%bb
ba:
call void@llvm.memcpy.p0i8.p0i8.i32(i8*%a7,i8*%a5,i32%aY,i1 false)
br label%bb
bb:
%bc=sext i32%z to i64
%bd=getelementptr inbounds i8,i8*%aZ,i64%bc
%be=bitcast i8*%bd to i32*
store i32%E,i32*%be,align 4
%bf=load i8*,i8**%f,align 8
%bg=tail call fastcc i8*@_SMLL4loop_162(i8*inreg%bf,i8*inreg%aZ)
ret i8*%bg
}
define internal fastcc i8*@_SMLLN12Array__common5foldlE_164(i8*inreg%a,i8*inreg%b)#3 gc"smlsharp"{
%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*%b,i8**%c,align 8
%f=getelementptr inbounds i8,i8*%a,i64 8
%g=bitcast i8*%f to i32*
%h=load i32,i32*%g,align 4
%i=shl i32%h,1
%j=or i32%i,1
%k=bitcast i8*%a to i8**
%l=load i8*,i8**%k,align 8
store i8*%l,i8**%d,align 8
%m=getelementptr inbounds i8,i8*%a,i64 12
%n=bitcast i8*%m to i32*
%o=load i32,i32*%n,align 4
%p=getelementptr inbounds i8,i8*%a,i64 16
%q=bitcast i8*%p to i32*
%r=load i32,i32*%q,align 4
%s=getelementptr inbounds i8,i8*%a,i64 20
%t=bitcast i8*%s to i32*
%u=load i32,i32*%t,align 4
%v=call i8*@sml_alloc(i32 inreg 36)#0
%w=getelementptr inbounds i8,i8*%v,i64 -4
%x=bitcast i8*%w to i32*
store i32 1342177312,i32*%x,align 4
store i8*%v,i8**%e,align 8
%y=load i8*,i8**%d,align 8
store i8*null,i8**%d,align 8
%z=bitcast i8*%v to i8**
store i8*%y,i8**%z,align 8
%A=icmp eq i32%h,0
%B=load i8*,i8**%c,align 8
store i8*null,i8**%c,align 8
%C=getelementptr inbounds i8,i8*%v,i64 8
br i1%A,label%F,label%D
D:
%E=bitcast i8*%C to i8**
store i8*%B,i8**%E,align 8
br label%G
F:
call void@llvm.memcpy.p0i8.p0i8.i32(i8*%C,i8*%B,i32%o,i1 false)
br label%G
G:
%H=getelementptr inbounds i8,i8*%v,i64 16
%I=bitcast i8*%H to i32*
store i32%h,i32*%I,align 4
%J=getelementptr inbounds i8,i8*%v,i64 20
%K=bitcast i8*%J to i32*
store i32%o,i32*%K,align 4
%L=getelementptr inbounds i8,i8*%v,i64 24
%M=bitcast i8*%L to i32*
store i32%r,i32*%M,align 4
%N=getelementptr inbounds i8,i8*%v,i64 28
%O=bitcast i8*%N to i32*
store i32%u,i32*%O,align 4
%P=getelementptr inbounds i8,i8*%v,i64 32
%Q=bitcast i8*%P to i32*
store i32%j,i32*%Q,align 4
%R=call i8*@sml_alloc(i32 inreg 28)#0
%S=getelementptr inbounds i8,i8*%R,i64 -4
%T=bitcast i8*%S to i32*
store i32 1342177304,i32*%T,align 4
%U=load i8*,i8**%e,align 8
%V=bitcast i8*%R to i8**
store i8*%U,i8**%V,align 8
%W=getelementptr inbounds i8,i8*%R,i64 8
%X=bitcast i8*%W to void(...)**
store void(...)*bitcast(i8*(i8*,i8*)*@_SMLLN12Array__common5foldlE_163 to void(...)*),void(...)**%X,align 8
%Y=getelementptr inbounds i8,i8*%R,i64 16
%Z=bitcast i8*%Y to void(...)**
store void(...)*bitcast(i8*(i8*,i8*)*@_SMLLN12Array__common5foldlE_163 to void(...)*),void(...)**%Z,align 8
%aa=getelementptr inbounds i8,i8*%R,i64 24
%ab=bitcast i8*%aa to i32*
store i32 1,i32*%ab,align 4
ret i8*%R
}
define internal fastcc i8*@_SMLLN12Array__common5foldlE_165(i8*inreg%a,i8*inreg%b)#3 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=getelementptr inbounds i8,i8*%a,i64 12
%n=bitcast i8*%m to i32*
%o=load i32,i32*%n,align 4
%p=call i8*@sml_alloc(i32 inreg 28)#0
%q=getelementptr inbounds i8,i8*%p,i64 -4
%r=bitcast i8*%q to i32*
store i32 1342177304,i32*%r,align 4
store i8*%p,i8**%d,align 8
%s=load i8*,i8**%c,align 8
store i8*null,i8**%c,align 8
%t=bitcast i8*%p to i8**
store i8*%s,i8**%t,align 8
%u=getelementptr inbounds i8,i8*%p,i64 8
%v=bitcast i8*%u to i32*
store i32%f,i32*%v,align 4
%w=getelementptr inbounds i8,i8*%p,i64 12
%x=bitcast i8*%w to i32*
store i32%i,i32*%x,align 4
%y=getelementptr inbounds i8,i8*%p,i64 16
%z=bitcast i8*%y to i32*
store i32%l,i32*%z,align 4
%A=getelementptr inbounds i8,i8*%p,i64 20
%B=bitcast i8*%A to i32*
store i32%o,i32*%B,align 4
%C=getelementptr inbounds i8,i8*%p,i64 24
%D=bitcast i8*%C to i32*
store i32 1,i32*%D,align 4
%E=call i8*@sml_alloc(i32 inreg 28)#0
%F=getelementptr inbounds i8,i8*%E,i64 -4
%G=bitcast i8*%F to i32*
store i32 1342177304,i32*%G,align 4
%H=load i8*,i8**%d,align 8
%I=bitcast i8*%E to i8**
store i8*%H,i8**%I,align 8
%J=getelementptr inbounds i8,i8*%E,i64 8
%K=bitcast i8*%J to void(...)**
store void(...)*bitcast(i8*(i8*,i8*)*@_SMLLN12Array__common5foldlE_164 to void(...)*),void(...)**%K,align 8
%L=getelementptr inbounds i8,i8*%E,i64 16
%M=bitcast i8*%L to void(...)**
store void(...)*bitcast(i8*(i8*,i8*)*@_SMLLN12Array__common5foldlE_164 to void(...)*),void(...)**%M,align 8
%N=getelementptr inbounds i8,i8*%E,i64 24
%O=bitcast i8*%N to i32*
store i32 1,i32*%O,align 4
ret i8*%E
}
define internal fastcc i8*@_SMLL4loop_168(i8*inreg%a,i8*inreg%b)#4 gc"smlsharp"{
j:
%c=alloca i8*,align 8
%d=alloca i8*,align 8
%e=alloca i8*,align 8
%f=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
call void@llvm.gcroot(i8**%f,i8*null)#0
store i8*%a,i8**%e,align 8
%g=bitcast i8**%e to i8***
br label%h
h:
%i=phi i8*[%bU,%b6],[%b,%j]
store i8*%i,i8**%c,align 8
%k=load atomic i32,i32*@sml_check_flag unordered,align 4
%l=icmp eq i32%k,0
br i1%l,label%o,label%m
m:
call void@sml_check(i32 inreg%k)
%n=load i8*,i8**%c,align 8
br label%o
o:
%p=phi i8*[%n,%m],[%i,%h]
%q=load i8*,i8**%e,align 8
%r=getelementptr inbounds i8,i8*%q,i64 20
%s=bitcast i8*%r to i32*
%t=load i32,i32*%s,align 4
%u=add i32%t,3
%v=sub i32 0,%t
%w=and i32%u,%v
%x=getelementptr inbounds i8,i8*%q,i64 28
%y=bitcast i8*%x to i32*
%z=load i32,i32*%y,align 4
%A=add i32%z,3
%B=sub i32 0,%z
%C=and i32%A,%B
%D=add i32%t,-1
%E=add i32%D,%z
%F=add i32%E,%C
%G=and i32%F,%v
%H=add i32%t,7
%I=add i32%H,%G
%J=and i32%I,-8
%K=lshr i32%G,3
%L=lshr i32%C,3
%M=sub nsw i32%K,%L
%N=getelementptr inbounds i8,i8*%q,i64 16
%O=bitcast i8*%N to i32*
%P=load i32,i32*%O,align 4
%Q=shl i32%P,%M
%R=getelementptr inbounds i8,i8*%q,i64 24
%S=bitcast i8*%R to i32*
%T=load i32,i32*%S,align 4
%U=or i32%Q,%T
%V=shl i32%U,%L
%W=or i32%J,4
%X=add i32%H,%w
%Y=and i32%X,-8
%Z=lshr i32%w,3
%aa=shl i32%P,%Z
%ab=or i32%Y,4
%ac=bitcast i8*%p to i32*
%ad=load i32,i32*%ac,align 4
%ae=icmp eq i32%P,0
br i1%ae,label%ak,label%af
af:
%ag=sext i32%w to i64
%ah=getelementptr inbounds i8,i8*%p,i64%ag
%ai=bitcast i8*%ah to i8**
%aj=load i8*,i8**%ai,align 8
br label%ar
ak:
%al=call i8*@sml_alloc(i32 inreg%t)#0
%am=getelementptr inbounds i8,i8*%al,i64 -4
%an=bitcast i8*%am to i32*
store i32%t,i32*%an,align 4
%ao=load i8*,i8**%c,align 8
%ap=sext i32%w to i64
%aq=getelementptr inbounds i8,i8*%ao,i64%ap
call void@llvm.memcpy.p0i8.p0i8.i32(i8*%al,i8*%aq,i32%t,i1 false)
br label%ar
ar:
%as=phi i8*[%al,%ak],[%aj,%af]
store i8*%as,i8**%d,align 8
%at=icmp sgt i32%ad,-1
br i1%at,label%av,label%au
au:
ret i8*%as
av:
%aw=load i8*,i8**%e,align 8
%ax=getelementptr inbounds i8,i8*%aw,i64 8
%ay=bitcast i8*%ax to i8**
%az=load i8*,i8**%ay,align 8
store i8*%az,i8**%c,align 8
%aA=getelementptr inbounds i8,i8*%aw,i64 28
%aB=bitcast i8*%aA to i32*
%aC=load i32,i32*%aB,align 4
%aD=getelementptr inbounds i8,i8*%aw,i64 24
%aE=bitcast i8*%aD to i32*
%aF=load i32,i32*%aE,align 4
%aG=icmp eq i32%aF,0
br i1%aG,label%aO,label%aH
aH:
%aI=bitcast i8*%aw to i8**
store i8*null,i8**%c,align 8
%aJ=mul i32%aC,%ad
%aK=sext i32%aJ to i64
%aL=getelementptr inbounds i8,i8*%az,i64%aK
%aM=bitcast i8*%aL to i8**
%aN=load i8*,i8**%aM,align 8
br label%a4
aO:
%aP=call i8*@sml_alloc(i32 inreg%aC)#0
%aQ=getelementptr inbounds i8,i8*%aP,i64 -4
%aR=bitcast i8*%aQ to i32*
store i32%aC,i32*%aR,align 4
%aS=load i8*,i8**%c,align 8
store i8*null,i8**%c,align 8
%aT=mul i32%aC,%ad
%aU=sext i32%aT to i64
%aV=getelementptr inbounds i8,i8*%aS,i64%aU
call void@llvm.memcpy.p0i8.p0i8.i32(i8*%aP,i8*%aV,i32%aC,i1 false)
%aW=load i8**,i8***%g,align 8
%aX=bitcast i8**%aW to i8*
%aY=getelementptr inbounds i8,i8*%aX,i64 28
%aZ=bitcast i8*%aY to i32*
%a0=load i32,i32*%aZ,align 4
%a1=getelementptr inbounds i8*,i8**%aW,i64 3
%a2=bitcast i8**%a1 to i32*
%a3=load i32,i32*%a2,align 4
br label%a4
a4:
%a5=phi i32[%a3,%aO],[%aF,%aH]
%a6=phi i32[%a0,%aO],[%aC,%aH]
%a7=phi i8*[%aX,%aO],[%aw,%aH]
%a8=phi i8**[%aW,%aO],[%aI,%aH]
%a9=phi i8*[%aP,%aO],[%aN,%aH]
store i8*%a9,i8**%c,align 8
%ba=add nsw i32%ad,-1
%bb=load i8*,i8**%a8,align 8
%bc=getelementptr inbounds i8,i8*%bb,i64 16
%bd=bitcast i8*%bc to i8*(i8*,i8*)**
%be=load i8*(i8*,i8*)*,i8*(i8*,i8*)**%bd,align 8
%bf=bitcast i8*%bb to i8**
%bg=load i8*,i8**%bf,align 8
store i8*%bg,i8**%f,align 8
%bh=getelementptr inbounds i8,i8*%a7,i64 20
%bi=bitcast i8*%bh to i32*
%bj=load i32,i32*%bi,align 4
%bk=getelementptr inbounds i8,i8*%a7,i64 16
%bl=bitcast i8*%bk to i32*
%bm=load i32,i32*%bl,align 4
%bn=call i8*@sml_alloc(i32 inreg%W)#0
%bo=or i32%J,1342177280
%bp=bitcast i8*%bn to i32*
%bq=getelementptr inbounds i8,i8*%bn,i64 -4
%br=bitcast i8*%bq to i32*
store i32%bo,i32*%br,align 4
call void@llvm.memset.p0i8.i32(i8*%bn,i8 0,i32%W,i1 false)
store i32%ad,i32*%bp,align 4
%bs=icmp eq i32%a5,0
%bt=load i8*,i8**%c,align 8
store i8*null,i8**%c,align 8
%bu=sext i32%C to i64
%bv=getelementptr inbounds i8,i8*%bn,i64%bu
br i1%bs,label%by,label%bw
bw:
%bx=bitcast i8*%bv to i8**
store i8*%bt,i8**%bx,align 8
br label%bz
by:
call void@llvm.memcpy.p0i8.p0i8.i32(i8*%bv,i8*%bt,i32%a6,i1 false)
br label%bz
bz:
%bA=icmp eq i32%bm,0
%bB=load i8*,i8**%d,align 8
store i8*null,i8**%d,align 8
%bC=sext i32%G to i64
%bD=getelementptr inbounds i8,i8*%bn,i64%bC
br i1%bA,label%bG,label%bE
bE:
%bF=bitcast i8*%bD to i8**
store i8*%bB,i8**%bF,align 8
br label%bH
bG:
call void@llvm.memcpy.p0i8.p0i8.i32(i8*%bD,i8*%bB,i32%bj,i1 false)
br label%bH
bH:
%bI=sext i32%J to i64
%bJ=getelementptr inbounds i8,i8*%bn,i64%bI
%bK=bitcast i8*%bJ to i32*
store i32%V,i32*%bK,align 4
%bL=load i8*,i8**%f,align 8
store i8*null,i8**%f,align 8
%bM=call fastcc i8*%be(i8*inreg%bL,i8*inreg%bn)
store i8*%bM,i8**%c,align 8
%bN=load i8*,i8**%e,align 8
%bO=getelementptr inbounds i8,i8*%bN,i64 20
%bP=bitcast i8*%bO to i32*
%bQ=load i32,i32*%bP,align 4
%bR=getelementptr inbounds i8,i8*%bN,i64 16
%bS=bitcast i8*%bR to i32*
%bT=load i32,i32*%bS,align 4
%bU=call i8*@sml_alloc(i32 inreg%ab)#0
%bV=or i32%Y,1342177280
%bW=bitcast i8*%bU to i32*
%bX=getelementptr inbounds i8,i8*%bU,i64 -4
%bY=bitcast i8*%bX to i32*
store i32%bV,i32*%bY,align 4
call void@llvm.memset.p0i8.i32(i8*%bU,i8 0,i32%ab,i1 false)
store i32%ba,i32*%bW,align 4
%bZ=icmp eq i32%bT,0
%b0=load i8*,i8**%c,align 8
%b1=sext i32%w to i64
%b2=getelementptr inbounds i8,i8*%bU,i64%b1
br i1%bZ,label%b5,label%b3
b3:
%b4=bitcast i8*%b2 to i8**
store i8*%b0,i8**%b4,align 8
br label%b6
b5:
call void@llvm.memcpy.p0i8.p0i8.i32(i8*%b2,i8*%b0,i32%bQ,i1 false)
br label%b6
b6:
%b7=sext i32%Y to i64
%b8=getelementptr inbounds i8,i8*%bU,i64%b7
%b9=bitcast i8*%b8 to i32*
store i32%aa,i32*%b9,align 4
br label%h
}
define internal fastcc i8*@_SMLLN12Array__common6foldriE_169(i8*inreg%a,i8*inreg%b)#4 gc"smlsharp"{
%c=alloca i8*,align 8
%d=alloca i8*,align 8
%e=alloca i8*,align 8
%f=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
call void@llvm.gcroot(i8**%f,i8*null)#0
store i8*%a,i8**%d,align 8
store i8*%b,i8**%c,align 8
%g=load atomic i32,i32*@sml_check_flag unordered,align 4
%h=icmp eq i32%g,0
br i1%h,label%i,label%k
i:
%j=bitcast i8*%b to i32*
br label%o
k:
call void@sml_check(i32 inreg%g)
%l=bitcast i8**%c to i32**
%m=load i32*,i32**%l,align 8
%n=load i8*,i8**%d,align 8
br label%o
o:
%p=phi i8*[%n,%k],[%a,%i]
%q=phi i32*[%m,%k],[%j,%i]
%r=getelementptr inbounds i8,i8*%p,i64 20
%s=bitcast i8*%r to i32*
%t=load i32,i32*%s,align 4
%u=add i32%t,3
%v=sub i32 0,%t
%w=and i32%u,%v
%x=add i32%t,7
%y=add i32%x,%w
%z=and i32%y,-8
%A=lshr i32%w,3
%B=getelementptr inbounds i8,i8*%p,i64 16
%C=bitcast i8*%B to i32*
%D=load i32,i32*%C,align 4
%E=shl i32%D,%A
%F=or i32%z,4
%G=getelementptr inbounds i32,i32*%q,i64 -1
%H=load i32,i32*%G,align 4
%I=and i32%H,268435455
%J=getelementptr inbounds i8,i8*%p,i64 28
%K=bitcast i8*%J to i32*
%L=load i32,i32*%K,align 4
%M=udiv i32%I,%L
%N=bitcast i8*%p to i8**
%O=load i8*,i8**%N,align 8
store i8*%O,i8**%e,align 8
%P=getelementptr inbounds i8,i8*%p,i64 24
%Q=bitcast i8*%P to i32*
%R=load i32,i32*%Q,align 4
%S=call i8*@sml_alloc(i32 inreg 36)#0
%T=getelementptr inbounds i8,i8*%S,i64 -4
%U=bitcast i8*%T to i32*
store i32 1342177312,i32*%U,align 4
store i8*%S,i8**%f,align 8
%V=load i8*,i8**%e,align 8
store i8*null,i8**%e,align 8
%W=bitcast i8*%S to i8**
store i8*%V,i8**%W,align 8
%X=load i8*,i8**%c,align 8
store i8*null,i8**%c,align 8
%Y=getelementptr inbounds i8,i8*%S,i64 8
%Z=bitcast i8*%Y to i8**
store i8*%X,i8**%Z,align 8
%aa=getelementptr inbounds i8,i8*%S,i64 16
%ab=bitcast i8*%aa to i32*
store i32%D,i32*%ab,align 4
%ac=getelementptr inbounds i8,i8*%S,i64 20
%ad=bitcast i8*%ac to i32*
store i32%t,i32*%ad,align 4
%ae=getelementptr inbounds i8,i8*%S,i64 24
%af=bitcast i8*%ae to i32*
store i32%R,i32*%af,align 4
%ag=getelementptr inbounds i8,i8*%S,i64 28
%ah=bitcast i8*%ag to i32*
store i32%L,i32*%ah,align 4
%ai=getelementptr inbounds i8,i8*%S,i64 32
%aj=bitcast i8*%ai to i32*
store i32 3,i32*%aj,align 4
%ak=call i8*@sml_alloc(i32 inreg 28)#0
%al=getelementptr inbounds i8,i8*%ak,i64 -4
%am=bitcast i8*%al to i32*
store i32 1342177304,i32*%am,align 4
%an=load i8*,i8**%f,align 8
%ao=bitcast i8*%ak to i8**
store i8*%an,i8**%ao,align 8
%ap=getelementptr inbounds i8,i8*%ak,i64 8
%aq=bitcast i8*%ap to void(...)**
store void(...)*bitcast(i8*(i8*,i8*)*@_SMLL4loop_168 to void(...)*),void(...)**%aq,align 8
%ar=getelementptr inbounds i8,i8*%ak,i64 16
%as=bitcast i8*%ar to void(...)**
store void(...)*bitcast(i8*(i8*,i8*)*@_SMLL4loop_168 to void(...)*),void(...)**%as,align 8
%at=getelementptr inbounds i8,i8*%ak,i64 24
%au=bitcast i8*%at to i32*
store i32 1,i32*%au,align 4
%av=add nsw i32%M,-1
%aw=load i8*,i8**%d,align 8
%ax=getelementptr inbounds i8,i8*%aw,i64 16
%ay=bitcast i8*%ax to i32*
%az=load i32,i32*%ay,align 4
%aA=icmp eq i32%az,0
br i1%aA,label%aF,label%aB
aB:
%aC=getelementptr inbounds i8,i8*%aw,i64 8
%aD=bitcast i8*%aC to i8**
%aE=load i8*,i8**%aD,align 8
br label%aR
aF:
%aG=getelementptr inbounds i8,i8*%aw,i64 20
%aH=bitcast i8*%aG to i32*
%aI=load i32,i32*%aH,align 4
%aJ=call i8*@sml_alloc(i32 inreg%aI)#0
%aK=getelementptr inbounds i8,i8*%aJ,i64 -4
%aL=bitcast i8*%aK to i32*
store i32%aI,i32*%aL,align 4
%aM=load i8*,i8**%d,align 8
%aN=getelementptr inbounds i8,i8*%aM,i64 8
call void@llvm.memcpy.p0i8.p0i8.i32(i8*%aJ,i8*%aN,i32%aI,i1 false)
%aO=getelementptr inbounds i8,i8*%aM,i64 16
%aP=bitcast i8*%aO to i32*
%aQ=load i32,i32*%aP,align 4
br label%aR
aR:
%aS=phi i32[%aQ,%aF],[%az,%aB]
%aT=phi i8*[%aM,%aF],[%aw,%aB]
%aU=phi i8*[%aJ,%aF],[%aE,%aB]
store i8*%aU,i8**%c,align 8
%aV=getelementptr inbounds i8,i8*%aT,i64 20
%aW=bitcast i8*%aV to i32*
%aX=load i32,i32*%aW,align 4
store i8*null,i8**%d,align 8
%aY=call i8*@sml_alloc(i32 inreg%F)#0
%aZ=or i32%z,1342177280
%a0=bitcast i8*%aY to i32*
%a1=getelementptr inbounds i8,i8*%aY,i64 -4
%a2=bitcast i8*%a1 to i32*
store i32%aZ,i32*%a2,align 4
call void@llvm.memset.p0i8.i32(i8*%aY,i8 0,i32%F,i1 false)
store i32%av,i32*%a0,align 4
%a3=icmp eq i32%aS,0
%a4=load i8*,i8**%c,align 8
%a5=sext i32%w to i64
%a6=getelementptr inbounds i8,i8*%aY,i64%a5
br i1%a3,label%a9,label%a7
a7:
%a8=bitcast i8*%a6 to i8**
store i8*%a4,i8**%a8,align 8
br label%ba
a9:
call void@llvm.memcpy.p0i8.p0i8.i32(i8*%a6,i8*%a4,i32%aX,i1 false)
br label%ba
ba:
%bb=sext i32%z to i64
%bc=getelementptr inbounds i8,i8*%aY,i64%bb
%bd=bitcast i8*%bc to i32*
store i32%E,i32*%bd,align 4
%be=load i8*,i8**%f,align 8
%bf=tail call fastcc i8*@_SMLL4loop_168(i8*inreg%be,i8*inreg%aY)
ret i8*%bf
}
define internal fastcc i8*@_SMLLN12Array__common6foldriE_170(i8*inreg%a,i8*inreg%b)#3 gc"smlsharp"{
%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*%b,i8**%c,align 8
%f=getelementptr inbounds i8,i8*%a,i64 8
%g=bitcast i8*%f to i32*
%h=load i32,i32*%g,align 4
%i=shl i32%h,1
%j=or i32%i,1
%k=bitcast i8*%a to i8**
%l=load i8*,i8**%k,align 8
store i8*%l,i8**%d,align 8
%m=getelementptr inbounds i8,i8*%a,i64 12
%n=bitcast i8*%m to i32*
%o=load i32,i32*%n,align 4
%p=getelementptr inbounds i8,i8*%a,i64 16
%q=bitcast i8*%p to i32*
%r=load i32,i32*%q,align 4
%s=getelementptr inbounds i8,i8*%a,i64 20
%t=bitcast i8*%s to i32*
%u=load i32,i32*%t,align 4
%v=call i8*@sml_alloc(i32 inreg 36)#0
%w=getelementptr inbounds i8,i8*%v,i64 -4
%x=bitcast i8*%w to i32*
store i32 1342177312,i32*%x,align 4
store i8*%v,i8**%e,align 8
%y=load i8*,i8**%d,align 8
store i8*null,i8**%d,align 8
%z=bitcast i8*%v to i8**
store i8*%y,i8**%z,align 8
%A=icmp eq i32%h,0
%B=load i8*,i8**%c,align 8
store i8*null,i8**%c,align 8
%C=getelementptr inbounds i8,i8*%v,i64 8
br i1%A,label%F,label%D
D:
%E=bitcast i8*%C to i8**
store i8*%B,i8**%E,align 8
br label%G
F:
call void@llvm.memcpy.p0i8.p0i8.i32(i8*%C,i8*%B,i32%o,i1 false)
br label%G
G:
%H=getelementptr inbounds i8,i8*%v,i64 16
%I=bitcast i8*%H to i32*
store i32%h,i32*%I,align 4
%J=getelementptr inbounds i8,i8*%v,i64 20
%K=bitcast i8*%J to i32*
store i32%o,i32*%K,align 4
%L=getelementptr inbounds i8,i8*%v,i64 24
%M=bitcast i8*%L to i32*
store i32%r,i32*%M,align 4
%N=getelementptr inbounds i8,i8*%v,i64 28
%O=bitcast i8*%N to i32*
store i32%u,i32*%O,align 4
%P=getelementptr inbounds i8,i8*%v,i64 32
%Q=bitcast i8*%P to i32*
store i32%j,i32*%Q,align 4
%R=call i8*@sml_alloc(i32 inreg 28)#0
%S=getelementptr inbounds i8,i8*%R,i64 -4
%T=bitcast i8*%S to i32*
store i32 1342177304,i32*%T,align 4
%U=load i8*,i8**%e,align 8
%V=bitcast i8*%R to i8**
store i8*%U,i8**%V,align 8
%W=getelementptr inbounds i8,i8*%R,i64 8
%X=bitcast i8*%W to void(...)**
store void(...)*bitcast(i8*(i8*,i8*)*@_SMLLN12Array__common6foldriE_169 to void(...)*),void(...)**%X,align 8
%Y=getelementptr inbounds i8,i8*%R,i64 16
%Z=bitcast i8*%Y to void(...)**
store void(...)*bitcast(i8*(i8*,i8*)*@_SMLLN12Array__common6foldriE_169 to void(...)*),void(...)**%Z,align 8
%aa=getelementptr inbounds i8,i8*%R,i64 24
%ab=bitcast i8*%aa to i32*
store i32 1,i32*%ab,align 4
ret i8*%R
}
define internal fastcc i8*@_SMLLN12Array__common6foldriE_171(i8*inreg%a,i8*inreg%b)#3 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=getelementptr inbounds i8,i8*%a,i64 12
%n=bitcast i8*%m to i32*
%o=load i32,i32*%n,align 4
%p=call i8*@sml_alloc(i32 inreg 28)#0
%q=getelementptr inbounds i8,i8*%p,i64 -4
%r=bitcast i8*%q to i32*
store i32 1342177304,i32*%r,align 4
store i8*%p,i8**%d,align 8
%s=load i8*,i8**%c,align 8
store i8*null,i8**%c,align 8
%t=bitcast i8*%p to i8**
store i8*%s,i8**%t,align 8
%u=getelementptr inbounds i8,i8*%p,i64 8
%v=bitcast i8*%u to i32*
store i32%f,i32*%v,align 4
%w=getelementptr inbounds i8,i8*%p,i64 12
%x=bitcast i8*%w to i32*
store i32%i,i32*%x,align 4
%y=getelementptr inbounds i8,i8*%p,i64 16
%z=bitcast i8*%y to i32*
store i32%l,i32*%z,align 4
%A=getelementptr inbounds i8,i8*%p,i64 20
%B=bitcast i8*%A to i32*
store i32%o,i32*%B,align 4
%C=getelementptr inbounds i8,i8*%p,i64 24
%D=bitcast i8*%C to i32*
store i32 1,i32*%D,align 4
%E=call i8*@sml_alloc(i32 inreg 28)#0
%F=getelementptr inbounds i8,i8*%E,i64 -4
%G=bitcast i8*%F to i32*
store i32 1342177304,i32*%G,align 4
%H=load i8*,i8**%d,align 8
%I=bitcast i8*%E to i8**
store i8*%H,i8**%I,align 8
%J=getelementptr inbounds i8,i8*%E,i64 8
%K=bitcast i8*%J to void(...)**
store void(...)*bitcast(i8*(i8*,i8*)*@_SMLLN12Array__common6foldriE_170 to void(...)*),void(...)**%K,align 8
%L=getelementptr inbounds i8,i8*%E,i64 16
%M=bitcast i8*%L to void(...)**
store void(...)*bitcast(i8*(i8*,i8*)*@_SMLLN12Array__common6foldriE_170 to void(...)*),void(...)**%M,align 8
%N=getelementptr inbounds i8,i8*%E,i64 24
%O=bitcast i8*%N to i32*
store i32 1,i32*%O,align 4
ret i8*%E
}
define internal fastcc i8*@_SMLL4loop_174(i8*inreg%a,i8*inreg%b)#4 gc"smlsharp"{
j:
%c=alloca i8*,align 8
%d=alloca i8*,align 8
%e=alloca i8*,align 8
%f=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
call void@llvm.gcroot(i8**%f,i8*null)#0
store i8*%a,i8**%e,align 8
%g=bitcast i8**%e to i8***
br label%h
h:
%i=phi i8*[%bR,%b3],[%b,%j]
store i8*%i,i8**%c,align 8
%k=load atomic i32,i32*@sml_check_flag unordered,align 4
%l=icmp eq i32%k,0
br i1%l,label%o,label%m
m:
call void@sml_check(i32 inreg%k)
%n=load i8*,i8**%c,align 8
br label%o
o:
%p=phi i8*[%n,%m],[%i,%h]
%q=load i8*,i8**%e,align 8
%r=getelementptr inbounds i8,i8*%q,i64 20
%s=bitcast i8*%r to i32*
%t=load i32,i32*%s,align 4
%u=add i32%t,3
%v=sub i32 0,%t
%w=and i32%u,%v
%x=getelementptr inbounds i8,i8*%q,i64 28
%y=bitcast i8*%x to i32*
%z=load i32,i32*%y,align 4
%A=add i32%z,-1
%B=sub i32 0,%z
%C=and i32%A,%B
%D=add i32%A,%t
%E=add i32%D,%C
%F=and i32%E,%v
%G=add i32%t,7
%H=add i32%G,%F
%I=and i32%H,-8
%J=lshr i32%F,3
%K=lshr i32%C,3
%L=sub nsw i32%J,%K
%M=getelementptr inbounds i8,i8*%q,i64 16
%N=bitcast i8*%M to i32*
%O=load i32,i32*%N,align 4
%P=shl i32%O,%L
%Q=getelementptr inbounds i8,i8*%q,i64 24
%R=bitcast i8*%Q to i32*
%S=load i32,i32*%R,align 4
%T=or i32%P,%S
%U=or i32%I,4
%V=add i32%G,%w
%W=and i32%V,-8
%X=lshr i32%w,3
%Y=shl i32%O,%X
%Z=or i32%W,4
%aa=bitcast i8*%p to i32*
%ab=load i32,i32*%aa,align 4
%ac=icmp eq i32%O,0
br i1%ac,label%ai,label%ad
ad:
%ae=sext i32%w to i64
%af=getelementptr inbounds i8,i8*%p,i64%ae
%ag=bitcast i8*%af to i8**
%ah=load i8*,i8**%ag,align 8
br label%ap
ai:
%aj=call i8*@sml_alloc(i32 inreg%t)#0
%ak=getelementptr inbounds i8,i8*%aj,i64 -4
%al=bitcast i8*%ak to i32*
store i32%t,i32*%al,align 4
%am=load i8*,i8**%c,align 8
%an=sext i32%w to i64
%ao=getelementptr inbounds i8,i8*%am,i64%an
call void@llvm.memcpy.p0i8.p0i8.i32(i8*%aj,i8*%ao,i32%t,i1 false)
br label%ap
ap:
%aq=phi i8*[%aj,%ai],[%ah,%ad]
store i8*%aq,i8**%d,align 8
%ar=icmp sgt i32%ab,-1
br i1%ar,label%at,label%as
as:
ret i8*%aq
at:
%au=load i8*,i8**%e,align 8
%av=getelementptr inbounds i8,i8*%au,i64 8
%aw=bitcast i8*%av to i8**
%ax=load i8*,i8**%aw,align 8
store i8*%ax,i8**%c,align 8
%ay=getelementptr inbounds i8,i8*%au,i64 28
%az=bitcast i8*%ay to i32*
%aA=load i32,i32*%az,align 4
%aB=getelementptr inbounds i8,i8*%au,i64 24
%aC=bitcast i8*%aB to i32*
%aD=load i32,i32*%aC,align 4
%aE=icmp eq i32%aD,0
br i1%aE,label%aM,label%aF
aF:
%aG=bitcast i8*%au to i8**
store i8*null,i8**%c,align 8
%aH=mul i32%aA,%ab
%aI=sext i32%aH to i64
%aJ=getelementptr inbounds i8,i8*%ax,i64%aI
%aK=bitcast i8*%aJ to i8**
%aL=load i8*,i8**%aK,align 8
br label%a2
aM:
%aN=call i8*@sml_alloc(i32 inreg%aA)#0
%aO=getelementptr inbounds i8,i8*%aN,i64 -4
%aP=bitcast i8*%aO to i32*
store i32%aA,i32*%aP,align 4
%aQ=load i8*,i8**%c,align 8
store i8*null,i8**%c,align 8
%aR=mul i32%aA,%ab
%aS=sext i32%aR to i64
%aT=getelementptr inbounds i8,i8*%aQ,i64%aS
call void@llvm.memcpy.p0i8.p0i8.i32(i8*%aN,i8*%aT,i32%aA,i1 false)
%aU=load i8**,i8***%g,align 8
%aV=bitcast i8**%aU to i8*
%aW=getelementptr inbounds i8,i8*%aV,i64 28
%aX=bitcast i8*%aW to i32*
%aY=load i32,i32*%aX,align 4
%aZ=getelementptr inbounds i8*,i8**%aU,i64 3
%a0=bitcast i8**%aZ to i32*
%a1=load i32,i32*%a0,align 4
br label%a2
a2:
%a3=phi i32[%a1,%aM],[%aD,%aF]
%a4=phi i32[%aY,%aM],[%aA,%aF]
%a5=phi i8*[%aV,%aM],[%au,%aF]
%a6=phi i8**[%aU,%aM],[%aG,%aF]
%a7=phi i8*[%aN,%aM],[%aL,%aF]
store i8*%a7,i8**%c,align 8
%a8=add nsw i32%ab,-1
%a9=load i8*,i8**%a6,align 8
%ba=getelementptr inbounds i8,i8*%a9,i64 16
%bb=bitcast i8*%ba to i8*(i8*,i8*)**
%bc=load i8*(i8*,i8*)*,i8*(i8*,i8*)**%bb,align 8
%bd=bitcast i8*%a9 to i8**
%be=load i8*,i8**%bd,align 8
store i8*%be,i8**%f,align 8
%bf=getelementptr inbounds i8,i8*%a5,i64 20
%bg=bitcast i8*%bf to i32*
%bh=load i32,i32*%bg,align 4
%bi=getelementptr inbounds i8,i8*%a5,i64 16
%bj=bitcast i8*%bi to i32*
%bk=load i32,i32*%bj,align 4
%bl=call i8*@sml_alloc(i32 inreg%U)#0
%bm=or i32%I,1342177280
%bn=getelementptr inbounds i8,i8*%bl,i64 -4
%bo=bitcast i8*%bn to i32*
store i32%bm,i32*%bo,align 4
call void@llvm.memset.p0i8.i32(i8*%bl,i8 0,i32%U,i1 false)
%bp=icmp eq i32%a3,0
%bq=load i8*,i8**%c,align 8
store i8*null,i8**%c,align 8
%br=sext i32%C to i64
%bs=getelementptr inbounds i8,i8*%bl,i64%br
br i1%bp,label%bv,label%bt
bt:
%bu=bitcast i8*%bs to i8**
store i8*%bq,i8**%bu,align 8
br label%bw
bv:
call void@llvm.memcpy.p0i8.p0i8.i32(i8*%bs,i8*%bq,i32%a4,i1 false)
br label%bw
bw:
%bx=icmp eq i32%bk,0
%by=load i8*,i8**%d,align 8
store i8*null,i8**%d,align 8
%bz=sext i32%F to i64
%bA=getelementptr inbounds i8,i8*%bl,i64%bz
br i1%bx,label%bD,label%bB
bB:
%bC=bitcast i8*%bA to i8**
store i8*%by,i8**%bC,align 8
br label%bE
bD:
call void@llvm.memcpy.p0i8.p0i8.i32(i8*%bA,i8*%by,i32%bh,i1 false)
br label%bE
bE:
%bF=sext i32%I to i64
%bG=getelementptr inbounds i8,i8*%bl,i64%bF
%bH=bitcast i8*%bG to i32*
store i32%T,i32*%bH,align 4
%bI=load i8*,i8**%f,align 8
store i8*null,i8**%f,align 8
%bJ=call fastcc i8*%bc(i8*inreg%bI,i8*inreg%bl)
store i8*%bJ,i8**%c,align 8
%bK=load i8*,i8**%e,align 8
%bL=getelementptr inbounds i8,i8*%bK,i64 20
%bM=bitcast i8*%bL to i32*
%bN=load i32,i32*%bM,align 4
%bO=getelementptr inbounds i8,i8*%bK,i64 16
%bP=bitcast i8*%bO to i32*
%bQ=load i32,i32*%bP,align 4
%bR=call i8*@sml_alloc(i32 inreg%Z)#0
%bS=or i32%W,1342177280
%bT=bitcast i8*%bR to i32*
%bU=getelementptr inbounds i8,i8*%bR,i64 -4
%bV=bitcast i8*%bU to i32*
store i32%bS,i32*%bV,align 4
call void@llvm.memset.p0i8.i32(i8*%bR,i8 0,i32%Z,i1 false)
store i32%a8,i32*%bT,align 4
%bW=icmp eq i32%bQ,0
%bX=load i8*,i8**%c,align 8
%bY=sext i32%w to i64
%bZ=getelementptr inbounds i8,i8*%bR,i64%bY
br i1%bW,label%b2,label%b0
b0:
%b1=bitcast i8*%bZ to i8**
store i8*%bX,i8**%b1,align 8
br label%b3
b2:
call void@llvm.memcpy.p0i8.p0i8.i32(i8*%bZ,i8*%bX,i32%bN,i1 false)
br label%b3
b3:
%b4=sext i32%W to i64
%b5=getelementptr inbounds i8,i8*%bR,i64%b4
%b6=bitcast i8*%b5 to i32*
store i32%Y,i32*%b6,align 4
br label%h
}
define internal fastcc i8*@_SMLLN12Array__common5foldrE_175(i8*inreg%a,i8*inreg%b)#4 gc"smlsharp"{
%c=alloca i8*,align 8
%d=alloca i8*,align 8
%e=alloca i8*,align 8
%f=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
call void@llvm.gcroot(i8**%f,i8*null)#0
store i8*%a,i8**%d,align 8
store i8*%b,i8**%c,align 8
%g=load atomic i32,i32*@sml_check_flag unordered,align 4
%h=icmp eq i32%g,0
br i1%h,label%i,label%k
i:
%j=bitcast i8*%b to i32*
br label%o
k:
call void@sml_check(i32 inreg%g)
%l=bitcast i8**%c to i32**
%m=load i32*,i32**%l,align 8
%n=load i8*,i8**%d,align 8
br label%o
o:
%p=phi i8*[%n,%k],[%a,%i]
%q=phi i32*[%m,%k],[%j,%i]
%r=getelementptr inbounds i8,i8*%p,i64 20
%s=bitcast i8*%r to i32*
%t=load i32,i32*%s,align 4
%u=add i32%t,3
%v=sub i32 0,%t
%w=and i32%u,%v
%x=add i32%t,7
%y=add i32%x,%w
%z=and i32%y,-8
%A=lshr i32%w,3
%B=getelementptr inbounds i8,i8*%p,i64 16
%C=bitcast i8*%B to i32*
%D=load i32,i32*%C,align 4
%E=shl i32%D,%A
%F=or i32%z,4
%G=getelementptr inbounds i32,i32*%q,i64 -1
%H=load i32,i32*%G,align 4
%I=and i32%H,268435455
%J=getelementptr inbounds i8,i8*%p,i64 28
%K=bitcast i8*%J to i32*
%L=load i32,i32*%K,align 4
%M=udiv i32%I,%L
%N=bitcast i8*%p to i8**
%O=load i8*,i8**%N,align 8
store i8*%O,i8**%e,align 8
%P=getelementptr inbounds i8,i8*%p,i64 24
%Q=bitcast i8*%P to i32*
%R=load i32,i32*%Q,align 4
%S=call i8*@sml_alloc(i32 inreg 36)#0
%T=getelementptr inbounds i8,i8*%S,i64 -4
%U=bitcast i8*%T to i32*
store i32 1342177312,i32*%U,align 4
store i8*%S,i8**%f,align 8
%V=load i8*,i8**%e,align 8
store i8*null,i8**%e,align 8
%W=bitcast i8*%S to i8**
store i8*%V,i8**%W,align 8
%X=load i8*,i8**%c,align 8
store i8*null,i8**%c,align 8
%Y=getelementptr inbounds i8,i8*%S,i64 8
%Z=bitcast i8*%Y to i8**
store i8*%X,i8**%Z,align 8
%aa=getelementptr inbounds i8,i8*%S,i64 16
%ab=bitcast i8*%aa to i32*
store i32%D,i32*%ab,align 4
%ac=getelementptr inbounds i8,i8*%S,i64 20
%ad=bitcast i8*%ac to i32*
store i32%t,i32*%ad,align 4
%ae=getelementptr inbounds i8,i8*%S,i64 24
%af=bitcast i8*%ae to i32*
store i32%R,i32*%af,align 4
%ag=getelementptr inbounds i8,i8*%S,i64 28
%ah=bitcast i8*%ag to i32*
store i32%L,i32*%ah,align 4
%ai=getelementptr inbounds i8,i8*%S,i64 32
%aj=bitcast i8*%ai to i32*
store i32 3,i32*%aj,align 4
%ak=call i8*@sml_alloc(i32 inreg 28)#0
%al=getelementptr inbounds i8,i8*%ak,i64 -4
%am=bitcast i8*%al to i32*
store i32 1342177304,i32*%am,align 4
%an=load i8*,i8**%f,align 8
%ao=bitcast i8*%ak to i8**
store i8*%an,i8**%ao,align 8
%ap=getelementptr inbounds i8,i8*%ak,i64 8
%aq=bitcast i8*%ap to void(...)**
store void(...)*bitcast(i8*(i8*,i8*)*@_SMLL4loop_174 to void(...)*),void(...)**%aq,align 8
%ar=getelementptr inbounds i8,i8*%ak,i64 16
%as=bitcast i8*%ar to void(...)**
store void(...)*bitcast(i8*(i8*,i8*)*@_SMLL4loop_174 to void(...)*),void(...)**%as,align 8
%at=getelementptr inbounds i8,i8*%ak,i64 24
%au=bitcast i8*%at to i32*
store i32 1,i32*%au,align 4
%av=add nsw i32%M,-1
%aw=load i8*,i8**%d,align 8
%ax=getelementptr inbounds i8,i8*%aw,i64 16
%ay=bitcast i8*%ax to i32*
%az=load i32,i32*%ay,align 4
%aA=icmp eq i32%az,0
br i1%aA,label%aF,label%aB
aB:
%aC=getelementptr inbounds i8,i8*%aw,i64 8
%aD=bitcast i8*%aC to i8**
%aE=load i8*,i8**%aD,align 8
br label%aR
aF:
%aG=getelementptr inbounds i8,i8*%aw,i64 20
%aH=bitcast i8*%aG to i32*
%aI=load i32,i32*%aH,align 4
%aJ=call i8*@sml_alloc(i32 inreg%aI)#0
%aK=getelementptr inbounds i8,i8*%aJ,i64 -4
%aL=bitcast i8*%aK to i32*
store i32%aI,i32*%aL,align 4
%aM=load i8*,i8**%d,align 8
%aN=getelementptr inbounds i8,i8*%aM,i64 8
call void@llvm.memcpy.p0i8.p0i8.i32(i8*%aJ,i8*%aN,i32%aI,i1 false)
%aO=getelementptr inbounds i8,i8*%aM,i64 16
%aP=bitcast i8*%aO to i32*
%aQ=load i32,i32*%aP,align 4
br label%aR
aR:
%aS=phi i32[%aQ,%aF],[%az,%aB]
%aT=phi i8*[%aM,%aF],[%aw,%aB]
%aU=phi i8*[%aJ,%aF],[%aE,%aB]
store i8*%aU,i8**%c,align 8
%aV=getelementptr inbounds i8,i8*%aT,i64 20
%aW=bitcast i8*%aV to i32*
%aX=load i32,i32*%aW,align 4
store i8*null,i8**%d,align 8
%aY=call i8*@sml_alloc(i32 inreg%F)#0
%aZ=or i32%z,1342177280
%a0=bitcast i8*%aY to i32*
%a1=getelementptr inbounds i8,i8*%aY,i64 -4
%a2=bitcast i8*%a1 to i32*
store i32%aZ,i32*%a2,align 4
call void@llvm.memset.p0i8.i32(i8*%aY,i8 0,i32%F,i1 false)
store i32%av,i32*%a0,align 4
%a3=icmp eq i32%aS,0
%a4=load i8*,i8**%c,align 8
%a5=sext i32%w to i64
%a6=getelementptr inbounds i8,i8*%aY,i64%a5
br i1%a3,label%a9,label%a7
a7:
%a8=bitcast i8*%a6 to i8**
store i8*%a4,i8**%a8,align 8
br label%ba
a9:
call void@llvm.memcpy.p0i8.p0i8.i32(i8*%a6,i8*%a4,i32%aX,i1 false)
br label%ba
ba:
%bb=sext i32%z to i64
%bc=getelementptr inbounds i8,i8*%aY,i64%bb
%bd=bitcast i8*%bc to i32*
store i32%E,i32*%bd,align 4
%be=load i8*,i8**%f,align 8
%bf=tail call fastcc i8*@_SMLL4loop_174(i8*inreg%be,i8*inreg%aY)
ret i8*%bf
}
define internal fastcc i8*@_SMLLN12Array__common5foldrE_176(i8*inreg%a,i8*inreg%b)#3 gc"smlsharp"{
%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*%b,i8**%c,align 8
%f=getelementptr inbounds i8,i8*%a,i64 8
%g=bitcast i8*%f to i32*
%h=load i32,i32*%g,align 4
%i=shl i32%h,1
%j=or i32%i,1
%k=bitcast i8*%a to i8**
%l=load i8*,i8**%k,align 8
store i8*%l,i8**%d,align 8
%m=getelementptr inbounds i8,i8*%a,i64 12
%n=bitcast i8*%m to i32*
%o=load i32,i32*%n,align 4
%p=getelementptr inbounds i8,i8*%a,i64 16
%q=bitcast i8*%p to i32*
%r=load i32,i32*%q,align 4
%s=getelementptr inbounds i8,i8*%a,i64 20
%t=bitcast i8*%s to i32*
%u=load i32,i32*%t,align 4
%v=call i8*@sml_alloc(i32 inreg 36)#0
%w=getelementptr inbounds i8,i8*%v,i64 -4
%x=bitcast i8*%w to i32*
store i32 1342177312,i32*%x,align 4
store i8*%v,i8**%e,align 8
%y=load i8*,i8**%d,align 8
store i8*null,i8**%d,align 8
%z=bitcast i8*%v to i8**
store i8*%y,i8**%z,align 8
%A=icmp eq i32%h,0
%B=load i8*,i8**%c,align 8
store i8*null,i8**%c,align 8
%C=getelementptr inbounds i8,i8*%v,i64 8
br i1%A,label%F,label%D
D:
%E=bitcast i8*%C to i8**
store i8*%B,i8**%E,align 8
br label%G
F:
call void@llvm.memcpy.p0i8.p0i8.i32(i8*%C,i8*%B,i32%o,i1 false)
br label%G
G:
%H=getelementptr inbounds i8,i8*%v,i64 16
%I=bitcast i8*%H to i32*
store i32%h,i32*%I,align 4
%J=getelementptr inbounds i8,i8*%v,i64 20
%K=bitcast i8*%J to i32*
store i32%o,i32*%K,align 4
%L=getelementptr inbounds i8,i8*%v,i64 24
%M=bitcast i8*%L to i32*
store i32%r,i32*%M,align 4
%N=getelementptr inbounds i8,i8*%v,i64 28
%O=bitcast i8*%N to i32*
store i32%u,i32*%O,align 4
%P=getelementptr inbounds i8,i8*%v,i64 32
%Q=bitcast i8*%P to i32*
store i32%j,i32*%Q,align 4
%R=call i8*@sml_alloc(i32 inreg 28)#0
%S=getelementptr inbounds i8,i8*%R,i64 -4
%T=bitcast i8*%S to i32*
store i32 1342177304,i32*%T,align 4
%U=load i8*,i8**%e,align 8
%V=bitcast i8*%R to i8**
store i8*%U,i8**%V,align 8
%W=getelementptr inbounds i8,i8*%R,i64 8
%X=bitcast i8*%W to void(...)**
store void(...)*bitcast(i8*(i8*,i8*)*@_SMLLN12Array__common5foldrE_175 to void(...)*),void(...)**%X,align 8
%Y=getelementptr inbounds i8,i8*%R,i64 16
%Z=bitcast i8*%Y to void(...)**
store void(...)*bitcast(i8*(i8*,i8*)*@_SMLLN12Array__common5foldrE_175 to void(...)*),void(...)**%Z,align 8
%aa=getelementptr inbounds i8,i8*%R,i64 24
%ab=bitcast i8*%aa to i32*
store i32 1,i32*%ab,align 4
ret i8*%R
}
define internal fastcc i8*@_SMLLN12Array__common5foldrE_177(i8*inreg%a,i8*inreg%b)#3 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=getelementptr inbounds i8,i8*%a,i64 12
%n=bitcast i8*%m to i32*
%o=load i32,i32*%n,align 4
%p=call i8*@sml_alloc(i32 inreg 28)#0
%q=getelementptr inbounds i8,i8*%p,i64 -4
%r=bitcast i8*%q to i32*
store i32 1342177304,i32*%r,align 4
store i8*%p,i8**%d,align 8
%s=load i8*,i8**%c,align 8
store i8*null,i8**%c,align 8
%t=bitcast i8*%p to i8**
store i8*%s,i8**%t,align 8
%u=getelementptr inbounds i8,i8*%p,i64 8
%v=bitcast i8*%u to i32*
store i32%f,i32*%v,align 4
%w=getelementptr inbounds i8,i8*%p,i64 12
%x=bitcast i8*%w to i32*
store i32%i,i32*%x,align 4
%y=getelementptr inbounds i8,i8*%p,i64 16
%z=bitcast i8*%y to i32*
store i32%l,i32*%z,align 4
%A=getelementptr inbounds i8,i8*%p,i64 20
%B=bitcast i8*%A to i32*
store i32%o,i32*%B,align 4
%C=getelementptr inbounds i8,i8*%p,i64 24
%D=bitcast i8*%C to i32*
store i32 1,i32*%D,align 4
%E=call i8*@sml_alloc(i32 inreg 28)#0
%F=getelementptr inbounds i8,i8*%E,i64 -4
%G=bitcast i8*%F to i32*
store i32 1342177304,i32*%G,align 4
%H=load i8*,i8**%d,align 8
%I=bitcast i8*%E to i8**
store i8*%H,i8**%I,align 8
%J=getelementptr inbounds i8,i8*%E,i64 8
%K=bitcast i8*%J to void(...)**
store void(...)*bitcast(i8*(i8*,i8*)*@_SMLLN12Array__common5foldrE_176 to void(...)*),void(...)**%K,align 8
%L=getelementptr inbounds i8,i8*%E,i64 16
%M=bitcast i8*%L to void(...)**
store void(...)*bitcast(i8*(i8*,i8*)*@_SMLLN12Array__common5foldrE_176 to void(...)*),void(...)**%M,align 8
%N=getelementptr inbounds i8,i8*%E,i64 24
%O=bitcast i8*%N to i32*
store i32 1,i32*%O,align 4
ret i8*%E
}
define internal fastcc void@_SMLL4loop_180(i8*inreg%a,i32 inreg%b)#4 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 i8***
br label%g
g:
%h=phi i32[%b,%i],[%aN,%aH]
%j=load atomic i32,i32*@sml_check_flag unordered,align 4
%k=icmp eq i32%j,0
br i1%k,label%m,label%l
l:
call void@sml_check(i32 inreg%j)
br label%m
m:
%n=load i8*,i8**%d,align 8
%o=getelementptr inbounds i8,i8*%n,i64 24
%p=bitcast i8*%o to i32*
%q=load i32,i32*%p,align 4
%r=add i32%q,3
%s=sub i32 0,%q
%t=and i32%r,%s
%u=add i32%q,7
%v=add i32%u,%t
%w=and i32%v,-8
%x=lshr i32%t,3
%y=getelementptr inbounds i8,i8*%n,i64 20
%z=bitcast i8*%y to i32*
%A=load i32,i32*%z,align 4
%B=shl i32%A,%x
%C=or i32%w,4
%D=getelementptr inbounds i8,i8*%n,i64 16
%E=bitcast i8*%D to i32*
%F=load i32,i32*%E,align 4
%G=icmp slt i32%h,%F
%H=bitcast i8*%n to i8**
br i1%G,label%J,label%I
I:
ret void
J:
%K=getelementptr inbounds i8,i8*%n,i64 8
%L=bitcast i8*%K to i8**
%M=load i8*,i8**%L,align 8
store i8*%M,i8**%c,align 8
%N=icmp eq i32%A,0
br i1%N,label%U,label%O
O:
store i8*null,i8**%c,align 8
%P=mul i32%q,%h
%Q=sext i32%P to i64
%R=getelementptr inbounds i8,i8*%M,i64%Q
%S=bitcast i8*%R to i8**
%T=load i8*,i8**%S,align 8
br label%ak
U:
%V=call i8*@sml_alloc(i32 inreg%q)#0
%W=getelementptr inbounds i8,i8*%V,i64 -4
%X=bitcast i8*%W to i32*
store i32%q,i32*%X,align 4
%Y=load i8*,i8**%c,align 8
store i8*null,i8**%c,align 8
%Z=mul i32%q,%h
%aa=sext i32%Z to i64
%ab=getelementptr inbounds i8,i8*%Y,i64%aa
call void@llvm.memcpy.p0i8.p0i8.i32(i8*%V,i8*%ab,i32%q,i1 false)
%ac=load i8**,i8***%f,align 8
%ad=bitcast i8**%ac to i8*
%ae=getelementptr inbounds i8*,i8**%ac,i64 3
%af=bitcast i8**%ae to i32*
%ag=load i32,i32*%af,align 4
%ah=getelementptr inbounds i8,i8*%ad,i64 20
%ai=bitcast i8*%ah to i32*
%aj=load i32,i32*%ai,align 4
br label%ak
ak:
%al=phi i32[%aj,%U],[%A,%O]
%am=phi i32[%ag,%U],[%q,%O]
%an=phi i8**[%ac,%U],[%H,%O]
%ao=phi i8*[%V,%U],[%T,%O]
store i8*%ao,i8**%c,align 8
%ap=load i8*,i8**%an,align 8
%aq=getelementptr inbounds i8,i8*%ap,i64 16
%ar=bitcast i8*%aq to i8*(i8*,i8*)**
%as=load i8*(i8*,i8*)*,i8*(i8*,i8*)**%ar,align 8
%at=bitcast i8*%ap to i8**
%au=load i8*,i8**%at,align 8
store i8*%au,i8**%e,align 8
%av=call i8*@sml_alloc(i32 inreg%C)#0
%aw=or i32%w,1342177280
%ax=bitcast i8*%av to i32*
%ay=getelementptr inbounds i8,i8*%av,i64 -4
%az=bitcast i8*%ay to i32*
store i32%aw,i32*%az,align 4
call void@llvm.memset.p0i8.i32(i8*%av,i8 0,i32%C,i1 false)
store i32%h,i32*%ax,align 4
%aA=icmp eq i32%al,0
%aB=load i8*,i8**%c,align 8
store i8*null,i8**%c,align 8
%aC=sext i32%t to i64
%aD=getelementptr inbounds i8,i8*%av,i64%aC
br i1%aA,label%aG,label%aE
aE:
%aF=bitcast i8*%aD to i8**
store i8*%aB,i8**%aF,align 8
br label%aH
aG:
call void@llvm.memcpy.p0i8.p0i8.i32(i8*%aD,i8*%aB,i32%am,i1 false)
br label%aH
aH:
%aI=sext i32%w to i64
%aJ=getelementptr inbounds i8,i8*%av,i64%aI
%aK=bitcast i8*%aJ to i32*
store i32%B,i32*%aK,align 4
%aL=load i8*,i8**%e,align 8
store i8*null,i8**%e,align 8
%aM=call fastcc i8*%as(i8*inreg%aL,i8*inreg%av)
%aN=add nsw i32%h,1
br label%g
}
define internal fastcc void@_SMLLN12Array__common4appiE_181(i8*inreg%a,i8*inreg%b)#4 gc"smlsharp"{
%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
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%h,label%j
h:
%i=bitcast i8*%b to i32*
br label%n
j:
call void@sml_check(i32 inreg%f)
%k=bitcast i8**%c to i32**
%l=load i32*,i32**%k,align 8
%m=load i8*,i8**%d,align 8
br label%n
n:
%o=phi i8*[%m,%j],[%a,%h]
%p=phi i32*[%l,%j],[%i,%h]
%q=getelementptr inbounds i32,i32*%p,i64 -1
%r=load i32,i32*%q,align 4
%s=and i32%r,268435455
%t=getelementptr inbounds i8,i8*%o,i64 12
%u=bitcast i8*%t to i32*
%v=load i32,i32*%u,align 4
%w=udiv i32%s,%v
%x=bitcast i8*%o to i8**
%y=load i8*,i8**%x,align 8
store i8*%y,i8**%e,align 8
%z=getelementptr inbounds i8,i8*%o,i64 8
%A=bitcast i8*%z to i32*
%B=load i32,i32*%A,align 4
store i8*null,i8**%d,align 8
%C=call i8*@sml_alloc(i32 inreg 36)#0
%D=getelementptr inbounds i8,i8*%C,i64 -4
%E=bitcast i8*%D to i32*
store i32 1342177312,i32*%E,align 4
store i8*%C,i8**%d,align 8
%F=load i8*,i8**%e,align 8
store i8*null,i8**%e,align 8
%G=bitcast i8*%C to i8**
store i8*%F,i8**%G,align 8
%H=load i8*,i8**%c,align 8
store i8*null,i8**%c,align 8
%I=getelementptr inbounds i8,i8*%C,i64 8
%J=bitcast i8*%I to i8**
store i8*%H,i8**%J,align 8
%K=getelementptr inbounds i8,i8*%C,i64 16
%L=bitcast i8*%K to i32*
store i32%w,i32*%L,align 4
%M=getelementptr inbounds i8,i8*%C,i64 20
%N=bitcast i8*%M to i32*
store i32%B,i32*%N,align 4
%O=getelementptr inbounds i8,i8*%C,i64 24
%P=bitcast i8*%O to i32*
store i32%v,i32*%P,align 4
%Q=getelementptr inbounds i8,i8*%C,i64 32
%R=bitcast i8*%Q to i32*
store i32 3,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**%d,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(void(i8*,i32)*@_SMLL4loop_180 to void(...)*),void(...)**%Y,align 8
%Z=getelementptr inbounds i8,i8*%S,i64 16
%aa=bitcast i8*%Z to void(...)**
store void(...)*bitcast(i8*(i8*,i8*)*@_SMLL4loop_309 to void(...)*),void(...)**%aa,align 8
%ab=getelementptr inbounds i8,i8*%S,i64 24
%ac=bitcast i8*%ab to i32*
store i32 -2147483647,i32*%ac,align 4
tail call fastcc void@_SMLL4loop_180(i8*inreg%V,i32 inreg 0)
ret void
}
define internal fastcc i8*@_SMLLN12Array__common4appiE_182(i8*inreg%a,i8*inreg%b)#3 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=call i8*@sml_alloc(i32 inreg 20)#0
%k=getelementptr inbounds i8,i8*%j,i64 -4
%l=bitcast i8*%k to i32*
store i32 1342177296,i32*%l,align 4
store i8*%j,i8**%d,align 8
%m=load i8*,i8**%c,align 8
store i8*null,i8**%c,align 8
%n=bitcast i8*%j to i8**
store i8*%m,i8**%n,align 8
%o=getelementptr inbounds i8,i8*%j,i64 8
%p=bitcast i8*%o to i32*
store i32%f,i32*%p,align 4
%q=getelementptr inbounds i8,i8*%j,i64 12
%r=bitcast i8*%q to i32*
store i32%i,i32*%r,align 4
%s=getelementptr inbounds i8,i8*%j,i64 16
%t=bitcast i8*%s to i32*
store i32 1,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**%d,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(void(i8*,i8*)*@_SMLLN12Array__common4appiE_181 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*)*@_SMLLN12Array__common4appiE_310 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
ret i8*%u
}
define internal fastcc void@_SMLL4loop_185(i8*inreg%a,i32 inreg%b)#4 gc"smlsharp"{
h:
%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*%a,i8**%d,align 8
%e=bitcast i8**%d to i8***
br label%f
f:
%g=phi i32[%b,%h],[%ad,%T]
%i=load atomic i32,i32*@sml_check_flag unordered,align 4
%j=icmp eq i32%i,0
br i1%j,label%l,label%k
k:
call void@sml_check(i32 inreg%i)
br label%l
l:
%m=load i8*,i8**%d,align 8
%n=getelementptr inbounds i8,i8*%m,i64 16
%o=bitcast i8*%n to i32*
%p=load i32,i32*%o,align 4
%q=icmp slt i32%g,%p
%r=bitcast i8*%m to i8**
br i1%q,label%t,label%s
s:
ret void
t:
%u=getelementptr inbounds i8,i8*%m,i64 8
%v=bitcast i8*%u to i8**
%w=load i8*,i8**%v,align 8
store i8*%w,i8**%c,align 8
%x=getelementptr inbounds i8,i8*%m,i64 24
%y=bitcast i8*%x to i32*
%z=load i32,i32*%y,align 4
%A=getelementptr inbounds i8,i8*%m,i64 20
%B=bitcast i8*%A to i32*
%C=load i32,i32*%B,align 4
%D=icmp eq i32%C,0
br i1%D,label%K,label%E
E:
store i8*null,i8**%c,align 8
%F=mul i32%z,%g
%G=sext i32%F to i64
%H=getelementptr inbounds i8,i8*%w,i64%G
%I=bitcast i8*%H to i8**
%J=load i8*,i8**%I,align 8
br label%T
K:
%L=call i8*@sml_alloc(i32 inreg%z)#0
%M=getelementptr inbounds i8,i8*%L,i64 -4
%N=bitcast i8*%M to i32*
store i32%z,i32*%N,align 4
%O=load i8*,i8**%c,align 8
store i8*null,i8**%c,align 8
%P=mul i32%z,%g
%Q=sext i32%P to i64
%R=getelementptr inbounds i8,i8*%O,i64%Q
call void@llvm.memcpy.p0i8.p0i8.i32(i8*%L,i8*%R,i32%z,i1 false)
%S=load i8**,i8***%e,align 8
br label%T
T:
%U=phi i8**[%r,%E],[%S,%K]
%V=phi i8*[%J,%E],[%L,%K]
%W=load i8*,i8**%U,align 8
%X=getelementptr inbounds i8,i8*%W,i64 16
%Y=bitcast i8*%X to i8*(i8*,i8*)**
%Z=load i8*(i8*,i8*)*,i8*(i8*,i8*)**%Y,align 8
%aa=bitcast i8*%W to i8**
%ab=load i8*,i8**%aa,align 8
%ac=call fastcc i8*%Z(i8*inreg%ab,i8*inreg%V)
%ad=add nsw i32%g,1
br label%f
}
define internal fastcc void@_SMLLN12Array__common3appE_186(i8*inreg%a,i8*inreg%b)#4 gc"smlsharp"{
%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
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%h,label%j
h:
%i=bitcast i8*%b to i32*
br label%n
j:
call void@sml_check(i32 inreg%f)
%k=bitcast i8**%c to i32**
%l=load i32*,i32**%k,align 8
%m=load i8*,i8**%d,align 8
br label%n
n:
%o=phi i8*[%m,%j],[%a,%h]
%p=phi i32*[%l,%j],[%i,%h]
%q=getelementptr inbounds i32,i32*%p,i64 -1
%r=load i32,i32*%q,align 4
%s=and i32%r,268435455
%t=getelementptr inbounds i8,i8*%o,i64 12
%u=bitcast i8*%t to i32*
%v=load i32,i32*%u,align 4
%w=udiv i32%s,%v
%x=bitcast i8*%o to i8**
%y=load i8*,i8**%x,align 8
store i8*%y,i8**%e,align 8
%z=getelementptr inbounds i8,i8*%o,i64 8
%A=bitcast i8*%z to i32*
%B=load i32,i32*%A,align 4
store i8*null,i8**%d,align 8
%C=call i8*@sml_alloc(i32 inreg 36)#0
%D=getelementptr inbounds i8,i8*%C,i64 -4
%E=bitcast i8*%D to i32*
store i32 1342177312,i32*%E,align 4
store i8*%C,i8**%d,align 8
%F=load i8*,i8**%e,align 8
store i8*null,i8**%e,align 8
%G=bitcast i8*%C to i8**
store i8*%F,i8**%G,align 8
%H=load i8*,i8**%c,align 8
store i8*null,i8**%c,align 8
%I=getelementptr inbounds i8,i8*%C,i64 8
%J=bitcast i8*%I to i8**
store i8*%H,i8**%J,align 8
%K=getelementptr inbounds i8,i8*%C,i64 16
%L=bitcast i8*%K to i32*
store i32%w,i32*%L,align 4
%M=getelementptr inbounds i8,i8*%C,i64 20
%N=bitcast i8*%M to i32*
store i32%B,i32*%N,align 4
%O=getelementptr inbounds i8,i8*%C,i64 24
%P=bitcast i8*%O to i32*
store i32%v,i32*%P,align 4
%Q=getelementptr inbounds i8,i8*%C,i64 32
%R=bitcast i8*%Q to i32*
store i32 3,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**%d,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(void(i8*,i32)*@_SMLL4loop_185 to void(...)*),void(...)**%Y,align 8
%Z=getelementptr inbounds i8,i8*%S,i64 16
%aa=bitcast i8*%Z to void(...)**
store void(...)*bitcast(i8*(i8*,i8*)*@_SMLL4loop_312 to void(...)*),void(...)**%aa,align 8
%ab=getelementptr inbounds i8,i8*%S,i64 24
%ac=bitcast i8*%ab to i32*
store i32 -2147483647,i32*%ac,align 4
tail call fastcc void@_SMLL4loop_185(i8*inreg%V,i32 inreg 0)
ret void
}
define internal fastcc i8*@_SMLLN12Array__common3appE_187(i8*inreg%a,i8*inreg%b)#3 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=call i8*@sml_alloc(i32 inreg 20)#0
%k=getelementptr inbounds i8,i8*%j,i64 -4
%l=bitcast i8*%k to i32*
store i32 1342177296,i32*%l,align 4
store i8*%j,i8**%d,align 8
%m=load i8*,i8**%c,align 8
store i8*null,i8**%c,align 8
%n=bitcast i8*%j to i8**
store i8*%m,i8**%n,align 8
%o=getelementptr inbounds i8,i8*%j,i64 8
%p=bitcast i8*%o to i32*
store i32%f,i32*%p,align 4
%q=getelementptr inbounds i8,i8*%j,i64 12
%r=bitcast i8*%q to i32*
store i32%i,i32*%r,align 4
%s=getelementptr inbounds i8,i8*%j,i64 16
%t=bitcast i8*%s to i32*
store i32 1,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**%d,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(void(i8*,i8*)*@_SMLLN12Array__common3appE_186 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*)*@_SMLLN12Array__common3appE_313 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
ret i8*%u
}
define internal fastcc void@_SMLL4loop_190(i8*inreg%a,i32 inreg%b)#4 gc"smlsharp"{
i:
%c=alloca i8*,align 8
%d=alloca i8*,align 8
%e=alloca i8*,align 8
%f=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
call void@llvm.gcroot(i8**%f,i8*null)#0
store i8*%a,i8**%e,align 8
br label%g
g:
%h=phi i32[%b,%i],[%a6,%a5]
%j=load atomic i32,i32*@sml_check_flag unordered,align 4
%k=icmp eq i32%j,0
br i1%k,label%m,label%l
l:
call void@sml_check(i32 inreg%j)
br label%m
m:
%n=load i8*,i8**%e,align 8
%o=getelementptr inbounds i8,i8*%n,i64 24
%p=bitcast i8*%o to i32*
%q=load i32,i32*%p,align 4
%r=add i32%q,3
%s=sub i32 0,%q
%t=and i32%r,%s
%u=add i32%q,7
%v=add i32%u,%t
%w=and i32%v,-8
%x=lshr i32%t,3
%y=getelementptr inbounds i8,i8*%n,i64 20
%z=bitcast i8*%y to i32*
%A=load i32,i32*%z,align 4
%B=shl i32%A,%x
%C=or i32%w,4
%D=getelementptr inbounds i8,i8*%n,i64 16
%E=bitcast i8*%D to i32*
%F=load i32,i32*%E,align 4
%G=icmp slt i32%h,%F
br i1%G,label%I,label%H
H:
ret void
I:
%J=getelementptr inbounds i8,i8*%n,i64 8
%K=bitcast i8*%J to i8**
%L=load i8*,i8**%K,align 8
store i8*%L,i8**%c,align 8
%M=icmp eq i32%A,0
br i1%M,label%T,label%N
N:
store i8*null,i8**%c,align 8
%O=mul i32%q,%h
%P=sext i32%O to i64
%Q=getelementptr inbounds i8,i8*%L,i64%P
%R=bitcast i8*%Q to i8**
%S=load i8*,i8**%R,align 8
br label%al
T:
%U=call i8*@sml_alloc(i32 inreg%q)#0
%V=getelementptr inbounds i8,i8*%U,i64 -4
%W=bitcast i8*%V to i32*
store i32%q,i32*%W,align 4
%X=load i8*,i8**%c,align 8
store i8*null,i8**%c,align 8
%Y=mul i32%q,%h
%Z=sext i32%Y to i64
%aa=getelementptr inbounds i8,i8*%X,i64%Z
call void@llvm.memcpy.p0i8.p0i8.i32(i8*%U,i8*%aa,i32%q,i1 false)
%ab=load i8*,i8**%e,align 8
%ac=getelementptr inbounds i8,i8*%ab,i64 8
%ad=bitcast i8*%ac to i8**
%ae=load i8*,i8**%ad,align 8
%af=getelementptr inbounds i8,i8*%ab,i64 24
%ag=bitcast i8*%af to i32*
%ah=load i32,i32*%ag,align 4
%ai=getelementptr inbounds i8,i8*%ab,i64 20
%aj=bitcast i8*%ai to i32*
%ak=load i32,i32*%aj,align 4
br label%al
al:
%am=phi i32[%ak,%T],[%A,%N]
%an=phi i32[%ah,%T],[%q,%N]
%ao=phi i8*[%ae,%T],[%L,%N]
%ap=phi i8*[%ab,%T],[%n,%N]
%aq=phi i8*[%U,%T],[%S,%N]
store i8*%aq,i8**%c,align 8
store i8*%ao,i8**%d,align 8
%ar=bitcast i8*%ap to i8**
%as=load i8*,i8**%ar,align 8
%at=getelementptr inbounds i8,i8*%as,i64 16
%au=bitcast i8*%at to i8*(i8*,i8*)**
%av=load i8*(i8*,i8*)*,i8*(i8*,i8*)**%au,align 8
%aw=bitcast i8*%as to i8**
%ax=load i8*,i8**%aw,align 8
store i8*%ax,i8**%f,align 8
%ay=call i8*@sml_alloc(i32 inreg%C)#0
%az=or i32%w,1342177280
%aA=bitcast i8*%ay to i32*
%aB=getelementptr inbounds i8,i8*%ay,i64 -4
%aC=bitcast i8*%aB to i32*
store i32%az,i32*%aC,align 4
call void@llvm.memset.p0i8.i32(i8*%ay,i8 0,i32%C,i1 false)
store i32%h,i32*%aA,align 4
%aD=icmp eq i32%am,0
%aE=load i8*,i8**%c,align 8
store i8*null,i8**%c,align 8
%aF=sext i32%t to i64
%aG=getelementptr inbounds i8,i8*%ay,i64%aF
br i1%aD,label%aJ,label%aH
aH:
%aI=bitcast i8*%aG to i8**
store i8*%aE,i8**%aI,align 8
br label%aK
aJ:
call void@llvm.memcpy.p0i8.p0i8.i32(i8*%aG,i8*%aE,i32%an,i1 false)
br label%aK
aK:
%aL=sext i32%w to i64
%aM=getelementptr inbounds i8,i8*%ay,i64%aL
%aN=bitcast i8*%aM to i32*
store i32%B,i32*%aN,align 4
%aO=load i8*,i8**%f,align 8
store i8*null,i8**%f,align 8
%aP=call fastcc i8*%av(i8*inreg%aO,i8*inreg%ay)
%aQ=load i8*,i8**%e,align 8
%aR=getelementptr inbounds i8,i8*%aQ,i64 24
%aS=bitcast i8*%aR to i32*
%aT=load i32,i32*%aS,align 4
%aU=getelementptr inbounds i8,i8*%aQ,i64 20
%aV=bitcast i8*%aU to i32*
%aW=load i32,i32*%aV,align 4
%aX=icmp eq i32%aW,0
%aY=load i8*,i8**%d,align 8
store i8*null,i8**%d,align 8
%aZ=mul i32%aT,%h
%a0=sext i32%aZ to i64
%a1=getelementptr inbounds i8,i8*%aY,i64%a0
br i1%aX,label%a4,label%a2
a2:
%a3=bitcast i8*%a1 to i8**
call void@sml_write(i8*inreg%aY,i8**inreg%a3,i8*inreg%aP)#0
br label%a5
a4:
call void@llvm.memcpy.p0i8.p0i8.i32(i8*%a1,i8*%aP,i32%aT,i1 false)
br label%a5
a5:
%a6=add nsw i32%h,1
br label%g
}
define internal fastcc void@_SMLLN12Array__common7modifyiE_191(i8*inreg%a,i8*inreg%b)#4 gc"smlsharp"{
%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
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%h,label%j
h:
%i=bitcast i8*%b to i32*
br label%n
j:
call void@sml_check(i32 inreg%f)
%k=bitcast i8**%c to i32**
%l=load i32*,i32**%k,align 8
%m=load i8*,i8**%d,align 8
br label%n
n:
%o=phi i8*[%m,%j],[%a,%h]
%p=phi i32*[%l,%j],[%i,%h]
%q=getelementptr inbounds i32,i32*%p,i64 -1
%r=load i32,i32*%q,align 4
%s=and i32%r,268435455
%t=getelementptr inbounds i8,i8*%o,i64 12
%u=bitcast i8*%t to i32*
%v=load i32,i32*%u,align 4
%w=udiv i32%s,%v
%x=bitcast i8*%o to i8**
%y=load i8*,i8**%x,align 8
store i8*%y,i8**%e,align 8
%z=getelementptr inbounds i8,i8*%o,i64 8
%A=bitcast i8*%z to i32*
%B=load i32,i32*%A,align 4
store i8*null,i8**%d,align 8
%C=call i8*@sml_alloc(i32 inreg 36)#0
%D=getelementptr inbounds i8,i8*%C,i64 -4
%E=bitcast i8*%D to i32*
store i32 1342177312,i32*%E,align 4
store i8*%C,i8**%d,align 8
%F=load i8*,i8**%e,align 8
store i8*null,i8**%e,align 8
%G=bitcast i8*%C to i8**
store i8*%F,i8**%G,align 8
%H=load i8*,i8**%c,align 8
store i8*null,i8**%c,align 8
%I=getelementptr inbounds i8,i8*%C,i64 8
%J=bitcast i8*%I to i8**
store i8*%H,i8**%J,align 8
%K=getelementptr inbounds i8,i8*%C,i64 16
%L=bitcast i8*%K to i32*
store i32%w,i32*%L,align 4
%M=getelementptr inbounds i8,i8*%C,i64 20
%N=bitcast i8*%M to i32*
store i32%B,i32*%N,align 4
%O=getelementptr inbounds i8,i8*%C,i64 24
%P=bitcast i8*%O to i32*
store i32%v,i32*%P,align 4
%Q=getelementptr inbounds i8,i8*%C,i64 32
%R=bitcast i8*%Q to i32*
store i32 3,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**%d,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(void(i8*,i32)*@_SMLL4loop_190 to void(...)*),void(...)**%Y,align 8
%Z=getelementptr inbounds i8,i8*%S,i64 16
%aa=bitcast i8*%Z to void(...)**
store void(...)*bitcast(i8*(i8*,i8*)*@_SMLL4loop_315 to void(...)*),void(...)**%aa,align 8
%ab=getelementptr inbounds i8,i8*%S,i64 24
%ac=bitcast i8*%ab to i32*
store i32 -2147483647,i32*%ac,align 4
tail call fastcc void@_SMLL4loop_190(i8*inreg%V,i32 inreg 0)
ret void
}
define internal fastcc i8*@_SMLLN12Array__common7modifyiE_192(i8*inreg%a,i8*inreg%b)#3 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=call i8*@sml_alloc(i32 inreg 20)#0
%k=getelementptr inbounds i8,i8*%j,i64 -4
%l=bitcast i8*%k to i32*
store i32 1342177296,i32*%l,align 4
store i8*%j,i8**%d,align 8
%m=load i8*,i8**%c,align 8
store i8*null,i8**%c,align 8
%n=bitcast i8*%j to i8**
store i8*%m,i8**%n,align 8
%o=getelementptr inbounds i8,i8*%j,i64 8
%p=bitcast i8*%o to i32*
store i32%f,i32*%p,align 4
%q=getelementptr inbounds i8,i8*%j,i64 12
%r=bitcast i8*%q to i32*
store i32%i,i32*%r,align 4
%s=getelementptr inbounds i8,i8*%j,i64 16
%t=bitcast i8*%s to i32*
store i32 1,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**%d,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(void(i8*,i8*)*@_SMLLN12Array__common7modifyiE_191 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*)*@_SMLLN12Array__common7modifyiE_316 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
ret i8*%u
}
define internal fastcc void@_SMLL4loop_195(i8*inreg%a,i32 inreg%b)#4 gc"smlsharp"{
g:
%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*%a,i8**%d,align 8
br label%e
e:
%f=phi i32[%b,%g],[%aw,%av]
%h=load atomic i32,i32*@sml_check_flag unordered,align 4
%i=icmp eq i32%h,0
br i1%i,label%k,label%j
j:
call void@sml_check(i32 inreg%h)
br label%k
k:
%l=load i8*,i8**%d,align 8
%m=getelementptr inbounds i8,i8*%l,i64 16
%n=bitcast i8*%m to i32*
%o=load i32,i32*%n,align 4
%p=icmp slt i32%f,%o
br i1%p,label%r,label%q
q:
ret void
r:
%s=getelementptr inbounds i8,i8*%l,i64 8
%t=bitcast i8*%s to i8**
%u=load i8*,i8**%t,align 8
store i8*%u,i8**%c,align 8
%v=getelementptr inbounds i8,i8*%l,i64 24
%w=bitcast i8*%v to i32*
%x=load i32,i32*%w,align 4
%y=getelementptr inbounds i8,i8*%l,i64 20
%z=bitcast i8*%y to i32*
%A=load i32,i32*%z,align 4
%B=icmp eq i32%A,0
br i1%B,label%I,label%C
C:
%D=mul i32%x,%f
%E=sext i32%D to i64
%F=getelementptr inbounds i8,i8*%u,i64%E
%G=bitcast i8*%F to i8**
%H=load i8*,i8**%G,align 8
br label%U
I:
%J=call i8*@sml_alloc(i32 inreg%x)#0
%K=getelementptr inbounds i8,i8*%J,i64 -4
%L=bitcast i8*%K to i32*
store i32%x,i32*%L,align 4
%M=load i8*,i8**%c,align 8
%N=mul i32%x,%f
%O=sext i32%N to i64
%P=getelementptr inbounds i8,i8*%M,i64%O
call void@llvm.memcpy.p0i8.p0i8.i32(i8*%J,i8*%P,i32%x,i1 false)
%Q=load i8*,i8**%d,align 8
%R=getelementptr inbounds i8,i8*%Q,i64 8
%S=bitcast i8*%R to i8**
%T=load i8*,i8**%S,align 8
br label%U
U:
%V=phi i8*[%u,%C],[%T,%I]
%W=phi i8*[%l,%C],[%Q,%I]
%X=phi i8*[%H,%C],[%J,%I]
store i8*%V,i8**%c,align 8
%Y=bitcast i8*%W to i8**
%Z=load i8*,i8**%Y,align 8
%aa=getelementptr inbounds i8,i8*%Z,i64 16
%ab=bitcast i8*%aa to i8*(i8*,i8*)**
%ac=load i8*(i8*,i8*)*,i8*(i8*,i8*)**%ab,align 8
%ad=bitcast i8*%Z to i8**
%ae=load i8*,i8**%ad,align 8
%af=call fastcc i8*%ac(i8*inreg%ae,i8*inreg%X)
%ag=load i8*,i8**%d,align 8
%ah=getelementptr inbounds i8,i8*%ag,i64 24
%ai=bitcast i8*%ah to i32*
%aj=load i32,i32*%ai,align 4
%ak=getelementptr inbounds i8,i8*%ag,i64 20
%al=bitcast i8*%ak to i32*
%am=load i32,i32*%al,align 4
%an=icmp eq i32%am,0
%ao=load i8*,i8**%c,align 8
store i8*null,i8**%c,align 8
%ap=mul i32%aj,%f
%aq=sext i32%ap to i64
%ar=getelementptr inbounds i8,i8*%ao,i64%aq
br i1%an,label%au,label%as
as:
%at=bitcast i8*%ar to i8**
call void@sml_write(i8*inreg%ao,i8**inreg%at,i8*inreg%af)#0
br label%av
au:
call void@llvm.memcpy.p0i8.p0i8.i32(i8*%ar,i8*%af,i32%aj,i1 false)
br label%av
av:
%aw=add nsw i32%f,1
br label%e
}
define internal fastcc void@_SMLLN12Array__common6modifyE_196(i8*inreg%a,i8*inreg%b)#4 gc"smlsharp"{
%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
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%h,label%j
h:
%i=bitcast i8*%b to i32*
br label%n
j:
call void@sml_check(i32 inreg%f)
%k=bitcast i8**%c to i32**
%l=load i32*,i32**%k,align 8
%m=load i8*,i8**%d,align 8
br label%n
n:
%o=phi i8*[%m,%j],[%a,%h]
%p=phi i32*[%l,%j],[%i,%h]
%q=getelementptr inbounds i32,i32*%p,i64 -1
%r=load i32,i32*%q,align 4
%s=and i32%r,268435455
%t=getelementptr inbounds i8,i8*%o,i64 12
%u=bitcast i8*%t to i32*
%v=load i32,i32*%u,align 4
%w=udiv i32%s,%v
%x=bitcast i8*%o to i8**
%y=load i8*,i8**%x,align 8
store i8*%y,i8**%e,align 8
%z=getelementptr inbounds i8,i8*%o,i64 8
%A=bitcast i8*%z to i32*
%B=load i32,i32*%A,align 4
store i8*null,i8**%d,align 8
%C=call i8*@sml_alloc(i32 inreg 36)#0
%D=getelementptr inbounds i8,i8*%C,i64 -4
%E=bitcast i8*%D to i32*
store i32 1342177312,i32*%E,align 4
store i8*%C,i8**%d,align 8
%F=load i8*,i8**%e,align 8
store i8*null,i8**%e,align 8
%G=bitcast i8*%C to i8**
store i8*%F,i8**%G,align 8
%H=load i8*,i8**%c,align 8
store i8*null,i8**%c,align 8
%I=getelementptr inbounds i8,i8*%C,i64 8
%J=bitcast i8*%I to i8**
store i8*%H,i8**%J,align 8
%K=getelementptr inbounds i8,i8*%C,i64 16
%L=bitcast i8*%K to i32*
store i32%w,i32*%L,align 4
%M=getelementptr inbounds i8,i8*%C,i64 20
%N=bitcast i8*%M to i32*
store i32%B,i32*%N,align 4
%O=getelementptr inbounds i8,i8*%C,i64 24
%P=bitcast i8*%O to i32*
store i32%v,i32*%P,align 4
%Q=getelementptr inbounds i8,i8*%C,i64 32
%R=bitcast i8*%Q to i32*
store i32 3,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**%d,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(void(i8*,i32)*@_SMLL4loop_195 to void(...)*),void(...)**%Y,align 8
%Z=getelementptr inbounds i8,i8*%S,i64 16
%aa=bitcast i8*%Z to void(...)**
store void(...)*bitcast(i8*(i8*,i8*)*@_SMLL4loop_318 to void(...)*),void(...)**%aa,align 8
%ab=getelementptr inbounds i8,i8*%S,i64 24
%ac=bitcast i8*%ab to i32*
store i32 -2147483647,i32*%ac,align 4
tail call fastcc void@_SMLL4loop_195(i8*inreg%V,i32 inreg 0)
ret void
}
define internal fastcc i8*@_SMLLN12Array__common6modifyE_197(i8*inreg%a,i8*inreg%b)#3 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=call i8*@sml_alloc(i32 inreg 20)#0
%k=getelementptr inbounds i8,i8*%j,i64 -4
%l=bitcast i8*%k to i32*
store i32 1342177296,i32*%l,align 4
store i8*%j,i8**%d,align 8
%m=load i8*,i8**%c,align 8
store i8*null,i8**%c,align 8
%n=bitcast i8*%j to i8**
store i8*%m,i8**%n,align 8
%o=getelementptr inbounds i8,i8*%j,i64 8
%p=bitcast i8*%o to i32*
store i32%f,i32*%p,align 4
%q=getelementptr inbounds i8,i8*%j,i64 12
%r=bitcast i8*%q to i32*
store i32%i,i32*%r,align 4
%s=getelementptr inbounds i8,i8*%j,i64 16
%t=bitcast i8*%s to i32*
store i32 1,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**%d,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(void(i8*,i8*)*@_SMLLN12Array__common6modifyE_196 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*)*@_SMLLN12Array__common6modifyE_319 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
ret i8*%u
}
define internal fastcc i8*@_SMLL4loop_200(i8*inreg%a,i32 inreg%b)#4 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 i8***
br label%g
g:
%h=phi i32[%b,%i],[%bj,%bi]
%j=load atomic i32,i32*@sml_check_flag unordered,align 4
%k=icmp eq i32%j,0
br i1%k,label%m,label%l
l:
call void@sml_check(i32 inreg%j)
br label%m
m:
%n=load i8*,i8**%d,align 8
%o=getelementptr inbounds i8,i8*%n,i64 24
%p=bitcast i8*%o to i32*
%q=load i32,i32*%p,align 4
%r=add i32%q,3
%s=sub i32 0,%q
%t=and i32%r,%s
%u=add i32%q,7
%v=add i32%u,%t
%w=and i32%v,-8
%x=lshr i32%t,3
%y=getelementptr inbounds i8,i8*%n,i64 20
%z=bitcast i8*%y to i32*
%A=load i32,i32*%z,align 4
%B=shl i32%A,%x
%C=or i32%w,4
%D=getelementptr inbounds i8,i8*%n,i64 16
%E=bitcast i8*%D to i32*
%F=load i32,i32*%E,align 4
%G=icmp slt i32%h,%F
%H=bitcast i8*%n to i8**
br i1%G,label%J,label%I
I:
ret i8*null
J:
%K=getelementptr inbounds i8,i8*%n,i64 8
%L=bitcast i8*%K to i8**
%M=load i8*,i8**%L,align 8
store i8*%M,i8**%c,align 8
%N=icmp eq i32%A,0
br i1%N,label%U,label%O
O:
store i8*null,i8**%c,align 8
%P=mul i32%q,%h
%Q=sext i32%P to i64
%R=getelementptr inbounds i8,i8*%M,i64%Q
%S=bitcast i8*%R to i8**
%T=load i8*,i8**%S,align 8
br label%ak
U:
%V=call i8*@sml_alloc(i32 inreg%q)#0
%W=getelementptr inbounds i8,i8*%V,i64 -4
%X=bitcast i8*%W to i32*
store i32%q,i32*%X,align 4
%Y=load i8*,i8**%c,align 8
store i8*null,i8**%c,align 8
%Z=mul i32%q,%h
%aa=sext i32%Z to i64
%ab=getelementptr inbounds i8,i8*%Y,i64%aa
call void@llvm.memcpy.p0i8.p0i8.i32(i8*%V,i8*%ab,i32%q,i1 false)
%ac=load i8**,i8***%f,align 8
%ad=bitcast i8**%ac to i8*
%ae=getelementptr inbounds i8*,i8**%ac,i64 3
%af=bitcast i8**%ae to i32*
%ag=load i32,i32*%af,align 4
%ah=getelementptr inbounds i8,i8*%ad,i64 20
%ai=bitcast i8*%ah to i32*
%aj=load i32,i32*%ai,align 4
br label%ak
ak:
%al=phi i32[%aj,%U],[%A,%O]
%am=phi i32[%ag,%U],[%q,%O]
%an=phi i8**[%ac,%U],[%H,%O]
%ao=phi i8*[%V,%U],[%T,%O]
store i8*%ao,i8**%c,align 8
%ap=load i8*,i8**%an,align 8
%aq=getelementptr inbounds i8,i8*%ap,i64 16
%ar=bitcast i8*%aq to i8*(i8*,i8*)**
%as=load i8*(i8*,i8*)*,i8*(i8*,i8*)**%ar,align 8
%at=bitcast i8*%ap to i8**
%au=load i8*,i8**%at,align 8
store i8*%au,i8**%e,align 8
%av=call i8*@sml_alloc(i32 inreg%C)#0
%aw=or i32%w,1342177280
%ax=bitcast i8*%av to i32*
%ay=getelementptr inbounds i8,i8*%av,i64 -4
%az=bitcast i8*%ay to i32*
store i32%aw,i32*%az,align 4
call void@llvm.memset.p0i8.i32(i8*%av,i8 0,i32%C,i1 false)
store i32%h,i32*%ax,align 4
%aA=icmp eq i32%al,0
%aB=load i8*,i8**%c,align 8
%aC=sext i32%t to i64
%aD=getelementptr inbounds i8,i8*%av,i64%aC
br i1%aA,label%aG,label%aE
aE:
%aF=bitcast i8*%aD to i8**
store i8*%aB,i8**%aF,align 8
br label%aH
aG:
call void@llvm.memcpy.p0i8.p0i8.i32(i8*%aD,i8*%aB,i32%am,i1 false)
br label%aH
aH:
%aI=sext i32%w to i64
%aJ=getelementptr inbounds i8,i8*%av,i64%aI
%aK=bitcast i8*%aJ to i32*
store i32%B,i32*%aK,align 4
%aL=load i8*,i8**%e,align 8
store i8*null,i8**%e,align 8
%aM=call fastcc i8*%as(i8*inreg%aL,i8*inreg%av)
%aN=bitcast i8*%aM to i32*
%aO=load i32,i32*%aN,align 4
%aP=icmp eq i32%aO,0
br i1%aP,label%bi,label%aQ
aQ:
%aR=load i8*,i8**%d,align 8
%aS=getelementptr inbounds i8,i8*%aR,i64 24
%aT=bitcast i8*%aS to i32*
%aU=load i32,i32*%aT,align 4
store i8*null,i8**%d,align 8
%aV=getelementptr inbounds i8,i8*%aR,i64 20
%aW=bitcast i8*%aV to i32*
%aX=load i32,i32*%aW,align 4
%aY=call i8*@sml_alloc(i32 inreg%C)#0
%aZ=getelementptr inbounds i8,i8*%aY,i64 -4
%a0=bitcast i8*%aZ to i32*
store i32%aw,i32*%a0,align 4
store i8*%aY,i8**%d,align 8
call void@llvm.memset.p0i8.i32(i8*%aY,i8 0,i32%C,i1 false)
%a1=bitcast i8*%aY to i32*
store i32%h,i32*%a1,align 4
%a2=icmp eq i32%aX,0
%a3=load i8*,i8**%c,align 8
store i8*null,i8**%c,align 8
%a4=getelementptr inbounds i8,i8*%aY,i64%aC
br i1%a2,label%a7,label%a5
a5:
%a6=bitcast i8*%a4 to i8**
store i8*%a3,i8**%a6,align 8
br label%a8
a7:
call void@llvm.memcpy.p0i8.p0i8.i32(i8*%a4,i8*%a3,i32%aU,i1 false)
br label%a8
a8:
%a9=getelementptr inbounds i8,i8*%aY,i64%aI
%ba=bitcast i8*%a9 to i32*
store i32%B,i32*%ba,align 4
%bb=call i8*@sml_alloc(i32 inreg 12)#0
%bc=getelementptr inbounds i8,i8*%bb,i64 -4
%bd=bitcast i8*%bc to i32*
store i32 1342177288,i32*%bd,align 4
%be=load i8*,i8**%d,align 8
%bf=bitcast i8*%bb to i8**
store i8*%be,i8**%bf,align 8
%bg=getelementptr inbounds i8,i8*%bb,i64 8
%bh=bitcast i8*%bg to i32*
store i32 1,i32*%bh,align 4
ret i8*%bb
bi:
store i8*null,i8**%c,align 8
%bj=add nsw i32%h,1
br label%g
}
define internal fastcc i8*@_SMLLN12Array__common5findiE_201(i8*inreg%a,i8*inreg%b)#4 gc"smlsharp"{
%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
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%h,label%j
h:
%i=bitcast i8*%b to i32*
br label%n
j:
call void@sml_check(i32 inreg%f)
%k=bitcast i8**%c to i32**
%l=load i32*,i32**%k,align 8
%m=load i8*,i8**%d,align 8
br label%n
n:
%o=phi i8*[%m,%j],[%a,%h]
%p=phi i32*[%l,%j],[%i,%h]
%q=getelementptr inbounds i32,i32*%p,i64 -1
%r=load i32,i32*%q,align 4
%s=and i32%r,268435455
%t=getelementptr inbounds i8,i8*%o,i64 12
%u=bitcast i8*%t to i32*
%v=load i32,i32*%u,align 4
%w=udiv i32%s,%v
%x=bitcast i8*%o to i8**
%y=load i8*,i8**%x,align 8
store i8*%y,i8**%e,align 8
%z=getelementptr inbounds i8,i8*%o,i64 8
%A=bitcast i8*%z to i32*
%B=load i32,i32*%A,align 4
store i8*null,i8**%d,align 8
%C=call i8*@sml_alloc(i32 inreg 36)#0
%D=getelementptr inbounds i8,i8*%C,i64 -4
%E=bitcast i8*%D to i32*
store i32 1342177312,i32*%E,align 4
store i8*%C,i8**%d,align 8
%F=load i8*,i8**%e,align 8
store i8*null,i8**%e,align 8
%G=bitcast i8*%C to i8**
store i8*%F,i8**%G,align 8
%H=load i8*,i8**%c,align 8
store i8*null,i8**%c,align 8
%I=getelementptr inbounds i8,i8*%C,i64 8
%J=bitcast i8*%I to i8**
store i8*%H,i8**%J,align 8
%K=getelementptr inbounds i8,i8*%C,i64 16
%L=bitcast i8*%K to i32*
store i32%w,i32*%L,align 4
%M=getelementptr inbounds i8,i8*%C,i64 20
%N=bitcast i8*%M to i32*
store i32%B,i32*%N,align 4
%O=getelementptr inbounds i8,i8*%C,i64 24
%P=bitcast i8*%O to i32*
store i32%v,i32*%P,align 4
%Q=getelementptr inbounds i8,i8*%C,i64 32
%R=bitcast i8*%Q to i32*
store i32 3,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**%d,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*,i32)*@_SMLL4loop_200 to void(...)*),void(...)**%Y,align 8
%Z=getelementptr inbounds i8,i8*%S,i64 16
%aa=bitcast i8*%Z to void(...)**
store void(...)*bitcast(i8*(i8*,i8*)*@_SMLL4loop_321 to void(...)*),void(...)**%aa,align 8
%ab=getelementptr inbounds i8,i8*%S,i64 24
%ac=bitcast i8*%ab to i32*
store i32 -2147483647,i32*%ac,align 4
%ad=tail call fastcc i8*@_SMLL4loop_200(i8*inreg%V,i32 inreg 0)
ret i8*%ad
}
define internal fastcc i8*@_SMLLN12Array__common5findiE_202(i8*inreg%a,i8*inreg%b)#3 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=call i8*@sml_alloc(i32 inreg 20)#0
%k=getelementptr inbounds i8,i8*%j,i64 -4
%l=bitcast i8*%k to i32*
store i32 1342177296,i32*%l,align 4
store i8*%j,i8**%d,align 8
%m=load i8*,i8**%c,align 8
store i8*null,i8**%c,align 8
%n=bitcast i8*%j to i8**
store i8*%m,i8**%n,align 8
%o=getelementptr inbounds i8,i8*%j,i64 8
%p=bitcast i8*%o to i32*
store i32%f,i32*%p,align 4
%q=getelementptr inbounds i8,i8*%j,i64 12
%r=bitcast i8*%q to i32*
store i32%i,i32*%r,align 4
%s=getelementptr inbounds i8,i8*%j,i64 16
%t=bitcast i8*%s to i32*
store i32 1,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**%d,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*)*@_SMLLN12Array__common5findiE_201 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*)*@_SMLLN12Array__common5findiE_201 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
ret i8*%u
}
define internal fastcc i8*@_SMLL4loop_205(i8*inreg%a,i32 inreg%b)#4 gc"smlsharp"{
h:
%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*%a,i8**%d,align 8
%e=bitcast i8**%d to i8***
br label%f
f:
%g=phi i32[%b,%h],[%aL,%aK]
%i=load atomic i32,i32*@sml_check_flag unordered,align 4
%j=icmp eq i32%i,0
br i1%j,label%l,label%k
k:
call void@sml_check(i32 inreg%i)
br label%l
l:
%m=load i8*,i8**%d,align 8
%n=getelementptr inbounds i8,i8*%m,i64 24
%o=bitcast i8*%n to i32*
%p=load i32,i32*%o,align 4
%q=getelementptr inbounds i8,i8*%m,i64 20
%r=bitcast i8*%q to i32*
%s=load i32,i32*%r,align 4
%t=getelementptr inbounds i8,i8*%m,i64 16
%u=bitcast i8*%t to i32*
%v=load i32,i32*%u,align 4
%w=icmp slt i32%g,%v
%x=bitcast i8*%m to i8**
br i1%w,label%z,label%y
y:
ret i8*null
z:
%A=getelementptr inbounds i8,i8*%m,i64 8
%B=bitcast i8*%A to i8**
%C=load i8*,i8**%B,align 8
store i8*%C,i8**%c,align 8
%D=icmp eq i32%s,0
br i1%D,label%K,label%E
E:
store i8*null,i8**%c,align 8
%F=mul i32%p,%g
%G=sext i32%F to i64
%H=getelementptr inbounds i8,i8*%C,i64%G
%I=bitcast i8*%H to i8**
%J=load i8*,i8**%I,align 8
br label%T
K:
%L=call i8*@sml_alloc(i32 inreg%p)#0
%M=getelementptr inbounds i8,i8*%L,i64 -4
%N=bitcast i8*%M to i32*
store i32%p,i32*%N,align 4
%O=load i8*,i8**%c,align 8
store i8*null,i8**%c,align 8
%P=mul i32%p,%g
%Q=sext i32%P to i64
%R=getelementptr inbounds i8,i8*%O,i64%Q
call void@llvm.memcpy.p0i8.p0i8.i32(i8*%L,i8*%R,i32%p,i1 false)
%S=load i8**,i8***%e,align 8
br label%T
T:
%U=phi i8**[%S,%K],[%x,%E]
%V=phi i8*[%L,%K],[%J,%E]
store i8*%V,i8**%c,align 8
%W=load i8*,i8**%U,align 8
%X=getelementptr inbounds i8,i8*%W,i64 16
%Y=bitcast i8*%X to i8*(i8*,i8*)**
%Z=load i8*(i8*,i8*)*,i8*(i8*,i8*)**%Y,align 8
%aa=bitcast i8*%W to i8**
%ab=load i8*,i8**%aa,align 8
%ac=call fastcc i8*%Z(i8*inreg%ab,i8*inreg%V)
%ad=bitcast i8*%ac to i32*
%ae=load i32,i32*%ad,align 4
%af=icmp eq i32%ae,0
br i1%af,label%aK,label%ag
ag:
%ah=add i32%p,-1
%ai=sub i32 0,%p
%aj=and i32%ah,%ai
%ak=add i32%p,7
%al=add i32%ak,%aj
%am=and i32%al,-8
%an=or i32%am,4
%ao=load i8*,i8**%d,align 8
%ap=getelementptr inbounds i8,i8*%ao,i64 24
%aq=bitcast i8*%ap to i32*
%ar=load i32,i32*%aq,align 4
store i8*null,i8**%d,align 8
%as=getelementptr inbounds i8,i8*%ao,i64 20
%at=bitcast i8*%as to i32*
%au=load i32,i32*%at,align 4
%av=call i8*@sml_alloc(i32 inreg%an)#0
%aw=or i32%am,1342177280
%ax=getelementptr inbounds i8,i8*%av,i64 -4
%ay=bitcast i8*%ax to i32*
store i32%aw,i32*%ay,align 4
call void@llvm.memset.p0i8.i32(i8*%av,i8 0,i32%an,i1 false)
%az=icmp eq i32%au,0
%aA=load i8*,i8**%c,align 8
%aB=sext i32%aj to i64
%aC=getelementptr inbounds i8,i8*%av,i64%aB
br i1%az,label%aF,label%aD
aD:
%aE=bitcast i8*%aC to i8**
store i8*%aA,i8**%aE,align 8
br label%aG
aF:
call void@llvm.memcpy.p0i8.p0i8.i32(i8*%aC,i8*%aA,i32%ar,i1 false)
br label%aG
aG:
%aH=sext i32%am to i64
%aI=getelementptr inbounds i8,i8*%av,i64%aH
%aJ=bitcast i8*%aI to i32*
store i32%s,i32*%aJ,align 4
ret i8*%av
aK:
store i8*null,i8**%c,align 8
%aL=add nsw i32%g,1
br label%f
}
define internal fastcc i8*@_SMLLN12Array__common4findE_206(i8*inreg%a,i8*inreg%b)#4 gc"smlsharp"{
%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
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%h,label%j
h:
%i=bitcast i8*%b to i32*
br label%n
j:
call void@sml_check(i32 inreg%f)
%k=bitcast i8**%c to i32**
%l=load i32*,i32**%k,align 8
%m=load i8*,i8**%d,align 8
br label%n
n:
%o=phi i8*[%m,%j],[%a,%h]
%p=phi i32*[%l,%j],[%i,%h]
%q=getelementptr inbounds i32,i32*%p,i64 -1
%r=load i32,i32*%q,align 4
%s=and i32%r,268435455
%t=getelementptr inbounds i8,i8*%o,i64 12
%u=bitcast i8*%t to i32*
%v=load i32,i32*%u,align 4
%w=udiv i32%s,%v
%x=bitcast i8*%o to i8**
%y=load i8*,i8**%x,align 8
store i8*%y,i8**%e,align 8
%z=getelementptr inbounds i8,i8*%o,i64 8
%A=bitcast i8*%z to i32*
%B=load i32,i32*%A,align 4
store i8*null,i8**%d,align 8
%C=call i8*@sml_alloc(i32 inreg 36)#0
%D=getelementptr inbounds i8,i8*%C,i64 -4
%E=bitcast i8*%D to i32*
store i32 1342177312,i32*%E,align 4
store i8*%C,i8**%d,align 8
%F=load i8*,i8**%e,align 8
store i8*null,i8**%e,align 8
%G=bitcast i8*%C to i8**
store i8*%F,i8**%G,align 8
%H=load i8*,i8**%c,align 8
store i8*null,i8**%c,align 8
%I=getelementptr inbounds i8,i8*%C,i64 8
%J=bitcast i8*%I to i8**
store i8*%H,i8**%J,align 8
%K=getelementptr inbounds i8,i8*%C,i64 16
%L=bitcast i8*%K to i32*
store i32%w,i32*%L,align 4
%M=getelementptr inbounds i8,i8*%C,i64 20
%N=bitcast i8*%M to i32*
store i32%B,i32*%N,align 4
%O=getelementptr inbounds i8,i8*%C,i64 24
%P=bitcast i8*%O to i32*
store i32%v,i32*%P,align 4
%Q=getelementptr inbounds i8,i8*%C,i64 32
%R=bitcast i8*%Q to i32*
store i32 3,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**%d,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*,i32)*@_SMLL4loop_205 to void(...)*),void(...)**%Y,align 8
%Z=getelementptr inbounds i8,i8*%S,i64 16
%aa=bitcast i8*%Z to void(...)**
store void(...)*bitcast(i8*(i8*,i8*)*@_SMLL4loop_323 to void(...)*),void(...)**%aa,align 8
%ab=getelementptr inbounds i8,i8*%S,i64 24
%ac=bitcast i8*%ab to i32*
store i32 -2147483647,i32*%ac,align 4
%ad=tail call fastcc i8*@_SMLL4loop_205(i8*inreg%V,i32 inreg 0)
ret i8*%ad
}
define internal fastcc i8*@_SMLLN12Array__common4findE_207(i8*inreg%a,i8*inreg%b)#3 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=call i8*@sml_alloc(i32 inreg 20)#0
%k=getelementptr inbounds i8,i8*%j,i64 -4
%l=bitcast i8*%k to i32*
store i32 1342177296,i32*%l,align 4
store i8*%j,i8**%d,align 8
%m=load i8*,i8**%c,align 8
store i8*null,i8**%c,align 8
%n=bitcast i8*%j to i8**
store i8*%m,i8**%n,align 8
%o=getelementptr inbounds i8,i8*%j,i64 8
%p=bitcast i8*%o to i32*
store i32%f,i32*%p,align 4
%q=getelementptr inbounds i8,i8*%j,i64 12
%r=bitcast i8*%q to i32*
store i32%i,i32*%r,align 4
%s=getelementptr inbounds i8,i8*%j,i64 16
%t=bitcast i8*%s to i32*
store i32 1,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**%d,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*)*@_SMLLN12Array__common4findE_206 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*)*@_SMLLN12Array__common4findE_206 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
ret i8*%u
}
define internal fastcc i32@_SMLL4loop_210(i8*inreg%a,i32 inreg%b)#4 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 i32[%b,%h],[%ah,%aa]
%i=load atomic i32,i32*@sml_check_flag unordered,align 4
%j=icmp eq i32%i,0
br i1%j,label%l,label%k
k:
call void@sml_check(i32 inreg%i)
br label%l
l:
%m=load i8*,i8**%d,align 8
%n=getelementptr inbounds i8,i8*%m,i64 16
%o=bitcast i8*%n to i32*
%p=load i32,i32*%o,align 4
%q=icmp slt i32%g,%p
br i1%q,label%t,label%r
r:
%s=phi i32[0,%l],[1,%aa]
ret i32%s
t:
%u=bitcast i8*%m to i8**
%v=load i8*,i8**%u,align 8
%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**%e,align 8
%B=getelementptr inbounds i8,i8*%m,i64 8
%C=bitcast i8*%B to i8**
%D=load i8*,i8**%C,align 8
store i8*%D,i8**%c,align 8
%E=getelementptr inbounds i8,i8*%m,i64 24
%F=bitcast i8*%E to i32*
%G=load i32,i32*%F,align 4
%H=getelementptr inbounds i8,i8*%m,i64 20
%I=bitcast i8*%H to i32*
%J=load i32,i32*%I,align 4
%K=icmp eq i32%J,0
br i1%K,label%R,label%L
L:
store i8*null,i8**%c,align 8
%M=mul i32%G,%g
%N=sext i32%M to i64
%O=getelementptr inbounds i8,i8*%D,i64%N
%P=bitcast i8*%O to i8**
%Q=load i8*,i8**%P,align 8
br label%aa
R:
%S=call i8*@sml_alloc(i32 inreg%G)#0
%T=getelementptr inbounds i8,i8*%S,i64 -4
%U=bitcast i8*%T to i32*
store i32%G,i32*%U,align 4
%V=load i8*,i8**%c,align 8
store i8*null,i8**%c,align 8
%W=mul i32%G,%g
%X=sext i32%W to i64
%Y=getelementptr inbounds i8,i8*%V,i64%X
call void@llvm.memcpy.p0i8.p0i8.i32(i8*%S,i8*%Y,i32%G,i1 false)
%Z=load i8*,i8**%e,align 8
br label%aa
aa:
%ab=phi i8*[%A,%L],[%Z,%R]
%ac=phi i8*[%Q,%L],[%S,%R]
store i8*null,i8**%e,align 8
%ad=call fastcc i8*%y(i8*inreg%ab,i8*inreg%ac)
%ae=bitcast i8*%ad to i32*
%af=load i32,i32*%ae,align 4
%ag=icmp eq i32%af,0
%ah=add nsw i32%g,1
br i1%ag,label%f,label%r
}
define internal fastcc i32@_SMLLN12Array__common6existsE_211(i8*inreg%a,i8*inreg%b)#4 gc"smlsharp"{
%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
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%h,label%j
h:
%i=bitcast i8*%b to i32*
br label%n
j:
call void@sml_check(i32 inreg%f)
%k=bitcast i8**%c to i32**
%l=load i32*,i32**%k,align 8
%m=load i8*,i8**%d,align 8
br label%n
n:
%o=phi i8*[%m,%j],[%a,%h]
%p=phi i32*[%l,%j],[%i,%h]
%q=getelementptr inbounds i32,i32*%p,i64 -1
%r=load i32,i32*%q,align 4
%s=and i32%r,268435455
%t=getelementptr inbounds i8,i8*%o,i64 12
%u=bitcast i8*%t to i32*
%v=load i32,i32*%u,align 4
%w=udiv i32%s,%v
%x=bitcast i8*%o to i8**
%y=load i8*,i8**%x,align 8
store i8*%y,i8**%e,align 8
%z=getelementptr inbounds i8,i8*%o,i64 8
%A=bitcast i8*%z to i32*
%B=load i32,i32*%A,align 4
store i8*null,i8**%d,align 8
%C=call i8*@sml_alloc(i32 inreg 36)#0
%D=getelementptr inbounds i8,i8*%C,i64 -4
%E=bitcast i8*%D to i32*
store i32 1342177312,i32*%E,align 4
store i8*%C,i8**%d,align 8
%F=load i8*,i8**%e,align 8
store i8*null,i8**%e,align 8
%G=bitcast i8*%C to i8**
store i8*%F,i8**%G,align 8
%H=load i8*,i8**%c,align 8
store i8*null,i8**%c,align 8
%I=getelementptr inbounds i8,i8*%C,i64 8
%J=bitcast i8*%I to i8**
store i8*%H,i8**%J,align 8
%K=getelementptr inbounds i8,i8*%C,i64 16
%L=bitcast i8*%K to i32*
store i32%w,i32*%L,align 4
%M=getelementptr inbounds i8,i8*%C,i64 20
%N=bitcast i8*%M to i32*
store i32%B,i32*%N,align 4
%O=getelementptr inbounds i8,i8*%C,i64 24
%P=bitcast i8*%O to i32*
store i32%v,i32*%P,align 4
%Q=getelementptr inbounds i8,i8*%C,i64 32
%R=bitcast i8*%Q to i32*
store i32 3,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**%d,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(i32(i8*,i32)*@_SMLL4loop_210 to void(...)*),void(...)**%Y,align 8
%Z=getelementptr inbounds i8,i8*%S,i64 16
%aa=bitcast i8*%Z to void(...)**
store void(...)*bitcast(i8*(i8*,i8*)*@_SMLL4loop_325 to void(...)*),void(...)**%aa,align 8
%ab=getelementptr inbounds i8,i8*%S,i64 24
%ac=bitcast i8*%ab to i32*
store i32 -2147483647,i32*%ac,align 4
%ad=tail call fastcc i32@_SMLL4loop_210(i8*inreg%V,i32 inreg 0)
ret i32%ad
}
define internal fastcc i8*@_SMLLN12Array__common6existsE_212(i8*inreg%a,i8*inreg%b)#3 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=call i8*@sml_alloc(i32 inreg 20)#0
%k=getelementptr inbounds i8,i8*%j,i64 -4
%l=bitcast i8*%k to i32*
store i32 1342177296,i32*%l,align 4
store i8*%j,i8**%d,align 8
%m=load i8*,i8**%c,align 8
store i8*null,i8**%c,align 8
%n=bitcast i8*%j to i8**
store i8*%m,i8**%n,align 8
%o=getelementptr inbounds i8,i8*%j,i64 8
%p=bitcast i8*%o to i32*
store i32%f,i32*%p,align 4
%q=getelementptr inbounds i8,i8*%j,i64 12
%r=bitcast i8*%q to i32*
store i32%i,i32*%r,align 4
%s=getelementptr inbounds i8,i8*%j,i64 16
%t=bitcast i8*%s to i32*
store i32 1,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**%d,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(i32(i8*,i8*)*@_SMLLN12Array__common6existsE_211 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*)*@_SMLLN12Array__common6existsE_326 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
ret i8*%u
}
define internal fastcc i32@_SMLL4loop_215(i8*inreg%a,i32 inreg%b)#4 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 i32[%b,%h],[%ah,%aa]
%i=load atomic i32,i32*@sml_check_flag unordered,align 4
%j=icmp eq i32%i,0
br i1%j,label%l,label%k
k:
call void@sml_check(i32 inreg%i)
br label%l
l:
%m=load i8*,i8**%d,align 8
%n=getelementptr inbounds i8,i8*%m,i64 16
%o=bitcast i8*%n to i32*
%p=load i32,i32*%o,align 4
%q=icmp slt i32%g,%p
br i1%q,label%t,label%r
r:
%s=phi i32[1,%l],[0,%aa]
ret i32%s
t:
%u=bitcast i8*%m to i8**
%v=load i8*,i8**%u,align 8
%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**%e,align 8
%B=getelementptr inbounds i8,i8*%m,i64 8
%C=bitcast i8*%B to i8**
%D=load i8*,i8**%C,align 8
store i8*%D,i8**%c,align 8
%E=getelementptr inbounds i8,i8*%m,i64 24
%F=bitcast i8*%E to i32*
%G=load i32,i32*%F,align 4
%H=getelementptr inbounds i8,i8*%m,i64 20
%I=bitcast i8*%H to i32*
%J=load i32,i32*%I,align 4
%K=icmp eq i32%J,0
br i1%K,label%R,label%L
L:
store i8*null,i8**%c,align 8
%M=mul i32%G,%g
%N=sext i32%M to i64
%O=getelementptr inbounds i8,i8*%D,i64%N
%P=bitcast i8*%O to i8**
%Q=load i8*,i8**%P,align 8
br label%aa
R:
%S=call i8*@sml_alloc(i32 inreg%G)#0
%T=getelementptr inbounds i8,i8*%S,i64 -4
%U=bitcast i8*%T to i32*
store i32%G,i32*%U,align 4
%V=load i8*,i8**%c,align 8
store i8*null,i8**%c,align 8
%W=mul i32%G,%g
%X=sext i32%W to i64
%Y=getelementptr inbounds i8,i8*%V,i64%X
call void@llvm.memcpy.p0i8.p0i8.i32(i8*%S,i8*%Y,i32%G,i1 false)
%Z=load i8*,i8**%e,align 8
br label%aa
aa:
%ab=phi i8*[%A,%L],[%Z,%R]
%ac=phi i8*[%Q,%L],[%S,%R]
store i8*null,i8**%e,align 8
%ad=call fastcc i8*%y(i8*inreg%ab,i8*inreg%ac)
%ae=bitcast i8*%ad to i32*
%af=load i32,i32*%ae,align 4
%ag=icmp eq i32%af,0
%ah=add nsw i32%g,1
br i1%ag,label%r,label%f
}
define internal fastcc i32@_SMLLN12Array__common3allE_216(i8*inreg%a,i8*inreg%b)#4 gc"smlsharp"{
%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
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%h,label%j
h:
%i=bitcast i8*%b to i32*
br label%n
j:
call void@sml_check(i32 inreg%f)
%k=bitcast i8**%c to i32**
%l=load i32*,i32**%k,align 8
%m=load i8*,i8**%d,align 8
br label%n
n:
%o=phi i8*[%m,%j],[%a,%h]
%p=phi i32*[%l,%j],[%i,%h]
%q=getelementptr inbounds i32,i32*%p,i64 -1
%r=load i32,i32*%q,align 4
%s=and i32%r,268435455
%t=getelementptr inbounds i8,i8*%o,i64 12
%u=bitcast i8*%t to i32*
%v=load i32,i32*%u,align 4
%w=udiv i32%s,%v
%x=bitcast i8*%o to i8**
%y=load i8*,i8**%x,align 8
store i8*%y,i8**%e,align 8
%z=getelementptr inbounds i8,i8*%o,i64 8
%A=bitcast i8*%z to i32*
%B=load i32,i32*%A,align 4
store i8*null,i8**%d,align 8
%C=call i8*@sml_alloc(i32 inreg 36)#0
%D=getelementptr inbounds i8,i8*%C,i64 -4
%E=bitcast i8*%D to i32*
store i32 1342177312,i32*%E,align 4
store i8*%C,i8**%d,align 8
%F=load i8*,i8**%e,align 8
store i8*null,i8**%e,align 8
%G=bitcast i8*%C to i8**
store i8*%F,i8**%G,align 8
%H=load i8*,i8**%c,align 8
store i8*null,i8**%c,align 8
%I=getelementptr inbounds i8,i8*%C,i64 8
%J=bitcast i8*%I to i8**
store i8*%H,i8**%J,align 8
%K=getelementptr inbounds i8,i8*%C,i64 16
%L=bitcast i8*%K to i32*
store i32%w,i32*%L,align 4
%M=getelementptr inbounds i8,i8*%C,i64 20
%N=bitcast i8*%M to i32*
store i32%B,i32*%N,align 4
%O=getelementptr inbounds i8,i8*%C,i64 24
%P=bitcast i8*%O to i32*
store i32%v,i32*%P,align 4
%Q=getelementptr inbounds i8,i8*%C,i64 32
%R=bitcast i8*%Q to i32*
store i32 3,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**%d,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(i32(i8*,i32)*@_SMLL4loop_215 to void(...)*),void(...)**%Y,align 8
%Z=getelementptr inbounds i8,i8*%S,i64 16
%aa=bitcast i8*%Z to void(...)**
store void(...)*bitcast(i8*(i8*,i8*)*@_SMLL4loop_328 to void(...)*),void(...)**%aa,align 8
%ab=getelementptr inbounds i8,i8*%S,i64 24
%ac=bitcast i8*%ab to i32*
store i32 -2147483647,i32*%ac,align 4
%ad=tail call fastcc i32@_SMLL4loop_215(i8*inreg%V,i32 inreg 0)
ret i32%ad
}
define internal fastcc i8*@_SMLLN12Array__common3allE_217(i8*inreg%a,i8*inreg%b)#3 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=call i8*@sml_alloc(i32 inreg 20)#0
%k=getelementptr inbounds i8,i8*%j,i64 -4
%l=bitcast i8*%k to i32*
store i32 1342177296,i32*%l,align 4
store i8*%j,i8**%d,align 8
%m=load i8*,i8**%c,align 8
store i8*null,i8**%c,align 8
%n=bitcast i8*%j to i8**
store i8*%m,i8**%n,align 8
%o=getelementptr inbounds i8,i8*%j,i64 8
%p=bitcast i8*%o to i32*
store i32%f,i32*%p,align 4
%q=getelementptr inbounds i8,i8*%j,i64 12
%r=bitcast i8*%q to i32*
store i32%i,i32*%r,align 4
%s=getelementptr inbounds i8,i8*%j,i64 16
%t=bitcast i8*%s to i32*
store i32 1,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**%d,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(i32(i8*,i8*)*@_SMLLN12Array__common3allE_216 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*)*@_SMLLN12Array__common3allE_329 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
ret i8*%u
}
define internal fastcc i32@_SMLL4loop_220(i8*inreg%a,i32 inreg%b)#4 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 i32[%b,%h],[%aO,%aF]
%i=load atomic i32,i32*@sml_check_flag unordered,align 4
%j=icmp eq i32%i,0
br i1%j,label%l,label%k
k:
call void@sml_check(i32 inreg%i)
br label%l
l:
%m=load i8*,i8**%d,align 8
%n=getelementptr inbounds i8,i8*%m,i64 24
%o=bitcast i8*%n to i32*
%p=load i32,i32*%o,align 4
%q=add i32%p,3
%r=sub i32 0,%p
%s=and i32%q,%r
%t=add i32%p,7
%u=add i32%t,%s
%v=and i32%u,-8
%w=lshr i32%s,3
%x=getelementptr inbounds i8,i8*%m,i64 20
%y=bitcast i8*%x to i32*
%z=load i32,i32*%y,align 4
%A=shl i32%z,%w
%B=or i32%v,4
%C=getelementptr inbounds i8,i8*%m,i64 16
%D=bitcast i8*%C to i32*
%E=load i32,i32*%D,align 4
%F=icmp slt i32%g,%E
br i1%F,label%I,label%G
G:
%H=phi i32[1,%l],[0,%aF]
ret i32%H
I:
%J=bitcast i8*%m to i8**
%K=load i8*,i8**%J,align 8
%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
store i8*%P,i8**%e,align 8
%Q=getelementptr inbounds i8,i8*%m,i64 8
%R=bitcast i8*%Q to i8**
%S=load i8*,i8**%R,align 8
store i8*%S,i8**%c,align 8
%T=icmp eq i32%z,0
br i1%T,label%aa,label%U
U:
store i8*null,i8**%c,align 8
%V=mul i32%p,%g
%W=sext i32%V to i64
%X=getelementptr inbounds i8,i8*%S,i64%W
%Y=bitcast i8*%X to i8**
%Z=load i8*,i8**%Y,align 8
br label%ap
aa:
%ab=call i8*@sml_alloc(i32 inreg%p)#0
%ac=getelementptr inbounds i8,i8*%ab,i64 -4
%ad=bitcast i8*%ac to i32*
store i32%p,i32*%ad,align 4
%ae=load i8*,i8**%c,align 8
store i8*null,i8**%c,align 8
%af=mul i32%p,%g
%ag=sext i32%af to i64
%ah=getelementptr inbounds i8,i8*%ae,i64%ag
call void@llvm.memcpy.p0i8.p0i8.i32(i8*%ab,i8*%ah,i32%p,i1 false)
%ai=load i8*,i8**%d,align 8
%aj=getelementptr inbounds i8,i8*%ai,i64 24
%ak=bitcast i8*%aj to i32*
%al=load i32,i32*%ak,align 4
%am=getelementptr inbounds i8,i8*%ai,i64 20
%an=bitcast i8*%am to i32*
%ao=load i32,i32*%an,align 4
br label%ap
ap:
%aq=phi i32[%ao,%aa],[%z,%U]
%ar=phi i32[%al,%aa],[%p,%U]
%as=phi i8*[%ab,%aa],[%Z,%U]
store i8*%as,i8**%c,align 8
%at=call i8*@sml_alloc(i32 inreg%B)#0
%au=or i32%v,1342177280
%av=bitcast i8*%at to i32*
%aw=getelementptr inbounds i8,i8*%at,i64 -4
%ax=bitcast i8*%aw to i32*
store i32%au,i32*%ax,align 4
call void@llvm.memset.p0i8.i32(i8*%at,i8 0,i32%B,i1 false)
store i32%g,i32*%av,align 4
%ay=icmp eq i32%aq,0
%az=load i8*,i8**%c,align 8
store i8*null,i8**%c,align 8
%aA=sext i32%s to i64
%aB=getelementptr inbounds i8,i8*%at,i64%aA
br i1%ay,label%aE,label%aC
aC:
%aD=bitcast i8*%aB to i8**
store i8*%az,i8**%aD,align 8
br label%aF
aE:
call void@llvm.memcpy.p0i8.p0i8.i32(i8*%aB,i8*%az,i32%ar,i1 false)
br label%aF
aF:
%aG=sext i32%v to i64
%aH=getelementptr inbounds i8,i8*%at,i64%aG
%aI=bitcast i8*%aH to i32*
store i32%A,i32*%aI,align 4
%aJ=load i8*,i8**%e,align 8
store i8*null,i8**%e,align 8
%aK=call fastcc i8*%N(i8*inreg%aJ,i8*inreg%at)
%aL=bitcast i8*%aK to i32*
%aM=load i32,i32*%aL,align 4
%aN=icmp eq i32%aM,0
%aO=add nsw i32%g,1
br i1%aN,label%G,label%f
}
define internal fastcc i32@_SMLLN12Array__common4alliE_221(i8*inreg%a,i8*inreg%b)#4 gc"smlsharp"{
%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
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%h,label%j
h:
%i=bitcast i8*%b to i32*
br label%n
j:
call void@sml_check(i32 inreg%f)
%k=bitcast i8**%c to i32**
%l=load i32*,i32**%k,align 8
%m=load i8*,i8**%d,align 8
br label%n
n:
%o=phi i8*[%m,%j],[%a,%h]
%p=phi i32*[%l,%j],[%i,%h]
%q=getelementptr inbounds i32,i32*%p,i64 -1
%r=load i32,i32*%q,align 4
%s=and i32%r,268435455
%t=getelementptr inbounds i8,i8*%o,i64 12
%u=bitcast i8*%t to i32*
%v=load i32,i32*%u,align 4
%w=udiv i32%s,%v
%x=bitcast i8*%o to i8**
%y=load i8*,i8**%x,align 8
store i8*%y,i8**%e,align 8
%z=getelementptr inbounds i8,i8*%o,i64 8
%A=bitcast i8*%z to i32*
%B=load i32,i32*%A,align 4
store i8*null,i8**%d,align 8
%C=call i8*@sml_alloc(i32 inreg 36)#0
%D=getelementptr inbounds i8,i8*%C,i64 -4
%E=bitcast i8*%D to i32*
store i32 1342177312,i32*%E,align 4
store i8*%C,i8**%d,align 8
%F=load i8*,i8**%e,align 8
store i8*null,i8**%e,align 8
%G=bitcast i8*%C to i8**
store i8*%F,i8**%G,align 8
%H=load i8*,i8**%c,align 8
store i8*null,i8**%c,align 8
%I=getelementptr inbounds i8,i8*%C,i64 8
%J=bitcast i8*%I to i8**
store i8*%H,i8**%J,align 8
%K=getelementptr inbounds i8,i8*%C,i64 16
%L=bitcast i8*%K to i32*
store i32%w,i32*%L,align 4
%M=getelementptr inbounds i8,i8*%C,i64 20
%N=bitcast i8*%M to i32*
store i32%B,i32*%N,align 4
%O=getelementptr inbounds i8,i8*%C,i64 24
%P=bitcast i8*%O to i32*
store i32%v,i32*%P,align 4
%Q=getelementptr inbounds i8,i8*%C,i64 32
%R=bitcast i8*%Q to i32*
store i32 3,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**%d,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(i32(i8*,i32)*@_SMLL4loop_220 to void(...)*),void(...)**%Y,align 8
%Z=getelementptr inbounds i8,i8*%S,i64 16
%aa=bitcast i8*%Z to void(...)**
store void(...)*bitcast(i8*(i8*,i8*)*@_SMLL4loop_331 to void(...)*),void(...)**%aa,align 8
%ab=getelementptr inbounds i8,i8*%S,i64 24
%ac=bitcast i8*%ab to i32*
store i32 -2147483647,i32*%ac,align 4
%ad=tail call fastcc i32@_SMLL4loop_220(i8*inreg%V,i32 inreg 0)
ret i32%ad
}
define internal fastcc i8*@_SMLLN12Array__common4alliE_222(i8*inreg%a,i8*inreg%b)#3 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=call i8*@sml_alloc(i32 inreg 20)#0
%k=getelementptr inbounds i8,i8*%j,i64 -4
%l=bitcast i8*%k to i32*
store i32 1342177296,i32*%l,align 4
store i8*%j,i8**%d,align 8
%m=load i8*,i8**%c,align 8
store i8*null,i8**%c,align 8
%n=bitcast i8*%j to i8**
store i8*%m,i8**%n,align 8
%o=getelementptr inbounds i8,i8*%j,i64 8
%p=bitcast i8*%o to i32*
store i32%f,i32*%p,align 4
%q=getelementptr inbounds i8,i8*%j,i64 12
%r=bitcast i8*%q to i32*
store i32%i,i32*%r,align 4
%s=getelementptr inbounds i8,i8*%j,i64 16
%t=bitcast i8*%s to i32*
store i32 1,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**%d,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(i32(i8*,i8*)*@_SMLLN12Array__common4alliE_221 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*)*@_SMLLN12Array__common4alliE_332 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
ret i8*%u
}
define internal fastcc i32@_SMLL4loop_225(i8*inreg%a,i8*inreg%b)#4 gc"smlsharp"{
j:
%c=alloca i8*,align 8
%d=alloca i8*,align 8
%e=alloca i8*,align 8
%f=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
call void@llvm.gcroot(i8**%f,i8*null)#0
store i8*%a,i8**%e,align 8
%g=bitcast i8**%e to i8***
br label%h
h:
%i=phi i8*[%bU,%bQ],[%b,%j]
store i8*%i,i8**%c,align 8
%k=load atomic i32,i32*@sml_check_flag unordered,align 4
%l=icmp eq i32%k,0
br i1%l,label%o,label%m
m:
call void@sml_check(i32 inreg%k)
%n=load i8*,i8**%c,align 8
br label%o
o:
%p=phi i8*[%n,%m],[%i,%h]
%q=load i8*,i8**%e,align 8
%r=getelementptr inbounds i8,i8*%q,i64 20
%s=bitcast i8*%r to i32*
%t=load i32,i32*%s,align 4
%u=add i32%t,-1
%v=sub i32 0,%t
%w=and i32%u,%v
%x=shl i32%t,1
%y=add i32%x,-1
%z=add i32%y,%w
%A=and i32%z,%v
%B=add i32%t,7
%C=add i32%B,%A
%D=and i32%C,-8
%E=lshr i32%A,3
%F=lshr i32%w,3
%G=sub nsw i32%E,%F
%H=getelementptr inbounds i8,i8*%q,i64 16
%I=bitcast i8*%H to i32*
%J=load i32,i32*%I,align 4
%K=shl i32%J,%G
%L=or i32%K,%J
%M=or i32%D,4
%N=bitcast i8*%p to i32*
%O=load i32,i32*%N,align 4
%P=getelementptr inbounds i8,i8*%p,i64 4
%Q=bitcast i8*%P to i32*
%R=load i32,i32*%Q,align 4
%S=icmp eq i32%R,0
%T=getelementptr inbounds i8,i8*%p,i64 8
%U=bitcast i8*%T to i32*
%V=load i32,i32*%U,align 4
%W=icmp eq i32%V,0
br i1%S,label%b6,label%X
X:
br i1%W,label%bO,label%Y
Y:
%Z=getelementptr inbounds i8,i8*%q,i64 8
%aa=bitcast i8*%Z to i8***
%ab=load i8**,i8***%aa,align 8
%ac=load i8*,i8**%ab,align 8
store i8*%ac,i8**%c,align 8
%ad=icmp eq i32%J,0
br i1%ad,label%ap,label%ae
ae:
store i8*null,i8**%c,align 8
%af=mul i32%O,%t
%ag=sext i32%af to i64
%ah=getelementptr inbounds i8,i8*%ac,i64%ag
%ai=bitcast i8*%ah to i8**
%aj=load i8*,i8**%ai,align 8
store i8*%aj,i8**%c,align 8
%ak=bitcast i8*%Z to i8**
%al=load i8*,i8**%ak,align 8
%am=getelementptr inbounds i8,i8*%al,i64 8
%an=bitcast i8*%am to i8**
%ao=load i8*,i8**%an,align 8
store i8*%ao,i8**%d,align 8
br label%aL
ap:
%aq=call i8*@sml_alloc(i32 inreg%t)#0
%ar=getelementptr inbounds i8,i8*%aq,i64 -4
%as=bitcast i8*%ar to i32*
store i32%t,i32*%as,align 4
%at=load i8*,i8**%c,align 8
store i8*null,i8**%c,align 8
%au=mul i32%O,%t
%av=sext i32%au to i64
%aw=getelementptr inbounds i8,i8*%at,i64%av
call void@llvm.memcpy.p0i8.p0i8.i32(i8*%aq,i8*%aw,i32%t,i1 false)
%ax=load i8*,i8**%e,align 8
%ay=getelementptr inbounds i8,i8*%ax,i64 20
%az=bitcast i8*%ay to i32*
%aA=load i32,i32*%az,align 4
%aB=getelementptr inbounds i8,i8*%ax,i64 16
%aC=bitcast i8*%aB to i32*
%aD=load i32,i32*%aC,align 4
%aE=getelementptr inbounds i8,i8*%ax,i64 8
store i8*%aq,i8**%c,align 8
%aF=bitcast i8*%aE to i8**
%aG=load i8*,i8**%aF,align 8
%aH=getelementptr inbounds i8,i8*%aG,i64 8
%aI=bitcast i8*%aH to i8**
%aJ=load i8*,i8**%aI,align 8
store i8*%aJ,i8**%d,align 8
%aK=icmp eq i32%aD,0
br i1%aK,label%aW,label%aL
aL:
%aM=phi i8*[%ao,%ae],[%aJ,%ap]
%aN=phi i32[%t,%ae],[%aA,%ap]
%aO=phi i32[%J,%ae],[%aD,%ap]
%aP=phi i8*[%q,%ae],[%ax,%ap]
%aQ=bitcast i8*%aP to i8**
store i8*null,i8**%d,align 8
%aR=mul i32%aN,%O
%aS=sext i32%aR to i64
%aT=getelementptr inbounds i8,i8*%aM,i64%aS
%aU=bitcast i8*%aT to i8**
%aV=load i8*,i8**%aU,align 8
br label%bc
aW:
%aX=call i8*@sml_alloc(i32 inreg%aA)#0
%aY=getelementptr inbounds i8,i8*%aX,i64 -4
%aZ=bitcast i8*%aY to i32*
store i32%aA,i32*%aZ,align 4
%a0=load i8*,i8**%d,align 8
store i8*null,i8**%d,align 8
%a1=mul i32%aA,%O
%a2=sext i32%a1 to i64
%a3=getelementptr inbounds i8,i8*%a0,i64%a2
call void@llvm.memcpy.p0i8.p0i8.i32(i8*%aX,i8*%a3,i32%aA,i1 false)
%a4=load i8**,i8***%g,align 8
%a5=bitcast i8**%a4 to i8*
%a6=getelementptr inbounds i8,i8*%a5,i64 20
%a7=bitcast i8*%a6 to i32*
%a8=load i32,i32*%a7,align 4
%a9=getelementptr inbounds i8*,i8**%a4,i64 2
%ba=bitcast i8**%a9 to i32*
%bb=load i32,i32*%ba,align 4
br label%bc
bc:
%bd=phi i32[%bb,%aW],[%aO,%aL]
%be=phi i32[%a8,%aW],[%aN,%aL]
%bf=phi i8**[%a4,%aW],[%aQ,%aL]
%bg=phi i8*[%aX,%aW],[%aV,%aL]
store i8*%bg,i8**%d,align 8
%bh=load i8*,i8**%bf,align 8
%bi=getelementptr inbounds i8,i8*%bh,i64 16
%bj=bitcast i8*%bi to i8*(i8*,i8*)**
%bk=load i8*(i8*,i8*)*,i8*(i8*,i8*)**%bj,align 8
%bl=bitcast i8*%bh to i8**
%bm=load i8*,i8**%bl,align 8
store i8*%bm,i8**%f,align 8
%bn=call i8*@sml_alloc(i32 inreg%M)#0
%bo=or i32%D,1342177280
%bp=getelementptr inbounds i8,i8*%bn,i64 -4
%bq=bitcast i8*%bp to i32*
store i32%bo,i32*%bq,align 4
call void@llvm.memset.p0i8.i32(i8*%bn,i8 0,i32%M,i1 false)
%br=icmp eq i32%bd,0
%bs=load i8*,i8**%c,align 8
store i8*null,i8**%c,align 8
%bt=sext i32%w to i64
%bu=getelementptr inbounds i8,i8*%bn,i64%bt
br i1%br,label%bB,label%bv
bv:
%bw=bitcast i8*%bu to i8**
store i8*%bs,i8**%bw,align 8
%bx=load i8*,i8**%d,align 8
store i8*null,i8**%d,align 8
%by=sext i32%A to i64
%bz=getelementptr inbounds i8,i8*%bn,i64%by
%bA=bitcast i8*%bz to i8**
store i8*%bx,i8**%bA,align 8
br label%bF
bB:
call void@llvm.memcpy.p0i8.p0i8.i32(i8*%bu,i8*%bs,i32%be,i1 false)
%bC=load i8*,i8**%d,align 8
store i8*null,i8**%d,align 8
%bD=sext i32%A to i64
%bE=getelementptr inbounds i8,i8*%bn,i64%bD
call void@llvm.memcpy.p0i8.p0i8.i32(i8*%bE,i8*%bC,i32%be,i1 false)
br label%bF
bF:
%bG=sext i32%D to i64
%bH=getelementptr inbounds i8,i8*%bn,i64%bG
%bI=bitcast i8*%bH to i32*
store i32%L,i32*%bI,align 4
%bJ=load i8*,i8**%f,align 8
store i8*null,i8**%f,align 8
%bK=call fastcc i8*%bk(i8*inreg%bJ,i8*inreg%bn)
%bL=bitcast i8*%bK to i32*
%bM=load i32,i32*%bL,align 4
%bN=icmp eq i32%bM,0
br i1%bN,label%bQ,label%bO
bO:
%bP=phi i32[%b7,%b6],[1,%X],[%bM,%bF]
ret i32%bP
bQ:
%bR=add nsw i32%O,1
%bS=add nsw i32%R,-1
%bT=add nsw i32%V,-1
%bU=call i8*@sml_alloc(i32 inreg 20)#0
%bV=bitcast i8*%bU to i32*
%bW=getelementptr inbounds i8,i8*%bU,i64 -4
%bX=bitcast i8*%bW to i32*
store i32 1342177296,i32*%bX,align 4
%bY=getelementptr inbounds i8,i8*%bU,i64 12
%bZ=bitcast i8*%bY to i32*
store i32 0,i32*%bZ,align 1
store i32%bR,i32*%bV,align 4
%b0=getelementptr inbounds i8,i8*%bU,i64 4
%b1=bitcast i8*%b0 to i32*
store i32%bS,i32*%b1,align 4
%b2=getelementptr inbounds i8,i8*%bU,i64 8
%b3=bitcast i8*%b2 to i32*
store i32%bT,i32*%b3,align 4
%b4=getelementptr inbounds i8,i8*%bU,i64 16
%b5=bitcast i8*%b4 to i32*
store i32 0,i32*%b5,align 4
br label%h
b6:
%b7=select i1%W,i32 0,i32 2
br label%bO
}
define internal fastcc i32@_SMLLN12Array__common7collateE_226(i8*inreg%a,i8*inreg%b)#4 gc"smlsharp"{
%c=alloca i8*,align 8
%d=alloca i8*,align 8
%e=alloca i8*,align 8
%f=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
call void@llvm.gcroot(i8**%f,i8*null)#0
store i8*%a,i8**%d,align 8
store i8*%b,i8**%c,align 8
%g=load atomic i32,i32*@sml_check_flag unordered,align 4
%h=icmp eq i32%g,0
br i1%h,label%i,label%k
i:
%j=bitcast i8*%a to i8**
br label%o
k:
call void@sml_check(i32 inreg%g)
%l=bitcast i8**%d to i8***
%m=load i8**,i8***%l,align 8
%n=bitcast i8**%m to i8*
br label%o
o:
%p=phi i8*[%n,%k],[%a,%i]
%q=phi i8**[%m,%k],[%j,%i]
%r=load i8*,i8**%q,align 8
store i8*%r,i8**%e,align 8
%s=getelementptr inbounds i8*,i8**%q,i64 1
%t=bitcast i8**%s to i32*
%u=load i32,i32*%t,align 4
%v=getelementptr inbounds i8,i8*%p,i64 12
%w=bitcast i8*%v to i32*
%x=load i32,i32*%w,align 4
%y=call i8*@sml_alloc(i32 inreg 28)#0
%z=getelementptr inbounds i8,i8*%y,i64 -4
%A=bitcast i8*%z to i32*
store i32 1342177304,i32*%A,align 4
store i8*%y,i8**%f,align 8
%B=load i8*,i8**%e,align 8
store i8*null,i8**%e,align 8
%C=bitcast i8*%y to i8**
store i8*%B,i8**%C,align 8
%D=load i8*,i8**%c,align 8
%E=getelementptr inbounds i8,i8*%y,i64 8
%F=bitcast i8*%E to i8**
store i8*%D,i8**%F,align 8
%G=getelementptr inbounds i8,i8*%y,i64 16
%H=bitcast i8*%G to i32*
store i32%u,i32*%H,align 4
%I=getelementptr inbounds i8,i8*%y,i64 20
%J=bitcast i8*%I to i32*
store i32%x,i32*%J,align 4
%K=getelementptr inbounds i8,i8*%y,i64 24
%L=bitcast i8*%K to i32*
store i32 3,i32*%L,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
%P=load i8*,i8**%f,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 void(...)**
store void(...)*bitcast(i32(i8*,i8*)*@_SMLL4loop_225 to void(...)*),void(...)**%S,align 8
%T=getelementptr inbounds i8,i8*%M,i64 16
%U=bitcast i8*%T to void(...)**
store void(...)*bitcast(i8*(i8*,i8*)*@_SMLL4loop_334 to void(...)*),void(...)**%U,align 8
%V=getelementptr inbounds i8,i8*%M,i64 24
%W=bitcast i8*%V to i32*
store i32 -2147483647,i32*%W,align 4
%X=load i8*,i8**%c,align 8
%Y=bitcast i8*%X to i32**
%Z=load i32*,i32**%Y,align 8
%aa=getelementptr inbounds i32,i32*%Z,i64 -1
%ab=load i32,i32*%aa,align 4
%ac=and i32%ab,268435455
%ad=load i8*,i8**%d,align 8
%ae=getelementptr inbounds i8,i8*%ad,i64 12
%af=bitcast i8*%ae to i32*
%ag=load i32,i32*%af,align 4
%ah=udiv i32%ac,%ag
store i8*null,i8**%c,align 8
%ai=getelementptr inbounds i8,i8*%X,i64 8
%aj=bitcast i8*%ai to i32**
%ak=load i32*,i32**%aj,align 8
%al=getelementptr inbounds i32,i32*%ak,i64 -1
%am=load i32,i32*%al,align 4
%an=and i32%am,268435455
store i8*null,i8**%d,align 8
%ao=udiv i32%an,%ag
%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
%as=getelementptr inbounds i8,i8*%ap,i64 4
%at=bitcast i8*%as to i32*
call void@llvm.memset.p0i8.i64(i8*%ap,i8 0,i64 16,i1 false)
store i32%ah,i32*%at,align 4
%au=getelementptr inbounds i8,i8*%ap,i64 8
%av=bitcast i8*%au to i32*
store i32%ao,i32*%av,align 4
%aw=getelementptr inbounds i8,i8*%ap,i64 16
%ax=bitcast i8*%aw to i32*
store i32 0,i32*%ax,align 4
%ay=load i8*,i8**%f,align 8
%az=tail call fastcc i32@_SMLL4loop_225(i8*inreg%ay,i8*inreg%ap)
ret i32%az
}
define internal fastcc i8*@_SMLLN12Array__common7collateE_227(i8*inreg%a,i8*inreg%b)#3 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=call i8*@sml_alloc(i32 inreg 20)#0
%k=getelementptr inbounds i8,i8*%j,i64 -4
%l=bitcast i8*%k to i32*
store i32 1342177296,i32*%l,align 4
store i8*%j,i8**%d,align 8
%m=load i8*,i8**%c,align 8
store i8*null,i8**%c,align 8
%n=bitcast i8*%j to i8**
store i8*%m,i8**%n,align 8
%o=getelementptr inbounds i8,i8*%j,i64 8
%p=bitcast i8*%o to i32*
store i32%f,i32*%p,align 4
%q=getelementptr inbounds i8,i8*%j,i64 12
%r=bitcast i8*%q to i32*
store i32%i,i32*%r,align 4
%s=getelementptr inbounds i8,i8*%j,i64 16
%t=bitcast i8*%s to i32*
store i32 1,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**%d,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(i32(i8*,i8*)*@_SMLLN12Array__common7collateE_226 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*)*@_SMLLN12Array__common7collateE_335 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
ret i8*%u
}
define internal fastcc i32@_SMLL6length_230(i8*inreg%a,i8*inreg%b)#4 gc"smlsharp"{
h:
%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*%a,i8**%d,align 8
%e=bitcast i8**%d to i32**
br label%f
f:
%g=phi i8*[%ah,%af],[%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 i32*,i32**%e,align 8
%p=load i32,i32*%o,align 4
%q=bitcast i8*%n to i8**
%r=load i8*,i8**%q,align 8
%s=icmp eq i8*%r,null
br i1%s,label%t,label%x
t:
%u=getelementptr inbounds i8,i8*%n,i64 8
%v=bitcast i8*%u to i32*
%w=load i32,i32*%v,align 4
ret i32%w
x:
%y=add i32%p,-1
%z=sub i32 0,%p
%A=and i32%y,%z
%B=add i32%p,7
%C=add i32%B,%A
%D=and i32%C,-8
%E=sext i32%D to i64
%F=getelementptr inbounds i8,i8*%r,i64%E
%G=bitcast i8*%F to i8**
%H=load i8*,i8**%G,align 8
store i8*%H,i8**%c,align 8
%I=getelementptr inbounds i8,i8*%n,i64 8
%J=bitcast i8*%I to i32*
%K=load i32,i32*%J,align 4
%L=call{i32,i1}@llvm.sadd.with.overflow.i32(i32%K,i32 1)#0
%M=extractvalue{i32,i1}%L,1
br i1%M,label%N,label%af
N:
store i8*null,i8**%d,align 8
%O=load i8*,i8**@_SMLZ8Overflow,align 8
store i8*%O,i8**%c,align 8
%P=call i8*@sml_alloc(i32 inreg 20)#0
%Q=getelementptr inbounds i8,i8*%P,i64 -4
%R=bitcast i8*%Q to i32*
store i32 1342177296,i32*%R,align 4
store i8*%P,i8**%d,align 8
%S=load i8*,i8**%c,align 8
store i8*null,i8**%c,align 8
%T=bitcast i8*%P to i8**
store i8*%S,i8**%T,align 8
%U=getelementptr inbounds i8,i8*%P,i64 8
%V=bitcast i8*%U to i8**
store i8*getelementptr inbounds(<{[4x i8],i32,[45x i8]}>,<{[4x i8],i32,[45x i8]}>*@c,i64 0,i32 2,i64 0),i8**%V,align 8
%W=getelementptr inbounds i8,i8*%P,i64 16
%X=bitcast i8*%W to i32*
store i32 3,i32*%X,align 4
%Y=call i8*@sml_alloc(i32 inreg 60)#0
%Z=getelementptr inbounds i8,i8*%Y,i64 -4
%aa=bitcast i8*%Z to i32*
store i32 1342177336,i32*%aa,align 4
%ab=getelementptr inbounds i8,i8*%Y,i64 56
%ac=bitcast i8*%ab to i32*
store i32 1,i32*%ac,align 4
%ad=load i8*,i8**%d,align 8
%ae=bitcast i8*%Y to i8**
store i8*%ad,i8**%ae,align 8
call void@sml_raise(i8*inreg%Y)#1
unreachable
af:
%ag=add nsw i32%K,1
%ah=call i8*@sml_alloc(i32 inreg 20)#0
%ai=getelementptr inbounds i8,i8*%ah,i64 -4
%aj=bitcast i8*%ai to i32*
store i32 1342177296,i32*%aj,align 4
%ak=getelementptr inbounds i8,i8*%ah,i64 12
%al=bitcast i8*%ak to i32*
store i32 0,i32*%al,align 1
%am=load i8*,i8**%c,align 8
store i8*null,i8**%c,align 8
%an=bitcast i8*%ah to i8**
store i8*%am,i8**%an,align 8
%ao=getelementptr inbounds i8,i8*%ah,i64 8
%ap=bitcast i8*%ao to i32*
store i32%ag,i32*%ap,align 4
%aq=getelementptr inbounds i8,i8*%ah,i64 16
%ar=bitcast i8*%aq to i32*
store i32 1,i32*%ar,align 4
br label%f
}
define internal fastcc void@_SMLL4fill_234(i8*inreg%a,i8*inreg%b)#4 gc"smlsharp"{
g:
%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*%a,i8**%d,align 8
br label%e
e:
%f=phi i8*[%ax,%av],[%b,%g]
store i8*%f,i8**%c,align 8
%h=load atomic i32,i32*@sml_check_flag unordered,align 4
%i=icmp eq i32%h,0
br i1%i,label%l,label%j
j:
call void@sml_check(i32 inreg%h)
%k=load i8*,i8**%c,align 8
br label%l
l:
%m=phi i8*[%k,%j],[%f,%e]
%n=load i8*,i8**%d,align 8
%o=getelementptr inbounds i8,i8*%n,i64 12
%p=bitcast i8*%o to i32*
%q=load i32,i32*%p,align 4
%r=add i32%q,-1
%s=sub i32 0,%q
%t=and i32%r,%s
%u=add i32%q,7
%v=add i32%u,%t
%w=and i32%v,-8
%x=bitcast i8*%m to i32*
%y=load i32,i32*%x,align 4
%z=getelementptr inbounds i8,i8*%m,i64 8
%A=bitcast i8*%z to i8**
%B=load i8*,i8**%A,align 8
%C=icmp eq i8*%B,null
br i1%C,label%D,label%E
D:
ret void
E:
store i8*%B,i8**%c,align 8
%F=getelementptr inbounds i8,i8*%n,i64 8
%G=bitcast i8*%F to i32*
%H=load i32,i32*%G,align 4
%I=icmp eq i32%H,0
br i1%I,label%O,label%J
J:
%K=sext i32%t to i64
%L=getelementptr inbounds i8,i8*%B,i64%K
%M=bitcast i8*%L to i8**
%N=load i8*,i8**%M,align 8
br label%ac
O:
%P=call i8*@sml_alloc(i32 inreg%q)#0
%Q=getelementptr inbounds i8,i8*%P,i64 -4
%R=bitcast i8*%Q to i32*
store i32%q,i32*%R,align 4
%S=load i8*,i8**%c,align 8
%T=sext i32%t to i64
%U=getelementptr inbounds i8,i8*%S,i64%T
call void@llvm.memcpy.p0i8.p0i8.i32(i8*%P,i8*%U,i32%q,i1 false)
%V=load i8*,i8**%d,align 8
%W=getelementptr inbounds i8,i8*%V,i64 12
%X=bitcast i8*%W to i32*
%Y=load i32,i32*%X,align 4
%Z=getelementptr inbounds i8,i8*%V,i64 8
%aa=bitcast i8*%Z to i32*
%ab=load i32,i32*%aa,align 4
br label%ac
ac:
%ad=phi i32[%H,%J],[%ab,%O]
%ae=phi i32[%q,%J],[%Y,%O]
%af=phi i8*[%n,%J],[%V,%O]
%ag=phi i8*[%B,%J],[%S,%O]
%ah=phi i8*[%N,%J],[%P,%O]
%ai=sext i32%w to i64
%aj=getelementptr inbounds i8,i8*%ag,i64%ai
%ak=bitcast i8*%aj to i8**
%al=load i8*,i8**%ak,align 8
store i8*%al,i8**%c,align 8
%am=bitcast i8*%af to i8**
%an=load i8*,i8**%am,align 8
%ao=icmp eq i32%ad,0
%ap=mul i32%ae,%y
%aq=sext i32%ap to i64
%ar=getelementptr inbounds i8,i8*%an,i64%aq
br i1%ao,label%au,label%as
as:
%at=bitcast i8*%ar to i8**
call void@sml_write(i8*inreg%an,i8**inreg%at,i8*inreg%ah)#0
br label%av
au:
call void@llvm.memcpy.p0i8.p0i8.i32(i8*%ar,i8*%ah,i32%ae,i1 false)
br label%av
av:
%aw=add nsw i32%y,1
%ax=call i8*@sml_alloc(i32 inreg 20)#0
%ay=bitcast i8*%ax to i32*
%az=getelementptr inbounds i8,i8*%ax,i64 -4
%aA=bitcast i8*%az to i32*
store i32 1342177296,i32*%aA,align 4
%aB=getelementptr inbounds i8,i8*%ax,i64 4
%aC=bitcast i8*%aB to i32*
store i32 0,i32*%aC,align 1
store i32%aw,i32*%ay,align 4
%aD=load i8*,i8**%c,align 8
store i8*null,i8**%c,align 8
%aE=getelementptr inbounds i8,i8*%ax,i64 8
%aF=bitcast i8*%aE to i8**
store i8*%aD,i8**%aF,align 8
%aG=getelementptr inbounds i8,i8*%ax,i64 16
%aH=bitcast i8*%aG to i32*
store i32 2,i32*%aH,align 4
br label%e
}
define internal fastcc i8*@_SMLLN12Array__common8fromListE_235(i8*inreg%a,i8*inreg%b)#4 gc"smlsharp"personality i32(...)*@sml_personality{
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 4
%n=bitcast i8*%m to i32*
%o=load i32,i32*%n,align 4
%p=call i8*@sml_alloc(i32 inreg 12)#0
%q=bitcast i8*%p to i32*
%r=getelementptr inbounds i8,i8*%p,i64 -4
%s=bitcast i8*%r to i32*
store i32 1342177288,i32*%s,align 4
store i8*%p,i8**%d,align 8
store i32%o,i32*%q,align 4
%t=getelementptr inbounds i8,i8*%p,i64 8
%u=bitcast i8*%t to i32*
store i32 0,i32*%u,align 4
%v=call i8*@sml_alloc(i32 inreg 28)#0
%w=getelementptr inbounds i8,i8*%v,i64 -4
%x=bitcast i8*%w to i32*
store i32 1342177304,i32*%x,align 4
%y=load i8*,i8**%d,align 8
%z=bitcast i8*%v to i8**
store i8*%y,i8**%z,align 8
%A=getelementptr inbounds i8,i8*%v,i64 8
%B=bitcast i8*%A to void(...)**
store void(...)*bitcast(i32(i8*,i8*)*@_SMLL6length_230 to void(...)*),void(...)**%B,align 8
%C=getelementptr inbounds i8,i8*%v,i64 16
%D=bitcast i8*%C to void(...)**
store void(...)*bitcast(i8*(i8*,i8*)*@_SMLL6length_337 to void(...)*),void(...)**%D,align 8
%E=getelementptr inbounds i8,i8*%v,i64 24
%F=bitcast i8*%E to i32*
store i32 -2147483647,i32*%F,align 4
%G=call i8*@sml_alloc(i32 inreg 20)#0
%H=getelementptr inbounds i8,i8*%G,i64 -4
%I=bitcast i8*%H to i32*
store i32 1342177296,i32*%I,align 4
%J=getelementptr inbounds i8,i8*%G,i64 12
%K=bitcast i8*%J to i32*
store i32 0,i32*%K,align 1
%L=load i8*,i8**%c,align 8
%M=bitcast i8*%G to i8**
store i8*%L,i8**%M,align 8
%N=getelementptr inbounds i8,i8*%G,i64 8
%O=bitcast i8*%N to i32*
store i32 0,i32*%O,align 4
%P=getelementptr inbounds i8,i8*%G,i64 16
%Q=bitcast i8*%P to i32*
store i32 1,i32*%Q,align 4
%R=load i8*,i8**%d,align 8
store i8*null,i8**%d,align 8
%S=invoke fastcc i32@_SMLL6length_230(i8*inreg%R,i8*inreg%G)
to label%aC unwind label%T
T:
%U=landingpad{i8*,i8*}
catch i8*null
%V=extractvalue{i8*,i8*}%U,1
%W=bitcast i8*%V to i8**
%X=load i8*,i8**%W,align 8
store i8*null,i8**%e,align 8
store i8*%X,i8**%c,align 8
%Y=bitcast i8*%X to i8**
%Z=load i8*,i8**%Y,align 8
%aa=load i8*,i8**@_SMLZ8Overflow,align 8
%ab=icmp eq i8*%Z,%aa
br i1%ab,label%ac,label%au
ac:
%ad=load i8*,i8**@_SMLZ4Size,align 8
store i8*%ad,i8**%c,align 8
%ae=call i8*@sml_alloc(i32 inreg 20)#0
%af=getelementptr inbounds i8,i8*%ae,i64 -4
%ag=bitcast i8*%af to i32*
store i32 1342177296,i32*%ag,align 4
store i8*%ae,i8**%d,align 8
%ah=load i8*,i8**%c,align 8
store i8*null,i8**%c,align 8
%ai=bitcast i8*%ae to i8**
store i8*%ah,i8**%ai,align 8
%aj=getelementptr inbounds i8,i8*%ae,i64 8
%ak=bitcast i8*%aj to i8**
store i8*getelementptr inbounds(<{[4x i8],i32,[45x i8]}>,<{[4x i8],i32,[45x i8]}>*@d,i64 0,i32 2,i64 0),i8**%ak,align 8
%al=getelementptr inbounds i8,i8*%ae,i64 16
%am=bitcast i8*%al to i32*
store i32 3,i32*%am,align 4
%an=call i8*@sml_alloc(i32 inreg 60)#0
%ao=getelementptr inbounds i8,i8*%an,i64 -4
%ap=bitcast i8*%ao to i32*
store i32 1342177336,i32*%ap,align 4
%aq=getelementptr inbounds i8,i8*%an,i64 56
%ar=bitcast i8*%aq to i32*
store i32 1,i32*%ar,align 4
%as=load i8*,i8**%d,align 8
%at=bitcast i8*%an to i8**
store i8*%as,i8**%at,align 8
call void@sml_raise(i8*inreg%an)#1
unreachable
au:
%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
%aA=load i8*,i8**%c,align 8
%aB=bitcast i8*%av to i8**
store i8*%aA,i8**%aB,align 8
call void@sml_raise(i8*inreg%av)#1
unreachable
aC:
%aD=icmp slt i32%S,0
br i1%aD,label%bB,label%aE
aE:
%aF=load i8*,i8**%e,align 8
%aG=getelementptr inbounds i8,i8*%aF,i64 4
%aH=bitcast i8*%aG to i32*
%aI=load i32,i32*%aH,align 4
%aJ=udiv i32 268435455,%aI
%aK=icmp sgt i32%S,%aJ
br i1%aK,label%bB,label%aL
aL:
%aM=bitcast i8*%aF to i32*
%aN=load i32,i32*%aM,align 4
%aO=mul nsw i32%aI,%S
%aP=call i8*@sml_alloc(i32 inreg%aO)#0
%aQ=shl i32%aN,28
%aR=or i32%aO,%aQ
%aS=or i32%aR,536870912
%aT=getelementptr inbounds i8,i8*%aP,i64 -4
%aU=bitcast i8*%aT to i32*
store i32%aS,i32*%aU,align 4
%aV=icmp eq i32%aN,0
br i1%aV,label%aX,label%aW
aW:
call void@llvm.memset.p0i8.i32(i8*%aP,i8 0,i32%aO,i1 false)
br label%aX
aX:
store i8*%aP,i8**%d,align 8
%aY=load i8*,i8**%e,align 8
%aZ=bitcast i8*%aY to i32*
%a0=load i32,i32*%aZ,align 4
store i8*null,i8**%e,align 8
%a1=getelementptr inbounds i8,i8*%aY,i64 4
%a2=bitcast i8*%a1 to i32*
%a3=load i32,i32*%a2,align 4
%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
%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 i32*
store i32%a0,i32*%ba,align 4
%bb=getelementptr inbounds i8,i8*%a4,i64 12
%bc=bitcast i8*%bb to i32*
store i32%a3,i32*%bc,align 4
%bd=getelementptr inbounds i8,i8*%a4,i64 16
%be=bitcast i8*%bd to i32*
store i32 1,i32*%be,align 4
%bf=call i8*@sml_alloc(i32 inreg 28)#0
%bg=getelementptr inbounds i8,i8*%bf,i64 -4
%bh=bitcast i8*%bg to i32*
store i32 1342177304,i32*%bh,align 4
%bi=load i8*,i8**%e,align 8
%bj=bitcast i8*%bf to i8**
store i8*%bi,i8**%bj,align 8
%bk=getelementptr inbounds i8,i8*%bf,i64 8
%bl=bitcast i8*%bk to void(...)**
store void(...)*bitcast(void(i8*,i8*)*@_SMLL4fill_234 to void(...)*),void(...)**%bl,align 8
%bm=getelementptr inbounds i8,i8*%bf,i64 16
%bn=bitcast i8*%bm to void(...)**
store void(...)*bitcast(i8*(i8*,i8*)*@_SMLL4fill_338 to void(...)*),void(...)**%bn,align 8
%bo=getelementptr inbounds i8,i8*%bf,i64 24
%bp=bitcast i8*%bo to i32*
store i32 -2147483647,i32*%bp,align 4
%bq=call i8*@sml_alloc(i32 inreg 20)#0
%br=getelementptr inbounds i8,i8*%bq,i64 -4
%bs=bitcast i8*%br to i32*
store i32 1342177296,i32*%bs,align 4
%bt=bitcast i8*%bq to i64*
store i64 0,i64*%bt,align 4
%bu=load i8*,i8**%c,align 8
store i8*null,i8**%c,align 8
%bv=getelementptr inbounds i8,i8*%bq,i64 8
%bw=bitcast i8*%bv to i8**
store i8*%bu,i8**%bw,align 8
%bx=getelementptr inbounds i8,i8*%bq,i64 16
%by=bitcast i8*%bx to i32*
store i32 2,i32*%by,align 4
%bz=load i8*,i8**%e,align 8
store i8*null,i8**%e,align 8
call fastcc void@_SMLL4fill_234(i8*inreg%bz,i8*inreg%bq)
%bA=load i8*,i8**%d,align 8
ret i8*%bA
bB:
store i8*null,i8**%e,align 8
%bC=load i8*,i8**@_SMLZ4Size,align 8
store i8*%bC,i8**%c,align 8
%bD=call i8*@sml_alloc(i32 inreg 20)#0
%bE=getelementptr inbounds i8,i8*%bD,i64 -4
%bF=bitcast i8*%bE to i32*
store i32 1342177296,i32*%bF,align 4
store i8*%bD,i8**%d,align 8
%bG=load i8*,i8**%c,align 8
store i8*null,i8**%c,align 8
%bH=bitcast i8*%bD to i8**
store i8*%bG,i8**%bH,align 8
%bI=getelementptr inbounds i8,i8*%bD,i64 8
%bJ=bitcast i8*%bI to i8**
store i8*getelementptr inbounds(<{[4x i8],i32,[45x i8]}>,<{[4x i8],i32,[45x i8]}>*@e,i64 0,i32 2,i64 0),i8**%bJ,align 8
%bK=getelementptr inbounds i8,i8*%bD,i64 16
%bL=bitcast i8*%bK to i32*
store i32 3,i32*%bL,align 4
%bM=call i8*@sml_alloc(i32 inreg 60)#0
%bN=getelementptr inbounds i8,i8*%bM,i64 -4
%bO=bitcast i8*%bN to i32*
store i32 1342177336,i32*%bO,align 4
%bP=getelementptr inbounds i8,i8*%bM,i64 56
%bQ=bitcast i8*%bP to i32*
store i32 1,i32*%bQ,align 4
%bR=load i8*,i8**%d,align 8
%bS=bitcast i8*%bM to i8**
store i8*%bR,i8**%bS,align 8
call void@sml_raise(i8*inreg%bM)#1
unreachable
}
define internal fastcc void@_SMLL4fill_239(i8*inreg%a,i32 inreg%b)#4 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 i32[%b,%h],[%ac,%ab]
%i=load atomic i32,i32*@sml_check_flag unordered,align 4
%j=icmp eq i32%i,0
br i1%j,label%l,label%k
k:
call void@sml_check(i32 inreg%i)
br label%l
l:
%m=load i8*,i8**%d,align 8
%n=getelementptr inbounds i8,i8*%m,i64 16
%o=bitcast i8*%n to i32*
%p=load i32,i32*%o,align 4
%q=icmp slt i32%g,%p
br i1%q,label%s,label%r
r:
ret void
s:
%t=bitcast i8*%m to i8**
%u=load i8*,i8**%t,align 8
store i8*%u,i8**%c,align 8
%v=getelementptr inbounds i8,i8*%m,i64 8
%w=bitcast i8*%v to i8**
%x=load i8*,i8**%w,align 8
%y=getelementptr inbounds i8,i8*%x,i64 8
%z=bitcast i8*%y to i8**
%A=load i8*,i8**%z,align 8
%B=getelementptr inbounds i8,i8*%A,i64 16
%C=bitcast i8*%B to i8*(i8*,i8*)**
%D=load i8*(i8*,i8*)*,i8*(i8*,i8*)**%C,align 8
%E=bitcast i8*%A to i8**
%F=load i8*,i8**%E,align 8
store i8*%F,i8**%e,align 8
%G=call i8*@sml_alloc(i32 inreg 4)#0
%H=bitcast i8*%G to i32*
%I=getelementptr inbounds i8,i8*%G,i64 -4
%J=bitcast i8*%I to i32*
store i32 4,i32*%J,align 4
store i32%g,i32*%H,align 4
%K=load i8*,i8**%e,align 8
store i8*null,i8**%e,align 8
%L=call fastcc i8*%D(i8*inreg%K,i8*inreg%G)
%M=load i8*,i8**%d,align 8
%N=getelementptr inbounds i8,i8*%M,i64 24
%O=bitcast i8*%N to i32*
%P=load i32,i32*%O,align 4
%Q=getelementptr inbounds i8,i8*%M,i64 20
%R=bitcast i8*%Q to i32*
%S=load i32,i32*%R,align 4
%T=icmp eq i32%S,0
%U=load i8*,i8**%c,align 8
store i8*null,i8**%c,align 8
%V=mul i32%P,%g
%W=sext i32%V to i64
%X=getelementptr inbounds i8,i8*%U,i64%W
br i1%T,label%aa,label%Y
Y:
%Z=bitcast i8*%X to i8**
call void@sml_write(i8*inreg%U,i8**inreg%Z,i8*inreg%L)#0
br label%ab
aa:
call void@llvm.memcpy.p0i8.p0i8.i32(i8*%X,i8*%L,i32%P,i1 false)
br label%ab
ab:
%ac=add nsw i32%g,1
br label%f
}
define internal fastcc i8*@_SMLLN12Array__common8tabulateE_240(i8*inreg%a,i8*inreg%b)#4 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**%c,align 8
br label%j
j:
%k=phi i8*[%i,%h],[%b,%l]
store i8*%k,i8**%d,align 8
%m=bitcast i8*%k to i32*
%n=load i32,i32*%m,align 4
%o=icmp slt i32%n,0
br i1%o,label%ar,label%p
p:
%q=load i8*,i8**%e,align 8
%r=getelementptr inbounds i8,i8*%q,i64 4
%s=bitcast i8*%r to i32*
%t=load i32,i32*%s,align 4
%u=udiv i32 268435455,%t
%v=icmp sgt i32%n,%u
br i1%v,label%ar,label%w
w:
%x=bitcast i8*%q to i32*
%y=load i32,i32*%x,align 4
%z=mul nsw i32%t,%n
%A=call i8*@sml_alloc(i32 inreg%z)#0
%B=shl i32%y,28
%C=or i32%z,%B
%D=or i32%C,536870912
%E=getelementptr inbounds i8,i8*%A,i64 -4
%F=bitcast i8*%E to i32*
store i32%D,i32*%F,align 4
%G=icmp eq i32%y,0
br i1%G,label%I,label%H
H:
call void@llvm.memset.p0i8.i32(i8*%A,i8 0,i32%z,i1 false)
br label%I
I:
store i8*%A,i8**%c,align 8
%J=load i8*,i8**%e,align 8
%K=bitcast i8*%J to i32*
%L=load i32,i32*%K,align 4
store i8*null,i8**%e,align 8
%M=getelementptr inbounds i8,i8*%J,i64 4
%N=bitcast i8*%M to i32*
%O=load i32,i32*%N,align 4
%P=call i8*@sml_alloc(i32 inreg 36)#0
%Q=getelementptr inbounds i8,i8*%P,i64 -4
%R=bitcast i8*%Q to i32*
store i32 1342177312,i32*%R,align 4
store i8*%P,i8**%e,align 8
%S=load i8*,i8**%c,align 8
%T=bitcast i8*%P to i8**
store i8*%S,i8**%T,align 8
%U=load i8*,i8**%d,align 8
store i8*null,i8**%d,align 8
%V=getelementptr inbounds i8,i8*%P,i64 8
%W=bitcast i8*%V to i8**
store i8*%U,i8**%W,align 8
%X=getelementptr inbounds i8,i8*%P,i64 16
%Y=bitcast i8*%X to i32*
store i32%n,i32*%Y,align 4
%Z=getelementptr inbounds i8,i8*%P,i64 20
%aa=bitcast i8*%Z to i32*
store i32%L,i32*%aa,align 4
%ab=getelementptr inbounds i8,i8*%P,i64 24
%ac=bitcast i8*%ab to i32*
store i32%O,i32*%ac,align 4
%ad=getelementptr inbounds i8,i8*%P,i64 32
%ae=bitcast i8*%ad to i32*
store i32 3,i32*%ae,align 4
%af=call i8*@sml_alloc(i32 inreg 28)#0
%ag=getelementptr inbounds i8,i8*%af,i64 -4
%ah=bitcast i8*%ag to i32*
store i32 1342177304,i32*%ah,align 4
%ai=load i8*,i8**%e,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 void(...)**
store void(...)*bitcast(void(i8*,i32)*@_SMLL4fill_239 to void(...)*),void(...)**%al,align 8
%am=getelementptr inbounds i8,i8*%af,i64 16
%an=bitcast i8*%am to void(...)**
store void(...)*bitcast(i8*(i8*,i8*)*@_SMLL4fill_340 to void(...)*),void(...)**%an,align 8
%ao=getelementptr inbounds i8,i8*%af,i64 24
%ap=bitcast i8*%ao to i32*
store i32 -2147483647,i32*%ap,align 4
store i8*null,i8**%e,align 8
call fastcc void@_SMLL4fill_239(i8*inreg%ai,i32 inreg 0)
%aq=load i8*,i8**%c,align 8
ret i8*%aq
ar:
store i8*null,i8**%d,align 8
store i8*null,i8**%e,align 8
%as=load i8*,i8**@_SMLZ4Size,align 8
store i8*%as,i8**%c,align 8
%at=call i8*@sml_alloc(i32 inreg 20)#0
%au=getelementptr inbounds i8,i8*%at,i64 -4
%av=bitcast i8*%au to i32*
store i32 1342177296,i32*%av,align 4
store i8*%at,i8**%d,align 8
%aw=load i8*,i8**%c,align 8
store i8*null,i8**%c,align 8
%ax=bitcast i8*%at to i8**
store i8*%aw,i8**%ax,align 8
%ay=getelementptr inbounds i8,i8*%at,i64 8
%az=bitcast i8*%ay to i8**
store i8*getelementptr inbounds(<{[4x i8],i32,[45x i8]}>,<{[4x i8],i32,[45x i8]}>*@f,i64 0,i32 2,i64 0),i8**%az,align 8
%aA=getelementptr inbounds i8,i8*%at,i64 16
%aB=bitcast i8*%aA to i32*
store i32 3,i32*%aB,align 4
%aC=call i8*@sml_alloc(i32 inreg 60)#0
%aD=getelementptr inbounds i8,i8*%aC,i64 -4
%aE=bitcast i8*%aD to i32*
store i32 1342177336,i32*%aE,align 4
%aF=getelementptr inbounds i8,i8*%aC,i64 56
%aG=bitcast i8*%aF to i32*
store i32 1,i32*%aG,align 4
%aH=load i8*,i8**%d,align 8
%aI=bitcast i8*%aC to i8**
store i8*%aH,i8**%aI,align 8
call void@sml_raise(i8*inreg%aC)#1
unreachable
}
define internal fastcc i8*@_SMLLN5Array5arrayE_243(i8*inreg%a,i8*inreg%b)#4 gc"smlsharp"{
l:
%c=alloca i8*,align 8
%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**%e,align 8
store i8*%b,i8**%d,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=bitcast i8*%k to i32*
%n=load i32,i32*%m,align 4
store i8*null,i8**%e,align 8
%o=getelementptr inbounds i8,i8*%k,i64 4
%p=bitcast i8*%o to i32*
%q=load i32,i32*%p,align 4
%r=bitcast i8**%c to i8*
call void@llvm.lifetime.start.p0i8(i64 8,i8*%r)
call void@llvm.gcroot(i8**%c,i8*null)#0
%s=call i8*@sml_alloc(i32 inreg 12)#0
%t=bitcast i8*%s to i32*
%u=getelementptr inbounds i8,i8*%s,i64 -4
%v=bitcast i8*%u to i32*
store i32 1342177288,i32*%v,align 4
store i8*%s,i8**%c,align 8
store i32%n,i32*%t,align 4
%w=getelementptr inbounds i8,i8*%s,i64 4
%x=bitcast i8*%w to i32*
store i32%q,i32*%x,align 4
%y=getelementptr inbounds i8,i8*%s,i64 8
%z=bitcast i8*%y to i32*
store i32 0,i32*%z,align 4
%A=call i8*@sml_alloc(i32 inreg 28)#0
%B=getelementptr inbounds i8,i8*%A,i64 -4
%C=bitcast i8*%B to i32*
store i32 1342177304,i32*%C,align 4
%D=load i8*,i8**%c,align 8
%E=bitcast i8*%A to i8**
store i8*%D,i8**%E,align 8
%F=getelementptr inbounds i8,i8*%A,i64 8
%G=bitcast i8*%F to void(...)**
store void(...)*bitcast(i8*(i8*,i8*)*@_SMLLN12Array__common5arrayE_146 to void(...)*),void(...)**%G,align 8
%H=getelementptr inbounds i8,i8*%A,i64 16
%I=bitcast i8*%H to void(...)**
store void(...)*bitcast(i8*(i8*,i8*)*@_SMLLN12Array__common5arrayE_146 to void(...)*),void(...)**%I,align 8
%J=getelementptr inbounds i8,i8*%A,i64 24
%K=bitcast i8*%J to i32*
store i32 -2147483647,i32*%K,align 4
call void@llvm.lifetime.end.p0i8(i64 8,i8*%r)
%L=load i8*,i8**%d,align 8
store i8*null,i8**%d,align 8
%M=call fastcc i8*@_SMLLN12Array__common5arrayE_146(i8*inreg%D,i8*inreg%L)
ret i8*%M
}
define fastcc i8*@_SMLFN5Array5arrayE(i32 inreg%a,i32 inreg%b)#3 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*,i8*)*@_SMLLN5Array5arrayE_243 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*)*@_SMLLN5Array5arrayE_243 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*@_SMLLN5Array8fromListE_246(i8*inreg%a,i8*inreg%b)#4 gc"smlsharp"{
l:
%c=alloca i8*,align 8
%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**%e,align 8
store i8*%b,i8**%d,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=bitcast i8*%k to i32*
%n=load i32,i32*%m,align 4
store i8*null,i8**%e,align 8
%o=getelementptr inbounds i8,i8*%k,i64 4
%p=bitcast i8*%o to i32*
%q=load i32,i32*%p,align 4
%r=bitcast i8**%c to i8*
call void@llvm.lifetime.start.p0i8(i64 8,i8*%r)
call void@llvm.gcroot(i8**%c,i8*null)#0
%s=call i8*@sml_alloc(i32 inreg 12)#0
%t=bitcast i8*%s to i32*
%u=getelementptr inbounds i8,i8*%s,i64 -4
%v=bitcast i8*%u to i32*
store i32 1342177288,i32*%v,align 4
store i8*%s,i8**%c,align 8
store i32%n,i32*%t,align 4
%w=getelementptr inbounds i8,i8*%s,i64 4
%x=bitcast i8*%w to i32*
store i32%q,i32*%x,align 4
%y=getelementptr inbounds i8,i8*%s,i64 8
%z=bitcast i8*%y to i32*
store i32 0,i32*%z,align 4
%A=call i8*@sml_alloc(i32 inreg 28)#0
%B=getelementptr inbounds i8,i8*%A,i64 -4
%C=bitcast i8*%B to i32*
store i32 1342177304,i32*%C,align 4
%D=load i8*,i8**%c,align 8
%E=bitcast i8*%A to i8**
store i8*%D,i8**%E,align 8
%F=getelementptr inbounds i8,i8*%A,i64 8
%G=bitcast i8*%F to void(...)**
store void(...)*bitcast(i8*(i8*,i8*)*@_SMLLN12Array__common8fromListE_235 to void(...)*),void(...)**%G,align 8
%H=getelementptr inbounds i8,i8*%A,i64 16
%I=bitcast i8*%H to void(...)**
store void(...)*bitcast(i8*(i8*,i8*)*@_SMLLN12Array__common8fromListE_235 to void(...)*),void(...)**%I,align 8
%J=getelementptr inbounds i8,i8*%A,i64 24
%K=bitcast i8*%J to i32*
store i32 -2147483647,i32*%K,align 4
call void@llvm.lifetime.end.p0i8(i64 8,i8*%r)
%L=load i8*,i8**%d,align 8
store i8*null,i8**%d,align 8
%M=call fastcc i8*@_SMLLN12Array__common8fromListE_235(i8*inreg%D,i8*inreg%L)
ret i8*%M
}
define fastcc i8*@_SMLFN5Array8fromListE(i32 inreg%a,i32 inreg%b)#3 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*,i8*)*@_SMLLN5Array8fromListE_246 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*)*@_SMLLN5Array8fromListE_246 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*@_SMLLN5Array8tabulateE_249(i8*inreg%a,i8*inreg%b)#4 gc"smlsharp"{
l:
%c=alloca i8*,align 8
%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**%e,align 8
store i8*%b,i8**%d,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=bitcast i8*%k to i32*
%n=load i32,i32*%m,align 4
store i8*null,i8**%e,align 8
%o=getelementptr inbounds i8,i8*%k,i64 4
%p=bitcast i8*%o to i32*
%q=load i32,i32*%p,align 4
%r=bitcast i8**%c to i8*
call void@llvm.lifetime.start.p0i8(i64 8,i8*%r)
call void@llvm.gcroot(i8**%c,i8*null)#0
%s=call i8*@sml_alloc(i32 inreg 12)#0
%t=bitcast i8*%s to i32*
%u=getelementptr inbounds i8,i8*%s,i64 -4
%v=bitcast i8*%u to i32*
store i32 1342177288,i32*%v,align 4
store i8*%s,i8**%c,align 8
store i32%n,i32*%t,align 4
%w=getelementptr inbounds i8,i8*%s,i64 4
%x=bitcast i8*%w to i32*
store i32%q,i32*%x,align 4
%y=getelementptr inbounds i8,i8*%s,i64 8
%z=bitcast i8*%y to i32*
store i32 0,i32*%z,align 4
%A=call i8*@sml_alloc(i32 inreg 28)#0
%B=getelementptr inbounds i8,i8*%A,i64 -4
%C=bitcast i8*%B to i32*
store i32 1342177304,i32*%C,align 4
%D=load i8*,i8**%c,align 8
%E=bitcast i8*%A to i8**
store i8*%D,i8**%E,align 8
%F=getelementptr inbounds i8,i8*%A,i64 8
%G=bitcast i8*%F to void(...)**
store void(...)*bitcast(i8*(i8*,i8*)*@_SMLLN12Array__common8tabulateE_240 to void(...)*),void(...)**%G,align 8
%H=getelementptr inbounds i8,i8*%A,i64 16
%I=bitcast i8*%H to void(...)**
store void(...)*bitcast(i8*(i8*,i8*)*@_SMLLN12Array__common8tabulateE_240 to void(...)*),void(...)**%I,align 8
%J=getelementptr inbounds i8,i8*%A,i64 24
%K=bitcast i8*%J to i32*
store i32 -2147483647,i32*%K,align 4
call void@llvm.lifetime.end.p0i8(i64 8,i8*%r)
%L=load i8*,i8**%d,align 8
store i8*null,i8**%d,align 8
%M=call fastcc i8*@_SMLLN12Array__common8tabulateE_240(i8*inreg%D,i8*inreg%L)
ret i8*%M
}
define fastcc i8*@_SMLFN5Array8tabulateE(i32 inreg%a,i32 inreg%b)#3 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*,i8*)*@_SMLLN5Array8tabulateE_249 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*)*@_SMLLN5Array8tabulateE_249 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*@_SMLLN5Array6vectorE_252(i8*inreg%a,i8*inreg%b)#4 gc"smlsharp"{
l:
%c=alloca i8*,align 8
%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**%e,align 8
store i8*%b,i8**%d,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=bitcast i8*%k to i32*
%n=load i32,i32*%m,align 4
store i8*null,i8**%e,align 8
%o=getelementptr inbounds i8,i8*%k,i64 4
%p=bitcast i8*%o to i32*
%q=load i32,i32*%p,align 4
%r=bitcast i8**%c to i8*
call void@llvm.lifetime.start.p0i8(i64 8,i8*%r)
call void@llvm.gcroot(i8**%c,i8*null)#0
%s=call i8*@sml_alloc(i32 inreg 12)#0
%t=bitcast i8*%s to i32*
%u=getelementptr inbounds i8,i8*%s,i64 -4
%v=bitcast i8*%u to i32*
store i32 1342177288,i32*%v,align 4
store i8*%s,i8**%c,align 8
store i32%n,i32*%t,align 4
%w=getelementptr inbounds i8,i8*%s,i64 4
%x=bitcast i8*%w to i32*
store i32%q,i32*%x,align 4
%y=getelementptr inbounds i8,i8*%s,i64 8
%z=bitcast i8*%y to i32*
store i32 0,i32*%z,align 4
%A=call i8*@sml_alloc(i32 inreg 28)#0
%B=getelementptr inbounds i8,i8*%A,i64 -4
%C=bitcast i8*%B to i32*
store i32 1342177304,i32*%C,align 4
%D=load i8*,i8**%c,align 8
%E=bitcast i8*%A to i8**
store i8*%D,i8**%E,align 8
%F=getelementptr inbounds i8,i8*%A,i64 8
%G=bitcast i8*%F to void(...)**
store void(...)*bitcast(i8*(i8*,i8*)*@_SMLLN12Array__common6vectorE_149 to void(...)*),void(...)**%G,align 8
%H=getelementptr inbounds i8,i8*%A,i64 16
%I=bitcast i8*%H to void(...)**
store void(...)*bitcast(i8*(i8*,i8*)*@_SMLLN12Array__common6vectorE_149 to void(...)*),void(...)**%I,align 8
%J=getelementptr inbounds i8,i8*%A,i64 24
%K=bitcast i8*%J to i32*
store i32 -2147483647,i32*%K,align 4
call void@llvm.lifetime.end.p0i8(i64 8,i8*%r)
%L=load i8*,i8**%d,align 8
store i8*null,i8**%d,align 8
%M=call fastcc i8*@_SMLLN12Array__common6vectorE_149(i8*inreg%D,i8*inreg%L)
ret i8*%M
}
define fastcc i8*@_SMLFN5Array6vectorE(i32 inreg%a,i32 inreg%b)#3 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*,i8*)*@_SMLLN5Array6vectorE_252 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*)*@_SMLLN5Array6vectorE_252 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 void@_SMLLN5Array7copyVecE_255(i8*inreg%a,i8*inreg%b)#4 gc"smlsharp"{
l:
%c=alloca i8*,align 8
%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**%e,align 8
store i8*%b,i8**%d,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=bitcast i8*%k to i32*
%n=load i32,i32*%m,align 4
store i8*null,i8**%e,align 8
%o=getelementptr inbounds i8,i8*%k,i64 4
%p=bitcast i8*%o to i32*
%q=load i32,i32*%p,align 4
%r=bitcast i8**%c to i8*
call void@llvm.lifetime.start.p0i8(i64 8,i8*%r)
call void@llvm.gcroot(i8**%c,i8*null)#0
%s=call i8*@sml_alloc(i32 inreg 12)#0
%t=bitcast i8*%s to i32*
%u=getelementptr inbounds i8,i8*%s,i64 -4
%v=bitcast i8*%u to i32*
store i32 1342177288,i32*%v,align 4
store i8*%s,i8**%c,align 8
store i32%n,i32*%t,align 4
%w=getelementptr inbounds i8,i8*%s,i64 4
%x=bitcast i8*%w to i32*
store i32%q,i32*%x,align 4
%y=getelementptr inbounds i8,i8*%s,i64 8
%z=bitcast i8*%y to i32*
store i32 0,i32*%z,align 4
%A=call i8*@sml_alloc(i32 inreg 28)#0
%B=getelementptr inbounds i8,i8*%A,i64 -4
%C=bitcast i8*%B to i32*
store i32 1342177304,i32*%C,align 4
%D=load i8*,i8**%c,align 8
%E=bitcast i8*%A to i8**
store i8*%D,i8**%E,align 8
%F=getelementptr inbounds i8,i8*%A,i64 8
%G=bitcast i8*%F to void(...)**
store void(...)*bitcast(void(i8*,i8*)*@_SMLLN12Array__common7copyVecE_153 to void(...)*),void(...)**%G,align 8
%H=getelementptr inbounds i8,i8*%A,i64 16
%I=bitcast i8*%H to void(...)**
store void(...)*bitcast(i8*(i8*,i8*)*@_SMLLN12Array__common7copyVecE_303 to void(...)*),void(...)**%I,align 8
%J=getelementptr inbounds i8,i8*%A,i64 24
%K=bitcast i8*%J to i32*
store i32 -2147483647,i32*%K,align 4
call void@llvm.lifetime.end.p0i8(i64 8,i8*%r)
%L=load i8*,i8**%d,align 8
store i8*null,i8**%d,align 8
%M=call fastcc i8*@_SMLLN12Array__common7copyVecE_303(i8*inreg%D,i8*inreg%L)
ret void
}
define fastcc i8*@_SMLFN5Array7copyVecE(i32 inreg%a,i32 inreg%b)#3 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(void(i8*,i8*)*@_SMLLN5Array7copyVecE_255 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*)*@_SMLLN5Array7copyVecE_346 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*@_SMLLN5Array4appiE_258(i8*inreg%a,i8*inreg%b)#4 gc"smlsharp"{
l:
%c=alloca i8*,align 8
%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**%e,align 8
store i8*%b,i8**%d,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=bitcast i8*%k to i32*
%n=load i32,i32*%m,align 4
store i8*null,i8**%e,align 8
%o=getelementptr inbounds i8,i8*%k,i64 4
%p=bitcast i8*%o to i32*
%q=load i32,i32*%p,align 4
%r=bitcast i8**%c to i8*
call void@llvm.lifetime.start.p0i8(i64 8,i8*%r)
call void@llvm.gcroot(i8**%c,i8*null)#0
%s=call i8*@sml_alloc(i32 inreg 12)#0
%t=bitcast i8*%s to i32*
%u=getelementptr inbounds i8,i8*%s,i64 -4
%v=bitcast i8*%u to i32*
store i32 1342177288,i32*%v,align 4
store i8*%s,i8**%c,align 8
store i32%n,i32*%t,align 4
%w=getelementptr inbounds i8,i8*%s,i64 4
%x=bitcast i8*%w to i32*
store i32%q,i32*%x,align 4
%y=getelementptr inbounds i8,i8*%s,i64 8
%z=bitcast i8*%y to i32*
store i32 0,i32*%z,align 4
%A=call i8*@sml_alloc(i32 inreg 28)#0
%B=getelementptr inbounds i8,i8*%A,i64 -4
%C=bitcast i8*%B to i32*
store i32 1342177304,i32*%C,align 4
%D=load i8*,i8**%c,align 8
%E=bitcast i8*%A to i8**
store i8*%D,i8**%E,align 8
%F=getelementptr inbounds i8,i8*%A,i64 8
%G=bitcast i8*%F to void(...)**
store void(...)*bitcast(i8*(i8*,i8*)*@_SMLLN12Array__common4appiE_182 to void(...)*),void(...)**%G,align 8
%H=getelementptr inbounds i8,i8*%A,i64 16
%I=bitcast i8*%H to void(...)**
store void(...)*bitcast(i8*(i8*,i8*)*@_SMLLN12Array__common4appiE_182 to void(...)*),void(...)**%I,align 8
%J=getelementptr inbounds i8,i8*%A,i64 24
%K=bitcast i8*%J to i32*
store i32 -2147483647,i32*%K,align 4
call void@llvm.lifetime.end.p0i8(i64 8,i8*%r)
%L=load i8*,i8**%d,align 8
store i8*null,i8**%d,align 8
%M=call fastcc i8*@_SMLLN12Array__common4appiE_182(i8*inreg%D,i8*inreg%L)
ret i8*%M
}
define fastcc i8*@_SMLFN5Array4appiE(i32 inreg%a,i32 inreg%b)#3 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*,i8*)*@_SMLLN5Array4appiE_258 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*)*@_SMLLN5Array4appiE_258 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*@_SMLLN5Array3appE_261(i8*inreg%a,i8*inreg%b)#4 gc"smlsharp"{
l:
%c=alloca i8*,align 8
%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**%e,align 8
store i8*%b,i8**%d,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=bitcast i8*%k to i32*
%n=load i32,i32*%m,align 4
store i8*null,i8**%e,align 8
%o=getelementptr inbounds i8,i8*%k,i64 4
%p=bitcast i8*%o to i32*
%q=load i32,i32*%p,align 4
%r=bitcast i8**%c to i8*
call void@llvm.lifetime.start.p0i8(i64 8,i8*%r)
call void@llvm.gcroot(i8**%c,i8*null)#0
%s=call i8*@sml_alloc(i32 inreg 12)#0
%t=bitcast i8*%s to i32*
%u=getelementptr inbounds i8,i8*%s,i64 -4
%v=bitcast i8*%u to i32*
store i32 1342177288,i32*%v,align 4
store i8*%s,i8**%c,align 8
store i32%n,i32*%t,align 4
%w=getelementptr inbounds i8,i8*%s,i64 4
%x=bitcast i8*%w to i32*
store i32%q,i32*%x,align 4
%y=getelementptr inbounds i8,i8*%s,i64 8
%z=bitcast i8*%y to i32*
store i32 0,i32*%z,align 4
%A=call i8*@sml_alloc(i32 inreg 28)#0
%B=getelementptr inbounds i8,i8*%A,i64 -4
%C=bitcast i8*%B to i32*
store i32 1342177304,i32*%C,align 4
%D=load i8*,i8**%c,align 8
%E=bitcast i8*%A to i8**
store i8*%D,i8**%E,align 8
%F=getelementptr inbounds i8,i8*%A,i64 8
%G=bitcast i8*%F to void(...)**
store void(...)*bitcast(i8*(i8*,i8*)*@_SMLLN12Array__common3appE_187 to void(...)*),void(...)**%G,align 8
%H=getelementptr inbounds i8,i8*%A,i64 16
%I=bitcast i8*%H to void(...)**
store void(...)*bitcast(i8*(i8*,i8*)*@_SMLLN12Array__common3appE_187 to void(...)*),void(...)**%I,align 8
%J=getelementptr inbounds i8,i8*%A,i64 24
%K=bitcast i8*%J to i32*
store i32 -2147483647,i32*%K,align 4
call void@llvm.lifetime.end.p0i8(i64 8,i8*%r)
%L=load i8*,i8**%d,align 8
store i8*null,i8**%d,align 8
%M=call fastcc i8*@_SMLLN12Array__common3appE_187(i8*inreg%D,i8*inreg%L)
ret i8*%M
}
define fastcc i8*@_SMLFN5Array3appE(i32 inreg%a,i32 inreg%b)#3 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*,i8*)*@_SMLLN5Array3appE_261 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*)*@_SMLLN5Array3appE_261 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*@_SMLLN5Array7modifyiE_264(i8*inreg%a,i8*inreg%b)#4 gc"smlsharp"{
l:
%c=alloca i8*,align 8
%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**%e,align 8
store i8*%b,i8**%d,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=bitcast i8*%k to i32*
%n=load i32,i32*%m,align 4
store i8*null,i8**%e,align 8
%o=getelementptr inbounds i8,i8*%k,i64 4
%p=bitcast i8*%o to i32*
%q=load i32,i32*%p,align 4
%r=bitcast i8**%c to i8*
call void@llvm.lifetime.start.p0i8(i64 8,i8*%r)
call void@llvm.gcroot(i8**%c,i8*null)#0
%s=call i8*@sml_alloc(i32 inreg 12)#0
%t=bitcast i8*%s to i32*
%u=getelementptr inbounds i8,i8*%s,i64 -4
%v=bitcast i8*%u to i32*
store i32 1342177288,i32*%v,align 4
store i8*%s,i8**%c,align 8
store i32%n,i32*%t,align 4
%w=getelementptr inbounds i8,i8*%s,i64 4
%x=bitcast i8*%w to i32*
store i32%q,i32*%x,align 4
%y=getelementptr inbounds i8,i8*%s,i64 8
%z=bitcast i8*%y to i32*
store i32 0,i32*%z,align 4
%A=call i8*@sml_alloc(i32 inreg 28)#0
%B=getelementptr inbounds i8,i8*%A,i64 -4
%C=bitcast i8*%B to i32*
store i32 1342177304,i32*%C,align 4
%D=load i8*,i8**%c,align 8
%E=bitcast i8*%A to i8**
store i8*%D,i8**%E,align 8
%F=getelementptr inbounds i8,i8*%A,i64 8
%G=bitcast i8*%F to void(...)**
store void(...)*bitcast(i8*(i8*,i8*)*@_SMLLN12Array__common7modifyiE_192 to void(...)*),void(...)**%G,align 8
%H=getelementptr inbounds i8,i8*%A,i64 16
%I=bitcast i8*%H to void(...)**
store void(...)*bitcast(i8*(i8*,i8*)*@_SMLLN12Array__common7modifyiE_192 to void(...)*),void(...)**%I,align 8
%J=getelementptr inbounds i8,i8*%A,i64 24
%K=bitcast i8*%J to i32*
store i32 -2147483647,i32*%K,align 4
call void@llvm.lifetime.end.p0i8(i64 8,i8*%r)
%L=load i8*,i8**%d,align 8
store i8*null,i8**%d,align 8
%M=call fastcc i8*@_SMLLN12Array__common7modifyiE_192(i8*inreg%D,i8*inreg%L)
ret i8*%M
}
define fastcc i8*@_SMLFN5Array7modifyiE(i32 inreg%a,i32 inreg%b)#3 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*,i8*)*@_SMLLN5Array7modifyiE_264 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*)*@_SMLLN5Array7modifyiE_264 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*@_SMLLN5Array6modifyE_267(i8*inreg%a,i8*inreg%b)#4 gc"smlsharp"{
l:
%c=alloca i8*,align 8
%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**%e,align 8
store i8*%b,i8**%d,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=bitcast i8*%k to i32*
%n=load i32,i32*%m,align 4
store i8*null,i8**%e,align 8
%o=getelementptr inbounds i8,i8*%k,i64 4
%p=bitcast i8*%o to i32*
%q=load i32,i32*%p,align 4
%r=bitcast i8**%c to i8*
call void@llvm.lifetime.start.p0i8(i64 8,i8*%r)
call void@llvm.gcroot(i8**%c,i8*null)#0
%s=call i8*@sml_alloc(i32 inreg 12)#0
%t=bitcast i8*%s to i32*
%u=getelementptr inbounds i8,i8*%s,i64 -4
%v=bitcast i8*%u to i32*
store i32 1342177288,i32*%v,align 4
store i8*%s,i8**%c,align 8
store i32%n,i32*%t,align 4
%w=getelementptr inbounds i8,i8*%s,i64 4
%x=bitcast i8*%w to i32*
store i32%q,i32*%x,align 4
%y=getelementptr inbounds i8,i8*%s,i64 8
%z=bitcast i8*%y to i32*
store i32 0,i32*%z,align 4
%A=call i8*@sml_alloc(i32 inreg 28)#0
%B=getelementptr inbounds i8,i8*%A,i64 -4
%C=bitcast i8*%B to i32*
store i32 1342177304,i32*%C,align 4
%D=load i8*,i8**%c,align 8
%E=bitcast i8*%A to i8**
store i8*%D,i8**%E,align 8
%F=getelementptr inbounds i8,i8*%A,i64 8
%G=bitcast i8*%F to void(...)**
store void(...)*bitcast(i8*(i8*,i8*)*@_SMLLN12Array__common6modifyE_197 to void(...)*),void(...)**%G,align 8
%H=getelementptr inbounds i8,i8*%A,i64 16
%I=bitcast i8*%H to void(...)**
store void(...)*bitcast(i8*(i8*,i8*)*@_SMLLN12Array__common6modifyE_197 to void(...)*),void(...)**%I,align 8
%J=getelementptr inbounds i8,i8*%A,i64 24
%K=bitcast i8*%J to i32*
store i32 -2147483647,i32*%K,align 4
call void@llvm.lifetime.end.p0i8(i64 8,i8*%r)
%L=load i8*,i8**%d,align 8
store i8*null,i8**%d,align 8
%M=call fastcc i8*@_SMLLN12Array__common6modifyE_197(i8*inreg%D,i8*inreg%L)
ret i8*%M
}
define fastcc i8*@_SMLFN5Array6modifyE(i32 inreg%a,i32 inreg%b)#3 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*,i8*)*@_SMLLN5Array6modifyE_267 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*)*@_SMLLN5Array6modifyE_267 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*@_SMLLN5Array6foldliE_270(i8*inreg%a,i8*inreg%b)#4 gc"smlsharp"{
l:
%c=alloca i8*,align 8
%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**%e,align 8
store i8*%b,i8**%d,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 8
%n=bitcast i8*%m to i32*
%o=load i32,i32*%n,align 4
%p=getelementptr inbounds i8,i8*%k,i64 12
%q=bitcast i8*%p to i32*
%r=load i32,i32*%q,align 4
%s=bitcast i8*%k to i32*
%t=load i32,i32*%s,align 4
store i8*null,i8**%e,align 8
%u=getelementptr inbounds i8,i8*%k,i64 4
%v=bitcast i8*%u to i32*
%w=load i32,i32*%v,align 4
%x=bitcast i8**%c to i8*
call void@llvm.lifetime.start.p0i8(i64 8,i8*%x)
call void@llvm.gcroot(i8**%c,i8*null)#0
%y=call i8*@sml_alloc(i32 inreg 20)#0
%z=bitcast i8*%y to i32*
%A=getelementptr inbounds i8,i8*%y,i64 -4
%B=bitcast i8*%A to i32*
store i32 1342177296,i32*%B,align 4
store i8*%y,i8**%c,align 8
store i32%o,i32*%z,align 4
%C=getelementptr inbounds i8,i8*%y,i64 4
%D=bitcast i8*%C to i32*
store i32%r,i32*%D,align 4
%E=getelementptr inbounds i8,i8*%y,i64 8
%F=bitcast i8*%E to i32*
store i32%t,i32*%F,align 4
%G=getelementptr inbounds i8,i8*%y,i64 12
%H=bitcast i8*%G to i32*
store i32%w,i32*%H,align 4
%I=getelementptr inbounds i8,i8*%y,i64 16
%J=bitcast i8*%I to i32*
store i32 0,i32*%J,align 4
%K=call i8*@sml_alloc(i32 inreg 28)#0
%L=getelementptr inbounds i8,i8*%K,i64 -4
%M=bitcast i8*%L to i32*
store i32 1342177304,i32*%M,align 4
%N=load i8*,i8**%c,align 8
%O=bitcast i8*%K to i8**
store i8*%N,i8**%O,align 8
%P=getelementptr inbounds i8,i8*%K,i64 8
%Q=bitcast i8*%P to void(...)**
store void(...)*bitcast(i8*(i8*,i8*)*@_SMLLN12Array__common6foldliE_159 to void(...)*),void(...)**%Q,align 8
%R=getelementptr inbounds i8,i8*%K,i64 16
%S=bitcast i8*%R to void(...)**
store void(...)*bitcast(i8*(i8*,i8*)*@_SMLLN12Array__common6foldliE_159 to void(...)*),void(...)**%S,align 8
%T=getelementptr inbounds i8,i8*%K,i64 24
%U=bitcast i8*%T to i32*
store i32 -2147483647,i32*%U,align 4
call void@llvm.lifetime.end.p0i8(i64 8,i8*%x)
%V=load i8*,i8**%d,align 8
store i8*null,i8**%d,align 8
%W=call fastcc i8*@_SMLLN12Array__common6foldliE_159(i8*inreg%N,i8*inreg%V)
ret i8*%W
}
define fastcc i8*@_SMLFN5Array6foldliE(i32 inreg%a,i32 inreg%b,i32 inreg%c,i32 inreg%d)#3 gc"smlsharp"{
%e=alloca i8*,align 8
call void@llvm.gcroot(i8**%e,i8*null)#0
%f=call i8*@sml_alloc(i32 inreg 20)#0
%g=bitcast i8*%f to i32*
%h=getelementptr inbounds i8,i8*%f,i64 -4
%i=bitcast i8*%h to i32*
store i32 1342177296,i32*%i,align 4
store i8*%f,i8**%e,align 8
store i32%a,i32*%g,align 4
%j=getelementptr inbounds i8,i8*%f,i64 4
%k=bitcast i8*%j to i32*
store i32%b,i32*%k,align 4
%l=getelementptr inbounds i8,i8*%f,i64 8
%m=bitcast i8*%l to i32*
store i32%c,i32*%m,align 4
%n=getelementptr inbounds i8,i8*%f,i64 12
%o=bitcast i8*%n to i32*
store i32%d,i32*%o,align 4
%p=getelementptr inbounds i8,i8*%f,i64 16
%q=bitcast i8*%p to i32*
store i32 0,i32*%q,align 4
%r=call i8*@sml_alloc(i32 inreg 28)#0
%s=getelementptr inbounds i8,i8*%r,i64 -4
%t=bitcast i8*%s to i32*
store i32 1342177304,i32*%t,align 4
%u=load i8*,i8**%e,align 8
%v=bitcast i8*%r to i8**
store i8*%u,i8**%v,align 8
%w=getelementptr inbounds i8,i8*%r,i64 8
%x=bitcast i8*%w to void(...)**
store void(...)*bitcast(i8*(i8*,i8*)*@_SMLLN5Array6foldliE_270 to void(...)*),void(...)**%x,align 8
%y=getelementptr inbounds i8,i8*%r,i64 16
%z=bitcast i8*%y to void(...)**
store void(...)*bitcast(i8*(i8*,i8*)*@_SMLLN5Array6foldliE_270 to void(...)*),void(...)**%z,align 8
%A=getelementptr inbounds i8,i8*%r,i64 24
%B=bitcast i8*%A to i32*
store i32 -2147483647,i32*%B,align 4
ret i8*%r
}
define internal fastcc i8*@_SMLLN5Array6foldriE_273(i8*inreg%a,i8*inreg%b)#4 gc"smlsharp"{
l:
%c=alloca i8*,align 8
%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**%e,align 8
store i8*%b,i8**%d,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 8
%n=bitcast i8*%m to i32*
%o=load i32,i32*%n,align 4
%p=getelementptr inbounds i8,i8*%k,i64 12
%q=bitcast i8*%p to i32*
%r=load i32,i32*%q,align 4
%s=bitcast i8*%k to i32*
%t=load i32,i32*%s,align 4
store i8*null,i8**%e,align 8
%u=getelementptr inbounds i8,i8*%k,i64 4
%v=bitcast i8*%u to i32*
%w=load i32,i32*%v,align 4
%x=bitcast i8**%c to i8*
call void@llvm.lifetime.start.p0i8(i64 8,i8*%x)
call void@llvm.gcroot(i8**%c,i8*null)#0
%y=call i8*@sml_alloc(i32 inreg 20)#0
%z=bitcast i8*%y to i32*
%A=getelementptr inbounds i8,i8*%y,i64 -4
%B=bitcast i8*%A to i32*
store i32 1342177296,i32*%B,align 4
store i8*%y,i8**%c,align 8
store i32%o,i32*%z,align 4
%C=getelementptr inbounds i8,i8*%y,i64 4
%D=bitcast i8*%C to i32*
store i32%r,i32*%D,align 4
%E=getelementptr inbounds i8,i8*%y,i64 8
%F=bitcast i8*%E to i32*
store i32%t,i32*%F,align 4
%G=getelementptr inbounds i8,i8*%y,i64 12
%H=bitcast i8*%G to i32*
store i32%w,i32*%H,align 4
%I=getelementptr inbounds i8,i8*%y,i64 16
%J=bitcast i8*%I to i32*
store i32 0,i32*%J,align 4
%K=call i8*@sml_alloc(i32 inreg 28)#0
%L=getelementptr inbounds i8,i8*%K,i64 -4
%M=bitcast i8*%L to i32*
store i32 1342177304,i32*%M,align 4
%N=load i8*,i8**%c,align 8
%O=bitcast i8*%K to i8**
store i8*%N,i8**%O,align 8
%P=getelementptr inbounds i8,i8*%K,i64 8
%Q=bitcast i8*%P to void(...)**
store void(...)*bitcast(i8*(i8*,i8*)*@_SMLLN12Array__common6foldriE_171 to void(...)*),void(...)**%Q,align 8
%R=getelementptr inbounds i8,i8*%K,i64 16
%S=bitcast i8*%R to void(...)**
store void(...)*bitcast(i8*(i8*,i8*)*@_SMLLN12Array__common6foldriE_171 to void(...)*),void(...)**%S,align 8
%T=getelementptr inbounds i8,i8*%K,i64 24
%U=bitcast i8*%T to i32*
store i32 -2147483647,i32*%U,align 4
call void@llvm.lifetime.end.p0i8(i64 8,i8*%x)
%V=load i8*,i8**%d,align 8
store i8*null,i8**%d,align 8
%W=call fastcc i8*@_SMLLN12Array__common6foldriE_171(i8*inreg%N,i8*inreg%V)
ret i8*%W
}
define fastcc i8*@_SMLFN5Array6foldriE(i32 inreg%a,i32 inreg%b,i32 inreg%c,i32 inreg%d)#3 gc"smlsharp"{
%e=alloca i8*,align 8
call void@llvm.gcroot(i8**%e,i8*null)#0
%f=call i8*@sml_alloc(i32 inreg 20)#0
%g=bitcast i8*%f to i32*
%h=getelementptr inbounds i8,i8*%f,i64 -4
%i=bitcast i8*%h to i32*
store i32 1342177296,i32*%i,align 4
store i8*%f,i8**%e,align 8
store i32%a,i32*%g,align 4
%j=getelementptr inbounds i8,i8*%f,i64 4
%k=bitcast i8*%j to i32*
store i32%b,i32*%k,align 4
%l=getelementptr inbounds i8,i8*%f,i64 8
%m=bitcast i8*%l to i32*
store i32%c,i32*%m,align 4
%n=getelementptr inbounds i8,i8*%f,i64 12
%o=bitcast i8*%n to i32*
store i32%d,i32*%o,align 4
%p=getelementptr inbounds i8,i8*%f,i64 16
%q=bitcast i8*%p to i32*
store i32 0,i32*%q,align 4
%r=call i8*@sml_alloc(i32 inreg 28)#0
%s=getelementptr inbounds i8,i8*%r,i64 -4
%t=bitcast i8*%s to i32*
store i32 1342177304,i32*%t,align 4
%u=load i8*,i8**%e,align 8
%v=bitcast i8*%r to i8**
store i8*%u,i8**%v,align 8
%w=getelementptr inbounds i8,i8*%r,i64 8
%x=bitcast i8*%w to void(...)**
store void(...)*bitcast(i8*(i8*,i8*)*@_SMLLN5Array6foldriE_273 to void(...)*),void(...)**%x,align 8
%y=getelementptr inbounds i8,i8*%r,i64 16
%z=bitcast i8*%y to void(...)**
store void(...)*bitcast(i8*(i8*,i8*)*@_SMLLN5Array6foldriE_273 to void(...)*),void(...)**%z,align 8
%A=getelementptr inbounds i8,i8*%r,i64 24
%B=bitcast i8*%A to i32*
store i32 -2147483647,i32*%B,align 4
ret i8*%r
}
define internal fastcc i8*@_SMLLN5Array5foldlE_276(i8*inreg%a,i8*inreg%b)#4 gc"smlsharp"{
l:
%c=alloca i8*,align 8
%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**%e,align 8
store i8*%b,i8**%d,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 8
%n=bitcast i8*%m to i32*
%o=load i32,i32*%n,align 4
%p=getelementptr inbounds i8,i8*%k,i64 12
%q=bitcast i8*%p to i32*
%r=load i32,i32*%q,align 4
%s=bitcast i8*%k to i32*
%t=load i32,i32*%s,align 4
store i8*null,i8**%e,align 8
%u=getelementptr inbounds i8,i8*%k,i64 4
%v=bitcast i8*%u to i32*
%w=load i32,i32*%v,align 4
%x=bitcast i8**%c to i8*
call void@llvm.lifetime.start.p0i8(i64 8,i8*%x)
call void@llvm.gcroot(i8**%c,i8*null)#0
%y=call i8*@sml_alloc(i32 inreg 20)#0
%z=bitcast i8*%y to i32*
%A=getelementptr inbounds i8,i8*%y,i64 -4
%B=bitcast i8*%A to i32*
store i32 1342177296,i32*%B,align 4
store i8*%y,i8**%c,align 8
store i32%o,i32*%z,align 4
%C=getelementptr inbounds i8,i8*%y,i64 4
%D=bitcast i8*%C to i32*
store i32%r,i32*%D,align 4
%E=getelementptr inbounds i8,i8*%y,i64 8
%F=bitcast i8*%E to i32*
store i32%t,i32*%F,align 4
%G=getelementptr inbounds i8,i8*%y,i64 12
%H=bitcast i8*%G to i32*
store i32%w,i32*%H,align 4
%I=getelementptr inbounds i8,i8*%y,i64 16
%J=bitcast i8*%I to i32*
store i32 0,i32*%J,align 4
%K=call i8*@sml_alloc(i32 inreg 28)#0
%L=getelementptr inbounds i8,i8*%K,i64 -4
%M=bitcast i8*%L to i32*
store i32 1342177304,i32*%M,align 4
%N=load i8*,i8**%c,align 8
%O=bitcast i8*%K to i8**
store i8*%N,i8**%O,align 8
%P=getelementptr inbounds i8,i8*%K,i64 8
%Q=bitcast i8*%P to void(...)**
store void(...)*bitcast(i8*(i8*,i8*)*@_SMLLN12Array__common5foldlE_165 to void(...)*),void(...)**%Q,align 8
%R=getelementptr inbounds i8,i8*%K,i64 16
%S=bitcast i8*%R to void(...)**
store void(...)*bitcast(i8*(i8*,i8*)*@_SMLLN12Array__common5foldlE_165 to void(...)*),void(...)**%S,align 8
%T=getelementptr inbounds i8,i8*%K,i64 24
%U=bitcast i8*%T to i32*
store i32 -2147483647,i32*%U,align 4
call void@llvm.lifetime.end.p0i8(i64 8,i8*%x)
%V=load i8*,i8**%d,align 8
store i8*null,i8**%d,align 8
%W=call fastcc i8*@_SMLLN12Array__common5foldlE_165(i8*inreg%N,i8*inreg%V)
ret i8*%W
}
define fastcc i8*@_SMLFN5Array5foldlE(i32 inreg%a,i32 inreg%b,i32 inreg%c,i32 inreg%d)#3 gc"smlsharp"{
%e=alloca i8*,align 8
call void@llvm.gcroot(i8**%e,i8*null)#0
%f=call i8*@sml_alloc(i32 inreg 20)#0
%g=bitcast i8*%f to i32*
%h=getelementptr inbounds i8,i8*%f,i64 -4
%i=bitcast i8*%h to i32*
store i32 1342177296,i32*%i,align 4
store i8*%f,i8**%e,align 8
store i32%a,i32*%g,align 4
%j=getelementptr inbounds i8,i8*%f,i64 4
%k=bitcast i8*%j to i32*
store i32%b,i32*%k,align 4
%l=getelementptr inbounds i8,i8*%f,i64 8
%m=bitcast i8*%l to i32*
store i32%c,i32*%m,align 4
%n=getelementptr inbounds i8,i8*%f,i64 12
%o=bitcast i8*%n to i32*
store i32%d,i32*%o,align 4
%p=getelementptr inbounds i8,i8*%f,i64 16
%q=bitcast i8*%p to i32*
store i32 0,i32*%q,align 4
%r=call i8*@sml_alloc(i32 inreg 28)#0
%s=getelementptr inbounds i8,i8*%r,i64 -4
%t=bitcast i8*%s to i32*
store i32 1342177304,i32*%t,align 4
%u=load i8*,i8**%e,align 8
%v=bitcast i8*%r to i8**
store i8*%u,i8**%v,align 8
%w=getelementptr inbounds i8,i8*%r,i64 8
%x=bitcast i8*%w to void(...)**
store void(...)*bitcast(i8*(i8*,i8*)*@_SMLLN5Array5foldlE_276 to void(...)*),void(...)**%x,align 8
%y=getelementptr inbounds i8,i8*%r,i64 16
%z=bitcast i8*%y to void(...)**
store void(...)*bitcast(i8*(i8*,i8*)*@_SMLLN5Array5foldlE_276 to void(...)*),void(...)**%z,align 8
%A=getelementptr inbounds i8,i8*%r,i64 24
%B=bitcast i8*%A to i32*
store i32 -2147483647,i32*%B,align 4
ret i8*%r
}
define internal fastcc i8*@_SMLLN5Array5foldrE_279(i8*inreg%a,i8*inreg%b)#4 gc"smlsharp"{
l:
%c=alloca i8*,align 8
%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**%e,align 8
store i8*%b,i8**%d,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 8
%n=bitcast i8*%m to i32*
%o=load i32,i32*%n,align 4
%p=getelementptr inbounds i8,i8*%k,i64 12
%q=bitcast i8*%p to i32*
%r=load i32,i32*%q,align 4
%s=bitcast i8*%k to i32*
%t=load i32,i32*%s,align 4
store i8*null,i8**%e,align 8
%u=getelementptr inbounds i8,i8*%k,i64 4
%v=bitcast i8*%u to i32*
%w=load i32,i32*%v,align 4
%x=bitcast i8**%c to i8*
call void@llvm.lifetime.start.p0i8(i64 8,i8*%x)
call void@llvm.gcroot(i8**%c,i8*null)#0
%y=call i8*@sml_alloc(i32 inreg 20)#0
%z=bitcast i8*%y to i32*
%A=getelementptr inbounds i8,i8*%y,i64 -4
%B=bitcast i8*%A to i32*
store i32 1342177296,i32*%B,align 4
store i8*%y,i8**%c,align 8
store i32%o,i32*%z,align 4
%C=getelementptr inbounds i8,i8*%y,i64 4
%D=bitcast i8*%C to i32*
store i32%r,i32*%D,align 4
%E=getelementptr inbounds i8,i8*%y,i64 8
%F=bitcast i8*%E to i32*
store i32%t,i32*%F,align 4
%G=getelementptr inbounds i8,i8*%y,i64 12
%H=bitcast i8*%G to i32*
store i32%w,i32*%H,align 4
%I=getelementptr inbounds i8,i8*%y,i64 16
%J=bitcast i8*%I to i32*
store i32 0,i32*%J,align 4
%K=call i8*@sml_alloc(i32 inreg 28)#0
%L=getelementptr inbounds i8,i8*%K,i64 -4
%M=bitcast i8*%L to i32*
store i32 1342177304,i32*%M,align 4
%N=load i8*,i8**%c,align 8
%O=bitcast i8*%K to i8**
store i8*%N,i8**%O,align 8
%P=getelementptr inbounds i8,i8*%K,i64 8
%Q=bitcast i8*%P to void(...)**
store void(...)*bitcast(i8*(i8*,i8*)*@_SMLLN12Array__common5foldrE_177 to void(...)*),void(...)**%Q,align 8
%R=getelementptr inbounds i8,i8*%K,i64 16
%S=bitcast i8*%R to void(...)**
store void(...)*bitcast(i8*(i8*,i8*)*@_SMLLN12Array__common5foldrE_177 to void(...)*),void(...)**%S,align 8
%T=getelementptr inbounds i8,i8*%K,i64 24
%U=bitcast i8*%T to i32*
store i32 -2147483647,i32*%U,align 4
call void@llvm.lifetime.end.p0i8(i64 8,i8*%x)
%V=load i8*,i8**%d,align 8
store i8*null,i8**%d,align 8
%W=call fastcc i8*@_SMLLN12Array__common5foldrE_177(i8*inreg%N,i8*inreg%V)
ret i8*%W
}
define fastcc i8*@_SMLFN5Array5foldrE(i32 inreg%a,i32 inreg%b,i32 inreg%c,i32 inreg%d)#3 gc"smlsharp"{
%e=alloca i8*,align 8
call void@llvm.gcroot(i8**%e,i8*null)#0
%f=call i8*@sml_alloc(i32 inreg 20)#0
%g=bitcast i8*%f to i32*
%h=getelementptr inbounds i8,i8*%f,i64 -4
%i=bitcast i8*%h to i32*
store i32 1342177296,i32*%i,align 4
store i8*%f,i8**%e,align 8
store i32%a,i32*%g,align 4
%j=getelementptr inbounds i8,i8*%f,i64 4
%k=bitcast i8*%j to i32*
store i32%b,i32*%k,align 4
%l=getelementptr inbounds i8,i8*%f,i64 8
%m=bitcast i8*%l to i32*
store i32%c,i32*%m,align 4
%n=getelementptr inbounds i8,i8*%f,i64 12
%o=bitcast i8*%n to i32*
store i32%d,i32*%o,align 4
%p=getelementptr inbounds i8,i8*%f,i64 16
%q=bitcast i8*%p to i32*
store i32 0,i32*%q,align 4
%r=call i8*@sml_alloc(i32 inreg 28)#0
%s=getelementptr inbounds i8,i8*%r,i64 -4
%t=bitcast i8*%s to i32*
store i32 1342177304,i32*%t,align 4
%u=load i8*,i8**%e,align 8
%v=bitcast i8*%r to i8**
store i8*%u,i8**%v,align 8
%w=getelementptr inbounds i8,i8*%r,i64 8
%x=bitcast i8*%w to void(...)**
store void(...)*bitcast(i8*(i8*,i8*)*@_SMLLN5Array5foldrE_279 to void(...)*),void(...)**%x,align 8
%y=getelementptr inbounds i8,i8*%r,i64 16
%z=bitcast i8*%y to void(...)**
store void(...)*bitcast(i8*(i8*,i8*)*@_SMLLN5Array5foldrE_279 to void(...)*),void(...)**%z,align 8
%A=getelementptr inbounds i8,i8*%r,i64 24
%B=bitcast i8*%A to i32*
store i32 -2147483647,i32*%B,align 4
ret i8*%r
}
define internal fastcc i8*@_SMLLN5Array5findiE_282(i8*inreg%a,i8*inreg%b)#4 gc"smlsharp"{
l:
%c=alloca i8*,align 8
%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**%e,align 8
store i8*%b,i8**%d,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=bitcast i8*%k to i32*
%n=load i32,i32*%m,align 4
store i8*null,i8**%e,align 8
%o=getelementptr inbounds i8,i8*%k,i64 4
%p=bitcast i8*%o to i32*
%q=load i32,i32*%p,align 4
%r=bitcast i8**%c to i8*
call void@llvm.lifetime.start.p0i8(i64 8,i8*%r)
call void@llvm.gcroot(i8**%c,i8*null)#0
%s=call i8*@sml_alloc(i32 inreg 12)#0
%t=bitcast i8*%s to i32*
%u=getelementptr inbounds i8,i8*%s,i64 -4
%v=bitcast i8*%u to i32*
store i32 1342177288,i32*%v,align 4
store i8*%s,i8**%c,align 8
store i32%n,i32*%t,align 4
%w=getelementptr inbounds i8,i8*%s,i64 4
%x=bitcast i8*%w to i32*
store i32%q,i32*%x,align 4
%y=getelementptr inbounds i8,i8*%s,i64 8
%z=bitcast i8*%y to i32*
store i32 0,i32*%z,align 4
%A=call i8*@sml_alloc(i32 inreg 28)#0
%B=getelementptr inbounds i8,i8*%A,i64 -4
%C=bitcast i8*%B to i32*
store i32 1342177304,i32*%C,align 4
%D=load i8*,i8**%c,align 8
%E=bitcast i8*%A to i8**
store i8*%D,i8**%E,align 8
%F=getelementptr inbounds i8,i8*%A,i64 8
%G=bitcast i8*%F to void(...)**
store void(...)*bitcast(i8*(i8*,i8*)*@_SMLLN12Array__common5findiE_202 to void(...)*),void(...)**%G,align 8
%H=getelementptr inbounds i8,i8*%A,i64 16
%I=bitcast i8*%H to void(...)**
store void(...)*bitcast(i8*(i8*,i8*)*@_SMLLN12Array__common5findiE_202 to void(...)*),void(...)**%I,align 8
%J=getelementptr inbounds i8,i8*%A,i64 24
%K=bitcast i8*%J to i32*
store i32 -2147483647,i32*%K,align 4
call void@llvm.lifetime.end.p0i8(i64 8,i8*%r)
%L=load i8*,i8**%d,align 8
store i8*null,i8**%d,align 8
%M=call fastcc i8*@_SMLLN12Array__common5findiE_202(i8*inreg%D,i8*inreg%L)
ret i8*%M
}
define fastcc i8*@_SMLFN5Array5findiE(i32 inreg%a,i32 inreg%b)#3 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*,i8*)*@_SMLLN5Array5findiE_282 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*)*@_SMLLN5Array5findiE_282 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*@_SMLLN5Array4findE_285(i8*inreg%a,i8*inreg%b)#4 gc"smlsharp"{
l:
%c=alloca i8*,align 8
%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**%e,align 8
store i8*%b,i8**%d,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=bitcast i8*%k to i32*
%n=load i32,i32*%m,align 4
store i8*null,i8**%e,align 8
%o=getelementptr inbounds i8,i8*%k,i64 4
%p=bitcast i8*%o to i32*
%q=load i32,i32*%p,align 4
%r=bitcast i8**%c to i8*
call void@llvm.lifetime.start.p0i8(i64 8,i8*%r)
call void@llvm.gcroot(i8**%c,i8*null)#0
%s=call i8*@sml_alloc(i32 inreg 12)#0
%t=bitcast i8*%s to i32*
%u=getelementptr inbounds i8,i8*%s,i64 -4
%v=bitcast i8*%u to i32*
store i32 1342177288,i32*%v,align 4
store i8*%s,i8**%c,align 8
store i32%n,i32*%t,align 4
%w=getelementptr inbounds i8,i8*%s,i64 4
%x=bitcast i8*%w to i32*
store i32%q,i32*%x,align 4
%y=getelementptr inbounds i8,i8*%s,i64 8
%z=bitcast i8*%y to i32*
store i32 0,i32*%z,align 4
%A=call i8*@sml_alloc(i32 inreg 28)#0
%B=getelementptr inbounds i8,i8*%A,i64 -4
%C=bitcast i8*%B to i32*
store i32 1342177304,i32*%C,align 4
%D=load i8*,i8**%c,align 8
%E=bitcast i8*%A to i8**
store i8*%D,i8**%E,align 8
%F=getelementptr inbounds i8,i8*%A,i64 8
%G=bitcast i8*%F to void(...)**
store void(...)*bitcast(i8*(i8*,i8*)*@_SMLLN12Array__common4findE_207 to void(...)*),void(...)**%G,align 8
%H=getelementptr inbounds i8,i8*%A,i64 16
%I=bitcast i8*%H to void(...)**
store void(...)*bitcast(i8*(i8*,i8*)*@_SMLLN12Array__common4findE_207 to void(...)*),void(...)**%I,align 8
%J=getelementptr inbounds i8,i8*%A,i64 24
%K=bitcast i8*%J to i32*
store i32 -2147483647,i32*%K,align 4
call void@llvm.lifetime.end.p0i8(i64 8,i8*%r)
%L=load i8*,i8**%d,align 8
store i8*null,i8**%d,align 8
%M=call fastcc i8*@_SMLLN12Array__common4findE_207(i8*inreg%D,i8*inreg%L)
ret i8*%M
}
define fastcc i8*@_SMLFN5Array4findE(i32 inreg%a,i32 inreg%b)#3 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*,i8*)*@_SMLLN5Array4findE_285 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*)*@_SMLLN5Array4findE_285 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*@_SMLLN5Array6existsE_288(i8*inreg%a,i8*inreg%b)#4 gc"smlsharp"{
l:
%c=alloca i8*,align 8
%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**%e,align 8
store i8*%b,i8**%d,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=bitcast i8*%k to i32*
%n=load i32,i32*%m,align 4
store i8*null,i8**%e,align 8
%o=getelementptr inbounds i8,i8*%k,i64 4
%p=bitcast i8*%o to i32*
%q=load i32,i32*%p,align 4
%r=bitcast i8**%c to i8*
call void@llvm.lifetime.start.p0i8(i64 8,i8*%r)
call void@llvm.gcroot(i8**%c,i8*null)#0
%s=call i8*@sml_alloc(i32 inreg 12)#0
%t=bitcast i8*%s to i32*
%u=getelementptr inbounds i8,i8*%s,i64 -4
%v=bitcast i8*%u to i32*
store i32 1342177288,i32*%v,align 4
store i8*%s,i8**%c,align 8
store i32%n,i32*%t,align 4
%w=getelementptr inbounds i8,i8*%s,i64 4
%x=bitcast i8*%w to i32*
store i32%q,i32*%x,align 4
%y=getelementptr inbounds i8,i8*%s,i64 8
%z=bitcast i8*%y to i32*
store i32 0,i32*%z,align 4
%A=call i8*@sml_alloc(i32 inreg 28)#0
%B=getelementptr inbounds i8,i8*%A,i64 -4
%C=bitcast i8*%B to i32*
store i32 1342177304,i32*%C,align 4
%D=load i8*,i8**%c,align 8
%E=bitcast i8*%A to i8**
store i8*%D,i8**%E,align 8
%F=getelementptr inbounds i8,i8*%A,i64 8
%G=bitcast i8*%F to void(...)**
store void(...)*bitcast(i8*(i8*,i8*)*@_SMLLN12Array__common6existsE_212 to void(...)*),void(...)**%G,align 8
%H=getelementptr inbounds i8,i8*%A,i64 16
%I=bitcast i8*%H to void(...)**
store void(...)*bitcast(i8*(i8*,i8*)*@_SMLLN12Array__common6existsE_212 to void(...)*),void(...)**%I,align 8
%J=getelementptr inbounds i8,i8*%A,i64 24
%K=bitcast i8*%J to i32*
store i32 -2147483647,i32*%K,align 4
call void@llvm.lifetime.end.p0i8(i64 8,i8*%r)
%L=load i8*,i8**%d,align 8
store i8*null,i8**%d,align 8
%M=call fastcc i8*@_SMLLN12Array__common6existsE_212(i8*inreg%D,i8*inreg%L)
ret i8*%M
}
define fastcc i8*@_SMLFN5Array6existsE(i32 inreg%a,i32 inreg%b)#3 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*,i8*)*@_SMLLN5Array6existsE_288 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*)*@_SMLLN5Array6existsE_288 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*@_SMLLN5Array3allE_291(i8*inreg%a,i8*inreg%b)#4 gc"smlsharp"{
l:
%c=alloca i8*,align 8
%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**%e,align 8
store i8*%b,i8**%d,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=bitcast i8*%k to i32*
%n=load i32,i32*%m,align 4
store i8*null,i8**%e,align 8
%o=getelementptr inbounds i8,i8*%k,i64 4
%p=bitcast i8*%o to i32*
%q=load i32,i32*%p,align 4
%r=bitcast i8**%c to i8*
call void@llvm.lifetime.start.p0i8(i64 8,i8*%r)
call void@llvm.gcroot(i8**%c,i8*null)#0
%s=call i8*@sml_alloc(i32 inreg 12)#0
%t=bitcast i8*%s to i32*
%u=getelementptr inbounds i8,i8*%s,i64 -4
%v=bitcast i8*%u to i32*
store i32 1342177288,i32*%v,align 4
store i8*%s,i8**%c,align 8
store i32%n,i32*%t,align 4
%w=getelementptr inbounds i8,i8*%s,i64 4
%x=bitcast i8*%w to i32*
store i32%q,i32*%x,align 4
%y=getelementptr inbounds i8,i8*%s,i64 8
%z=bitcast i8*%y to i32*
store i32 0,i32*%z,align 4
%A=call i8*@sml_alloc(i32 inreg 28)#0
%B=getelementptr inbounds i8,i8*%A,i64 -4
%C=bitcast i8*%B to i32*
store i32 1342177304,i32*%C,align 4
%D=load i8*,i8**%c,align 8
%E=bitcast i8*%A to i8**
store i8*%D,i8**%E,align 8
%F=getelementptr inbounds i8,i8*%A,i64 8
%G=bitcast i8*%F to void(...)**
store void(...)*bitcast(i8*(i8*,i8*)*@_SMLLN12Array__common3allE_217 to void(...)*),void(...)**%G,align 8
%H=getelementptr inbounds i8,i8*%A,i64 16
%I=bitcast i8*%H to void(...)**
store void(...)*bitcast(i8*(i8*,i8*)*@_SMLLN12Array__common3allE_217 to void(...)*),void(...)**%I,align 8
%J=getelementptr inbounds i8,i8*%A,i64 24
%K=bitcast i8*%J to i32*
store i32 -2147483647,i32*%K,align 4
call void@llvm.lifetime.end.p0i8(i64 8,i8*%r)
%L=load i8*,i8**%d,align 8
store i8*null,i8**%d,align 8
%M=call fastcc i8*@_SMLLN12Array__common3allE_217(i8*inreg%D,i8*inreg%L)
ret i8*%M
}
define fastcc i8*@_SMLFN5Array3allE(i32 inreg%a,i32 inreg%b)#3 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*,i8*)*@_SMLLN5Array3allE_291 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*)*@_SMLLN5Array3allE_291 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*@_SMLLN5Array4alliE_294(i8*inreg%a,i8*inreg%b)#4 gc"smlsharp"{
l:
%c=alloca i8*,align 8
%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**%e,align 8
store i8*%b,i8**%d,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=bitcast i8*%k to i32*
%n=load i32,i32*%m,align 4
store i8*null,i8**%e,align 8
%o=getelementptr inbounds i8,i8*%k,i64 4
%p=bitcast i8*%o to i32*
%q=load i32,i32*%p,align 4
%r=bitcast i8**%c to i8*
call void@llvm.lifetime.start.p0i8(i64 8,i8*%r)
call void@llvm.gcroot(i8**%c,i8*null)#0
%s=call i8*@sml_alloc(i32 inreg 12)#0
%t=bitcast i8*%s to i32*
%u=getelementptr inbounds i8,i8*%s,i64 -4
%v=bitcast i8*%u to i32*
store i32 1342177288,i32*%v,align 4
store i8*%s,i8**%c,align 8
store i32%n,i32*%t,align 4
%w=getelementptr inbounds i8,i8*%s,i64 4
%x=bitcast i8*%w to i32*
store i32%q,i32*%x,align 4
%y=getelementptr inbounds i8,i8*%s,i64 8
%z=bitcast i8*%y to i32*
store i32 0,i32*%z,align 4
%A=call i8*@sml_alloc(i32 inreg 28)#0
%B=getelementptr inbounds i8,i8*%A,i64 -4
%C=bitcast i8*%B to i32*
store i32 1342177304,i32*%C,align 4
%D=load i8*,i8**%c,align 8
%E=bitcast i8*%A to i8**
store i8*%D,i8**%E,align 8
%F=getelementptr inbounds i8,i8*%A,i64 8
%G=bitcast i8*%F to void(...)**
store void(...)*bitcast(i8*(i8*,i8*)*@_SMLLN12Array__common4alliE_222 to void(...)*),void(...)**%G,align 8
%H=getelementptr inbounds i8,i8*%A,i64 16
%I=bitcast i8*%H to void(...)**
store void(...)*bitcast(i8*(i8*,i8*)*@_SMLLN12Array__common4alliE_222 to void(...)*),void(...)**%I,align 8
%J=getelementptr inbounds i8,i8*%A,i64 24
%K=bitcast i8*%J to i32*
store i32 -2147483647,i32*%K,align 4
call void@llvm.lifetime.end.p0i8(i64 8,i8*%r)
%L=load i8*,i8**%d,align 8
store i8*null,i8**%d,align 8
%M=call fastcc i8*@_SMLLN12Array__common4alliE_222(i8*inreg%D,i8*inreg%L)
ret i8*%M
}
define fastcc i8*@_SMLFN5Array4alliE(i32 inreg%a,i32 inreg%b)#3 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*,i8*)*@_SMLLN5Array4alliE_294 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*)*@_SMLLN5Array4alliE_294 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*@_SMLLN5Array7collateE_297(i8*inreg%a,i8*inreg%b)#4 gc"smlsharp"{
l:
%c=alloca i8*,align 8
%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**%e,align 8
store i8*%b,i8**%d,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=bitcast i8*%k to i32*
%n=load i32,i32*%m,align 4
store i8*null,i8**%e,align 8
%o=getelementptr inbounds i8,i8*%k,i64 4
%p=bitcast i8*%o to i32*
%q=load i32,i32*%p,align 4
%r=bitcast i8**%c to i8*
call void@llvm.lifetime.start.p0i8(i64 8,i8*%r)
call void@llvm.gcroot(i8**%c,i8*null)#0
%s=call i8*@sml_alloc(i32 inreg 12)#0
%t=bitcast i8*%s to i32*
%u=getelementptr inbounds i8,i8*%s,i64 -4
%v=bitcast i8*%u to i32*
store i32 1342177288,i32*%v,align 4
store i8*%s,i8**%c,align 8
store i32%n,i32*%t,align 4
%w=getelementptr inbounds i8,i8*%s,i64 4
%x=bitcast i8*%w to i32*
store i32%q,i32*%x,align 4
%y=getelementptr inbounds i8,i8*%s,i64 8
%z=bitcast i8*%y to i32*
store i32 0,i32*%z,align 4
%A=call i8*@sml_alloc(i32 inreg 28)#0
%B=getelementptr inbounds i8,i8*%A,i64 -4
%C=bitcast i8*%B to i32*
store i32 1342177304,i32*%C,align 4
%D=load i8*,i8**%c,align 8
%E=bitcast i8*%A to i8**
store i8*%D,i8**%E,align 8
%F=getelementptr inbounds i8,i8*%A,i64 8
%G=bitcast i8*%F to void(...)**
store void(...)*bitcast(i8*(i8*,i8*)*@_SMLLN12Array__common7collateE_227 to void(...)*),void(...)**%G,align 8
%H=getelementptr inbounds i8,i8*%A,i64 16
%I=bitcast i8*%H to void(...)**
store void(...)*bitcast(i8*(i8*,i8*)*@_SMLLN12Array__common7collateE_227 to void(...)*),void(...)**%I,align 8
%J=getelementptr inbounds i8,i8*%A,i64 24
%K=bitcast i8*%J to i32*
store i32 -2147483647,i32*%K,align 4
call void@llvm.lifetime.end.p0i8(i64 8,i8*%r)
%L=load i8*,i8**%d,align 8
store i8*null,i8**%d,align 8
%M=call fastcc i8*@_SMLLN12Array__common7collateE_227(i8*inreg%D,i8*inreg%L)
ret i8*%M
}
define fastcc i8*@_SMLFN5Array7collateE(i32 inreg%a,i32 inreg%b)#3 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*,i8*)*@_SMLLN5Array7collateE_297 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*)*@_SMLLN5Array7collateE_297 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*@_SMLL4loop_300(i8*inreg%a,i8*inreg%b)#4 gc"smlsharp"{
%c=bitcast i8*%b to i32*
%d=load i32,i32*%c,align 4
tail call fastcc void@_SMLL4loop_145(i8*inreg%a,i32 inreg%d)
%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 0,i32*%f,align 4
ret i8*%e
}
define internal fastcc i8*@_SMLLN12Array__common7copyVecE_303(i8*inreg%a,i8*inreg%b)#4 gc"smlsharp"{
tail call fastcc void@_SMLLN12Array__common7copyVecE_153(i8*inreg%a,i8*inreg%b)
%c=tail call i8*@sml_alloc(i32 inreg 4)#0
%d=bitcast i8*%c to i32*
%e=getelementptr inbounds i8,i8*%c,i64 -4
%f=bitcast i8*%e to i32*
store i32 4,i32*%f,align 4
store i32 0,i32*%d,align 4
ret i8*%c
}
define internal fastcc i8*@_SMLL4loop_309(i8*inreg%a,i8*inreg%b)#4 gc"smlsharp"{
%c=bitcast i8*%b to i32*
%d=load i32,i32*%c,align 4
tail call fastcc void@_SMLL4loop_180(i8*inreg%a,i32 inreg%d)
%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 0,i32*%f,align 4
ret i8*%e
}
define internal fastcc i8*@_SMLLN12Array__common4appiE_310(i8*inreg%a,i8*inreg%b)#4 gc"smlsharp"{
tail call fastcc void@_SMLLN12Array__common4appiE_181(i8*inreg%a,i8*inreg%b)
%c=tail call i8*@sml_alloc(i32 inreg 4)#0
%d=bitcast i8*%c to i32*
%e=getelementptr inbounds i8,i8*%c,i64 -4
%f=bitcast i8*%e to i32*
store i32 4,i32*%f,align 4
store i32 0,i32*%d,align 4
ret i8*%c
}
define internal fastcc i8*@_SMLL4loop_312(i8*inreg%a,i8*inreg%b)#4 gc"smlsharp"{
%c=bitcast i8*%b to i32*
%d=load i32,i32*%c,align 4
tail call fastcc void@_SMLL4loop_185(i8*inreg%a,i32 inreg%d)
%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 0,i32*%f,align 4
ret i8*%e
}
define internal fastcc i8*@_SMLLN12Array__common3appE_313(i8*inreg%a,i8*inreg%b)#4 gc"smlsharp"{
tail call fastcc void@_SMLLN12Array__common3appE_186(i8*inreg%a,i8*inreg%b)
%c=tail call i8*@sml_alloc(i32 inreg 4)#0
%d=bitcast i8*%c to i32*
%e=getelementptr inbounds i8,i8*%c,i64 -4
%f=bitcast i8*%e to i32*
store i32 4,i32*%f,align 4
store i32 0,i32*%d,align 4
ret i8*%c
}
define internal fastcc i8*@_SMLL4loop_315(i8*inreg%a,i8*inreg%b)#4 gc"smlsharp"{
%c=bitcast i8*%b to i32*
%d=load i32,i32*%c,align 4
tail call fastcc void@_SMLL4loop_190(i8*inreg%a,i32 inreg%d)
%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 0,i32*%f,align 4
ret i8*%e
}
define internal fastcc i8*@_SMLLN12Array__common7modifyiE_316(i8*inreg%a,i8*inreg%b)#4 gc"smlsharp"{
tail call fastcc void@_SMLLN12Array__common7modifyiE_191(i8*inreg%a,i8*inreg%b)
%c=tail call i8*@sml_alloc(i32 inreg 4)#0
%d=bitcast i8*%c to i32*
%e=getelementptr inbounds i8,i8*%c,i64 -4
%f=bitcast i8*%e to i32*
store i32 4,i32*%f,align 4
store i32 0,i32*%d,align 4
ret i8*%c
}
define internal fastcc i8*@_SMLL4loop_318(i8*inreg%a,i8*inreg%b)#4 gc"smlsharp"{
%c=bitcast i8*%b to i32*
%d=load i32,i32*%c,align 4
tail call fastcc void@_SMLL4loop_195(i8*inreg%a,i32 inreg%d)
%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 0,i32*%f,align 4
ret i8*%e
}
define internal fastcc i8*@_SMLLN12Array__common6modifyE_319(i8*inreg%a,i8*inreg%b)#4 gc"smlsharp"{
tail call fastcc void@_SMLLN12Array__common6modifyE_196(i8*inreg%a,i8*inreg%b)
%c=tail call i8*@sml_alloc(i32 inreg 4)#0
%d=bitcast i8*%c to i32*
%e=getelementptr inbounds i8,i8*%c,i64 -4
%f=bitcast i8*%e to i32*
store i32 4,i32*%f,align 4
store i32 0,i32*%d,align 4
ret i8*%c
}
define internal fastcc i8*@_SMLL4loop_321(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*@_SMLL4loop_200(i8*inreg%a,i32 inreg%d)
ret i8*%e
}
define internal fastcc i8*@_SMLL4loop_323(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*@_SMLL4loop_205(i8*inreg%a,i32 inreg%d)
ret i8*%e
}
define internal fastcc i8*@_SMLL4loop_325(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 i32@_SMLL4loop_210(i8*inreg%a,i32 inreg%d)
%f=tail 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
ret i8*%f
}
define internal fastcc i8*@_SMLLN12Array__common6existsE_326(i8*inreg%a,i8*inreg%b)#4 gc"smlsharp"{
%c=tail call fastcc i32@_SMLLN12Array__common6existsE_211(i8*inreg%a,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*@_SMLL4loop_328(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 i32@_SMLL4loop_215(i8*inreg%a,i32 inreg%d)
%f=tail 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
ret i8*%f
}
define internal fastcc i8*@_SMLLN12Array__common3allE_329(i8*inreg%a,i8*inreg%b)#4 gc"smlsharp"{
%c=tail call fastcc i32@_SMLLN12Array__common3allE_216(i8*inreg%a,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*@_SMLL4loop_331(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 i32@_SMLL4loop_220(i8*inreg%a,i32 inreg%d)
%f=tail 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
ret i8*%f
}
define internal fastcc i8*@_SMLLN12Array__common4alliE_332(i8*inreg%a,i8*inreg%b)#4 gc"smlsharp"{
%c=tail call fastcc i32@_SMLLN12Array__common4alliE_221(i8*inreg%a,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*@_SMLL4loop_334(i8*inreg%a,i8*inreg%b)#4 gc"smlsharp"{
%c=tail call fastcc i32@_SMLL4loop_225(i8*inreg%a,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*@_SMLLN12Array__common7collateE_335(i8*inreg%a,i8*inreg%b)#4 gc"smlsharp"{
%c=tail call fastcc i32@_SMLLN12Array__common7collateE_226(i8*inreg%a,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*@_SMLL6length_337(i8*inreg%a,i8*inreg%b)#4 gc"smlsharp"{
%c=tail call fastcc i32@_SMLL6length_230(i8*inreg%a,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*@_SMLL4fill_338(i8*inreg%a,i8*inreg%b)#4 gc"smlsharp"{
tail call fastcc void@_SMLL4fill_234(i8*inreg%a,i8*inreg%b)
%c=tail call i8*@sml_alloc(i32 inreg 4)#0
%d=bitcast i8*%c to i32*
%e=getelementptr inbounds i8,i8*%c,i64 -4
%f=bitcast i8*%e to i32*
store i32 4,i32*%f,align 4
store i32 0,i32*%d,align 4
ret i8*%c
}
define internal fastcc i8*@_SMLL4fill_340(i8*inreg%a,i8*inreg%b)#4 gc"smlsharp"{
%c=bitcast i8*%b to i32*
%d=load i32,i32*%c,align 4
tail call fastcc void@_SMLL4fill_239(i8*inreg%a,i32 inreg%d)
%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 0,i32*%f,align 4
ret i8*%e
}
define internal fastcc i8*@_SMLLN5Array5arrayE_342(i8*inreg%a,i8*inreg%b,i8*inreg%c)#3 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*@_SMLFN5Array5arrayE(i32 inreg%e,i32 inreg%g)
ret i8*%h
}
define internal fastcc i8*@_SMLLN5Array8fromListE_343(i8*inreg%a,i8*inreg%b,i8*inreg%c)#3 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*@_SMLFN5Array8fromListE(i32 inreg%e,i32 inreg%g)
ret i8*%h
}
define internal fastcc i8*@_SMLLN5Array8tabulateE_344(i8*inreg%a,i8*inreg%b,i8*inreg%c)#3 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*@_SMLFN5Array8tabulateE(i32 inreg%e,i32 inreg%g)
ret i8*%h
}
define internal fastcc i8*@_SMLLN5Array6vectorE_345(i8*inreg%a,i8*inreg%b,i8*inreg%c)#3 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*@_SMLFN5Array6vectorE(i32 inreg%e,i32 inreg%g)
ret i8*%h
}
define internal fastcc i8*@_SMLLN5Array7copyVecE_346(i8*inreg%a,i8*inreg%b)#4 gc"smlsharp"{
tail call fastcc void@_SMLLN5Array7copyVecE_255(i8*inreg%a,i8*inreg%b)
%c=tail call i8*@sml_alloc(i32 inreg 4)#0
%d=bitcast i8*%c to i32*
%e=getelementptr inbounds i8,i8*%c,i64 -4
%f=bitcast i8*%e to i32*
store i32 4,i32*%f,align 4
store i32 0,i32*%d,align 4
ret i8*%c
}
define internal fastcc i8*@_SMLLN5Array7copyVecE_347(i8*inreg%a,i8*inreg%b,i8*inreg%c)#3 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*@_SMLFN5Array7copyVecE(i32 inreg%e,i32 inreg%g)
ret i8*%h
}
define internal fastcc i8*@_SMLLN5Array4appiE_348(i8*inreg%a,i8*inreg%b,i8*inreg%c)#3 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*@_SMLFN5Array4appiE(i32 inreg%e,i32 inreg%g)
ret i8*%h
}
define internal fastcc i8*@_SMLLN5Array3appE_349(i8*inreg%a,i8*inreg%b,i8*inreg%c)#3 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*@_SMLFN5Array3appE(i32 inreg%e,i32 inreg%g)
ret i8*%h
}
define internal fastcc i8*@_SMLLN5Array7modifyiE_350(i8*inreg%a,i8*inreg%b,i8*inreg%c)#3 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*@_SMLFN5Array7modifyiE(i32 inreg%e,i32 inreg%g)
ret i8*%h
}
define internal fastcc i8*@_SMLLN5Array6modifyE_351(i8*inreg%a,i8*inreg%b,i8*inreg%c)#3 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*@_SMLFN5Array6modifyE(i32 inreg%e,i32 inreg%g)
ret i8*%h
}
define internal fastcc i8*@_SMLLN5Array6foldliE_352(i8*inreg%a,i8*inreg%b,i8*inreg%c,i8*inreg%d,i8*inreg%e)#3 gc"smlsharp"{
%f=bitcast i8*%b to i32*
%g=load i32,i32*%f,align 4
%h=bitcast i8*%c to i32*
%i=load i32,i32*%h,align 4
%j=bitcast i8*%d to i32*
%k=load i32,i32*%j,align 4
%l=bitcast i8*%e to i32*
%m=load i32,i32*%l,align 4
%n=tail call fastcc i8*@_SMLFN5Array6foldliE(i32 inreg%g,i32 inreg%i,i32 inreg%k,i32 inreg%m)
ret i8*%n
}
define internal fastcc i8*@_SMLLN5Array6foldriE_353(i8*inreg%a,i8*inreg%b,i8*inreg%c,i8*inreg%d,i8*inreg%e)#3 gc"smlsharp"{
%f=bitcast i8*%b to i32*
%g=load i32,i32*%f,align 4
%h=bitcast i8*%c to i32*
%i=load i32,i32*%h,align 4
%j=bitcast i8*%d to i32*
%k=load i32,i32*%j,align 4
%l=bitcast i8*%e to i32*
%m=load i32,i32*%l,align 4
%n=tail call fastcc i8*@_SMLFN5Array6foldriE(i32 inreg%g,i32 inreg%i,i32 inreg%k,i32 inreg%m)
ret i8*%n
}
define internal fastcc i8*@_SMLLN5Array5foldlE_354(i8*inreg%a,i8*inreg%b,i8*inreg%c,i8*inreg%d,i8*inreg%e)#3 gc"smlsharp"{
%f=bitcast i8*%b to i32*
%g=load i32,i32*%f,align 4
%h=bitcast i8*%c to i32*
%i=load i32,i32*%h,align 4
%j=bitcast i8*%d to i32*
%k=load i32,i32*%j,align 4
%l=bitcast i8*%e to i32*
%m=load i32,i32*%l,align 4
%n=tail call fastcc i8*@_SMLFN5Array5foldlE(i32 inreg%g,i32 inreg%i,i32 inreg%k,i32 inreg%m)
ret i8*%n
}
define internal fastcc i8*@_SMLLN5Array5foldrE_355(i8*inreg%a,i8*inreg%b,i8*inreg%c,i8*inreg%d,i8*inreg%e)#3 gc"smlsharp"{
%f=bitcast i8*%b to i32*
%g=load i32,i32*%f,align 4
%h=bitcast i8*%c to i32*
%i=load i32,i32*%h,align 4
%j=bitcast i8*%d to i32*
%k=load i32,i32*%j,align 4
%l=bitcast i8*%e to i32*
%m=load i32,i32*%l,align 4
%n=tail call fastcc i8*@_SMLFN5Array5foldrE(i32 inreg%g,i32 inreg%i,i32 inreg%k,i32 inreg%m)
ret i8*%n
}
define internal fastcc i8*@_SMLLN5Array5findiE_356(i8*inreg%a,i8*inreg%b,i8*inreg%c)#3 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*@_SMLFN5Array5findiE(i32 inreg%e,i32 inreg%g)
ret i8*%h
}
define internal fastcc i8*@_SMLLN5Array4findE_357(i8*inreg%a,i8*inreg%b,i8*inreg%c)#3 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*@_SMLFN5Array4findE(i32 inreg%e,i32 inreg%g)
ret i8*%h
}
define internal fastcc i8*@_SMLLN5Array6existsE_358(i8*inreg%a,i8*inreg%b,i8*inreg%c)#3 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*@_SMLFN5Array6existsE(i32 inreg%e,i32 inreg%g)
ret i8*%h
}
define internal fastcc i8*@_SMLLN5Array3allE_359(i8*inreg%a,i8*inreg%b,i8*inreg%c)#3 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*@_SMLFN5Array3allE(i32 inreg%e,i32 inreg%g)
ret i8*%h
}
define internal fastcc i8*@_SMLLN5Array4alliE_360(i8*inreg%a,i8*inreg%b,i8*inreg%c)#3 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*@_SMLFN5Array4alliE(i32 inreg%e,i32 inreg%g)
ret i8*%h
}
define internal fastcc i8*@_SMLLN5Array7collateE_361(i8*inreg%a,i8*inreg%b,i8*inreg%c)#3 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*@_SMLFN5Array7collateE(i32 inreg%e,i32 inreg%g)
ret i8*%h
}
declare void@llvm.memcpy.p0i8.p0i8.i32(i8*,i8*,i32,i1)#0
declare void@llvm.memmove.p0i8.p0i8.i32(i8*,i8*,i32,i1)#0
declare void@llvm.memset.p0i8.i32(i8*,i8,i32,i1)#0
declare void@llvm.memset.p0i8.i64(i8*,i8,i64,i1)#0
declare void@llvm.lifetime.start.p0i8(i64,i8*)#0
declare void@llvm.lifetime.end.p0i8(i64,i8*)#0
attributes#0={nounwind}
attributes#1={noreturn}
attributes#2={noreturn nounwind}
attributes#3={nounwind uwtable}
attributes#4={uwtable}
