@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,i8*,void(...)*,void(...)*,i32}><{[4x i8]zeroinitializer,i32 -805306344,i8*null,void(...)*bitcast(i8*(i8*)*@_SMLFN10CharVector4appiE to void(...)*),void(...)*bitcast(i8*(i8*,i8*)*@_SMLLLN12Array__common4appiE_197 to void(...)*),i32 -2147483647}>,align 8
@b=private unnamed_addr constant<{[4x i8],i32,i8*,void(...)*,void(...)*,i32}><{[4x i8]zeroinitializer,i32 -805306344,i8*null,void(...)*bitcast(i8*(i8*)*@_SMLFN10CharVector3appE to void(...)*),void(...)*bitcast(i8*(i8*,i8*)*@_SMLLLN12Array__common3appE_199 to void(...)*),i32 -2147483647}>,align 8
@c=private unnamed_addr constant<{[4x i8],i32,i8*,void(...)*,void(...)*,i32}><{[4x i8]zeroinitializer,i32 -805306344,i8*null,void(...)*bitcast(i8*(i8*)*@_SMLFN10CharVector4mapiE to void(...)*),void(...)*bitcast(i8*(i8*,i8*)*@_SMLLLN12Array__common4mapiE_200 to void(...)*),i32 -2147483647}>,align 8
@d=private unnamed_addr constant<{[4x i8],i32,i8*,void(...)*,void(...)*,i32}><{[4x i8]zeroinitializer,i32 -805306344,i8*null,void(...)*bitcast(i8*(i8*)*@_SMLFN10CharVector3mapE to void(...)*),void(...)*bitcast(i8*(i8*,i8*)*@_SMLLLN12Array__common3mapE_201 to void(...)*),i32 -2147483647}>,align 8
@e=private unnamed_addr constant<{[4x i8],i32,i8*,void(...)*,void(...)*,i32}><{[4x i8]zeroinitializer,i32 -805306344,i8*null,void(...)*bitcast(i8*(i8*)*@_SMLFN10CharVector5findiE to void(...)*),void(...)*bitcast(i8*(i8*,i8*)*@_SMLLLN12Array__common5findiE_202 to void(...)*),i32 -2147483647}>,align 8
@f=private unnamed_addr constant<{[4x i8],i32,i8*,void(...)*,void(...)*,i32}><{[4x i8]zeroinitializer,i32 -805306344,i8*null,void(...)*bitcast(i8*(i8*)*@_SMLFN10CharVector4findE to void(...)*),void(...)*bitcast(i8*(i8*,i8*)*@_SMLLLN12Array__common4findE_203 to void(...)*),i32 -2147483647}>,align 8
@g=private unnamed_addr constant<{[4x i8],i32,i8*,void(...)*,void(...)*,i32}><{[4x i8]zeroinitializer,i32 -805306344,i8*null,void(...)*bitcast(i8*(i8*)*@_SMLFN10CharVector6existsE to void(...)*),void(...)*bitcast(i8*(i8*,i8*)*@_SMLLLN12Array__common6existsE_205 to void(...)*),i32 -2147483647}>,align 8
@h=private unnamed_addr constant<{[4x i8],i32,i8*,void(...)*,void(...)*,i32}><{[4x i8]zeroinitializer,i32 -805306344,i8*null,void(...)*bitcast(i8*(i8*)*@_SMLFN10CharVector3allE to void(...)*),void(...)*bitcast(i8*(i8*,i8*)*@_SMLLLN12Array__common3allE_207 to void(...)*),i32 -2147483647}>,align 8
@i=private unnamed_addr constant<{[4x i8],i32,i8*,void(...)*,void(...)*,i32}><{[4x i8]zeroinitializer,i32 -805306344,i8*null,void(...)*bitcast(i8*(i8*)*@_SMLFN10CharVector7collateE to void(...)*),void(...)*bitcast(i8*(i8*,i8*)*@_SMLLLN12Array__common7collateE_209 to void(...)*),i32 -2147483647}>,align 8
@j=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
@k=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
@l=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
@m=private unnamed_addr constant<{[4x i8],i32,i8*,void(...)*,void(...)*,i32}><{[4x i8]zeroinitializer,i32 -805306344,i8*null,void(...)*bitcast(i8*(i8*)*@_SMLFN10CharVector8fromListE to void(...)*),void(...)*bitcast(i8*(i8*,i8*)*@_SMLLLN12Array__common8fromListE_210 to void(...)*),i32 -2147483647}>,align 8
@n=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
@o=private unnamed_addr constant<{[4x i8],i32,i8*,void(...)*,void(...)*,i32}><{[4x i8]zeroinitializer,i32 -805306344,i8*null,void(...)*bitcast(i8*(i8*)*@_SMLFN10CharVector8tabulateE to void(...)*),void(...)*bitcast(i8*(i8*,i8*)*@_SMLLLN12Array__common8tabulateE_211 to void(...)*),i32 -2147483647}>,align 8
@p=private unnamed_addr constant<{[4x i8],i32,[45x i8]}><{[4x i8]zeroinitializer,i32 -2147483603,[45x i8]c"src/basis/main/Array_common.sml:333.52(9353)\00"}>,align 8
@q=private unnamed_addr constant<{[4x i8],i32,i8*,void(...)*,void(...)*,i32}><{[4x i8]zeroinitializer,i32 -805306344,i8*null,void(...)*bitcast(i8*(i8*)*@_SMLFN10CharVector6updateE to void(...)*),void(...)*bitcast(i8*(i8*,i8*)*@_SMLLLN12Array__common6updateE_212 to void(...)*),i32 -2147483647}>,align 8
@r=private unnamed_addr constant<{[4x i8],i32,[45x i8]}><{[4x i8]zeroinitializer,i32 -2147483603,[45x i8]c"src/basis/main/Array_common.sml:349.52(9873)\00"}>,align 8
@s=private unnamed_addr constant<{[4x i8],i32,[45x i8]}><{[4x i8]zeroinitializer,i32 -2147483603,[45x i8]c"src/basis/main/Array_common.sml:350.70(9972)\00"}>,align 8
@t=private unnamed_addr constant<{[4x i8],i32,[45x i8]}><{[4x i8]zeroinitializer,i32 -2147483603,[45x i8]c"src/basis/main/Array_common.sml:351.18(9995)\00"}>,align 8
@u=private unnamed_addr constant<{[4x i8],i32,[1x i8]}><{[4x i8]zeroinitializer,i32 -2147483647,[1x i8]zeroinitializer}>,align 8
@v=private unnamed_addr constant<{[4x i8],i32,i8*,void(...)*,void(...)*,i32}><{[4x i8]zeroinitializer,i32 -805306344,i8*null,void(...)*bitcast(i8*(i8*)*@_SMLFN10CharVector6concatE to void(...)*),void(...)*bitcast(i8*(i8*,i8*)*@_SMLLLN12Array__common6concatE_213 to void(...)*),i32 -2147483647}>,align 8
@w=private unnamed_addr constant<{[4x i8],i32,i8*,void(...)*,void(...)*,i32}><{[4x i8]zeroinitializer,i32 -805306344,i8*null,void(...)*bitcast(i8*(i32,i32)*@_SMLFN10CharVector6foldliE to void(...)*),void(...)*bitcast(i8*(i8*,i8*,i8*)*@_SMLLLN10CharVector6foldliE_214 to void(...)*),i32 -2147483647}>,align 8
@x=private unnamed_addr constant<{[4x i8],i32,i8*,void(...)*,void(...)*,i32}><{[4x i8]zeroinitializer,i32 -805306344,i8*null,void(...)*bitcast(i8*(i32,i32)*@_SMLFN10CharVector5foldlE to void(...)*),void(...)*bitcast(i8*(i8*,i8*,i8*)*@_SMLLLN10CharVector5foldlE_215 to void(...)*),i32 -2147483647}>,align 8
@y=private unnamed_addr constant<{[4x i8],i32,i8*,void(...)*,void(...)*,i32}><{[4x i8]zeroinitializer,i32 -805306344,i8*null,void(...)*bitcast(i8*(i32,i32)*@_SMLFN10CharVector6foldriE to void(...)*),void(...)*bitcast(i8*(i8*,i8*,i8*)*@_SMLLLN10CharVector6foldriE_216 to void(...)*),i32 -2147483647}>,align 8
@z=private unnamed_addr constant<{[4x i8],i32,i8*,void(...)*,void(...)*,i32}><{[4x i8]zeroinitializer,i32 -805306344,i8*null,void(...)*bitcast(i8*(i32,i32)*@_SMLFN10CharVector5foldrE to void(...)*),void(...)*bitcast(i8*(i8*,i8*,i8*)*@_SMLLLN10CharVector5foldrE_217 to void(...)*),i32 -2147483647}>,align 8
@_SMLZN10CharVector6maxLenE=local_unnamed_addr constant i32 268435454
@_SMLZN10CharVector6foldliE=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*)
@_SMLZN10CharVector5foldlE=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*)
@_SMLZN10CharVector6foldriE=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*)
@_SMLZN10CharVector5foldrE=local_unnamed_addr constant i8*bitcast(i8**getelementptr inbounds(<{[4x i8],i32,i8*,void(...)*,void(...)*,i32}>,<{[4x i8],i32,i8*,void(...)*,void(...)*,i32}>*@z,i64 0,i32 2)to i8*)
@_SMLZN10CharVector4appiE=local_unnamed_addr constant i8*bitcast(i8**getelementptr inbounds(<{[4x i8],i32,i8*,void(...)*,void(...)*,i32}>,<{[4x i8],i32,i8*,void(...)*,void(...)*,i32}>*@a,i64 0,i32 2)to i8*)
@_SMLZN10CharVector3appE=local_unnamed_addr constant i8*bitcast(i8**getelementptr inbounds(<{[4x i8],i32,i8*,void(...)*,void(...)*,i32}>,<{[4x i8],i32,i8*,void(...)*,void(...)*,i32}>*@b,i64 0,i32 2)to i8*)
@_SMLZN10CharVector5findiE=local_unnamed_addr constant i8*bitcast(i8**getelementptr inbounds(<{[4x i8],i32,i8*,void(...)*,void(...)*,i32}>,<{[4x i8],i32,i8*,void(...)*,void(...)*,i32}>*@e,i64 0,i32 2)to i8*)
@_SMLZN10CharVector4findE=local_unnamed_addr constant i8*bitcast(i8**getelementptr inbounds(<{[4x i8],i32,i8*,void(...)*,void(...)*,i32}>,<{[4x i8],i32,i8*,void(...)*,void(...)*,i32}>*@f,i64 0,i32 2)to i8*)
@_SMLZN10CharVector6existsE=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*)
@_SMLZN10CharVector3allE=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*)
@_SMLZN10CharVector7collateE=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*)
@_SMLZN10CharVector8fromListE=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*)
@_SMLZN10CharVector8tabulateE=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*)
@_SMLZN10CharVector6updateE=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*)
@_SMLZN10CharVector6concatE=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*)
@_SMLZN10CharVector4mapiE=local_unnamed_addr constant i8*bitcast(i8**getelementptr inbounds(<{[4x i8],i32,i8*,void(...)*,void(...)*,i32}>,<{[4x i8],i32,i8*,void(...)*,void(...)*,i32}>*@c,i64 0,i32 2)to i8*)
@_SMLZN10CharVector3mapE=local_unnamed_addr constant i8*bitcast(i8**getelementptr inbounds(<{[4x i8],i32,i8*,void(...)*,void(...)*,i32}>,<{[4x i8],i32,i8*,void(...)*,void(...)*,i32}>*@d,i64 0,i32 2)to i8*)
@_SML_ftabadbb5309e852b68c_CharVector=external global i8
@A=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_gcroot(i8*,void()*,i8*,i8*)local_unnamed_addr#0
declare i32@sml_personality(...)#0
declare void@sml_raise(i8*inreg)local_unnamed_addr#1
define private void@_SML_tabbadbb5309e852b68c_CharVector()#2{
unreachable
}
define void@_SML_loadadbb5309e852b68c_CharVector(i8*%a)local_unnamed_addr#0{
%b=load i1,i1*@A,align 1
br i1%b,label%c,label%d
c:
ret void
d:
store i1 true,i1*@A,align 1
tail call void@sml_gcroot(i8*%a,void()*@_SML_tabbadbb5309e852b68c_CharVector,i8*@_SML_ftabadbb5309e852b68c_CharVector,i8*null)#0
ret void
}
define void@_SML_mainadbb5309e852b68c_CharVector()local_unnamed_addr#3 gc"smlsharp"{
ret void
}
define internal fastcc void@_SMLLLN12Array__common4appiE_132(i8*inreg%a,i8*inreg%b)#4 gc"smlsharp"{
n:
%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=getelementptr inbounds i8,i8*%b,i64 -4
%g=bitcast i8*%f to i32*
%h=load i32,i32*%g,align 4
%i=and i32%h,268435455
%j=add nsw i32%i,-1
%k=bitcast i8**%d to i8***
br label%l
l:
%m=phi i32[0,%n],[%Q,%u]
%o=load atomic i32,i32*@sml_check_flag unordered,align 4
%p=icmp eq i32%o,0
br i1%p,label%r,label%q
q:
call void@sml_check(i32 inreg%o)
br label%r
r:
%s=icmp slt i32%m,%j
br i1%s,label%u,label%t
t:
ret void
u:
%v=load i8*,i8**%c,align 8
%w=zext i32%m to i64
%x=getelementptr inbounds i8,i8*%v,i64%w
%y=load i8,i8*%x,align 1
%z=load i8**,i8***%k,align 8
%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 12)#0
%H=bitcast i8*%G to i32*
%I=getelementptr inbounds i8,i8*%G,i64 -4
%J=bitcast i8*%I to i32*
store i32 1342177288,i32*%J,align 4
%K=getelementptr inbounds i8,i8*%G,i64 5
call void@llvm.memset.p0i8.i32(i8*%K,i8 0,i32 3,i1 false)
store i32%m,i32*%H,align 4
%L=getelementptr inbounds i8,i8*%G,i64 4
store i8%y,i8*%L,align 1
%M=getelementptr inbounds i8,i8*%G,i64 8
%N=bitcast i8*%M to i32*
store i32 0,i32*%N,align 4
%O=load i8*,i8**%e,align 8
store i8*null,i8**%e,align 8
%P=call fastcc i8*%D(i8*inreg%O,i8*inreg%G)
%Q=add nuw nsw i32%m,1
br label%l
}
define fastcc i8*@_SMLFN10CharVector4appiE(i8*inreg%a)#3 gc"smlsharp"{
%b=alloca i8*,align 8
%c=alloca i8*,align 8
call void@llvm.gcroot(i8**%b,i8*null)#0
call void@llvm.gcroot(i8**%c,i8*null)#0
store i8*%a,i8**%b,align 8
%d=call i8*@sml_alloc(i32 inreg 12)#0
%e=getelementptr inbounds i8,i8*%d,i64 -4
%f=bitcast i8*%e to i32*
store i32 1342177288,i32*%f,align 4
store i8*%d,i8**%c,align 8
%g=load i8*,i8**%b,align 8
store i8*null,i8**%b,align 8
%h=bitcast i8*%d to i8**
store i8*%g,i8**%h,align 8
%i=getelementptr inbounds i8,i8*%d,i64 8
%j=bitcast i8*%i to i32*
store i32 1,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(void(i8*,i8*)*@_SMLLLN12Array__common4appiE_132 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*)*@_SMLLLN12Array__common4appiE_196 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
ret i8*%k
}
define internal fastcc void@_SMLLLN12Array__common3appE_135(i8*inreg%a,i8*inreg%b)#4 gc"smlsharp"{
n:
%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=getelementptr inbounds i8,i8*%b,i64 -4
%g=bitcast i8*%f to i32*
%h=load i32,i32*%g,align 4
%i=and i32%h,268435455
%j=add nsw i32%i,-1
%k=bitcast i8**%d to i8***
br label%l
l:
%m=phi i32[0,%n],[%L,%u]
%o=load atomic i32,i32*@sml_check_flag unordered,align 4
%p=icmp eq i32%o,0
br i1%p,label%r,label%q
q:
call void@sml_check(i32 inreg%o)
br label%r
r:
%s=icmp slt i32%m,%j
br i1%s,label%u,label%t
t:
ret void
u:
%v=load i8*,i8**%c,align 8
%w=zext i32%m to i64
%x=getelementptr inbounds i8,i8*%v,i64%w
%y=load i8,i8*%x,align 1
%z=load i8**,i8***%k,align 8
%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 1)#0
%H=getelementptr inbounds i8,i8*%G,i64 -4
%I=bitcast i8*%H to i32*
store i32 1,i32*%I,align 4
store i8%y,i8*%G,align 1
%J=load i8*,i8**%e,align 8
store i8*null,i8**%e,align 8
%K=call fastcc i8*%D(i8*inreg%J,i8*inreg%G)
%L=add nuw nsw i32%m,1
br label%l
}
define fastcc i8*@_SMLFN10CharVector3appE(i8*inreg%a)#3 gc"smlsharp"{
%b=alloca i8*,align 8
%c=alloca i8*,align 8
call void@llvm.gcroot(i8**%b,i8*null)#0
call void@llvm.gcroot(i8**%c,i8*null)#0
store i8*%a,i8**%b,align 8
%d=call i8*@sml_alloc(i32 inreg 12)#0
%e=getelementptr inbounds i8,i8*%d,i64 -4
%f=bitcast i8*%e to i32*
store i32 1342177288,i32*%f,align 4
store i8*%d,i8**%c,align 8
%g=load i8*,i8**%b,align 8
store i8*null,i8**%b,align 8
%h=bitcast i8*%d to i8**
store i8*%g,i8**%h,align 8
%i=getelementptr inbounds i8,i8*%d,i64 8
%j=bitcast i8*%i to i32*
store i32 1,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(void(i8*,i8*)*@_SMLLLN12Array__common3appE_135 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*)*@_SMLLLN12Array__common3appE_198 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
ret i8*%k
}
define internal fastcc i8*@_SMLLLN12Array__common4mapiE_138(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**%e,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%n
k:
call void@sml_check(i32 inreg%g)
%l=bitcast i8**%c to i32**
%m=load i32*,i32**%l,align 8
br label%n
n:
%o=phi i32*[%m,%k],[%j,%i]
%p=getelementptr inbounds i32,i32*%o,i64 -1
%q=load i32,i32*%p,align 4
%r=and i32%q,268435455
%s=add nsw i32%r,-1
%t=call i8*@sml_alloc(i32 inreg%r)#0
%u=getelementptr inbounds i8,i8*%t,i64 -4
%v=bitcast i8*%u to i32*
store i32%r,i32*%v,align 4
store i8*%t,i8**%d,align 8
%w=sext i32%s to i64
%x=getelementptr inbounds i8,i8*%t,i64%w
store i8 0,i8*%x,align 1
%y=bitcast i8**%e to i8***
br label%z
z:
%A=phi i32[0,%n],[%ab,%C]
%B=icmp slt i32%A,%s
br i1%B,label%C,label%ac
C:
%D=load i8*,i8**%c,align 8
%E=zext i32%A to i64
%F=getelementptr inbounds i8,i8*%D,i64%E
%G=load i8,i8*%F,align 1
%H=load i8**,i8***%y,align 8
%I=load i8*,i8**%H,align 8
%J=getelementptr inbounds i8,i8*%I,i64 16
%K=bitcast i8*%J to i8*(i8*,i8*)**
%L=load i8*(i8*,i8*)*,i8*(i8*,i8*)**%K,align 8
%M=bitcast i8*%I to i8**
%N=load i8*,i8**%M,align 8
store i8*%N,i8**%f,align 8
%O=call i8*@sml_alloc(i32 inreg 12)#0
%P=bitcast i8*%O to i32*
%Q=getelementptr inbounds i8,i8*%O,i64 -4
%R=bitcast i8*%Q to i32*
store i32 1342177288,i32*%R,align 4
%S=getelementptr inbounds i8,i8*%O,i64 5
call void@llvm.memset.p0i8.i32(i8*%S,i8 0,i32 3,i1 false)
store i32%A,i32*%P,align 4
%T=getelementptr inbounds i8,i8*%O,i64 4
store i8%G,i8*%T,align 1
%U=getelementptr inbounds i8,i8*%O,i64 8
%V=bitcast i8*%U to i32*
store i32 0,i32*%V,align 4
%W=load i8*,i8**%f,align 8
store i8*null,i8**%f,align 8
%X=call fastcc i8*%L(i8*inreg%W,i8*inreg%O)
%Y=load i8,i8*%X,align 1
%Z=load i8*,i8**%d,align 8
%aa=getelementptr inbounds i8,i8*%Z,i64%E
store i8%Y,i8*%aa,align 1
%ab=add nuw nsw i32%A,1
br label%z
ac:
%ad=load i8*,i8**%d,align 8
ret i8*%ad
}
define fastcc i8*@_SMLFN10CharVector4mapiE(i8*inreg%a)#3 gc"smlsharp"{
%b=alloca i8*,align 8
%c=alloca i8*,align 8
call void@llvm.gcroot(i8**%b,i8*null)#0
call void@llvm.gcroot(i8**%c,i8*null)#0
store i8*%a,i8**%b,align 8
%d=call i8*@sml_alloc(i32 inreg 12)#0
%e=getelementptr inbounds i8,i8*%d,i64 -4
%f=bitcast i8*%e to i32*
store i32 1342177288,i32*%f,align 4
store i8*%d,i8**%c,align 8
%g=load i8*,i8**%b,align 8
store i8*null,i8**%b,align 8
%h=bitcast i8*%d to i8**
store i8*%g,i8**%h,align 8
%i=getelementptr inbounds i8,i8*%d,i64 8
%j=bitcast i8*%i to i32*
store i32 1,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*)*@_SMLLLN12Array__common4mapiE_138 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*)*@_SMLLLN12Array__common4mapiE_138 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
ret i8*%k
}
define internal fastcc i8*@_SMLLLN12Array__common3mapE_141(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**%e,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%n
k:
call void@sml_check(i32 inreg%g)
%l=bitcast i8**%c to i32**
%m=load i32*,i32**%l,align 8
br label%n
n:
%o=phi i32*[%m,%k],[%j,%i]
%p=getelementptr inbounds i32,i32*%o,i64 -1
%q=load i32,i32*%p,align 4
%r=and i32%q,268435455
%s=add nsw i32%r,-1
%t=call i8*@sml_alloc(i32 inreg%r)#0
%u=getelementptr inbounds i8,i8*%t,i64 -4
%v=bitcast i8*%u to i32*
store i32%r,i32*%v,align 4
store i8*%t,i8**%d,align 8
%w=sext i32%s to i64
%x=getelementptr inbounds i8,i8*%t,i64%w
store i8 0,i8*%x,align 1
%y=bitcast i8**%e to i8***
br label%z
z:
%A=phi i32[0,%n],[%W,%C]
%B=icmp slt i32%A,%s
br i1%B,label%C,label%X
C:
%D=load i8*,i8**%c,align 8
%E=zext i32%A to i64
%F=getelementptr inbounds i8,i8*%D,i64%E
%G=load i8,i8*%F,align 1
%H=load i8**,i8***%y,align 8
%I=load i8*,i8**%H,align 8
%J=getelementptr inbounds i8,i8*%I,i64 16
%K=bitcast i8*%J to i8*(i8*,i8*)**
%L=load i8*(i8*,i8*)*,i8*(i8*,i8*)**%K,align 8
%M=bitcast i8*%I to i8**
%N=load i8*,i8**%M,align 8
store i8*%N,i8**%f,align 8
%O=call i8*@sml_alloc(i32 inreg 1)#0
%P=getelementptr inbounds i8,i8*%O,i64 -4
%Q=bitcast i8*%P to i32*
store i32 1,i32*%Q,align 4
store i8%G,i8*%O,align 1
%R=load i8*,i8**%f,align 8
store i8*null,i8**%f,align 8
%S=call fastcc i8*%L(i8*inreg%R,i8*inreg%O)
%T=load i8,i8*%S,align 1
%U=load i8*,i8**%d,align 8
%V=getelementptr inbounds i8,i8*%U,i64%E
store i8%T,i8*%V,align 1
%W=add nuw nsw i32%A,1
br label%z
X:
%Y=load i8*,i8**%d,align 8
ret i8*%Y
}
define fastcc i8*@_SMLFN10CharVector3mapE(i8*inreg%a)#3 gc"smlsharp"{
%b=alloca i8*,align 8
%c=alloca i8*,align 8
call void@llvm.gcroot(i8**%b,i8*null)#0
call void@llvm.gcroot(i8**%c,i8*null)#0
store i8*%a,i8**%b,align 8
%d=call i8*@sml_alloc(i32 inreg 12)#0
%e=getelementptr inbounds i8,i8*%d,i64 -4
%f=bitcast i8*%e to i32*
store i32 1342177288,i32*%f,align 4
store i8*%d,i8**%c,align 8
%g=load i8*,i8**%b,align 8
store i8*null,i8**%b,align 8
%h=bitcast i8*%d to i8**
store i8*%g,i8**%h,align 8
%i=getelementptr inbounds i8,i8*%d,i64 8
%j=bitcast i8*%i to i32*
store i32 1,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*)*@_SMLLLN12Array__common3mapE_141 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*)*@_SMLLLN12Array__common3mapE_141 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
ret i8*%k
}
define internal fastcc i8*@_SMLLLN12Array__common5findiE_144(i8*inreg%a,i8*inreg%b)#4 gc"smlsharp"{
n:
%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=getelementptr inbounds i8,i8*%b,i64 -4
%g=bitcast i8*%f to i32*
%h=load i32,i32*%g,align 4
%i=and i32%h,268435455
%j=add nsw i32%i,-1
%k=bitcast i8**%d to i8***
br label%l
l:
%m=phi i32[0,%n],[%ak,%aj]
%o=load atomic i32,i32*@sml_check_flag unordered,align 4
%p=icmp eq i32%o,0
br i1%p,label%r,label%q
q:
call void@sml_check(i32 inreg%o)
br label%r
r:
%s=icmp slt i32%m,%j
br i1%s,label%u,label%t
t:
ret i8*null
u:
%v=load i8*,i8**%c,align 8
%w=zext i32%m to i64
%x=getelementptr inbounds i8,i8*%v,i64%w
%y=load i8,i8*%x,align 1
%z=load i8**,i8***%k,align 8
%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 12)#0
%H=bitcast i8*%G to i32*
%I=getelementptr inbounds i8,i8*%G,i64 -4
%J=bitcast i8*%I to i32*
store i32 1342177288,i32*%J,align 4
%K=getelementptr inbounds i8,i8*%G,i64 5
call void@llvm.memset.p0i8.i32(i8*%K,i8 0,i32 3,i1 false)
store i32%m,i32*%H,align 4
%L=getelementptr inbounds i8,i8*%G,i64 4
store i8%y,i8*%L,align 1
%M=getelementptr inbounds i8,i8*%G,i64 8
%N=bitcast i8*%M to i32*
store i32 0,i32*%N,align 4
%O=load i8*,i8**%e,align 8
store i8*null,i8**%e,align 8
%P=call fastcc i8*%D(i8*inreg%O,i8*inreg%G)
%Q=bitcast i8*%P to i32*
%R=load i32,i32*%Q,align 4
%S=icmp eq i32%R,0
br i1%S,label%aj,label%T
T:
store i8*null,i8**%c,align 8
store i8*null,i8**%d,align 8
%U=call i8*@sml_alloc(i32 inreg 12)#0
%V=getelementptr inbounds i8,i8*%U,i64 -4
%W=bitcast i8*%V to i32*
store i32 1342177288,i32*%W,align 4
store i8*%U,i8**%c,align 8
%X=getelementptr inbounds i8,i8*%U,i64 5
call void@llvm.memset.p0i8.i32(i8*%X,i8 0,i32 3,i1 false)
%Y=bitcast i8*%U to i32*
store i32%m,i32*%Y,align 4
%Z=getelementptr inbounds i8,i8*%U,i64 4
store i8%y,i8*%Z,align 1
%aa=getelementptr inbounds i8,i8*%U,i64 8
%ab=bitcast i8*%aa to i32*
store i32 0,i32*%ab,align 4
%ac=call i8*@sml_alloc(i32 inreg 12)#0
%ad=getelementptr inbounds i8,i8*%ac,i64 -4
%ae=bitcast i8*%ad to i32*
store i32 1342177288,i32*%ae,align 4
%af=load i8*,i8**%c,align 8
%ag=bitcast i8*%ac to i8**
store i8*%af,i8**%ag,align 8
%ah=getelementptr inbounds i8,i8*%ac,i64 8
%ai=bitcast i8*%ah to i32*
store i32 1,i32*%ai,align 4
ret i8*%ac
aj:
%ak=add nuw nsw i32%m,1
br label%l
}
define fastcc i8*@_SMLFN10CharVector5findiE(i8*inreg%a)#3 gc"smlsharp"{
%b=alloca i8*,align 8
%c=alloca i8*,align 8
call void@llvm.gcroot(i8**%b,i8*null)#0
call void@llvm.gcroot(i8**%c,i8*null)#0
store i8*%a,i8**%b,align 8
%d=call i8*@sml_alloc(i32 inreg 12)#0
%e=getelementptr inbounds i8,i8*%d,i64 -4
%f=bitcast i8*%e to i32*
store i32 1342177288,i32*%f,align 4
store i8*%d,i8**%c,align 8
%g=load i8*,i8**%b,align 8
store i8*null,i8**%b,align 8
%h=bitcast i8*%d to i8**
store i8*%g,i8**%h,align 8
%i=getelementptr inbounds i8,i8*%d,i64 8
%j=bitcast i8*%i to i32*
store i32 1,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*)*@_SMLLLN12Array__common5findiE_144 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*)*@_SMLLLN12Array__common5findiE_144 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
ret i8*%k
}
define internal fastcc i8*@_SMLLLN12Array__common4findE_147(i8*inreg%a,i8*inreg%b)#4 gc"smlsharp"{
n:
%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=getelementptr inbounds i8,i8*%b,i64 -4
%g=bitcast i8*%f to i32*
%h=load i32,i32*%g,align 4
%i=and i32%h,268435455
%j=add nsw i32%i,-1
%k=bitcast i8**%d to i8***
br label%l
l:
%m=phi i32[0,%n],[%O,%u]
%o=load atomic i32,i32*@sml_check_flag unordered,align 4
%p=icmp eq i32%o,0
br i1%p,label%r,label%q
q:
call void@sml_check(i32 inreg%o)
br label%r
r:
%s=icmp slt i32%m,%j
br i1%s,label%u,label%t
t:
ret i8*null
u:
%v=load i8*,i8**%c,align 8
%w=zext i32%m to i64
%x=getelementptr inbounds i8,i8*%v,i64%w
%y=load i8,i8*%x,align 1
%z=load i8**,i8***%k,align 8
%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 1)#0
%H=getelementptr inbounds i8,i8*%G,i64 -4
%I=bitcast i8*%H to i32*
store i32 1,i32*%I,align 4
store i8%y,i8*%G,align 1
%J=load i8*,i8**%e,align 8
store i8*null,i8**%e,align 8
%K=call fastcc i8*%D(i8*inreg%J,i8*inreg%G)
%L=bitcast i8*%K to i32*
%M=load i32,i32*%L,align 4
%N=icmp eq i32%M,0
%O=add nuw nsw i32%m,1
br i1%N,label%l,label%P
P:
store i8*null,i8**%c,align 8
store i8*null,i8**%d,align 8
%Q=call i8*@sml_alloc(i32 inreg 12)#0
%R=getelementptr inbounds i8,i8*%Q,i64 -4
%S=bitcast i8*%R to i32*
store i32 1342177288,i32*%S,align 4
%T=getelementptr inbounds i8,i8*%Q,i64 1
call void@llvm.memset.p0i8.i32(i8*%T,i8 0,i32 7,i1 false)
store i8%y,i8*%Q,align 1
%U=getelementptr inbounds i8,i8*%Q,i64 8
%V=bitcast i8*%U to i32*
store i32 0,i32*%V,align 4
ret i8*%Q
}
define fastcc i8*@_SMLFN10CharVector4findE(i8*inreg%a)#3 gc"smlsharp"{
%b=alloca i8*,align 8
%c=alloca i8*,align 8
call void@llvm.gcroot(i8**%b,i8*null)#0
call void@llvm.gcroot(i8**%c,i8*null)#0
store i8*%a,i8**%b,align 8
%d=call i8*@sml_alloc(i32 inreg 12)#0
%e=getelementptr inbounds i8,i8*%d,i64 -4
%f=bitcast i8*%e to i32*
store i32 1342177288,i32*%f,align 4
store i8*%d,i8**%c,align 8
%g=load i8*,i8**%b,align 8
store i8*null,i8**%b,align 8
%h=bitcast i8*%d to i8**
store i8*%g,i8**%h,align 8
%i=getelementptr inbounds i8,i8*%d,i64 8
%j=bitcast i8*%i to i32*
store i32 1,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*)*@_SMLLLN12Array__common4findE_147 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*)*@_SMLLLN12Array__common4findE_147 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
ret i8*%k
}
define internal fastcc i32@_SMLLLN12Array__common6existsE_150(i8*inreg%a,i8*inreg%b)#4 gc"smlsharp"{
n:
%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=getelementptr inbounds i8,i8*%b,i64 -4
%g=bitcast i8*%f to i32*
%h=load i32,i32*%g,align 4
%i=and i32%h,268435455
%j=add nsw i32%i,-1
%k=bitcast i8**%d to i8***
br label%l
l:
%m=phi i32[0,%n],[%P,%v]
%o=load atomic i32,i32*@sml_check_flag unordered,align 4
%p=icmp eq i32%o,0
br i1%p,label%r,label%q
q:
call void@sml_check(i32 inreg%o)
br label%r
r:
%s=icmp slt i32%m,%j
br i1%s,label%v,label%t
t:
%u=phi i32[0,%r],[1,%v]
ret i32%u
v:
%w=load i8**,i8***%k,align 8
%x=load i8*,i8**%w,align 8
%y=getelementptr inbounds i8,i8*%x,i64 16
%z=bitcast i8*%y to i8*(i8*,i8*)**
%A=load i8*(i8*,i8*)*,i8*(i8*,i8*)**%z,align 8
%B=bitcast i8*%x to i8**
%C=load i8*,i8**%B,align 8
store i8*%C,i8**%e,align 8
%D=load i8*,i8**%c,align 8
%E=zext i32%m to i64
%F=getelementptr inbounds i8,i8*%D,i64%E
%G=load i8,i8*%F,align 1
%H=call i8*@sml_alloc(i32 inreg 1)#0
%I=getelementptr inbounds i8,i8*%H,i64 -4
%J=bitcast i8*%I to i32*
store i32 1,i32*%J,align 4
store i8%G,i8*%H,align 1
%K=load i8*,i8**%e,align 8
store i8*null,i8**%e,align 8
%L=call fastcc i8*%A(i8*inreg%K,i8*inreg%H)
%M=bitcast i8*%L to i32*
%N=load i32,i32*%M,align 4
%O=icmp eq i32%N,0
%P=add nuw nsw i32%m,1
br i1%O,label%l,label%t
}
define fastcc i8*@_SMLFN10CharVector6existsE(i8*inreg%a)#3 gc"smlsharp"{
%b=alloca i8*,align 8
%c=alloca i8*,align 8
call void@llvm.gcroot(i8**%b,i8*null)#0
call void@llvm.gcroot(i8**%c,i8*null)#0
store i8*%a,i8**%b,align 8
%d=call i8*@sml_alloc(i32 inreg 12)#0
%e=getelementptr inbounds i8,i8*%d,i64 -4
%f=bitcast i8*%e to i32*
store i32 1342177288,i32*%f,align 4
store i8*%d,i8**%c,align 8
%g=load i8*,i8**%b,align 8
store i8*null,i8**%b,align 8
%h=bitcast i8*%d to i8**
store i8*%g,i8**%h,align 8
%i=getelementptr inbounds i8,i8*%d,i64 8
%j=bitcast i8*%i to i32*
store i32 1,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(i32(i8*,i8*)*@_SMLLLN12Array__common6existsE_150 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*)*@_SMLLLN12Array__common6existsE_204 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
ret i8*%k
}
define internal fastcc i32@_SMLLLN12Array__common3allE_153(i8*inreg%a,i8*inreg%b)#4 gc"smlsharp"{
n:
%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=getelementptr inbounds i8,i8*%b,i64 -4
%g=bitcast i8*%f to i32*
%h=load i32,i32*%g,align 4
%i=and i32%h,268435455
%j=add nsw i32%i,-1
%k=bitcast i8**%d to i8***
br label%l
l:
%m=phi i32[0,%n],[%P,%v]
%o=load atomic i32,i32*@sml_check_flag unordered,align 4
%p=icmp eq i32%o,0
br i1%p,label%r,label%q
q:
call void@sml_check(i32 inreg%o)
br label%r
r:
%s=icmp slt i32%m,%j
br i1%s,label%v,label%t
t:
%u=phi i32[1,%r],[0,%v]
ret i32%u
v:
%w=load i8**,i8***%k,align 8
%x=load i8*,i8**%w,align 8
%y=getelementptr inbounds i8,i8*%x,i64 16
%z=bitcast i8*%y to i8*(i8*,i8*)**
%A=load i8*(i8*,i8*)*,i8*(i8*,i8*)**%z,align 8
%B=bitcast i8*%x to i8**
%C=load i8*,i8**%B,align 8
store i8*%C,i8**%e,align 8
%D=load i8*,i8**%c,align 8
%E=zext i32%m to i64
%F=getelementptr inbounds i8,i8*%D,i64%E
%G=load i8,i8*%F,align 1
%H=call i8*@sml_alloc(i32 inreg 1)#0
%I=getelementptr inbounds i8,i8*%H,i64 -4
%J=bitcast i8*%I to i32*
store i32 1,i32*%J,align 4
store i8%G,i8*%H,align 1
%K=load i8*,i8**%e,align 8
store i8*null,i8**%e,align 8
%L=call fastcc i8*%A(i8*inreg%K,i8*inreg%H)
%M=bitcast i8*%L to i32*
%N=load i32,i32*%M,align 4
%O=icmp eq i32%N,0
%P=add nuw nsw i32%m,1
br i1%O,label%t,label%l
}
define fastcc i8*@_SMLFN10CharVector3allE(i8*inreg%a)#3 gc"smlsharp"{
%b=alloca i8*,align 8
%c=alloca i8*,align 8
call void@llvm.gcroot(i8**%b,i8*null)#0
call void@llvm.gcroot(i8**%c,i8*null)#0
store i8*%a,i8**%b,align 8
%d=call i8*@sml_alloc(i32 inreg 12)#0
%e=getelementptr inbounds i8,i8*%d,i64 -4
%f=bitcast i8*%e to i32*
store i32 1342177288,i32*%f,align 4
store i8*%d,i8**%c,align 8
%g=load i8*,i8**%b,align 8
store i8*null,i8**%b,align 8
%h=bitcast i8*%d to i8**
store i8*%g,i8**%h,align 8
%i=getelementptr inbounds i8,i8*%d,i64 8
%j=bitcast i8*%i to i32*
store i32 1,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(i32(i8*,i8*)*@_SMLLLN12Array__common3allE_153 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*)*@_SMLLLN12Array__common3allE_206 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
ret i8*%k
}
define internal fastcc i32@_SMLLLN12Array__common7collateE_156(i8*inreg%a,i8*inreg%b)#4 gc"smlsharp"{
H:
%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**%f,align 8
%g=bitcast i8*%b to i8**
%h=load i8*,i8**%g,align 8
store i8*%h,i8**%c,align 8
%i=getelementptr inbounds i8,i8*%b,i64 8
%j=bitcast i8*%i to i8**
%k=load i8*,i8**%j,align 8
store i8*%k,i8**%d,align 8
%l=getelementptr inbounds i8,i8*%h,i64 -4
%m=bitcast i8*%l to i32*
%n=load i32,i32*%m,align 4
%o=and i32%n,268435455
%p=add nsw i32%o,-1
%q=getelementptr inbounds i8,i8*%k,i64 -4
%r=bitcast i8*%q to i32*
%s=load i32,i32*%r,align 4
%t=and i32%s,268435455
%u=add nsw i32%t,-1
%v=call i8*@sml_alloc(i32 inreg 20)#0
%w=getelementptr inbounds i8,i8*%v,i64 -4
%x=bitcast i8*%w to i32*
store i32 1342177296,i32*%x,align 4
%y=getelementptr inbounds i8,i8*%v,i64 4
%z=bitcast i8*%y to i32*
call void@llvm.memset.p0i8.i64(i8*%v,i8 0,i64 16,i1 false)
store i32%p,i32*%z,align 4
%A=getelementptr inbounds i8,i8*%v,i64 8
%B=bitcast i8*%A to i32*
store i32%u,i32*%B,align 4
%C=getelementptr inbounds i8,i8*%v,i64 16
%D=bitcast i8*%C to i32*
store i32 0,i32*%D,align 4
%E=bitcast i8**%f to i8***
br label%F
F:
%G=phi i8*[%aG,%aC],[%v,%H]
store i8*%G,i8**%e,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**%e,align 8
br label%M
M:
%N=phi i8*[%L,%K],[%G,%F]
%O=bitcast i8*%N to i32*
%P=load i32,i32*%O,align 4
%Q=getelementptr inbounds i8,i8*%N,i64 4
%R=bitcast i8*%Q to i32*
%S=load i32,i32*%R,align 4
%T=icmp eq i32%S,0
%U=getelementptr inbounds i8,i8*%N,i64 8
%V=bitcast i8*%U to i32*
%W=load i32,i32*%V,align 4
%X=icmp eq i32%W,0
br i1%T,label%aS,label%Y
Y:
br i1%X,label%aA,label%Z
Z:
%aa=load i8*,i8**%c,align 8
%ab=sext i32%P to i64
%ac=getelementptr inbounds i8,i8*%aa,i64%ab
%ad=load i8,i8*%ac,align 1
%ae=load i8*,i8**%d,align 8
%af=getelementptr inbounds i8,i8*%ae,i64%ab
%ag=load i8,i8*%af,align 1
%ah=load i8**,i8***%E,align 8
%ai=load i8*,i8**%ah,align 8
%aj=getelementptr inbounds i8,i8*%ai,i64 16
%ak=bitcast i8*%aj to i8*(i8*,i8*)**
%al=load i8*(i8*,i8*)*,i8*(i8*,i8*)**%ak,align 8
%am=bitcast i8*%ai to i8**
%an=load i8*,i8**%am,align 8
store i8*%an,i8**%e,align 8
%ao=call i8*@sml_alloc(i32 inreg 12)#0
%ap=getelementptr inbounds i8,i8*%ao,i64 -4
%aq=bitcast i8*%ap to i32*
store i32 1342177288,i32*%aq,align 4
%ar=getelementptr inbounds i8,i8*%ao,i64 2
call void@llvm.memset.p0i8.i32(i8*%ar,i8 0,i32 6,i1 false)
store i8%ad,i8*%ao,align 1
%as=getelementptr inbounds i8,i8*%ao,i64 1
store i8%ag,i8*%as,align 1
%at=getelementptr inbounds i8,i8*%ao,i64 8
%au=bitcast i8*%at to i32*
store i32 0,i32*%au,align 4
%av=load i8*,i8**%e,align 8
store i8*null,i8**%e,align 8
%aw=call fastcc i8*%al(i8*inreg%av,i8*inreg%ao)
%ax=bitcast i8*%aw to i32*
%ay=load i32,i32*%ax,align 4
%az=icmp eq i32%ay,0
br i1%az,label%aC,label%aA
aA:
%aB=phi i32[%aT,%aS],[1,%Y],[%ay,%Z]
ret i32%aB
aC:
%aD=add nsw i32%P,1
%aE=add nsw i32%S,-1
%aF=add nsw i32%W,-1
%aG=call i8*@sml_alloc(i32 inreg 20)#0
%aH=bitcast i8*%aG to i32*
%aI=getelementptr inbounds i8,i8*%aG,i64 -4
%aJ=bitcast i8*%aI to i32*
store i32 1342177296,i32*%aJ,align 4
%aK=getelementptr inbounds i8,i8*%aG,i64 12
%aL=bitcast i8*%aK to i32*
store i32 0,i32*%aL,align 1
store i32%aD,i32*%aH,align 4
%aM=getelementptr inbounds i8,i8*%aG,i64 4
%aN=bitcast i8*%aM to i32*
store i32%aE,i32*%aN,align 4
%aO=getelementptr inbounds i8,i8*%aG,i64 8
%aP=bitcast i8*%aO to i32*
store i32%aF,i32*%aP,align 4
%aQ=getelementptr inbounds i8,i8*%aG,i64 16
%aR=bitcast i8*%aQ to i32*
store i32 0,i32*%aR,align 4
br label%F
aS:
%aT=select i1%X,i32 0,i32 2
br label%aA
}
define fastcc i8*@_SMLFN10CharVector7collateE(i8*inreg%a)#3 gc"smlsharp"{
%b=alloca i8*,align 8
%c=alloca i8*,align 8
call void@llvm.gcroot(i8**%b,i8*null)#0
call void@llvm.gcroot(i8**%c,i8*null)#0
store i8*%a,i8**%b,align 8
%d=call i8*@sml_alloc(i32 inreg 12)#0
%e=getelementptr inbounds i8,i8*%d,i64 -4
%f=bitcast i8*%e to i32*
store i32 1342177288,i32*%f,align 4
store i8*%d,i8**%c,align 8
%g=load i8*,i8**%b,align 8
store i8*null,i8**%b,align 8
%h=bitcast i8*%d to i8**
store i8*%g,i8**%h,align 8
%i=getelementptr inbounds i8,i8*%d,i64 8
%j=bitcast i8*%i to i32*
store i32 1,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(i32(i8*,i8*)*@_SMLLLN12Array__common7collateE_156 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*)*@_SMLLLN12Array__common7collateE_208 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
ret i8*%k
}
define fastcc i8*@_SMLFN10CharVector8fromListE(i8*inreg%a)#4 gc"smlsharp"personality i32(...)*@sml_personality{
m:
%b=alloca i8*,align 8
%c=alloca i8*,align 8
%d=alloca i8*,align 8
call void@llvm.gcroot(i8**%b,i8*null)#0
call void@llvm.gcroot(i8**%c,i8*null)#0
call void@llvm.gcroot(i8**%d,i8*null)#0
store i8*%a,i8**%b,align 8
%e=call i8*@sml_alloc(i32 inreg 20)#0
%f=getelementptr inbounds i8,i8*%e,i64 -4
%g=bitcast i8*%f to i32*
store i32 1342177296,i32*%g,align 4
%h=getelementptr inbounds i8,i8*%e,i64 12
%i=bitcast i8*%h to i32*
store i32 0,i32*%i,align 1
%j=load i8*,i8**%b,align 8
br label%k
k:
%l=phi i8*[%af,%ad],[%e,%m]
%n=phi i8*[%ak,%ad],[%j,%m]
%o=phi i32[%ae,%ad],[0,%m]
%p=bitcast i8*%l to i8**
store i8*%n,i8**%p,align 8
%q=getelementptr inbounds i8,i8*%l,i64 8
%r=bitcast i8*%q to i32*
store i32%o,i32*%r,align 4
%s=getelementptr inbounds i8,i8*%l,i64 16
%t=bitcast i8*%s to i32*
store i32 1,i32*%t,align 4
store i8*%l,i8**%c,align 8
%u=load atomic i32,i32*@sml_check_flag unordered,align 4
%v=icmp eq i32%u,0
br i1%v,label%y,label%w
w:
call void@sml_check(i32 inreg%u)
%x=load i8*,i8**%c,align 8
br label%y
y:
%z=phi i8*[%x,%w],[%l,%k]
%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%I
D:
store i8*null,i8**%c,align 8
%E=getelementptr inbounds i8,i8*%z,i64 8
%F=bitcast i8*%E to i32*
%G=load i32,i32*%F,align 4
%H=icmp ugt i32%G,268435454
br i1%H,label%aW,label%aL
I:
%J=getelementptr inbounds i8,i8*%B,i64 8
%K=bitcast i8*%J to i8**
%L=load i8*,i8**%K,align 8
store i8*%L,i8**%d,align 8
store i8*null,i8**%c,align 8
%M=getelementptr inbounds i8,i8*%z,i64 8
%N=bitcast i8*%M to i32*
%O=load i32,i32*%N,align 4
%P=call{i32,i1}@llvm.sadd.with.overflow.i32(i32%O,i32 1)#0
%Q=extractvalue{i32,i1}%P,1
br i1%Q,label%R,label%ad
R:
store i8*null,i8**%d,align 8
%S=load i8*,i8**@_SMLZ8Overflow,align 8
store i8*%S,i8**%b,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
%W=load i8*,i8**%b,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,[45x i8]}>,<{[4x i8],i32,[45x i8]}>*@j,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
store i8*%T,i8**%b,align 8
%ac=icmp eq i8*%W,%S
br i1%ac,label%al,label%aD
ad:
%ae=add nsw i32%O,1
%af=call i8*@sml_alloc(i32 inreg 20)#0
%ag=getelementptr inbounds i8,i8*%af,i64 -4
%ah=bitcast i8*%ag to i32*
store i32 1342177296,i32*%ah,align 4
%ai=getelementptr inbounds i8,i8*%af,i64 12
%aj=bitcast i8*%ai to i32*
store i32 0,i32*%aj,align 1
%ak=load i8*,i8**%d,align 8
store i8*null,i8**%d,align 8
br label%k
al:
%am=load i8*,i8**@_SMLZ4Size,align 8
store i8*%am,i8**%b,align 8
%an=call i8*@sml_alloc(i32 inreg 20)#0
%ao=getelementptr inbounds i8,i8*%an,i64 -4
%ap=bitcast i8*%ao to i32*
store i32 1342177296,i32*%ap,align 4
store i8*%an,i8**%c,align 8
%aq=load i8*,i8**%b,align 8
store i8*null,i8**%b,align 8
%ar=bitcast i8*%an to i8**
store i8*%aq,i8**%ar,align 8
%as=getelementptr inbounds i8,i8*%an,i64 8
%at=bitcast i8*%as to i8**
store i8*getelementptr inbounds(<{[4x i8],i32,[45x i8]}>,<{[4x i8],i32,[45x i8]}>*@k,i64 0,i32 2,i64 0),i8**%at,align 8
%au=getelementptr inbounds i8,i8*%an,i64 16
%av=bitcast i8*%au to i32*
store i32 3,i32*%av,align 4
%aw=call i8*@sml_alloc(i32 inreg 60)#0
%ax=getelementptr inbounds i8,i8*%aw,i64 -4
%ay=bitcast i8*%ax to i32*
store i32 1342177336,i32*%ay,align 4
%az=getelementptr inbounds i8,i8*%aw,i64 56
%aA=bitcast i8*%az to i32*
store i32 1,i32*%aA,align 4
%aB=load i8*,i8**%c,align 8
%aC=bitcast i8*%aw to i8**
store i8*%aB,i8**%aC,align 8
call void@sml_raise(i8*inreg%aw)#1
unreachable
aD:
%aE=call i8*@sml_alloc(i32 inreg 60)#0
%aF=getelementptr inbounds i8,i8*%aE,i64 -4
%aG=bitcast i8*%aF to i32*
store i32 1342177336,i32*%aG,align 4
%aH=getelementptr inbounds i8,i8*%aE,i64 56
%aI=bitcast i8*%aH to i32*
store i32 1,i32*%aI,align 4
%aJ=load i8*,i8**%b,align 8
%aK=bitcast i8*%aE to i8**
store i8*%aJ,i8**%aK,align 8
call void@sml_raise(i8*inreg%aE)#1
unreachable
aL:
%aM=add nsw i32%G,1
%aN=call i8*@sml_alloc(i32 inreg%aM)#0
%aO=getelementptr inbounds i8,i8*%aN,i64 -4
%aP=bitcast i8*%aO to i32*
store i32%aM,i32*%aP,align 4
%aQ=sext i32%G to i64
%aR=getelementptr inbounds i8,i8*%aN,i64%aQ
store i8 0,i8*%aR,align 1
store i8*%aN,i8**%c,align 8
%aS=call i8*@sml_alloc(i32 inreg 20)#0
%aT=getelementptr inbounds i8,i8*%aS,i64 -4
%aU=bitcast i8*%aT to i32*
store i32 1342177296,i32*%aU,align 4
%aV=bitcast i8*%aS to i64*
store i64 0,i64*%aV,align 4
br label%be
aW:
%aX=load i8*,i8**@_SMLZ4Size,align 8
store i8*%aX,i8**%b,align 8
%aY=call i8*@sml_alloc(i32 inreg 20)#0
%aZ=getelementptr inbounds i8,i8*%aY,i64 -4
%a0=bitcast i8*%aZ to i32*
store i32 1342177296,i32*%a0,align 4
store i8*%aY,i8**%c,align 8
%a1=load i8*,i8**%b,align 8
store i8*null,i8**%b,align 8
%a2=bitcast i8*%aY to i8**
store i8*%a1,i8**%a2,align 8
%a3=getelementptr inbounds i8,i8*%aY,i64 8
%a4=bitcast i8*%a3 to i8**
store i8*getelementptr inbounds(<{[4x i8],i32,[45x i8]}>,<{[4x i8],i32,[45x i8]}>*@l,i64 0,i32 2,i64 0),i8**%a4,align 8
%a5=getelementptr inbounds i8,i8*%aY,i64 16
%a6=bitcast i8*%a5 to i32*
store i32 3,i32*%a6,align 4
%a7=call i8*@sml_alloc(i32 inreg 60)#0
%a8=getelementptr inbounds i8,i8*%a7,i64 -4
%a9=bitcast i8*%a8 to i32*
store i32 1342177336,i32*%a9,align 4
%ba=getelementptr inbounds i8,i8*%a7,i64 56
%bb=bitcast i8*%ba to i32*
store i32 1,i32*%bb,align 4
%bc=load i8*,i8**%c,align 8
%bd=bitcast i8*%a7 to i8**
store i8*%bc,i8**%bd,align 8
call void@sml_raise(i8*inreg%a7)#1
unreachable
be:
%bf=phi i8*[%bG,%bx],[%aS,%aL]
%bg=load i8*,i8**%b,align 8
store i8*null,i8**%b,align 8
%bh=getelementptr inbounds i8,i8*%bf,i64 8
%bi=bitcast i8*%bh to i8**
store i8*%bg,i8**%bi,align 8
%bj=getelementptr inbounds i8,i8*%bf,i64 16
%bk=bitcast i8*%bj to i32*
store i32 2,i32*%bk,align 4
store i8*%bf,i8**%b,align 8
%bl=load atomic i32,i32*@sml_check_flag unordered,align 4
%bm=icmp eq i32%bl,0
br i1%bm,label%bp,label%bn
bn:
call void@sml_check(i32 inreg%bl)
%bo=load i8*,i8**%b,align 8
br label%bp
bp:
%bq=phi i8*[%bo,%bn],[%bf,%be]
%br=bitcast i8*%bq to i32*
%bs=load i32,i32*%br,align 4
%bt=getelementptr inbounds i8,i8*%bq,i64 8
%bu=bitcast i8*%bt to i8**
%bv=load i8*,i8**%bu,align 8
%bw=icmp eq i8*%bv,null
br i1%bw,label%bM,label%bx
bx:
%by=load i8,i8*%bv,align 1
%bz=getelementptr inbounds i8,i8*%bv,i64 8
%bA=bitcast i8*%bz to i8**
%bB=load i8*,i8**%bA,align 8
store i8*%bB,i8**%b,align 8
%bC=load i8*,i8**%c,align 8
%bD=sext i32%bs to i64
%bE=getelementptr inbounds i8,i8*%bC,i64%bD
store i8%by,i8*%bE,align 1
%bF=add nsw i32%bs,1
%bG=call i8*@sml_alloc(i32 inreg 20)#0
%bH=bitcast i8*%bG to i32*
%bI=getelementptr inbounds i8,i8*%bG,i64 -4
%bJ=bitcast i8*%bI to i32*
store i32 1342177296,i32*%bJ,align 4
%bK=getelementptr inbounds i8,i8*%bG,i64 4
%bL=bitcast i8*%bK to i32*
store i32 0,i32*%bL,align 1
store i32%bF,i32*%bH,align 4
br label%be
bM:
%bN=load i8*,i8**%c,align 8
ret i8*%bN
}
define fastcc i8*@_SMLFN10CharVector8tabulateE(i8*inreg%a)#4 gc"smlsharp"{
k:
%b=alloca i8*,align 8
%c=alloca i8*,align 8
%d=alloca i8*,align 8
call void@llvm.gcroot(i8**%b,i8*null)#0
call void@llvm.gcroot(i8**%c,i8*null)#0
call void@llvm.gcroot(i8**%d,i8*null)#0
store i8*%a,i8**%b,align 8
%e=load atomic i32,i32*@sml_check_flag unordered,align 4
%f=icmp eq i32%e,0
br i1%f,label%i,label%g
g:
call void@sml_check(i32 inreg%e)
%h=load i8*,i8**%b,align 8
br label%i
i:
%j=phi i8*[%h,%g],[%a,%k]
%l=bitcast i8*%j to i32*
%m=load i32,i32*%l,align 4
%n=getelementptr inbounds i8,i8*%j,i64 8
%o=bitcast i8*%n to i8**
%p=load i8*,i8**%o,align 8
store i8*%p,i8**%b,align 8
%q=icmp ugt i32%m,268435454
br i1%q,label%y,label%r
r:
%s=add nsw i32%m,1
%t=call i8*@sml_alloc(i32 inreg%s)#0
%u=getelementptr inbounds i8,i8*%t,i64 -4
%v=bitcast i8*%u to i32*
store i32%s,i32*%v,align 4
%w=sext i32%m to i64
%x=getelementptr inbounds i8,i8*%t,i64%w
store i8 0,i8*%x,align 1
store i8*%t,i8**%c,align 8
br label%Q
y:
%z=load i8*,i8**@_SMLZ4Size,align 8
store i8*%z,i8**%b,align 8
%A=call i8*@sml_alloc(i32 inreg 20)#0
%B=getelementptr inbounds i8,i8*%A,i64 -4
%C=bitcast i8*%B to i32*
store i32 1342177296,i32*%C,align 4
store i8*%A,i8**%c,align 8
%D=load i8*,i8**%b,align 8
store i8*null,i8**%b,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 i8**
store i8*getelementptr inbounds(<{[4x i8],i32,[45x i8]}>,<{[4x i8],i32,[45x i8]}>*@n,i64 0,i32 2,i64 0),i8**%G,align 8
%H=getelementptr inbounds i8,i8*%A,i64 16
%I=bitcast i8*%H to i32*
store i32 3,i32*%I,align 4
%J=call i8*@sml_alloc(i32 inreg 60)#0
%K=getelementptr inbounds i8,i8*%J,i64 -4
%L=bitcast i8*%K to i32*
store i32 1342177336,i32*%L,align 4
%M=getelementptr inbounds i8,i8*%J,i64 56
%N=bitcast i8*%M to i32*
store i32 1,i32*%N,align 4
%O=load i8*,i8**%c,align 8
%P=bitcast i8*%J to i8**
store i8*%O,i8**%P,align 8
call void@sml_raise(i8*inreg%J)#1
unreachable
Q:
%R=phi i32[0,%r],[%ak,%T]
%S=icmp slt i32%R,%m
br i1%S,label%T,label%al
T:
%U=load i8*,i8**%b,align 8
%V=getelementptr inbounds i8,i8*%U,i64 16
%W=bitcast i8*%V to i8*(i8*,i8*)**
%X=load i8*(i8*,i8*)*,i8*(i8*,i8*)**%W,align 8
%Y=bitcast i8*%U to i8**
%Z=load i8*,i8**%Y,align 8
store i8*%Z,i8**%d,align 8
%aa=call i8*@sml_alloc(i32 inreg 4)#0
%ab=bitcast i8*%aa to i32*
%ac=getelementptr inbounds i8,i8*%aa,i64 -4
%ad=bitcast i8*%ac to i32*
store i32 4,i32*%ad,align 4
store i32%R,i32*%ab,align 4
%ae=load i8*,i8**%d,align 8
store i8*null,i8**%d,align 8
%af=call fastcc i8*%X(i8*inreg%ae,i8*inreg%aa)
%ag=load i8,i8*%af,align 1
%ah=load i8*,i8**%c,align 8
%ai=zext i32%R to i64
%aj=getelementptr inbounds i8,i8*%ah,i64%ai
store i8%ag,i8*%aj,align 1
%ak=add nuw nsw i32%R,1
br label%Q
al:
%am=load i8*,i8**%c,align 8
ret i8*%am
}
define fastcc i8*@_SMLFN10CharVector6updateE(i8*inreg%a)#4 gc"smlsharp"{
%b=alloca i8*,align 8
%c=alloca i8*,align 8
call void@llvm.gcroot(i8**%b,i8*null)#0
call void@llvm.gcroot(i8**%c,i8*null)#0
%d=bitcast i8*%a to i8**
%e=load i8*,i8**%d,align 8
store i8*%e,i8**%b,align 8
%f=getelementptr inbounds i8,i8*%a,i64 8
%g=bitcast i8*%f to i32*
%h=load i32,i32*%g,align 4
%i=getelementptr inbounds i8,i8*%e,i64 -4
%j=bitcast i8*%i to i32*
%k=load i32,i32*%j,align 4
%l=and i32%k,268435455
%m=add nsw i32%l,-1
%n=icmp sgt i32%h,-1
%o=icmp slt i32%h,%m
%p=and i1%n,%o
br i1%p,label%I,label%q
q:
%r=load i8*,i8**@_SMLZ9Subscript,align 8
store i8*%r,i8**%b,align 8
%s=call i8*@sml_alloc(i32 inreg 20)#0
%t=getelementptr inbounds i8,i8*%s,i64 -4
%u=bitcast i8*%t to i32*
store i32 1342177296,i32*%u,align 4
store i8*%s,i8**%c,align 8
%v=load i8*,i8**%b,align 8
store i8*null,i8**%b,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 i8**
store i8*getelementptr inbounds(<{[4x i8],i32,[45x i8]}>,<{[4x i8],i32,[45x i8]}>*@p,i64 0,i32 2,i64 0),i8**%y,align 8
%z=getelementptr inbounds i8,i8*%s,i64 16
%A=bitcast i8*%z to i32*
store i32 3,i32*%A,align 4
%B=call i8*@sml_alloc(i32 inreg 60)#0
%C=getelementptr inbounds i8,i8*%B,i64 -4
%D=bitcast i8*%C to i32*
store i32 1342177336,i32*%D,align 4
%E=getelementptr inbounds i8,i8*%B,i64 56
%F=bitcast i8*%E to i32*
store i32 1,i32*%F,align 4
%G=load i8*,i8**%c,align 8
%H=bitcast i8*%B to i8**
store i8*%G,i8**%H,align 8
call void@sml_raise(i8*inreg%B)#1
unreachable
I:
%J=getelementptr inbounds i8,i8*%a,i64 12
%K=load i8,i8*%J,align 1
%L=call i8*@sml_alloc(i32 inreg%l)#0
%M=getelementptr inbounds i8,i8*%L,i64 -4
%N=bitcast i8*%M to i32*
store i32%l,i32*%N,align 4
%O=sext i32%m to i64
%P=getelementptr inbounds i8,i8*%L,i64%O
store i8 0,i8*%P,align 1
%Q=load i8*,i8**%b,align 8
call void@llvm.memcpy.p0i8.p0i8.i32(i8*%L,i8*%Q,i32%m,i1 false)
%R=sext i32%h to i64
%S=getelementptr inbounds i8,i8*%L,i64%R
store i8%K,i8*%S,align 1
ret i8*%L
}
define fastcc i8*@_SMLFN10CharVector6concatE(i8*inreg%a)#4 gc"smlsharp"personality i32(...)*@sml_personality{
h:
%b=alloca i8*,align 8
%c=alloca i8*,align 8
%d=alloca i8*,align 8
call void@llvm.gcroot(i8**%b,i8*null)#0
call void@llvm.gcroot(i8**%c,i8*null)#0
call void@llvm.gcroot(i8**%d,i8*null)#0
store i8*%a,i8**%b,align 8
%e=icmp eq i8*%a,null
br i1%e,label%f,label%i
f:
%g=phi i8*[getelementptr inbounds(<{[4x i8],i32,[1x i8]}>,<{[4x i8],i32,[1x i8]}>*@u,i64 0,i32 2,i64 0),%h],[%k,%i]
ret i8*%g
i:
%j=bitcast i8*%a to i8**
%k=load i8*,i8**%j,align 8
%l=getelementptr inbounds i8,i8*%a,i64 8
%m=bitcast i8*%l to i8**
%n=load i8*,i8**%m,align 8
%o=icmp eq i8*%n,null
br i1%o,label%f,label%p
p:
%q=call i8*@sml_alloc(i32 inreg 20)#0
%r=getelementptr inbounds i8,i8*%q,i64 -4
%s=bitcast i8*%r to i32*
store i32 1342177296,i32*%s,align 4
%t=getelementptr inbounds i8,i8*%q,i64 12
%u=bitcast i8*%t to i32*
store i32 0,i32*%u,align 1
%v=load i8*,i8**%b,align 8
br label%w
w:
%x=phi i8*[%aw,%au],[%q,%p]
%y=phi i8*[%aB,%au],[%v,%p]
%z=phi i32[%av,%au],[0,%p]
%A=bitcast i8*%x to i8**
store i8*%y,i8**%A,align 8
%B=getelementptr inbounds i8,i8*%x,i64 8
%C=bitcast i8*%B to i32*
store i32%z,i32*%C,align 4
%D=getelementptr inbounds i8,i8*%x,i64 16
%E=bitcast i8*%D to i32*
store i32 1,i32*%E,align 4
store i8*%x,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],[%x,%w]
%L=bitcast i8*%K to i8**
%M=load i8*,i8**%L,align 8
%N=icmp eq i8*%M,null
br i1%N,label%O,label%T
O:
store i8*null,i8**%c,align 8
%P=getelementptr inbounds i8,i8*%K,i64 8
%Q=bitcast i8*%P to i32*
%R=load i32,i32*%Q,align 4
%S=icmp ugt i32%R,268435454
br i1%S,label%bd,label%a2
T:
%U=bitcast i8*%M to i32**
%V=load i32*,i32**%U,align 8
%W=getelementptr inbounds i8,i8*%M,i64 8
%X=bitcast i8*%W to i8**
%Y=load i8*,i8**%X,align 8
store i8*%Y,i8**%d,align 8
store i8*null,i8**%c,align 8
%Z=getelementptr inbounds i8,i8*%K,i64 8
%aa=bitcast i8*%Z to i32*
%ab=load i32,i32*%aa,align 4
%ac=getelementptr inbounds i32,i32*%V,i64 -1
%ad=load i32,i32*%ac,align 4
%ae=and i32%ad,268435455
%af=add nsw i32%ae,-1
%ag=call{i32,i1}@llvm.sadd.with.overflow.i32(i32%af,i32%ab)#0
%ah=extractvalue{i32,i1}%ag,1
br i1%ah,label%ai,label%au
ai:
store i8*null,i8**%d,align 8
%aj=load i8*,i8**@_SMLZ8Overflow,align 8
store i8*%aj,i8**%b,align 8
%ak=call i8*@sml_alloc(i32 inreg 20)#0
%al=getelementptr inbounds i8,i8*%ak,i64 -4
%am=bitcast i8*%al to i32*
store i32 1342177296,i32*%am,align 4
%an=load i8*,i8**%b,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 i8**
store i8*getelementptr inbounds(<{[4x i8],i32,[45x i8]}>,<{[4x i8],i32,[45x i8]}>*@r,i64 0,i32 2,i64 0),i8**%aq,align 8
%ar=getelementptr inbounds i8,i8*%ak,i64 16
%as=bitcast i8*%ar to i32*
store i32 3,i32*%as,align 4
store i8*%ak,i8**%b,align 8
%at=icmp eq i8*%an,%aj
br i1%at,label%aC,label%aU
au:
%av=add nsw i32%af,%ab
%aw=call i8*@sml_alloc(i32 inreg 20)#0
%ax=getelementptr inbounds i8,i8*%aw,i64 -4
%ay=bitcast i8*%ax to i32*
store i32 1342177296,i32*%ay,align 4
%az=getelementptr inbounds i8,i8*%aw,i64 12
%aA=bitcast i8*%az to i32*
store i32 0,i32*%aA,align 1
%aB=load i8*,i8**%d,align 8
store i8*null,i8**%d,align 8
br label%w
aC:
%aD=load i8*,i8**@_SMLZ4Size,align 8
store i8*%aD,i8**%b,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**%c,align 8
%aH=load i8*,i8**%b,align 8
store i8*null,i8**%b,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]}>*@s,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**%c,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
%a0=load i8*,i8**%b,align 8
%a1=bitcast i8*%aV to i8**
store i8*%a0,i8**%a1,align 8
call void@sml_raise(i8*inreg%aV)#1
unreachable
a2:
%a3=add nsw i32%R,1
%a4=call i8*@sml_alloc(i32 inreg%a3)#0
%a5=getelementptr inbounds i8,i8*%a4,i64 -4
%a6=bitcast i8*%a5 to i32*
store i32%a3,i32*%a6,align 4
%a7=sext i32%R to i64
%a8=getelementptr inbounds i8,i8*%a4,i64%a7
store i8 0,i8*%a8,align 1
store i8*%a4,i8**%c,align 8
%a9=call i8*@sml_alloc(i32 inreg 20)#0
%ba=getelementptr inbounds i8,i8*%a9,i64 -4
%bb=bitcast i8*%ba to i32*
store i32 1342177296,i32*%bb,align 4
%bc=bitcast i8*%a9 to i64*
store i64 0,i64*%bc,align 4
br label%bv
bd:
%be=load i8*,i8**@_SMLZ4Size,align 8
store i8*%be,i8**%b,align 8
%bf=call i8*@sml_alloc(i32 inreg 20)#0
%bg=getelementptr inbounds i8,i8*%bf,i64 -4
%bh=bitcast i8*%bg to i32*
store i32 1342177296,i32*%bh,align 4
store i8*%bf,i8**%c,align 8
%bi=load i8*,i8**%b,align 8
store i8*null,i8**%b,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 i8**
store i8*getelementptr inbounds(<{[4x i8],i32,[45x i8]}>,<{[4x i8],i32,[45x i8]}>*@t,i64 0,i32 2,i64 0),i8**%bl,align 8
%bm=getelementptr inbounds i8,i8*%bf,i64 16
%bn=bitcast i8*%bm to i32*
store i32 3,i32*%bn,align 4
%bo=call i8*@sml_alloc(i32 inreg 60)#0
%bp=getelementptr inbounds i8,i8*%bo,i64 -4
%bq=bitcast i8*%bp to i32*
store i32 1342177336,i32*%bq,align 4
%br=getelementptr inbounds i8,i8*%bo,i64 56
%bs=bitcast i8*%br to i32*
store i32 1,i32*%bs,align 4
%bt=load i8*,i8**%c,align 8
%bu=bitcast i8*%bo to i8**
store i8*%bt,i8**%bu,align 8
call void@sml_raise(i8*inreg%bo)#1
unreachable
bv:
%bw=phi i8*[%b3,%bO],[%a9,%a2]
%bx=load i8*,i8**%b,align 8
store i8*null,i8**%b,align 8
%by=getelementptr inbounds i8,i8*%bw,i64 8
%bz=bitcast i8*%by to i8**
store i8*%bx,i8**%bz,align 8
%bA=getelementptr inbounds i8,i8*%bw,i64 16
%bB=bitcast i8*%bA to i32*
store i32 2,i32*%bB,align 4
store i8*%bw,i8**%b,align 8
%bC=load atomic i32,i32*@sml_check_flag unordered,align 4
%bD=icmp eq i32%bC,0
br i1%bD,label%bG,label%bE
bE:
call void@sml_check(i32 inreg%bC)
%bF=load i8*,i8**%b,align 8
br label%bG
bG:
%bH=phi i8*[%bF,%bE],[%bw,%bv]
%bI=bitcast i8*%bH to i32*
%bJ=load i32,i32*%bI,align 4
%bK=getelementptr inbounds i8,i8*%bH,i64 8
%bL=bitcast i8*%bK to i8**
%bM=load i8*,i8**%bL,align 8
%bN=icmp eq i8*%bM,null
br i1%bN,label%b9,label%bO
bO:
%bP=bitcast i8*%bM to i8**
%bQ=load i8*,i8**%bP,align 8
%bR=getelementptr inbounds i8,i8*%bM,i64 8
%bS=bitcast i8*%bR to i8**
%bT=load i8*,i8**%bS,align 8
store i8*%bT,i8**%b,align 8
%bU=getelementptr inbounds i8,i8*%bQ,i64 -4
%bV=bitcast i8*%bU to i32*
%bW=load i32,i32*%bV,align 4
%bX=and i32%bW,268435455
%bY=add nsw i32%bX,-1
%bZ=load i8*,i8**%c,align 8
%b0=sext i32%bJ to i64
%b1=getelementptr inbounds i8,i8*%bZ,i64%b0
call void@llvm.memmove.p0i8.p0i8.i32(i8*%b1,i8*%bQ,i32%bY,i1 false)
%b2=add nsw i32%bY,%bJ
%b3=call i8*@sml_alloc(i32 inreg 20)#0
%b4=bitcast i8*%b3 to i32*
%b5=getelementptr inbounds i8,i8*%b3,i64 -4
%b6=bitcast i8*%b5 to i32*
store i32 1342177296,i32*%b6,align 4
%b7=getelementptr inbounds i8,i8*%b3,i64 4
%b8=bitcast i8*%b7 to i32*
store i32 0,i32*%b8,align 1
store i32%b2,i32*%b4,align 4
br label%bv
b9:
%ca=load i8*,i8**%c,align 8
ret i8*%ca
}
define internal fastcc i8*@_SMLLLN10CharVector6foldliE_176(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**%e,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**%e,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=add i32%t,4
%H=and i32%G,%v
%I=add i32%x,%H
%J=and i32%I,-8
%K=lshr i32%H,3
%L=shl i32%D,%K
%M=or i32%J,4
%N=getelementptr inbounds i32,i32*%q,i64 -1
%O=load i32,i32*%N,align 4
%P=and i32%O,268435455
%Q=add nsw i32%P,-1
%R=icmp eq i32%D,0
br i1%R,label%W,label%S
S:
%T=getelementptr inbounds i8,i8*%p,i64 8
%U=bitcast i8*%T to i8**
%V=load i8*,i8**%U,align 8
br label%ai
W:
%X=call i8*@sml_alloc(i32 inreg%t)#0
%Y=getelementptr inbounds i8,i8*%X,i64 -4
%Z=bitcast i8*%Y to i32*
store i32%t,i32*%Z,align 4
%aa=load i8*,i8**%e,align 8
%ab=getelementptr inbounds i8,i8*%aa,i64 8
call void@llvm.memcpy.p0i8.p0i8.i32(i8*%X,i8*%ab,i32%t,i1 false)
%ac=getelementptr inbounds i8,i8*%aa,i64 20
%ad=bitcast i8*%ac to i32*
%ae=load i32,i32*%ad,align 4
%af=getelementptr inbounds i8,i8*%aa,i64 16
%ag=bitcast i8*%af to i32*
%ah=load i32,i32*%ag,align 4
br label%ai
ai:
%aj=phi i32[%ah,%W],[%D,%S]
%ak=phi i32[%ae,%W],[%t,%S]
%al=phi i8*[%X,%W],[%V,%S]
store i8*%al,i8**%d,align 8
%am=call i8*@sml_alloc(i32 inreg%F)#0
%an=or i32%z,1342177280
%ao=bitcast i8*%am to i32*
%ap=getelementptr inbounds i8,i8*%am,i64 -4
%aq=bitcast i8*%ap to i32*
store i32%an,i32*%aq,align 4
call void@llvm.memset.p0i8.i32(i8*%am,i8 0,i32%F,i1 false)
store i32 0,i32*%ao,align 4
%ar=icmp eq i32%aj,0
%as=load i8*,i8**%d,align 8
store i8*null,i8**%d,align 8
%at=sext i32%w to i64
%au=getelementptr inbounds i8,i8*%am,i64%at
br i1%ar,label%av,label%aw
av:
call void@llvm.memcpy.p0i8.p0i8.i32(i8*%au,i8*%as,i32%ak,i1 false)
br label%ay
aw:
%ax=bitcast i8*%au to i8**
store i8*%as,i8**%ax,align 8
br label%ay
ay:
%az=sext i32%z to i64
%aA=getelementptr inbounds i8,i8*%am,i64%az
%aB=bitcast i8*%aA to i32*
store i32%E,i32*%aB,align 4
%aC=bitcast i8**%e to i8***
%aD=or i32%J,1342177280
%aE=sext i32%H to i64
%aF=sext i32%J to i64
br label%aG
aG:
%aH=phi i8*[%bN,%bX],[%am,%ay]
store i8*%aH,i8**%d,align 8
%aI=bitcast i8*%aH to i32*
%aJ=load i32,i32*%aI,align 4
%aK=load i8*,i8**%e,align 8
%aL=getelementptr inbounds i8,i8*%aK,i64 16
%aM=bitcast i8*%aL to i32*
%aN=load i32,i32*%aM,align 4
%aO=icmp eq i32%aN,0
br i1%aO,label%aT,label%aP
aP:
store i8*null,i8**%d,align 8
%aQ=getelementptr inbounds i8,i8*%aH,i64%at
%aR=bitcast i8*%aQ to i8**
%aS=load i8*,i8**%aR,align 8
br label%a2
aT:
%aU=getelementptr inbounds i8,i8*%aK,i64 20
%aV=bitcast i8*%aU to i32*
%aW=load i32,i32*%aV,align 4
%aX=call i8*@sml_alloc(i32 inreg%aW)#0
%aY=getelementptr inbounds i8,i8*%aX,i64 -4
%aZ=bitcast i8*%aY to i32*
store i32%aW,i32*%aZ,align 4
%a0=load i8*,i8**%d,align 8
store i8*null,i8**%d,align 8
%a1=getelementptr inbounds i8,i8*%a0,i64%at
call void@llvm.memcpy.p0i8.p0i8.i32(i8*%aX,i8*%a1,i32%aW,i1 false)
br label%a2
a2:
%a3=phi i8*[%aX,%aT],[%aS,%aP]
store i8*%a3,i8**%d,align 8
%a4=icmp slt i32%aJ,%Q
br i1%a4,label%a6,label%a5
a5:
ret i8*%a3
a6:
%a7=load i8*,i8**%c,align 8
%a8=sext i32%aJ to i64
%a9=getelementptr inbounds i8,i8*%a7,i64%a8
%ba=load i8,i8*%a9,align 1
%bb=add nsw i32%aJ,1
%bc=load i8**,i8***%aC,align 8
%bd=load i8*,i8**%bc,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=bitcast i8**%bc to i8*
%bk=getelementptr inbounds i8,i8*%bj,i64 20
%bl=bitcast i8*%bk to i32*
%bm=load i32,i32*%bl,align 4
%bn=getelementptr inbounds i8*,i8**%bc,i64 2
%bo=bitcast i8**%bn to i32*
%bp=load i32,i32*%bo,align 4
%bq=call i8*@sml_alloc(i32 inreg%M)#0
%br=bitcast i8*%bq to i32*
%bs=getelementptr inbounds i8,i8*%bq,i64 -4
%bt=bitcast i8*%bs to i32*
store i32%aD,i32*%bt,align 4
call void@llvm.memset.p0i8.i32(i8*%bq,i8 0,i32%M,i1 false)
store i32%aJ,i32*%br,align 4
%bu=getelementptr inbounds i8,i8*%bq,i64 4
store i8%ba,i8*%bu,align 1
%bv=icmp eq i32%bp,0
%bw=load i8*,i8**%d,align 8
store i8*null,i8**%d,align 8
%bx=getelementptr inbounds i8,i8*%bq,i64%aE
br i1%bv,label%by,label%bz
by:
call void@llvm.memcpy.p0i8.p0i8.i32(i8*%bx,i8*%bw,i32%bm,i1 false)
br label%bB
bz:
%bA=bitcast i8*%bx to i8**
store i8*%bw,i8**%bA,align 8
br label%bB
bB:
%bC=getelementptr inbounds i8,i8*%bq,i64%aF
%bD=bitcast i8*%bC to i32*
store i32%L,i32*%bD,align 4
%bE=load i8*,i8**%f,align 8
store i8*null,i8**%f,align 8
%bF=call fastcc i8*%bg(i8*inreg%bE,i8*inreg%bq)
store i8*%bF,i8**%d,align 8
%bG=load i8*,i8**%e,align 8
%bH=getelementptr inbounds i8,i8*%bG,i64 20
%bI=bitcast i8*%bH to i32*
%bJ=load i32,i32*%bI,align 4
%bK=getelementptr inbounds i8,i8*%bG,i64 16
%bL=bitcast i8*%bK to i32*
%bM=load i32,i32*%bL,align 4
%bN=call i8*@sml_alloc(i32 inreg%F)#0
%bO=bitcast i8*%bN to i32*
%bP=getelementptr inbounds i8,i8*%bN,i64 -4
%bQ=bitcast i8*%bP to i32*
store i32%an,i32*%bQ,align 4
call void@llvm.memset.p0i8.i32(i8*%bN,i8 0,i32%F,i1 false)
store i32%bb,i32*%bO,align 4
%bR=icmp eq i32%bM,0
%bS=load i8*,i8**%d,align 8
store i8*null,i8**%d,align 8
%bT=getelementptr inbounds i8,i8*%bN,i64%at
br i1%bR,label%bU,label%bV
bU:
call void@llvm.memcpy.p0i8.p0i8.i32(i8*%bT,i8*%bS,i32%bJ,i1 false)
br label%bX
bV:
%bW=bitcast i8*%bT to i8**
store i8*%bS,i8**%bW,align 8
br label%bX
bX:
%bY=getelementptr inbounds i8,i8*%bN,i64%az
%bZ=bitcast i8*%bY to i32*
store i32%E,i32*%bZ,align 4
br label%aG
}
define internal fastcc i8*@_SMLLLN10CharVector6foldliE_177(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=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**%e,align 8
%s=load i8*,i8**%d,align 8
store i8*null,i8**%d,align 8
%t=bitcast i8*%p to i8**
store i8*%s,i8**%t,align 8
%u=icmp eq i32%h,0
%v=load i8*,i8**%c,align 8
store i8*null,i8**%c,align 8
%w=getelementptr inbounds i8,i8*%p,i64 8
br i1%u,label%x,label%y
x:
call void@llvm.memcpy.p0i8.p0i8.i32(i8*%w,i8*%v,i32%o,i1 false)
br label%A
y:
%z=bitcast i8*%w to i8**
store i8*%v,i8**%z,align 8
br label%A
A:
%B=getelementptr inbounds i8,i8*%p,i64 16
%C=bitcast i8*%B to i32*
store i32%h,i32*%C,align 4
%D=getelementptr inbounds i8,i8*%p,i64 20
%E=bitcast i8*%D to i32*
store i32%o,i32*%E,align 4
%F=getelementptr inbounds i8,i8*%p,i64 24
%G=bitcast i8*%F to i32*
store i32%j,i32*%G,align 4
%H=call i8*@sml_alloc(i32 inreg 28)#0
%I=getelementptr inbounds i8,i8*%H,i64 -4
%J=bitcast i8*%I to i32*
store i32 1342177304,i32*%J,align 4
%K=load i8*,i8**%e,align 8
%L=bitcast i8*%H to i8**
store i8*%K,i8**%L,align 8
%M=getelementptr inbounds i8,i8*%H,i64 8
%N=bitcast i8*%M to void(...)**
store void(...)*bitcast(i8*(i8*,i8*)*@_SMLLLN10CharVector6foldliE_176 to void(...)*),void(...)**%N,align 8
%O=getelementptr inbounds i8,i8*%H,i64 16
%P=bitcast i8*%O to void(...)**
store void(...)*bitcast(i8*(i8*,i8*)*@_SMLLLN10CharVector6foldliE_176 to void(...)*),void(...)**%P,align 8
%Q=getelementptr inbounds i8,i8*%H,i64 24
%R=bitcast i8*%Q to i32*
store i32 1,i32*%R,align 4
ret i8*%H
}
define internal fastcc i8*@_SMLLLN10CharVector6foldliE_178(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*)*@_SMLLLN10CharVector6foldliE_177 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*)*@_SMLLLN10CharVector6foldliE_177 to void(...)*),void(...)**%C,align 8
%D=getelementptr inbounds i8,i8*%u,i64 24
%E=bitcast i8*%D to i32*
store i32 1,i32*%E,align 4
ret i8*%u
}
define fastcc i8*@_SMLFN10CharVector6foldliE(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*)*@_SMLLLN10CharVector6foldliE_178 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*)*@_SMLLLN10CharVector6foldliE_178 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*@_SMLLLN10CharVector5foldlE_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
%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
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**%e,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=and i32%t,%v
%H=add i32%x,%G
%I=and i32%H,-8
%J=lshr i32%G,3
%K=shl i32%D,%J
%L=or i32%I,4
%M=getelementptr inbounds i32,i32*%q,i64 -1
%N=load i32,i32*%M,align 4
%O=and i32%N,268435455
%P=add nsw i32%O,-1
%Q=icmp eq i32%D,0
br i1%Q,label%V,label%R
R:
%S=getelementptr inbounds i8,i8*%p,i64 8
%T=bitcast i8*%S to i8**
%U=load i8*,i8**%T,align 8
br label%ah
V:
%W=call i8*@sml_alloc(i32 inreg%t)#0
%X=getelementptr inbounds i8,i8*%W,i64 -4
%Y=bitcast i8*%X to i32*
store i32%t,i32*%Y,align 4
%Z=load i8*,i8**%e,align 8
%aa=getelementptr inbounds i8,i8*%Z,i64 8
call void@llvm.memcpy.p0i8.p0i8.i32(i8*%W,i8*%aa,i32%t,i1 false)
%ab=getelementptr inbounds i8,i8*%Z,i64 20
%ac=bitcast i8*%ab to i32*
%ad=load i32,i32*%ac,align 4
%ae=getelementptr inbounds i8,i8*%Z,i64 16
%af=bitcast i8*%ae to i32*
%ag=load i32,i32*%af,align 4
br label%ah
ah:
%ai=phi i32[%ag,%V],[%D,%R]
%aj=phi i32[%ad,%V],[%t,%R]
%ak=phi i8*[%W,%V],[%U,%R]
store i8*%ak,i8**%d,align 8
%al=call i8*@sml_alloc(i32 inreg%F)#0
%am=or i32%z,1342177280
%an=bitcast i8*%al to i32*
%ao=getelementptr inbounds i8,i8*%al,i64 -4
%ap=bitcast i8*%ao to i32*
store i32%am,i32*%ap,align 4
call void@llvm.memset.p0i8.i32(i8*%al,i8 0,i32%F,i1 false)
store i32 0,i32*%an,align 4
%aq=icmp eq i32%ai,0
%ar=load i8*,i8**%d,align 8
store i8*null,i8**%d,align 8
%as=sext i32%w to i64
%at=getelementptr inbounds i8,i8*%al,i64%as
br i1%aq,label%au,label%av
au:
call void@llvm.memcpy.p0i8.p0i8.i32(i8*%at,i8*%ar,i32%aj,i1 false)
br label%ax
av:
%aw=bitcast i8*%at to i8**
store i8*%ar,i8**%aw,align 8
br label%ax
ax:
%ay=sext i32%z to i64
%az=getelementptr inbounds i8,i8*%al,i64%ay
%aA=bitcast i8*%az to i32*
store i32%E,i32*%aA,align 4
%aB=bitcast i8**%e to i8***
%aC=or i32%I,1342177280
%aD=sext i32%G to i64
%aE=sext i32%I to i64
br label%aF
aF:
%aG=phi i8*[%bK,%bU],[%al,%ax]
store i8*%aG,i8**%d,align 8
%aH=bitcast i8*%aG to i32*
%aI=load i32,i32*%aH,align 4
%aJ=load i8*,i8**%e,align 8
%aK=getelementptr inbounds i8,i8*%aJ,i64 16
%aL=bitcast i8*%aK to i32*
%aM=load i32,i32*%aL,align 4
%aN=icmp eq i32%aM,0
br i1%aN,label%aS,label%aO
aO:
store i8*null,i8**%d,align 8
%aP=getelementptr inbounds i8,i8*%aG,i64%as
%aQ=bitcast i8*%aP to i8**
%aR=load i8*,i8**%aQ,align 8
br label%a1
aS:
%aT=getelementptr inbounds i8,i8*%aJ,i64 20
%aU=bitcast i8*%aT to i32*
%aV=load i32,i32*%aU,align 4
%aW=call i8*@sml_alloc(i32 inreg%aV)#0
%aX=getelementptr inbounds i8,i8*%aW,i64 -4
%aY=bitcast i8*%aX to i32*
store i32%aV,i32*%aY,align 4
%aZ=load i8*,i8**%d,align 8
store i8*null,i8**%d,align 8
%a0=getelementptr inbounds i8,i8*%aZ,i64%as
call void@llvm.memcpy.p0i8.p0i8.i32(i8*%aW,i8*%a0,i32%aV,i1 false)
br label%a1
a1:
%a2=phi i8*[%aW,%aS],[%aR,%aO]
store i8*%a2,i8**%d,align 8
%a3=icmp slt i32%aI,%P
br i1%a3,label%a5,label%a4
a4:
ret i8*%a2
a5:
%a6=load i8*,i8**%c,align 8
%a7=sext i32%aI to i64
%a8=getelementptr inbounds i8,i8*%a6,i64%a7
%a9=load i8,i8*%a8,align 1
%ba=add nsw i32%aI,1
%bb=load i8**,i8***%aB,align 8
%bc=load i8*,i8**%bb,align 8
%bd=getelementptr inbounds i8,i8*%bc,i64 16
%be=bitcast i8*%bd to i8*(i8*,i8*)**
%bf=load i8*(i8*,i8*)*,i8*(i8*,i8*)**%be,align 8
%bg=bitcast i8*%bc to i8**
%bh=load i8*,i8**%bg,align 8
store i8*%bh,i8**%f,align 8
%bi=bitcast i8**%bb to i8*
%bj=getelementptr inbounds i8,i8*%bi,i64 20
%bk=bitcast i8*%bj to i32*
%bl=load i32,i32*%bk,align 4
%bm=getelementptr inbounds i8*,i8**%bb,i64 2
%bn=bitcast i8**%bm to i32*
%bo=load i32,i32*%bn,align 4
%bp=call i8*@sml_alloc(i32 inreg%L)#0
%bq=getelementptr inbounds i8,i8*%bp,i64 -4
%br=bitcast i8*%bq to i32*
store i32%aC,i32*%br,align 4
call void@llvm.memset.p0i8.i32(i8*%bp,i8 0,i32%L,i1 false)
store i8%a9,i8*%bp,align 1
%bs=icmp eq i32%bo,0
%bt=load i8*,i8**%d,align 8
store i8*null,i8**%d,align 8
%bu=getelementptr inbounds i8,i8*%bp,i64%aD
br i1%bs,label%bv,label%bw
bv:
call void@llvm.memcpy.p0i8.p0i8.i32(i8*%bu,i8*%bt,i32%bl,i1 false)
br label%by
bw:
%bx=bitcast i8*%bu to i8**
store i8*%bt,i8**%bx,align 8
br label%by
by:
%bz=getelementptr inbounds i8,i8*%bp,i64%aE
%bA=bitcast i8*%bz to i32*
store i32%K,i32*%bA,align 4
%bB=load i8*,i8**%f,align 8
store i8*null,i8**%f,align 8
%bC=call fastcc i8*%bf(i8*inreg%bB,i8*inreg%bp)
store i8*%bC,i8**%d,align 8
%bD=load i8*,i8**%e,align 8
%bE=getelementptr inbounds i8,i8*%bD,i64 20
%bF=bitcast i8*%bE to i32*
%bG=load i32,i32*%bF,align 4
%bH=getelementptr inbounds i8,i8*%bD,i64 16
%bI=bitcast i8*%bH to i32*
%bJ=load i32,i32*%bI,align 4
%bK=call i8*@sml_alloc(i32 inreg%F)#0
%bL=bitcast i8*%bK to i32*
%bM=getelementptr inbounds i8,i8*%bK,i64 -4
%bN=bitcast i8*%bM to i32*
store i32%am,i32*%bN,align 4
call void@llvm.memset.p0i8.i32(i8*%bK,i8 0,i32%F,i1 false)
store i32%ba,i32*%bL,align 4
%bO=icmp eq i32%bJ,0
%bP=load i8*,i8**%d,align 8
store i8*null,i8**%d,align 8
%bQ=getelementptr inbounds i8,i8*%bK,i64%as
br i1%bO,label%bR,label%bS
bR:
call void@llvm.memcpy.p0i8.p0i8.i32(i8*%bQ,i8*%bP,i32%bG,i1 false)
br label%bU
bS:
%bT=bitcast i8*%bQ to i8**
store i8*%bP,i8**%bT,align 8
br label%bU
bU:
%bV=getelementptr inbounds i8,i8*%bK,i64%ay
%bW=bitcast i8*%bV to i32*
store i32%E,i32*%bW,align 4
br label%aF
}
define internal fastcc i8*@_SMLLLN10CharVector5foldlE_182(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=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**%e,align 8
%s=load i8*,i8**%d,align 8
store i8*null,i8**%d,align 8
%t=bitcast i8*%p to i8**
store i8*%s,i8**%t,align 8
%u=icmp eq i32%h,0
%v=load i8*,i8**%c,align 8
store i8*null,i8**%c,align 8
%w=getelementptr inbounds i8,i8*%p,i64 8
br i1%u,label%x,label%y
x:
call void@llvm.memcpy.p0i8.p0i8.i32(i8*%w,i8*%v,i32%o,i1 false)
br label%A
y:
%z=bitcast i8*%w to i8**
store i8*%v,i8**%z,align 8
br label%A
A:
%B=getelementptr inbounds i8,i8*%p,i64 16
%C=bitcast i8*%B to i32*
store i32%h,i32*%C,align 4
%D=getelementptr inbounds i8,i8*%p,i64 20
%E=bitcast i8*%D to i32*
store i32%o,i32*%E,align 4
%F=getelementptr inbounds i8,i8*%p,i64 24
%G=bitcast i8*%F to i32*
store i32%j,i32*%G,align 4
%H=call i8*@sml_alloc(i32 inreg 28)#0
%I=getelementptr inbounds i8,i8*%H,i64 -4
%J=bitcast i8*%I to i32*
store i32 1342177304,i32*%J,align 4
%K=load i8*,i8**%e,align 8
%L=bitcast i8*%H to i8**
store i8*%K,i8**%L,align 8
%M=getelementptr inbounds i8,i8*%H,i64 8
%N=bitcast i8*%M to void(...)**
store void(...)*bitcast(i8*(i8*,i8*)*@_SMLLLN10CharVector5foldlE_181 to void(...)*),void(...)**%N,align 8
%O=getelementptr inbounds i8,i8*%H,i64 16
%P=bitcast i8*%O to void(...)**
store void(...)*bitcast(i8*(i8*,i8*)*@_SMLLLN10CharVector5foldlE_181 to void(...)*),void(...)**%P,align 8
%Q=getelementptr inbounds i8,i8*%H,i64 24
%R=bitcast i8*%Q to i32*
store i32 1,i32*%R,align 4
ret i8*%H
}
define internal fastcc i8*@_SMLLLN10CharVector5foldlE_183(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*)*@_SMLLLN10CharVector5foldlE_182 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*)*@_SMLLLN10CharVector5foldlE_182 to void(...)*),void(...)**%C,align 8
%D=getelementptr inbounds i8,i8*%u,i64 24
%E=bitcast i8*%D to i32*
store i32 1,i32*%E,align 4
ret i8*%u
}
define fastcc i8*@_SMLFN10CharVector5foldlE(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*)*@_SMLLLN10CharVector5foldlE_183 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*)*@_SMLLLN10CharVector5foldlE_183 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*@_SMLLLN10CharVector6foldriE_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
%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
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**%e,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=add i32%t,4
%H=and i32%G,%v
%I=add i32%x,%H
%J=and i32%I,-8
%K=lshr i32%H,3
%L=shl i32%D,%K
%M=or i32%J,4
%N=getelementptr inbounds i32,i32*%q,i64 -1
%O=load i32,i32*%N,align 4
%P=and i32%O,268435455
%Q=add nsw i32%P,-2
%R=icmp eq i32%D,0
br i1%R,label%W,label%S
S:
%T=getelementptr inbounds i8,i8*%p,i64 8
%U=bitcast i8*%T to i8**
%V=load i8*,i8**%U,align 8
br label%ai
W:
%X=call i8*@sml_alloc(i32 inreg%t)#0
%Y=getelementptr inbounds i8,i8*%X,i64 -4
%Z=bitcast i8*%Y to i32*
store i32%t,i32*%Z,align 4
%aa=load i8*,i8**%e,align 8
%ab=getelementptr inbounds i8,i8*%aa,i64 8
call void@llvm.memcpy.p0i8.p0i8.i32(i8*%X,i8*%ab,i32%t,i1 false)
%ac=getelementptr inbounds i8,i8*%aa,i64 20
%ad=bitcast i8*%ac to i32*
%ae=load i32,i32*%ad,align 4
%af=getelementptr inbounds i8,i8*%aa,i64 16
%ag=bitcast i8*%af to i32*
%ah=load i32,i32*%ag,align 4
br label%ai
ai:
%aj=phi i32[%ah,%W],[%D,%S]
%ak=phi i32[%ae,%W],[%t,%S]
%al=phi i8*[%X,%W],[%V,%S]
store i8*%al,i8**%d,align 8
%am=call i8*@sml_alloc(i32 inreg%F)#0
%an=or i32%z,1342177280
%ao=bitcast i8*%am to i32*
%ap=getelementptr inbounds i8,i8*%am,i64 -4
%aq=bitcast i8*%ap to i32*
store i32%an,i32*%aq,align 4
call void@llvm.memset.p0i8.i32(i8*%am,i8 0,i32%F,i1 false)
store i32%Q,i32*%ao,align 4
%ar=icmp eq i32%aj,0
%as=load i8*,i8**%d,align 8
store i8*null,i8**%d,align 8
%at=sext i32%w to i64
%au=getelementptr inbounds i8,i8*%am,i64%at
br i1%ar,label%av,label%aw
av:
call void@llvm.memcpy.p0i8.p0i8.i32(i8*%au,i8*%as,i32%ak,i1 false)
br label%ay
aw:
%ax=bitcast i8*%au to i8**
store i8*%as,i8**%ax,align 8
br label%ay
ay:
%az=sext i32%z to i64
%aA=getelementptr inbounds i8,i8*%am,i64%az
%aB=bitcast i8*%aA to i32*
store i32%E,i32*%aB,align 4
%aC=bitcast i8**%e to i8***
%aD=or i32%J,1342177280
%aE=sext i32%H to i64
%aF=sext i32%J to i64
br label%aG
aG:
%aH=phi i8*[%bN,%bX],[%am,%ay]
store i8*%aH,i8**%d,align 8
%aI=bitcast i8*%aH to i32*
%aJ=load i32,i32*%aI,align 4
%aK=load i8*,i8**%e,align 8
%aL=getelementptr inbounds i8,i8*%aK,i64 16
%aM=bitcast i8*%aL to i32*
%aN=load i32,i32*%aM,align 4
%aO=icmp eq i32%aN,0
br i1%aO,label%aT,label%aP
aP:
store i8*null,i8**%d,align 8
%aQ=getelementptr inbounds i8,i8*%aH,i64%at
%aR=bitcast i8*%aQ to i8**
%aS=load i8*,i8**%aR,align 8
br label%a2
aT:
%aU=getelementptr inbounds i8,i8*%aK,i64 20
%aV=bitcast i8*%aU to i32*
%aW=load i32,i32*%aV,align 4
%aX=call i8*@sml_alloc(i32 inreg%aW)#0
%aY=getelementptr inbounds i8,i8*%aX,i64 -4
%aZ=bitcast i8*%aY to i32*
store i32%aW,i32*%aZ,align 4
%a0=load i8*,i8**%d,align 8
store i8*null,i8**%d,align 8
%a1=getelementptr inbounds i8,i8*%a0,i64%at
call void@llvm.memcpy.p0i8.p0i8.i32(i8*%aX,i8*%a1,i32%aW,i1 false)
br label%a2
a2:
%a3=phi i8*[%aX,%aT],[%aS,%aP]
store i8*%a3,i8**%d,align 8
%a4=icmp sgt i32%aJ,-1
br i1%a4,label%a6,label%a5
a5:
ret i8*%a3
a6:
%a7=load i8*,i8**%c,align 8
%a8=sext i32%aJ to i64
%a9=getelementptr inbounds i8,i8*%a7,i64%a8
%ba=load i8,i8*%a9,align 1
%bb=add nsw i32%aJ,-1
%bc=load i8**,i8***%aC,align 8
%bd=load i8*,i8**%bc,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=bitcast i8**%bc to i8*
%bk=getelementptr inbounds i8,i8*%bj,i64 20
%bl=bitcast i8*%bk to i32*
%bm=load i32,i32*%bl,align 4
%bn=getelementptr inbounds i8*,i8**%bc,i64 2
%bo=bitcast i8**%bn to i32*
%bp=load i32,i32*%bo,align 4
%bq=call i8*@sml_alloc(i32 inreg%M)#0
%br=bitcast i8*%bq to i32*
%bs=getelementptr inbounds i8,i8*%bq,i64 -4
%bt=bitcast i8*%bs to i32*
store i32%aD,i32*%bt,align 4
call void@llvm.memset.p0i8.i32(i8*%bq,i8 0,i32%M,i1 false)
store i32%aJ,i32*%br,align 4
%bu=getelementptr inbounds i8,i8*%bq,i64 4
store i8%ba,i8*%bu,align 1
%bv=icmp eq i32%bp,0
%bw=load i8*,i8**%d,align 8
store i8*null,i8**%d,align 8
%bx=getelementptr inbounds i8,i8*%bq,i64%aE
br i1%bv,label%by,label%bz
by:
call void@llvm.memcpy.p0i8.p0i8.i32(i8*%bx,i8*%bw,i32%bm,i1 false)
br label%bB
bz:
%bA=bitcast i8*%bx to i8**
store i8*%bw,i8**%bA,align 8
br label%bB
bB:
%bC=getelementptr inbounds i8,i8*%bq,i64%aF
%bD=bitcast i8*%bC to i32*
store i32%L,i32*%bD,align 4
%bE=load i8*,i8**%f,align 8
store i8*null,i8**%f,align 8
%bF=call fastcc i8*%bg(i8*inreg%bE,i8*inreg%bq)
store i8*%bF,i8**%d,align 8
%bG=load i8*,i8**%e,align 8
%bH=getelementptr inbounds i8,i8*%bG,i64 20
%bI=bitcast i8*%bH to i32*
%bJ=load i32,i32*%bI,align 4
%bK=getelementptr inbounds i8,i8*%bG,i64 16
%bL=bitcast i8*%bK to i32*
%bM=load i32,i32*%bL,align 4
%bN=call i8*@sml_alloc(i32 inreg%F)#0
%bO=bitcast i8*%bN to i32*
%bP=getelementptr inbounds i8,i8*%bN,i64 -4
%bQ=bitcast i8*%bP to i32*
store i32%an,i32*%bQ,align 4
call void@llvm.memset.p0i8.i32(i8*%bN,i8 0,i32%F,i1 false)
store i32%bb,i32*%bO,align 4
%bR=icmp eq i32%bM,0
%bS=load i8*,i8**%d,align 8
store i8*null,i8**%d,align 8
%bT=getelementptr inbounds i8,i8*%bN,i64%at
br i1%bR,label%bU,label%bV
bU:
call void@llvm.memcpy.p0i8.p0i8.i32(i8*%bT,i8*%bS,i32%bJ,i1 false)
br label%bX
bV:
%bW=bitcast i8*%bT to i8**
store i8*%bS,i8**%bW,align 8
br label%bX
bX:
%bY=getelementptr inbounds i8,i8*%bN,i64%az
%bZ=bitcast i8*%bY to i32*
store i32%E,i32*%bZ,align 4
br label%aG
}
define internal fastcc i8*@_SMLLLN10CharVector6foldriE_187(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=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**%e,align 8
%s=load i8*,i8**%d,align 8
store i8*null,i8**%d,align 8
%t=bitcast i8*%p to i8**
store i8*%s,i8**%t,align 8
%u=icmp eq i32%h,0
%v=load i8*,i8**%c,align 8
store i8*null,i8**%c,align 8
%w=getelementptr inbounds i8,i8*%p,i64 8
br i1%u,label%x,label%y
x:
call void@llvm.memcpy.p0i8.p0i8.i32(i8*%w,i8*%v,i32%o,i1 false)
br label%A
y:
%z=bitcast i8*%w to i8**
store i8*%v,i8**%z,align 8
br label%A
A:
%B=getelementptr inbounds i8,i8*%p,i64 16
%C=bitcast i8*%B to i32*
store i32%h,i32*%C,align 4
%D=getelementptr inbounds i8,i8*%p,i64 20
%E=bitcast i8*%D to i32*
store i32%o,i32*%E,align 4
%F=getelementptr inbounds i8,i8*%p,i64 24
%G=bitcast i8*%F to i32*
store i32%j,i32*%G,align 4
%H=call i8*@sml_alloc(i32 inreg 28)#0
%I=getelementptr inbounds i8,i8*%H,i64 -4
%J=bitcast i8*%I to i32*
store i32 1342177304,i32*%J,align 4
%K=load i8*,i8**%e,align 8
%L=bitcast i8*%H to i8**
store i8*%K,i8**%L,align 8
%M=getelementptr inbounds i8,i8*%H,i64 8
%N=bitcast i8*%M to void(...)**
store void(...)*bitcast(i8*(i8*,i8*)*@_SMLLLN10CharVector6foldriE_186 to void(...)*),void(...)**%N,align 8
%O=getelementptr inbounds i8,i8*%H,i64 16
%P=bitcast i8*%O to void(...)**
store void(...)*bitcast(i8*(i8*,i8*)*@_SMLLLN10CharVector6foldriE_186 to void(...)*),void(...)**%P,align 8
%Q=getelementptr inbounds i8,i8*%H,i64 24
%R=bitcast i8*%Q to i32*
store i32 1,i32*%R,align 4
ret i8*%H
}
define internal fastcc i8*@_SMLLLN10CharVector6foldriE_188(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*)*@_SMLLLN10CharVector6foldriE_187 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*)*@_SMLLLN10CharVector6foldriE_187 to void(...)*),void(...)**%C,align 8
%D=getelementptr inbounds i8,i8*%u,i64 24
%E=bitcast i8*%D to i32*
store i32 1,i32*%E,align 4
ret i8*%u
}
define fastcc i8*@_SMLFN10CharVector6foldriE(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*)*@_SMLLLN10CharVector6foldriE_188 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*)*@_SMLLLN10CharVector6foldriE_188 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*@_SMLLLN10CharVector5foldrE_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
%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
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**%e,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=and i32%t,%v
%H=add i32%x,%G
%I=and i32%H,-8
%J=lshr i32%G,3
%K=shl i32%D,%J
%L=or i32%I,4
%M=getelementptr inbounds i32,i32*%q,i64 -1
%N=load i32,i32*%M,align 4
%O=and i32%N,268435455
%P=add nsw i32%O,-2
%Q=icmp eq i32%D,0
br i1%Q,label%V,label%R
R:
%S=getelementptr inbounds i8,i8*%p,i64 8
%T=bitcast i8*%S to i8**
%U=load i8*,i8**%T,align 8
br label%ah
V:
%W=call i8*@sml_alloc(i32 inreg%t)#0
%X=getelementptr inbounds i8,i8*%W,i64 -4
%Y=bitcast i8*%X to i32*
store i32%t,i32*%Y,align 4
%Z=load i8*,i8**%e,align 8
%aa=getelementptr inbounds i8,i8*%Z,i64 8
call void@llvm.memcpy.p0i8.p0i8.i32(i8*%W,i8*%aa,i32%t,i1 false)
%ab=getelementptr inbounds i8,i8*%Z,i64 20
%ac=bitcast i8*%ab to i32*
%ad=load i32,i32*%ac,align 4
%ae=getelementptr inbounds i8,i8*%Z,i64 16
%af=bitcast i8*%ae to i32*
%ag=load i32,i32*%af,align 4
br label%ah
ah:
%ai=phi i32[%ag,%V],[%D,%R]
%aj=phi i32[%ad,%V],[%t,%R]
%ak=phi i8*[%W,%V],[%U,%R]
store i8*%ak,i8**%d,align 8
%al=call i8*@sml_alloc(i32 inreg%F)#0
%am=or i32%z,1342177280
%an=bitcast i8*%al to i32*
%ao=getelementptr inbounds i8,i8*%al,i64 -4
%ap=bitcast i8*%ao to i32*
store i32%am,i32*%ap,align 4
call void@llvm.memset.p0i8.i32(i8*%al,i8 0,i32%F,i1 false)
store i32%P,i32*%an,align 4
%aq=icmp eq i32%ai,0
%ar=load i8*,i8**%d,align 8
store i8*null,i8**%d,align 8
%as=sext i32%w to i64
%at=getelementptr inbounds i8,i8*%al,i64%as
br i1%aq,label%au,label%av
au:
call void@llvm.memcpy.p0i8.p0i8.i32(i8*%at,i8*%ar,i32%aj,i1 false)
br label%ax
av:
%aw=bitcast i8*%at to i8**
store i8*%ar,i8**%aw,align 8
br label%ax
ax:
%ay=sext i32%z to i64
%az=getelementptr inbounds i8,i8*%al,i64%ay
%aA=bitcast i8*%az to i32*
store i32%E,i32*%aA,align 4
%aB=bitcast i8**%e to i8***
%aC=or i32%I,1342177280
%aD=sext i32%G to i64
%aE=sext i32%I to i64
br label%aF
aF:
%aG=phi i8*[%bK,%bU],[%al,%ax]
store i8*%aG,i8**%d,align 8
%aH=bitcast i8*%aG to i32*
%aI=load i32,i32*%aH,align 4
%aJ=load i8*,i8**%e,align 8
%aK=getelementptr inbounds i8,i8*%aJ,i64 16
%aL=bitcast i8*%aK to i32*
%aM=load i32,i32*%aL,align 4
%aN=icmp eq i32%aM,0
br i1%aN,label%aS,label%aO
aO:
store i8*null,i8**%d,align 8
%aP=getelementptr inbounds i8,i8*%aG,i64%as
%aQ=bitcast i8*%aP to i8**
%aR=load i8*,i8**%aQ,align 8
br label%a1
aS:
%aT=getelementptr inbounds i8,i8*%aJ,i64 20
%aU=bitcast i8*%aT to i32*
%aV=load i32,i32*%aU,align 4
%aW=call i8*@sml_alloc(i32 inreg%aV)#0
%aX=getelementptr inbounds i8,i8*%aW,i64 -4
%aY=bitcast i8*%aX to i32*
store i32%aV,i32*%aY,align 4
%aZ=load i8*,i8**%d,align 8
store i8*null,i8**%d,align 8
%a0=getelementptr inbounds i8,i8*%aZ,i64%as
call void@llvm.memcpy.p0i8.p0i8.i32(i8*%aW,i8*%a0,i32%aV,i1 false)
br label%a1
a1:
%a2=phi i8*[%aW,%aS],[%aR,%aO]
store i8*%a2,i8**%d,align 8
%a3=icmp sgt i32%aI,-1
br i1%a3,label%a5,label%a4
a4:
ret i8*%a2
a5:
%a6=load i8*,i8**%c,align 8
%a7=sext i32%aI to i64
%a8=getelementptr inbounds i8,i8*%a6,i64%a7
%a9=load i8,i8*%a8,align 1
%ba=add nsw i32%aI,-1
%bb=load i8**,i8***%aB,align 8
%bc=load i8*,i8**%bb,align 8
%bd=getelementptr inbounds i8,i8*%bc,i64 16
%be=bitcast i8*%bd to i8*(i8*,i8*)**
%bf=load i8*(i8*,i8*)*,i8*(i8*,i8*)**%be,align 8
%bg=bitcast i8*%bc to i8**
%bh=load i8*,i8**%bg,align 8
store i8*%bh,i8**%f,align 8
%bi=bitcast i8**%bb to i8*
%bj=getelementptr inbounds i8,i8*%bi,i64 20
%bk=bitcast i8*%bj to i32*
%bl=load i32,i32*%bk,align 4
%bm=getelementptr inbounds i8*,i8**%bb,i64 2
%bn=bitcast i8**%bm to i32*
%bo=load i32,i32*%bn,align 4
%bp=call i8*@sml_alloc(i32 inreg%L)#0
%bq=getelementptr inbounds i8,i8*%bp,i64 -4
%br=bitcast i8*%bq to i32*
store i32%aC,i32*%br,align 4
call void@llvm.memset.p0i8.i32(i8*%bp,i8 0,i32%L,i1 false)
store i8%a9,i8*%bp,align 1
%bs=icmp eq i32%bo,0
%bt=load i8*,i8**%d,align 8
store i8*null,i8**%d,align 8
%bu=getelementptr inbounds i8,i8*%bp,i64%aD
br i1%bs,label%bv,label%bw
bv:
call void@llvm.memcpy.p0i8.p0i8.i32(i8*%bu,i8*%bt,i32%bl,i1 false)
br label%by
bw:
%bx=bitcast i8*%bu to i8**
store i8*%bt,i8**%bx,align 8
br label%by
by:
%bz=getelementptr inbounds i8,i8*%bp,i64%aE
%bA=bitcast i8*%bz to i32*
store i32%K,i32*%bA,align 4
%bB=load i8*,i8**%f,align 8
store i8*null,i8**%f,align 8
%bC=call fastcc i8*%bf(i8*inreg%bB,i8*inreg%bp)
store i8*%bC,i8**%d,align 8
%bD=load i8*,i8**%e,align 8
%bE=getelementptr inbounds i8,i8*%bD,i64 20
%bF=bitcast i8*%bE to i32*
%bG=load i32,i32*%bF,align 4
%bH=getelementptr inbounds i8,i8*%bD,i64 16
%bI=bitcast i8*%bH to i32*
%bJ=load i32,i32*%bI,align 4
%bK=call i8*@sml_alloc(i32 inreg%F)#0
%bL=bitcast i8*%bK to i32*
%bM=getelementptr inbounds i8,i8*%bK,i64 -4
%bN=bitcast i8*%bM to i32*
store i32%am,i32*%bN,align 4
call void@llvm.memset.p0i8.i32(i8*%bK,i8 0,i32%F,i1 false)
store i32%ba,i32*%bL,align 4
%bO=icmp eq i32%bJ,0
%bP=load i8*,i8**%d,align 8
store i8*null,i8**%d,align 8
%bQ=getelementptr inbounds i8,i8*%bK,i64%as
br i1%bO,label%bR,label%bS
bR:
call void@llvm.memcpy.p0i8.p0i8.i32(i8*%bQ,i8*%bP,i32%bG,i1 false)
br label%bU
bS:
%bT=bitcast i8*%bQ to i8**
store i8*%bP,i8**%bT,align 8
br label%bU
bU:
%bV=getelementptr inbounds i8,i8*%bK,i64%ay
%bW=bitcast i8*%bV to i32*
store i32%E,i32*%bW,align 4
br label%aF
}
define internal fastcc i8*@_SMLLLN10CharVector5foldrE_192(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=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**%e,align 8
%s=load i8*,i8**%d,align 8
store i8*null,i8**%d,align 8
%t=bitcast i8*%p to i8**
store i8*%s,i8**%t,align 8
%u=icmp eq i32%h,0
%v=load i8*,i8**%c,align 8
store i8*null,i8**%c,align 8
%w=getelementptr inbounds i8,i8*%p,i64 8
br i1%u,label%x,label%y
x:
call void@llvm.memcpy.p0i8.p0i8.i32(i8*%w,i8*%v,i32%o,i1 false)
br label%A
y:
%z=bitcast i8*%w to i8**
store i8*%v,i8**%z,align 8
br label%A
A:
%B=getelementptr inbounds i8,i8*%p,i64 16
%C=bitcast i8*%B to i32*
store i32%h,i32*%C,align 4
%D=getelementptr inbounds i8,i8*%p,i64 20
%E=bitcast i8*%D to i32*
store i32%o,i32*%E,align 4
%F=getelementptr inbounds i8,i8*%p,i64 24
%G=bitcast i8*%F to i32*
store i32%j,i32*%G,align 4
%H=call i8*@sml_alloc(i32 inreg 28)#0
%I=getelementptr inbounds i8,i8*%H,i64 -4
%J=bitcast i8*%I to i32*
store i32 1342177304,i32*%J,align 4
%K=load i8*,i8**%e,align 8
%L=bitcast i8*%H to i8**
store i8*%K,i8**%L,align 8
%M=getelementptr inbounds i8,i8*%H,i64 8
%N=bitcast i8*%M to void(...)**
store void(...)*bitcast(i8*(i8*,i8*)*@_SMLLLN10CharVector5foldrE_191 to void(...)*),void(...)**%N,align 8
%O=getelementptr inbounds i8,i8*%H,i64 16
%P=bitcast i8*%O to void(...)**
store void(...)*bitcast(i8*(i8*,i8*)*@_SMLLLN10CharVector5foldrE_191 to void(...)*),void(...)**%P,align 8
%Q=getelementptr inbounds i8,i8*%H,i64 24
%R=bitcast i8*%Q to i32*
store i32 1,i32*%R,align 4
ret i8*%H
}
define internal fastcc i8*@_SMLLLN10CharVector5foldrE_193(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*)*@_SMLLLN10CharVector5foldrE_192 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*)*@_SMLLLN10CharVector5foldrE_192 to void(...)*),void(...)**%C,align 8
%D=getelementptr inbounds i8,i8*%u,i64 24
%E=bitcast i8*%D to i32*
store i32 1,i32*%E,align 4
ret i8*%u
}
define fastcc i8*@_SMLFN10CharVector5foldrE(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*)*@_SMLLLN10CharVector5foldrE_193 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*)*@_SMLLLN10CharVector5foldrE_193 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*@_SMLLLN12Array__common4appiE_196(i8*inreg%a,i8*inreg%b)#4 gc"smlsharp"{
tail call fastcc void@_SMLLLN12Array__common4appiE_132(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*@_SMLLLN12Array__common4appiE_197(i8*inreg%a,i8*inreg%b)#3 gc"smlsharp"{
%c=tail call fastcc i8*@_SMLFN10CharVector4appiE(i8*inreg%b)
ret i8*%c
}
define internal fastcc i8*@_SMLLLN12Array__common3appE_198(i8*inreg%a,i8*inreg%b)#4 gc"smlsharp"{
tail call fastcc void@_SMLLLN12Array__common3appE_135(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*@_SMLLLN12Array__common3appE_199(i8*inreg%a,i8*inreg%b)#3 gc"smlsharp"{
%c=tail call fastcc i8*@_SMLFN10CharVector3appE(i8*inreg%b)
ret i8*%c
}
define internal fastcc i8*@_SMLLLN12Array__common4mapiE_200(i8*inreg%a,i8*inreg%b)#3 gc"smlsharp"{
%c=tail call fastcc i8*@_SMLFN10CharVector4mapiE(i8*inreg%b)
ret i8*%c
}
define internal fastcc i8*@_SMLLLN12Array__common3mapE_201(i8*inreg%a,i8*inreg%b)#3 gc"smlsharp"{
%c=tail call fastcc i8*@_SMLFN10CharVector3mapE(i8*inreg%b)
ret i8*%c
}
define internal fastcc i8*@_SMLLLN12Array__common5findiE_202(i8*inreg%a,i8*inreg%b)#3 gc"smlsharp"{
%c=tail call fastcc i8*@_SMLFN10CharVector5findiE(i8*inreg%b)
ret i8*%c
}
define internal fastcc i8*@_SMLLLN12Array__common4findE_203(i8*inreg%a,i8*inreg%b)#3 gc"smlsharp"{
%c=tail call fastcc i8*@_SMLFN10CharVector4findE(i8*inreg%b)
ret i8*%c
}
define internal fastcc i8*@_SMLLLN12Array__common6existsE_204(i8*inreg%a,i8*inreg%b)#4 gc"smlsharp"{
%c=tail call fastcc i32@_SMLLLN12Array__common6existsE_150(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*@_SMLLLN12Array__common6existsE_205(i8*inreg%a,i8*inreg%b)#3 gc"smlsharp"{
%c=tail call fastcc i8*@_SMLFN10CharVector6existsE(i8*inreg%b)
ret i8*%c
}
define internal fastcc i8*@_SMLLLN12Array__common3allE_206(i8*inreg%a,i8*inreg%b)#4 gc"smlsharp"{
%c=tail call fastcc i32@_SMLLLN12Array__common3allE_153(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*@_SMLLLN12Array__common3allE_207(i8*inreg%a,i8*inreg%b)#3 gc"smlsharp"{
%c=tail call fastcc i8*@_SMLFN10CharVector3allE(i8*inreg%b)
ret i8*%c
}
define internal fastcc i8*@_SMLLLN12Array__common7collateE_208(i8*inreg%a,i8*inreg%b)#4 gc"smlsharp"{
%c=tail call fastcc i32@_SMLLLN12Array__common7collateE_156(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*@_SMLLLN12Array__common7collateE_209(i8*inreg%a,i8*inreg%b)#3 gc"smlsharp"{
%c=tail call fastcc i8*@_SMLFN10CharVector7collateE(i8*inreg%b)
ret i8*%c
}
define internal fastcc i8*@_SMLLLN12Array__common8fromListE_210(i8*inreg%a,i8*inreg%b)#4 gc"smlsharp"{
%c=tail call fastcc i8*@_SMLFN10CharVector8fromListE(i8*inreg%b)
ret i8*%c
}
define internal fastcc i8*@_SMLLLN12Array__common8tabulateE_211(i8*inreg%a,i8*inreg%b)#4 gc"smlsharp"{
%c=tail call fastcc i8*@_SMLFN10CharVector8tabulateE(i8*inreg%b)
ret i8*%c
}
define internal fastcc i8*@_SMLLLN12Array__common6updateE_212(i8*inreg%a,i8*inreg%b)#4 gc"smlsharp"{
%c=tail call fastcc i8*@_SMLFN10CharVector6updateE(i8*inreg%b)
ret i8*%c
}
define internal fastcc i8*@_SMLLLN12Array__common6concatE_213(i8*inreg%a,i8*inreg%b)#4 gc"smlsharp"{
%c=tail call fastcc i8*@_SMLFN10CharVector6concatE(i8*inreg%b)
ret i8*%c
}
define internal fastcc i8*@_SMLLLN10CharVector6foldliE_214(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*@_SMLFN10CharVector6foldliE(i32 inreg%e,i32 inreg%g)
ret i8*%h
}
define internal fastcc i8*@_SMLLLN10CharVector5foldlE_215(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*@_SMLFN10CharVector5foldlE(i32 inreg%e,i32 inreg%g)
ret i8*%h
}
define internal fastcc i8*@_SMLLLN10CharVector6foldriE_216(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*@_SMLFN10CharVector6foldriE(i32 inreg%e,i32 inreg%g)
ret i8*%h
}
define internal fastcc i8*@_SMLLLN10CharVector5foldrE_217(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*@_SMLFN10CharVector5foldrE(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
attributes#0={nounwind}
attributes#1={noreturn}
attributes#2={noreturn nounwind}
attributes#3={nounwind uwtable}
attributes#4={uwtable}
