@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,[11x i8]}><{[4x i8]zeroinitializer,i32 -2147483637,[11x i8]c"List.Empty\00"}>,align 8
@b=private unnamed_addr constant<{[4x i8],i32,i8*,i32,[4x i8],i32}><{[4x i8]zeroinitializer,i32 -805306352,i8*getelementptr inbounds(i8,i8*getelementptr inbounds(<{[4x i8],i32,[11x i8]}>,<{[4x i8],i32,[11x i8]}>*@a,i32 0,i32 0,i32 0),i32 8),i32 0,[4x i8]zeroinitializer,i32 1}>,align 8
@_SMLDL131=private constant<{[4x i8],i32,i8*}><{[4x i8]zeroinitializer,i32 -1879048184,i8*getelementptr inbounds(i8,i8*getelementptr inbounds(<{[4x i8],i32,i8*,i32,[4x i8],i32}>,<{[4x i8],i32,i8*,i32,[4x i8],i32}>*@b,i32 0,i32 0,i32 0),i32 8)}>,align 8
@c=private unnamed_addr constant<{[4x i8],i32,i8*,void(...)*,void(...)*,i32}><{[4x i8]zeroinitializer,i32 -805306344,i8*null,void(...)*bitcast(i32(i8*)*@_SMLLLN4List4nullE_132 to void(...)*),void(...)*bitcast(i8*(i8*,i8*)*@_SMLLLN4List4nullE_235 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*(i32,i32)*@_SMLFN4List4nullE to void(...)*),void(...)*bitcast(i8*(i8*,i8*,i8*)*@_SMLLLN4List4nullE_236 to void(...)*),i32 -2147483647}>,align 8
@e=private unnamed_addr constant<{[4x i8],i32,[35x i8]}><{[4x i8]zeroinitializer,i32 -2147483613,[35x i8]c"src/basis/main/List.sml:28.38(596)\00"}>,align 8
@f=private unnamed_addr constant<{[4x i8],i32,i8*,void(...)*,void(...)*,i32}><{[4x i8]zeroinitializer,i32 -805306344,i8*null,void(...)*bitcast(i8*(i32,i32)*@_SMLFN4List6lengthE to void(...)*),void(...)*bitcast(i8*(i8*,i8*,i8*)*@_SMLLLN4List6lengthE_238 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*(i32,i32)*@_SMLFN4List1_VE to void(...)*),void(...)*bitcast(i8*(i8*,i8*,i8*)*@_SMLLLN4List1_VE_239 to void(...)*),i32 -2147483647}>,align 8
@h=private unnamed_addr constant<{[4x i8],i32,[35x i8]}><{[4x i8]zeroinitializer,i32 -2147483613,[35x i8]c"src/basis/main/List.sml:44.21(938)\00"}>,align 8
@i=private unnamed_addr constant<{[4x i8],i32,i8*,i8*,i32}><{[4x i8]zeroinitializer,i32 -805306352,i8*getelementptr inbounds(i8,i8*getelementptr inbounds(<{[4x i8],i32,i8*}>,<{[4x i8],i32,i8*}>*@_SMLDL131,i32 0,i32 0,i32 0),i32 8),i8*getelementptr inbounds(i8,i8*getelementptr inbounds(<{[4x i8],i32,[35x i8]}>,<{[4x i8],i32,[35x i8]}>*@h,i32 0,i32 0,i32 0),i32 8),i32 3}>,align 8
@j=private unnamed_addr constant<{[4x i8],i32,i8*,void(...)*,void(...)*,i32}><{[4x i8]zeroinitializer,i32 -805306344,i8*null,void(...)*bitcast(i8*(i32,i32)*@_SMLFN4List2hdE to void(...)*),void(...)*bitcast(i8*(i8*,i8*,i8*)*@_SMLLLN4List2hdE_240 to void(...)*),i32 -2147483647}>,align 8
@k=private unnamed_addr constant<{[4x i8],i32,[35x i8]}><{[4x i8]zeroinitializer,i32 -2147483613,[35x i8]c"src/basis/main/List.sml:47.21(988)\00"}>,align 8
@l=private unnamed_addr constant<{[4x i8],i32,i8*,i8*,i32}><{[4x i8]zeroinitializer,i32 -805306352,i8*getelementptr inbounds(i8,i8*getelementptr inbounds(<{[4x i8],i32,i8*}>,<{[4x i8],i32,i8*}>*@_SMLDL131,i32 0,i32 0,i32 0),i32 8),i8*getelementptr inbounds(i8,i8*getelementptr inbounds(<{[4x i8],i32,[35x i8]}>,<{[4x i8],i32,[35x i8]}>*@k,i32 0,i32 0,i32 0),i32 8),i32 3}>,align 8
@m=private unnamed_addr constant<{[4x i8],i32,i8*,void(...)*,void(...)*,i32}><{[4x i8]zeroinitializer,i32 -805306344,i8*null,void(...)*bitcast(i8*(i32,i32)*@_SMLFN4List2tlE to void(...)*),void(...)*bitcast(i8*(i8*,i8*,i8*)*@_SMLLLN4List2tlE_241 to void(...)*),i32 -2147483647}>,align 8
@n=private unnamed_addr constant<{[4x i8],i32,[36x i8]}><{[4x i8]zeroinitializer,i32 -2147483612,[36x i8]c"src/basis/main/List.sml:50.23(1040)\00"}>,align 8
@o=private unnamed_addr constant<{[4x i8],i32,i8*,i8*,i32}><{[4x i8]zeroinitializer,i32 -805306352,i8*getelementptr inbounds(i8,i8*getelementptr inbounds(<{[4x i8],i32,i8*}>,<{[4x i8],i32,i8*}>*@_SMLDL131,i32 0,i32 0,i32 0),i32 8),i8*getelementptr inbounds(i8,i8*getelementptr inbounds(<{[4x i8],i32,[36x i8]}>,<{[4x i8],i32,[36x i8]}>*@n,i32 0,i32 0,i32 0),i32 8),i32 3}>,align 8
@p=private unnamed_addr constant<{[4x i8],i32,i8*,void(...)*,void(...)*,i32}><{[4x i8]zeroinitializer,i32 -805306344,i8*null,void(...)*bitcast(i8*(i32,i32)*@_SMLFN4List4lastE to void(...)*),void(...)*bitcast(i8*(i8*,i8*,i8*)*@_SMLLLN4List4lastE_242 to void(...)*),i32 -2147483647}>,align 8
@q=private unnamed_addr constant<{[4x i8],i32,i8*,void(...)*,void(...)*,i32}><{[4x i8]zeroinitializer,i32 -805306344,i8*null,void(...)*bitcast(i8*(i32,i32)*@_SMLFN4List7getItemE to void(...)*),void(...)*bitcast(i8*(i8*,i8*,i8*)*@_SMLLLN4List7getItemE_243 to void(...)*),i32 -2147483647}>,align 8
@r=private unnamed_addr constant<{[4x i8],i32,[36x i8]}><{[4x i8]zeroinitializer,i32 -2147483612,[36x i8]c"src/basis/main/List.sml:59.43(1244)\00"}>,align 8
@s=private unnamed_addr constant<{[4x i8],i32,[36x i8]}><{[4x i8]zeroinitializer,i32 -2147483612,[36x i8]c"src/basis/main/List.sml:63.32(1372)\00"}>,align 8
@t=private unnamed_addr constant<{[4x i8],i32,i8*,void(...)*,void(...)*,i32}><{[4x i8]zeroinitializer,i32 -805306344,i8*null,void(...)*bitcast(i8*(i32,i32)*@_SMLFN4List3nthE to void(...)*),void(...)*bitcast(i8*(i8*,i8*,i8*)*@_SMLLLN4List3nthE_244 to void(...)*),i32 -2147483647}>,align 8
@u=private unnamed_addr constant<{[4x i8],i32,[36x i8]}><{[4x i8]zeroinitializer,i32 -2147483612,[36x i8]c"src/basis/main/List.sml:69.33(1540)\00"}>,align 8
@v=private unnamed_addr constant<{[4x i8],i32,[36x i8]}><{[4x i8]zeroinitializer,i32 -2147483612,[36x i8]c"src/basis/main/List.sml:72.30(1645)\00"}>,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)*@_SMLFN4List4takeE to void(...)*),void(...)*bitcast(i8*(i8*,i8*,i8*)*@_SMLLLN4List4takeE_245 to void(...)*),i32 -2147483647}>,align 8
@x=private unnamed_addr constant<{[4x i8],i32,[36x i8]}><{[4x i8]zeroinitializer,i32 -2147483612,[36x i8]c"src/basis/main/List.sml:78.31(1796)\00"}>,align 8
@y=private unnamed_addr constant<{[4x i8],i32,[36x i8]}><{[4x i8]zeroinitializer,i32 -2147483612,[36x i8]c"src/basis/main/List.sml:81.30(1890)\00"}>,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)*@_SMLFN4List4dropE to void(...)*),void(...)*bitcast(i8*(i8*,i8*,i8*)*@_SMLLLN4List4dropE_246 to void(...)*),i32 -2147483647}>,align 8
@A=private unnamed_addr constant<{[4x i8],i32,i8*,void(...)*,void(...)*,i32}><{[4x i8]zeroinitializer,i32 -805306344,i8*null,void(...)*bitcast(i8*(i32,i32)*@_SMLFN4List3revE to void(...)*),void(...)*bitcast(i8*(i8*,i8*,i8*)*@_SMLLLN4List3revE_247 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*(i32,i32)*@_SMLFN4List6concatE to void(...)*),void(...)*bitcast(i8*(i8*,i8*,i8*)*@_SMLLLN4List6concatE_248 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*(i32,i32)*@_SMLFN4List9revAppendE to void(...)*),void(...)*bitcast(i8*(i8*,i8*,i8*)*@_SMLLLN4List9revAppendE_249 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*(i32,i32)*@_SMLFN4List3appE to void(...)*),void(...)*bitcast(i8*(i8*,i8*,i8*)*@_SMLLLN4List3appE_251 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*(i32,i32,i32,i32)*@_SMLFN4List3mapE to void(...)*),void(...)*bitcast(i8*(i8*,i8*,i8*,i8*,i8*)*@_SMLLLN4List3mapE_252 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*(i32,i32,i32,i32)*@_SMLFN4List10mapPartialE to void(...)*),void(...)*bitcast(i8*(i8*,i8*,i8*,i8*,i8*)*@_SMLLLN4List10mapPartialE_253 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*(i32,i32)*@_SMLFN4List4findE to void(...)*),void(...)*bitcast(i8*(i8*,i8*,i8*)*@_SMLLLN4List4findE_254 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*(i32,i32)*@_SMLFN4List6filterE to void(...)*),void(...)*bitcast(i8*(i8*,i8*,i8*)*@_SMLLLN4List6filterE_255 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*(i32,i32)*@_SMLFN4List9partitionE to void(...)*),void(...)*bitcast(i8*(i8*,i8*,i8*)*@_SMLLLN4List9partitionE_256 to void(...)*),i32 -2147483647}>,align 8
@J=private unnamed_addr constant<{[4x i8],i32,i8*,void(...)*,void(...)*,i32}><{[4x i8]zeroinitializer,i32 -805306344,i8*null,void(...)*bitcast(i8*(i32,i32,i32,i32)*@_SMLFN4List5foldlE to void(...)*),void(...)*bitcast(i8*(i8*,i8*,i8*,i8*,i8*)*@_SMLLLN4List5foldlE_257 to void(...)*),i32 -2147483647}>,align 8
@K=private unnamed_addr constant<{[4x i8],i32,i8*,void(...)*,void(...)*,i32}><{[4x i8]zeroinitializer,i32 -805306344,i8*null,void(...)*bitcast(i8*(i32,i32,i32,i32)*@_SMLFN4List5foldrE to void(...)*),void(...)*bitcast(i8*(i8*,i8*,i8*,i8*,i8*)*@_SMLLLN4List5foldrE_258 to void(...)*),i32 -2147483647}>,align 8
@L=private unnamed_addr constant<{[4x i8],i32,i8*,void(...)*,void(...)*,i32}><{[4x i8]zeroinitializer,i32 -805306344,i8*null,void(...)*bitcast(i8*(i32,i32)*@_SMLFN4List6existsE to void(...)*),void(...)*bitcast(i8*(i8*,i8*,i8*)*@_SMLLLN4List6existsE_260 to void(...)*),i32 -2147483647}>,align 8
@M=private unnamed_addr constant<{[4x i8],i32,i8*,void(...)*,void(...)*,i32}><{[4x i8]zeroinitializer,i32 -805306344,i8*null,void(...)*bitcast(i8*(i32,i32)*@_SMLFN4List3allE to void(...)*),void(...)*bitcast(i8*(i8*,i8*,i8*)*@_SMLLLN4List3allE_262 to void(...)*),i32 -2147483647}>,align 8
@N=private unnamed_addr constant<{[4x i8],i32,[37x i8]}><{[4x i8]zeroinitializer,i32 -2147483611,[37x i8]c"src/basis/main/List.sml:165.30(4103)\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*(i32,i32)*@_SMLFN4List8tabulateE to void(...)*),void(...)*bitcast(i8*(i8*,i8*,i8*)*@_SMLLLN4List8tabulateE_263 to void(...)*),i32 -2147483647}>,align 8
@P=private unnamed_addr constant<{[4x i8],i32,i8*,void(...)*,void(...)*,i32}><{[4x i8]zeroinitializer,i32 -805306344,i8*null,void(...)*bitcast(i8*(i32,i32)*@_SMLFN4List7collateE to void(...)*),void(...)*bitcast(i8*(i8*,i8*,i8*)*@_SMLLLN4List7collateE_265 to void(...)*),i32 -2147483647}>,align 8
@_SMLZN4List5EmptyE=local_unnamed_addr constant i8*bitcast(i8**getelementptr inbounds(<{[4x i8],i32,i8*}>,<{[4x i8],i32,i8*}>*@_SMLDL131,i64 0,i32 2)to i8*)
@_SMLZN4List4nullE=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*)
@_SMLZN4List6lengthE=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*)
@_SMLZN4List1_VE=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*)
@_SMLZN4List2hdE=local_unnamed_addr constant i8*bitcast(i8**getelementptr inbounds(<{[4x i8],i32,i8*,void(...)*,void(...)*,i32}>,<{[4x i8],i32,i8*,void(...)*,void(...)*,i32}>*@j,i64 0,i32 2)to i8*)
@_SMLZN4List2tlE=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*)
@_SMLZN4List4lastE=local_unnamed_addr constant i8*bitcast(i8**getelementptr inbounds(<{[4x i8],i32,i8*,void(...)*,void(...)*,i32}>,<{[4x i8],i32,i8*,void(...)*,void(...)*,i32}>*@p,i64 0,i32 2)to i8*)
@_SMLZN4List7getItemE=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*)
@_SMLZN4List3nthE=local_unnamed_addr constant i8*bitcast(i8**getelementptr inbounds(<{[4x i8],i32,i8*,void(...)*,void(...)*,i32}>,<{[4x i8],i32,i8*,void(...)*,void(...)*,i32}>*@t,i64 0,i32 2)to i8*)
@_SMLZN4List4takeE=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*)
@_SMLZN4List4dropE=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*)
@_SMLZN4List3revE=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*)
@_SMLZN4List6concatE=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*)
@_SMLZN4List9revAppendE=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*)
@_SMLZN4List3appE=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*)
@_SMLZN4List3mapE=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*)
@_SMLZN4List10mapPartialE=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*)
@_SMLZN4List4findE=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*)
@_SMLZN4List6filterE=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*)
@_SMLZN4List9partitionE=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*)
@_SMLZN4List5foldlE=local_unnamed_addr constant i8*bitcast(i8**getelementptr inbounds(<{[4x i8],i32,i8*,void(...)*,void(...)*,i32}>,<{[4x i8],i32,i8*,void(...)*,void(...)*,i32}>*@J,i64 0,i32 2)to i8*)
@_SMLZN4List5foldrE=local_unnamed_addr constant i8*bitcast(i8**getelementptr inbounds(<{[4x i8],i32,i8*,void(...)*,void(...)*,i32}>,<{[4x i8],i32,i8*,void(...)*,void(...)*,i32}>*@K,i64 0,i32 2)to i8*)
@_SMLZN4List6existsE=local_unnamed_addr constant i8*bitcast(i8**getelementptr inbounds(<{[4x i8],i32,i8*,void(...)*,void(...)*,i32}>,<{[4x i8],i32,i8*,void(...)*,void(...)*,i32}>*@L,i64 0,i32 2)to i8*)
@_SMLZN4List3allE=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*)
@_SMLZN4List8tabulateE=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*)
@_SMLZN4List7collateE=local_unnamed_addr constant i8*bitcast(i8**getelementptr inbounds(<{[4x i8],i32,i8*,void(...)*,void(...)*,i32}>,<{[4x i8],i32,i8*,void(...)*,void(...)*,i32}>*@P,i64 0,i32 2)to i8*)
@_SML_ftab03d87556ec7f64b2_List=external global i8
@Q=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 void@sml_raise(i8*inreg)local_unnamed_addr#1
define private void@_SML_tabb03d87556ec7f64b2_List()#2{
unreachable
}
define void@_SML_load03d87556ec7f64b2_List(i8*%a)local_unnamed_addr#0{
%b=load i1,i1*@Q,align 1
br i1%b,label%c,label%d
c:
ret void
d:
store i1 true,i1*@Q,align 1
tail call void@sml_gcroot(i8*%a,void()*@_SML_tabb03d87556ec7f64b2_List,i8*@_SML_ftab03d87556ec7f64b2_List,i8*null)#0
ret void
}
define void@_SML_main03d87556ec7f64b2_List()local_unnamed_addr#3 gc"smlsharp"{
ret void
}
define internal fastcc i32@_SMLLLN4List4nullE_132(i8*inreg%a)#3 gc"smlsharp"{
%b=icmp eq i8*%a,null
%c=zext i1%b to i32
ret i32%c
}
define fastcc i8*@_SMLFN4List4nullE(i32 inreg%a,i32 inreg%b)#3 gc"smlsharp"{
ret 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*)
}
define internal fastcc i32@_SMLLLN4List6lengthE_137(i8*inreg%a,i8*inreg%b)#4 gc"smlsharp"{
p:
%c=alloca i8*,align 8
%d=alloca i8*,align 8
call void@llvm.gcroot(i8**%c,i8*null)#0
call void@llvm.gcroot(i8**%d,i8*null)#0
%e=bitcast i8*%a to i32*
%f=load i32,i32*%e,align 4
%g=add i32%f,-1
%h=sub i32 0,%f
%i=and i32%g,%h
%j=add i32%f,7
%k=add i32%j,%i
%l=and i32%k,-8
%m=sext i32%l to i64
br label%n
n:
%o=phi i8*[%X,%U],[%b,%p]
%q=phi i32[%Y,%U],[0,%p]
store i8*%o,i8**%c,align 8
%r=load atomic i32,i32*@sml_check_flag unordered,align 4
%s=icmp eq i32%r,0
br i1%s,label%v,label%t
t:
call void@sml_check(i32 inreg%r)
%u=load i8*,i8**%c,align 8
br label%v
v:
%w=phi i8*[%u,%t],[%o,%n]
%x=icmp eq i8*%w,null
br i1%x,label%y,label%z
y:
ret i32%q
z:
store i8*null,i8**%c,align 8
%A=call{i32,i1}@llvm.sadd.with.overflow.i32(i32%q,i32 1)#0
%B=extractvalue{i32,i1}%A,1
br i1%B,label%C,label%U
C:
%D=load i8*,i8**@_SMLZ8Overflow,align 8
store i8*%D,i8**%c,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
store i8*%E,i8**%d,align 8
%H=load i8*,i8**%c,align 8
store i8*null,i8**%c,align 8
%I=bitcast i8*%E to i8**
store i8*%H,i8**%I,align 8
%J=getelementptr inbounds i8,i8*%E,i64 8
%K=bitcast i8*%J to i8**
store i8*getelementptr inbounds(<{[4x i8],i32,[35x i8]}>,<{[4x i8],i32,[35x i8]}>*@e,i64 0,i32 2,i64 0),i8**%K,align 8
%L=getelementptr inbounds i8,i8*%E,i64 16
%M=bitcast i8*%L to i32*
store i32 3,i32*%M,align 4
%N=call i8*@sml_alloc(i32 inreg 60)#0
%O=getelementptr inbounds i8,i8*%N,i64 -4
%P=bitcast i8*%O to i32*
store i32 1342177336,i32*%P,align 4
%Q=getelementptr inbounds i8,i8*%N,i64 56
%R=bitcast i8*%Q to i32*
store i32 1,i32*%R,align 4
%S=load i8*,i8**%d,align 8
%T=bitcast i8*%N to i8**
store i8*%S,i8**%T,align 8
call void@sml_raise(i8*inreg%N)#1
unreachable
U:
%V=getelementptr inbounds i8,i8*%w,i64%m
%W=bitcast i8*%V to i8**
%X=load i8*,i8**%W,align 8
%Y=add nuw nsw i32%q,1
br label%n
}
define fastcc i8*@_SMLFN4List6lengthE(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%b,i32*%e,align 4
%h=getelementptr inbounds i8,i8*%d,i64 8
%i=bitcast i8*%h to i32*
store i32 0,i32*%i,align 4
%j=call i8*@sml_alloc(i32 inreg 28)#0
%k=getelementptr inbounds i8,i8*%j,i64 -4
%l=bitcast i8*%k to i32*
store i32 1342177304,i32*%l,align 4
%m=load i8*,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 void(...)**
store void(...)*bitcast(i32(i8*,i8*)*@_SMLLLN4List6lengthE_137 to void(...)*),void(...)**%p,align 8
%q=getelementptr inbounds i8,i8*%j,i64 16
%r=bitcast i8*%q to void(...)**
store void(...)*bitcast(i8*(i8*,i8*)*@_SMLLLN4List6lengthE_237 to void(...)*),void(...)**%r,align 8
%s=getelementptr inbounds i8,i8*%j,i64 24
%t=bitcast i8*%s to i32*
store i32 -2147483647,i32*%t,align 4
ret i8*%j
}
define internal fastcc i8*@_SMLLLN4List1_VE_140(i8*inreg%a,i8*inreg%b)#4 gc"smlsharp"{
K:
%c=alloca i8*,align 8
%d=alloca i8*,align 8
%e=alloca i8*,align 8
%f=alloca i8*,align 8
%g=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
call void@llvm.gcroot(i8**%g,i8*null)#0
store i8*%a,i8**%g,align 8
%h=getelementptr inbounds i8,i8*%a,i64 4
%i=bitcast i8*%h to i32*
%j=load i32,i32*%i,align 4
%k=add i32%j,-1
%l=sub i32 0,%j
%m=and i32%k,%l
%n=add i32%j,7
%o=add i32%n,%m
%p=and i32%o,-8
%q=add i32%p,15
%r=and i32%q,-8
%s=lshr i32%o,3
%t=lshr i32%m,3
%u=sub nsw i32%s,%t
%v=shl i32 1,%u
%w=bitcast i8*%a to i32*
%x=load i32,i32*%w,align 4
%y=or i32%v,%x
%z=or i32%r,4
%A=bitcast i8*%b to i8**
%B=load i8*,i8**%A,align 8
%C=icmp eq i8*%B,null
%D=getelementptr inbounds i8,i8*%b,i64 8
%E=bitcast i8*%D to i8**
%F=load i8*,i8**%E,align 8
br i1%C,label%I,label%G
G:
store i8*%F,i8**%c,align 8
%H=icmp eq i8*%F,null
br i1%H,label%I,label%L
I:
%J=phi i8*[%B,%G],[%F,%K]
ret i8*%J
L:
store i8*%B,i8**%d,align 8
%M=sext i32%m to i64
%N=sext i32%p to i64
%O=or i32%r,1342177280
%P=sext i32%r to i64
br label%Q
Q:
%R=phi i8*[%aH,%aQ],[null,%L]
store i8*%R,i8**%e,align 8
%S=load atomic i32,i32*@sml_check_flag unordered,align 4
%T=icmp eq i32%S,0
br i1%T,label%V,label%U
U:
call void@sml_check(i32 inreg%S)
br label%V
V:
%W=load i8*,i8**%d,align 8
%X=icmp eq i8*%W,null
br i1%X,label%Y,label%ab
Y:
store i8*null,i8**%d,align 8
%Z=load i8*,i8**%e,align 8
store i8*null,i8**%e,align 8
%aa=load i8*,i8**%c,align 8
store i8*%Z,i8**%c,align 8
br label%aW
ab:
%ac=load i8*,i8**%g,align 8
%ad=bitcast i8*%ac to i32*
%ae=load i32,i32*%ad,align 4
%af=icmp eq i32%ae,0
br i1%af,label%ak,label%ag
ag:
%ah=getelementptr inbounds i8,i8*%W,i64%M
%ai=bitcast i8*%ah to i8**
%aj=load i8*,i8**%ai,align 8
br label%av
ak:
%al=getelementptr inbounds i8,i8*%ac,i64 4
%am=bitcast i8*%al to i32*
%an=load i32,i32*%am,align 4
%ao=call i8*@sml_alloc(i32 inreg%an)#0
%ap=getelementptr inbounds i8,i8*%ao,i64 -4
%aq=bitcast i8*%ap to i32*
store i32%an,i32*%aq,align 4
%ar=load i8*,i8**%d,align 8
%as=getelementptr inbounds i8,i8*%ar,i64%M
call void@llvm.memcpy.p0i8.p0i8.i32(i8*%ao,i8*%as,i32%an,i1 false)
%at=load i8*,i8**%g,align 8
%au=bitcast i8*%at to i32*
br label%av
av:
%aw=phi i32*[%au,%ak],[%ad,%ag]
%ax=phi i8*[%at,%ak],[%ac,%ag]
%ay=phi i8*[%ar,%ak],[%W,%ag]
%az=phi i8*[%ao,%ak],[%aj,%ag]
store i8*%az,i8**%f,align 8
%aA=getelementptr inbounds i8,i8*%ay,i64%N
%aB=bitcast i8*%aA to i8**
%aC=load i8*,i8**%aB,align 8
store i8*%aC,i8**%d,align 8
%aD=getelementptr inbounds i8,i8*%ax,i64 4
%aE=bitcast i8*%aD to i32*
%aF=load i32,i32*%aE,align 4
%aG=load i32,i32*%aw,align 4
%aH=call i8*@sml_alloc(i32 inreg%z)#0
%aI=getelementptr inbounds i8,i8*%aH,i64 -4
%aJ=bitcast i8*%aI to i32*
store i32%O,i32*%aJ,align 4
call void@llvm.memset.p0i8.i32(i8*%aH,i8 0,i32%z,i1 false)
%aK=icmp eq i32%aG,0
%aL=load i8*,i8**%f,align 8
store i8*null,i8**%f,align 8
%aM=getelementptr inbounds i8,i8*%aH,i64%M
br i1%aK,label%aN,label%aO
aN:
call void@llvm.memcpy.p0i8.p0i8.i32(i8*%aM,i8*%aL,i32%aF,i1 false)
br label%aQ
aO:
%aP=bitcast i8*%aM to i8**
store i8*%aL,i8**%aP,align 8
br label%aQ
aQ:
%aR=load i8*,i8**%e,align 8
store i8*null,i8**%e,align 8
%aS=getelementptr inbounds i8,i8*%aH,i64%N
%aT=bitcast i8*%aS to i8**
store i8*%aR,i8**%aT,align 8
%aU=getelementptr inbounds i8,i8*%aH,i64%P
%aV=bitcast i8*%aU to i32*
store i32%y,i32*%aV,align 4
br label%Q
aW:
%aX=phi i8*[%bC,%bL],[%aa,%Y]
store i8*%aX,i8**%d,align 8
%aY=load atomic i32,i32*@sml_check_flag unordered,align 4
%aZ=icmp eq i32%aY,0
br i1%aZ,label%a1,label%a0
a0:
call void@sml_check(i32 inreg%aY)
br label%a1
a1:
%a2=load i8*,i8**%c,align 8
%a3=icmp eq i8*%a2,null
br i1%a3,label%a4,label%a6
a4:
%a5=load i8*,i8**%d,align 8
ret i8*%a5
a6:
%a7=load i8*,i8**%g,align 8
%a8=bitcast i8*%a7 to i32*
%a9=load i32,i32*%a8,align 4
%ba=icmp eq i32%a9,0
br i1%ba,label%bf,label%bb
bb:
%bc=getelementptr inbounds i8,i8*%a2,i64%M
%bd=bitcast i8*%bc to i8**
%be=load i8*,i8**%bd,align 8
br label%bq
bf:
%bg=getelementptr inbounds i8,i8*%a7,i64 4
%bh=bitcast i8*%bg to i32*
%bi=load i32,i32*%bh,align 4
%bj=call i8*@sml_alloc(i32 inreg%bi)#0
%bk=getelementptr inbounds i8,i8*%bj,i64 -4
%bl=bitcast i8*%bk to i32*
store i32%bi,i32*%bl,align 4
%bm=load i8*,i8**%c,align 8
%bn=getelementptr inbounds i8,i8*%bm,i64%M
call void@llvm.memcpy.p0i8.p0i8.i32(i8*%bj,i8*%bn,i32%bi,i1 false)
%bo=load i8*,i8**%g,align 8
%bp=bitcast i8*%bo to i32*
br label%bq
bq:
%br=phi i32*[%bp,%bf],[%a8,%bb]
%bs=phi i8*[%bo,%bf],[%a7,%bb]
%bt=phi i8*[%bm,%bf],[%a2,%bb]
%bu=phi i8*[%bj,%bf],[%be,%bb]
store i8*%bu,i8**%e,align 8
%bv=getelementptr inbounds i8,i8*%bt,i64%N
%bw=bitcast i8*%bv to i8**
%bx=load i8*,i8**%bw,align 8
store i8*%bx,i8**%c,align 8
%by=getelementptr inbounds i8,i8*%bs,i64 4
%bz=bitcast i8*%by to i32*
%bA=load i32,i32*%bz,align 4
%bB=load i32,i32*%br,align 4
%bC=call i8*@sml_alloc(i32 inreg%z)#0
%bD=getelementptr inbounds i8,i8*%bC,i64 -4
%bE=bitcast i8*%bD to i32*
store i32%O,i32*%bE,align 4
call void@llvm.memset.p0i8.i32(i8*%bC,i8 0,i32%z,i1 false)
%bF=icmp eq i32%bB,0
%bG=load i8*,i8**%e,align 8
store i8*null,i8**%e,align 8
%bH=getelementptr inbounds i8,i8*%bC,i64%M
br i1%bF,label%bI,label%bJ
bI:
call void@llvm.memcpy.p0i8.p0i8.i32(i8*%bH,i8*%bG,i32%bA,i1 false)
br label%bL
bJ:
%bK=bitcast i8*%bH to i8**
store i8*%bG,i8**%bK,align 8
br label%bL
bL:
%bM=load i8*,i8**%d,align 8
store i8*null,i8**%d,align 8
%bN=getelementptr inbounds i8,i8*%bC,i64%N
%bO=bitcast i8*%bN to i8**
store i8*%bM,i8**%bO,align 8
%bP=getelementptr inbounds i8,i8*%bC,i64%P
%bQ=bitcast i8*%bP to i32*
store i32%y,i32*%bQ,align 4
br label%aW
}
define fastcc i8*@_SMLFN4List1_VE(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*)*@_SMLLLN4List1_VE_140 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*)*@_SMLLLN4List1_VE_140 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*@_SMLLLN4List2hdE_145(i8*inreg%a,i8*inreg%b)#4 gc"smlsharp"{
%c=alloca i8*,align 8
call void@llvm.gcroot(i8**%c,i8*null)#0
store i8*%b,i8**%c,align 8
%d=getelementptr inbounds i8,i8*%a,i64 4
%e=bitcast i8*%d to i32*
%f=load i32,i32*%e,align 4
%g=add i32%f,-1
%h=sub i32 0,%f
%i=and i32%g,%h
%j=icmp eq i8*%b,null
br i1%j,label%k,label%r
k:
store i8*null,i8**%c,align 8
%l=call i8*@sml_alloc(i32 inreg 60)#0
%m=getelementptr inbounds i8,i8*%l,i64 -4
%n=bitcast i8*%m to i32*
store i32 1342177336,i32*%n,align 4
%o=getelementptr inbounds i8,i8*%l,i64 56
%p=bitcast i8*%o to i32*
store i32 1,i32*%p,align 4
%q=bitcast i8*%l to i8**
store i8*bitcast(i8**getelementptr inbounds(<{[4x i8],i32,i8*,i8*,i32}>,<{[4x i8],i32,i8*,i8*,i32}>*@i,i64 0,i32 2)to i8*),i8**%q,align 8
call void@sml_raise(i8*inreg%l)#1
unreachable
r:
%s=bitcast i8*%a to i32*
%t=load i32,i32*%s,align 4
%u=icmp eq i32%t,0
br i1%u,label%A,label%v
v:
%w=sext i32%i to i64
%x=getelementptr inbounds i8,i8*%b,i64%w
%y=bitcast i8*%x to i8**
%z=load i8*,i8**%y,align 8
ret i8*%z
A:
%B=call i8*@sml_alloc(i32 inreg%f)#0
%C=getelementptr inbounds i8,i8*%B,i64 -4
%D=bitcast i8*%C to i32*
store i32%f,i32*%D,align 4
%E=load i8*,i8**%c,align 8
%F=sext i32%i to i64
%G=getelementptr inbounds i8,i8*%E,i64%F
call void@llvm.memcpy.p0i8.p0i8.i32(i8*%B,i8*%G,i32%f,i1 false)
ret i8*%B
}
define fastcc i8*@_SMLFN4List2hdE(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*)*@_SMLLLN4List2hdE_145 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*)*@_SMLLLN4List2hdE_145 to void(...)*),void(...)**%t,align 8
%u=getelementptr inbounds i8,i8*%l,i64 24
%v=bitcast i8*%u to i32*
store i32 1,i32*%v,align 4
ret i8*%l
}
define internal fastcc i8*@_SMLLLN4List2tlE_150(i8*inreg%a,i8*inreg%b)#4 gc"smlsharp"{
%c=bitcast i8*%a to i32*
%d=load i32,i32*%c,align 4
%e=icmp eq i8*%b,null
br i1%e,label%f,label%m
f:
%g=tail call i8*@sml_alloc(i32 inreg 60)#0
%h=getelementptr inbounds i8,i8*%g,i64 -4
%i=bitcast i8*%h to i32*
store i32 1342177336,i32*%i,align 4
%j=getelementptr inbounds i8,i8*%g,i64 56
%k=bitcast i8*%j to i32*
store i32 1,i32*%k,align 4
%l=bitcast i8*%g to i8**
store i8*bitcast(i8**getelementptr inbounds(<{[4x i8],i32,i8*,i8*,i32}>,<{[4x i8],i32,i8*,i8*,i32}>*@l,i64 0,i32 2)to i8*),i8**%l,align 8
tail call void@sml_raise(i8*inreg%g)#1
unreachable
m:
%n=add i32%d,-1
%o=sub i32 0,%d
%p=and i32%n,%o
%q=add i32%d,7
%r=add i32%q,%p
%s=and i32%r,-8
%t=sext i32%s to i64
%u=getelementptr inbounds i8,i8*%b,i64%t
%v=bitcast i8*%u to i8**
%w=load i8*,i8**%v,align 8
ret i8*%w
}
define fastcc i8*@_SMLFN4List2tlE(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%b,i32*%e,align 4
%h=getelementptr inbounds i8,i8*%d,i64 8
%i=bitcast i8*%h to i32*
store i32 0,i32*%i,align 4
%j=call i8*@sml_alloc(i32 inreg 28)#0
%k=getelementptr inbounds i8,i8*%j,i64 -4
%l=bitcast i8*%k to i32*
store i32 1342177304,i32*%l,align 4
%m=load i8*,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 void(...)**
store void(...)*bitcast(i8*(i8*,i8*)*@_SMLLLN4List2tlE_150 to void(...)*),void(...)**%p,align 8
%q=getelementptr inbounds i8,i8*%j,i64 16
%r=bitcast i8*%q to void(...)**
store void(...)*bitcast(i8*(i8*,i8*)*@_SMLLLN4List2tlE_150 to void(...)*),void(...)**%r,align 8
%s=getelementptr inbounds i8,i8*%j,i64 24
%t=bitcast i8*%s to i32*
store i32 -2147483647,i32*%t,align 4
ret i8*%j
}
define internal fastcc i8*@_SMLLLN4List4lastE_155(i8*inreg%a,i8*inreg%b)#4 gc"smlsharp"{
r:
%c=alloca i8*,align 8
%d=alloca i8*,align 8
call void@llvm.gcroot(i8**%c,i8*null)#0
call void@llvm.gcroot(i8**%d,i8*null)#0
store i8*%a,i8**%d,align 8
%e=getelementptr inbounds i8,i8*%a,i64 4
%f=bitcast i8*%e to i32*
%g=load i32,i32*%f,align 4
%h=add i32%g,-1
%i=sub i32 0,%g
%j=and i32%h,%i
%k=add i32%g,7
%l=add i32%k,%j
%m=and i32%l,-8
%n=sext i32%j to i64
%o=sext i32%m to i64
br label%p
p:
%q=phi i8*[%b,%r],[%ad,%Y]
store i8*%q,i8**%c,align 8
%s=load atomic i32,i32*@sml_check_flag unordered,align 4
%t=icmp eq i32%s,0
br i1%t,label%w,label%u
u:
call void@sml_check(i32 inreg%s)
%v=load i8*,i8**%c,align 8
br label%w
w:
%x=phi i8*[%v,%u],[%q,%p]
%y=icmp eq i8*%x,null
br i1%y,label%z,label%G
z:
store i8*null,i8**%c,align 8
store i8*null,i8**%d,align 8
%A=call i8*@sml_alloc(i32 inreg 60)#0
%B=getelementptr inbounds i8,i8*%A,i64 -4
%C=bitcast i8*%B to i32*
store i32 1342177336,i32*%C,align 4
%D=getelementptr inbounds i8,i8*%A,i64 56
%E=bitcast i8*%D to i32*
store i32 1,i32*%E,align 4
%F=bitcast i8*%A to i8**
store i8*bitcast(i8**getelementptr inbounds(<{[4x i8],i32,i8*,i8*,i32}>,<{[4x i8],i32,i8*,i8*,i32}>*@o,i64 0,i32 2)to i8*),i8**%F,align 8
call void@sml_raise(i8*inreg%A)#1
unreachable
G:
%H=load i8*,i8**%d,align 8
%I=bitcast i8*%H to i32*
%J=load i32,i32*%I,align 4
%K=icmp eq i32%J,0
br i1%K,label%P,label%L
L:
%M=getelementptr inbounds i8,i8*%x,i64%n
%N=bitcast i8*%M to i8**
%O=load i8*,i8**%N,align 8
br label%Y
P:
%Q=getelementptr inbounds i8,i8*%H,i64 4
%R=bitcast i8*%Q to i32*
%S=load i32,i32*%R,align 4
%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=load i8*,i8**%c,align 8
%X=getelementptr inbounds i8,i8*%W,i64%n
call void@llvm.memcpy.p0i8.p0i8.i32(i8*%T,i8*%X,i32%S,i1 false)
br label%Y
Y:
%Z=phi i8*[%x,%L],[%W,%P]
%aa=phi i8*[%O,%L],[%T,%P]
store i8*null,i8**%c,align 8
%ab=getelementptr inbounds i8,i8*%Z,i64%o
%ac=bitcast i8*%ab to i8**
%ad=load i8*,i8**%ac,align 8
%ae=icmp eq i8*%ad,null
br i1%ae,label%af,label%p
af:
ret i8*%aa
}
define fastcc i8*@_SMLFN4List4lastE(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*)*@_SMLLLN4List4lastE_155 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*)*@_SMLLLN4List4lastE_155 to void(...)*),void(...)**%t,align 8
%u=getelementptr inbounds i8,i8*%l,i64 24
%v=bitcast i8*%u to i32*
store i32 1,i32*%v,align 4
ret i8*%l
}
define internal fastcc i8*@_SMLLLN4List7getItemE_158(i8*inreg%a,i8*inreg%b)#3 gc"smlsharp"{
%c=alloca i8*,align 8
%d=alloca i8*,align 8
%e=alloca i8*,align 8
call void@llvm.gcroot(i8**%c,i8*null)#0
call void@llvm.gcroot(i8**%d,i8*null)#0
call void@llvm.gcroot(i8**%e,i8*null)#0
store i8*%a,i8**%d,align 8
store i8*%b,i8**%c,align 8
%f=getelementptr inbounds i8,i8*%a,i64 4
%g=bitcast i8*%f to i32*
%h=load i32,i32*%g,align 4
%i=add i32%h,-1
%j=sub i32 0,%h
%k=and i32%i,%j
%l=add i32%h,7
%m=add i32%l,%k
%n=and i32%m,-8
%o=add i32%n,15
%p=and i32%o,-8
%q=lshr i32%m,3
%r=lshr i32%k,3
%s=sub nsw i32%q,%r
%t=shl i32 1,%s
%u=bitcast i8*%a to i32*
%v=load i32,i32*%u,align 4
%w=or i32%t,%v
%x=or i32%p,4
%y=icmp eq i8*%b,null
br i1%y,label%z,label%A
z:
ret i8*null
A:
%B=icmp eq i32%v,0
br i1%B,label%H,label%C
C:
%D=sext i32%k to i64
%E=getelementptr inbounds i8,i8*%b,i64%D
%F=bitcast i8*%E to i8**
%G=load i8*,i8**%F,align 8
br label%S
H:
%I=call i8*@sml_alloc(i32 inreg%h)#0
%J=getelementptr inbounds i8,i8*%I,i64 -4
%K=bitcast i8*%J to i32*
store i32%h,i32*%K,align 4
%L=load i8*,i8**%c,align 8
%M=sext i32%k to i64
%N=getelementptr inbounds i8,i8*%L,i64%M
call void@llvm.memcpy.p0i8.p0i8.i32(i8*%I,i8*%N,i32%h,i1 false)
%O=load i8*,i8**%d,align 8
%P=getelementptr inbounds i8,i8*%O,i64 4
%Q=bitcast i8*%P to i32*
%R=bitcast i8*%O to i32*
br label%S
S:
%T=phi i64[%M,%H],[%D,%C]
%U=phi i32*[%R,%H],[%u,%C]
%V=phi i32*[%Q,%H],[%g,%C]
%W=phi i8*[%L,%H],[%b,%C]
%X=phi i8*[%I,%H],[%G,%C]
store i8*%X,i8**%e,align 8
%Y=load i32,i32*%V,align 4
store i8*null,i8**%d,align 8
%Z=load i32,i32*%U,align 4
%aa=sext i32%n to i64
%ab=getelementptr inbounds i8,i8*%W,i64%aa
%ac=bitcast i8*%ab to i8**
%ad=load i8*,i8**%ac,align 8
store i8*%ad,i8**%c,align 8
%ae=call i8*@sml_alloc(i32 inreg%x)#0
%af=or i32%p,1342177280
%ag=getelementptr inbounds i8,i8*%ae,i64 -4
%ah=bitcast i8*%ag to i32*
store i32%af,i32*%ah,align 4
store i8*%ae,i8**%d,align 8
call void@llvm.memset.p0i8.i32(i8*%ae,i8 0,i32%x,i1 false)
%ai=icmp eq i32%Z,0
%aj=load i8*,i8**%e,align 8
store i8*null,i8**%e,align 8
%ak=getelementptr inbounds i8,i8*%ae,i64%T
br i1%ai,label%al,label%am
al:
call void@llvm.memcpy.p0i8.p0i8.i32(i8*%ak,i8*%aj,i32%Y,i1 false)
br label%ao
am:
%an=bitcast i8*%ak to i8**
store i8*%aj,i8**%an,align 8
br label%ao
ao:
%ap=load i8*,i8**%c,align 8
store i8*null,i8**%c,align 8
%aq=getelementptr inbounds i8,i8*%ae,i64%aa
%ar=bitcast i8*%aq to i8**
store i8*%ap,i8**%ar,align 8
%as=sext i32%p to i64
%at=getelementptr inbounds i8,i8*%ae,i64%as
%au=bitcast i8*%at to i32*
store i32%w,i32*%au,align 4
%av=call i8*@sml_alloc(i32 inreg 12)#0
%aw=getelementptr inbounds i8,i8*%av,i64 -4
%ax=bitcast i8*%aw to i32*
store i32 1342177288,i32*%ax,align 4
%ay=load i8*,i8**%d,align 8
%az=bitcast i8*%av to i8**
store i8*%ay,i8**%az,align 8
%aA=getelementptr inbounds i8,i8*%av,i64 8
%aB=bitcast i8*%aA to i32*
store i32 1,i32*%aB,align 4
ret i8*%av
}
define fastcc i8*@_SMLFN4List7getItemE(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*)*@_SMLLLN4List7getItemE_158 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*)*@_SMLLLN4List7getItemE_158 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*@_SMLLLN4List3nthE_163(i8*inreg%a,i8*inreg%b)#4 gc"smlsharp"{
%c=alloca i8*,align 8
%d=alloca i8*,align 8
call void@llvm.gcroot(i8**%c,i8*null)#0
call void@llvm.gcroot(i8**%d,i8*null)#0
store i8*%a,i8**%d,align 8
%e=getelementptr inbounds i8,i8*%a,i64 4
%f=bitcast i8*%e to i32*
%g=load i32,i32*%f,align 4
%h=add i32%g,-1
%i=sub i32 0,%g
%j=and i32%h,%i
%k=getelementptr inbounds i8,i8*%b,i64 8
%l=bitcast i8*%k to i32*
%m=load i32,i32*%l,align 4
%n=icmp sgt i32%m,-1
br i1%n,label%o,label%u
o:
%p=add i32%g,7
%q=add i32%p,%j
%r=and i32%q,-8
%s=sext i32%j to i64
%t=sext i32%r to i64
br label%M
u:
store i8*null,i8**%d,align 8
%v=load i8*,i8**@_SMLZ9Subscript,align 8
store i8*%v,i8**%c,align 8
%w=call i8*@sml_alloc(i32 inreg 20)#0
%x=getelementptr inbounds i8,i8*%w,i64 -4
%y=bitcast i8*%x to i32*
store i32 1342177296,i32*%y,align 4
store i8*%w,i8**%d,align 8
%z=load i8*,i8**%c,align 8
store i8*null,i8**%c,align 8
%A=bitcast i8*%w to i8**
store i8*%z,i8**%A,align 8
%B=getelementptr inbounds i8,i8*%w,i64 8
%C=bitcast i8*%B to i8**
store i8*getelementptr inbounds(<{[4x i8],i32,[36x i8]}>,<{[4x i8],i32,[36x i8]}>*@s,i64 0,i32 2,i64 0),i8**%C,align 8
%D=getelementptr inbounds i8,i8*%w,i64 16
%E=bitcast i8*%D to i32*
store i32 3,i32*%E,align 4
%F=call i8*@sml_alloc(i32 inreg 60)#0
%G=getelementptr inbounds i8,i8*%F,i64 -4
%H=bitcast i8*%G to i32*
store i32 1342177336,i32*%H,align 4
%I=getelementptr inbounds i8,i8*%F,i64 56
%J=bitcast i8*%I to i32*
store i32 1,i32*%J,align 4
%K=load i8*,i8**%d,align 8
%L=bitcast i8*%F to i8**
store i8*%K,i8**%L,align 8
call void@sml_raise(i8*inreg%F)#1
unreachable
M:
%N=phi i8*[%aN,%aM],[%b,%o]
%O=phi i32[%aO,%aM],[%m,%o]
%P=bitcast i8*%N to i8**
%Q=load i8*,i8**%P,align 8
store i8*%Q,i8**%c,align 8
%R=load atomic i32,i32*@sml_check_flag unordered,align 4
%S=icmp eq i32%R,0
br i1%S,label%V,label%T
T:
call void@sml_check(i32 inreg%R)
%U=load i8*,i8**%c,align 8
br label%V
V:
%W=phi i8*[%U,%T],[%Q,%M]
%X=icmp eq i8*%W,null
br i1%X,label%Y,label%aq
Y:
store i8*null,i8**%d,align 8
%Z=load i8*,i8**@_SMLZ9Subscript,align 8
store i8*%Z,i8**%c,align 8
%aa=call i8*@sml_alloc(i32 inreg 20)#0
%ab=getelementptr inbounds i8,i8*%aa,i64 -4
%ac=bitcast i8*%ab to i32*
store i32 1342177296,i32*%ac,align 4
store i8*%aa,i8**%d,align 8
%ad=load i8*,i8**%c,align 8
store i8*null,i8**%c,align 8
%ae=bitcast i8*%aa to i8**
store i8*%ad,i8**%ae,align 8
%af=getelementptr inbounds i8,i8*%aa,i64 8
%ag=bitcast i8*%af to i8**
store i8*getelementptr inbounds(<{[4x i8],i32,[36x i8]}>,<{[4x i8],i32,[36x i8]}>*@r,i64 0,i32 2,i64 0),i8**%ag,align 8
%ah=getelementptr inbounds i8,i8*%aa,i64 16
%ai=bitcast i8*%ah to i32*
store i32 3,i32*%ai,align 4
%aj=call i8*@sml_alloc(i32 inreg 60)#0
%ak=getelementptr inbounds i8,i8*%aj,i64 -4
%al=bitcast i8*%ak to i32*
store i32 1342177336,i32*%al,align 4
%am=getelementptr inbounds i8,i8*%aj,i64 56
%an=bitcast i8*%am to i32*
store i32 1,i32*%an,align 4
%ao=load i8*,i8**%d,align 8
%ap=bitcast i8*%aj to i8**
store i8*%ao,i8**%ap,align 8
call void@sml_raise(i8*inreg%aj)#1
unreachable
aq:
%ar=load i8*,i8**%d,align 8
%as=bitcast i8*%ar to i32*
%at=load i32,i32*%as,align 4
%au=icmp eq i32%at,0
br i1%au,label%az,label%av
av:
%aw=getelementptr inbounds i8,i8*%W,i64%s
%ax=bitcast i8*%aw to i8**
%ay=load i8*,i8**%ax,align 8
br label%aI
az:
%aA=getelementptr inbounds i8,i8*%ar,i64 4
%aB=bitcast i8*%aA to i32*
%aC=load i32,i32*%aB,align 4
%aD=call i8*@sml_alloc(i32 inreg%aC)#0
%aE=getelementptr inbounds i8,i8*%aD,i64 -4
%aF=bitcast i8*%aE to i32*
store i32%aC,i32*%aF,align 4
%aG=load i8*,i8**%c,align 8
%aH=getelementptr inbounds i8,i8*%aG,i64%s
call void@llvm.memcpy.p0i8.p0i8.i32(i8*%aD,i8*%aH,i32%aC,i1 false)
br label%aI
aI:
%aJ=phi i8*[%W,%av],[%aG,%az]
%aK=phi i8*[%ay,%av],[%aD,%az]
store i8*null,i8**%c,align 8
%aL=icmp eq i32%O,0
br i1%aL,label%aP,label%aM
aM:
%aN=getelementptr inbounds i8,i8*%aJ,i64%t
%aO=add nsw i32%O,-1
br label%M
aP:
ret i8*%aK
}
define fastcc i8*@_SMLFN4List3nthE(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*)*@_SMLLLN4List3nthE_163 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*)*@_SMLLLN4List3nthE_163 to void(...)*),void(...)**%t,align 8
%u=getelementptr inbounds i8,i8*%l,i64 24
%v=bitcast i8*%u to i32*
store i32 1,i32*%v,align 4
ret i8*%l
}
define internal fastcc i8*@_SMLLLN4List4takeE_168(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**%f,align 8
%g=getelementptr inbounds i8,i8*%a,i64 4
%h=bitcast i8*%g to i32*
%i=load i32,i32*%h,align 4
%j=add i32%i,-1
%k=sub i32 0,%i
%l=and i32%j,%k
%m=add i32%i,7
%n=add i32%m,%l
%o=and i32%n,-8
%p=add i32%o,15
%q=and i32%p,-8
%r=lshr i32%n,3
%s=lshr i32%l,3
%t=sub nsw i32%r,%s
%u=shl i32 1,%t
%v=bitcast i8*%a to i32*
%w=load i32,i32*%v,align 4
%x=or i32%u,%w
%y=or i32%q,4
%z=getelementptr inbounds i8,i8*%b,i64 8
%A=bitcast i8*%z to i32*
%B=load i32,i32*%A,align 4
%C=icmp sgt i32%B,-1
br i1%C,label%V,label%D
D:
store i8*null,i8**%f,align 8
%E=load i8*,i8**@_SMLZ9Subscript,align 8
store i8*%E,i8**%c,align 8
%F=call i8*@sml_alloc(i32 inreg 20)#0
%G=getelementptr inbounds i8,i8*%F,i64 -4
%H=bitcast i8*%G to i32*
store i32 1342177296,i32*%H,align 4
store i8*%F,i8**%d,align 8
%I=load i8*,i8**%c,align 8
store i8*null,i8**%c,align 8
%J=bitcast i8*%F to i8**
store i8*%I,i8**%J,align 8
%K=getelementptr inbounds i8,i8*%F,i64 8
%L=bitcast i8*%K to i8**
store i8*getelementptr inbounds(<{[4x i8],i32,[36x i8]}>,<{[4x i8],i32,[36x i8]}>*@v,i64 0,i32 2,i64 0),i8**%L,align 8
%M=getelementptr inbounds i8,i8*%F,i64 16
%N=bitcast i8*%M to i32*
store i32 3,i32*%N,align 4
%O=call i8*@sml_alloc(i32 inreg 60)#0
%P=getelementptr inbounds i8,i8*%O,i64 -4
%Q=bitcast i8*%P to i32*
store i32 1342177336,i32*%Q,align 4
%R=getelementptr inbounds i8,i8*%O,i64 56
%S=bitcast i8*%R to i32*
store i32 1,i32*%S,align 4
%T=load i8*,i8**%d,align 8
%U=bitcast i8*%O to i8**
store i8*%T,i8**%U,align 8
call void@sml_raise(i8*inreg%O)#1
unreachable
V:
%W=bitcast i8*%b to i8**
%X=load i8*,i8**%W,align 8
store i8*%X,i8**%c,align 8
%Y=sext i32%l to i64
%Z=sext i32%o to i64
%aa=or i32%q,1342177280
%ab=sext i32%q to i64
br label%ac
ac:
%ad=phi i8*[%bc,%bl],[null,%V]
%ae=phi i32[%a5,%bl],[%B,%V]
store i8*%ad,i8**%d,align 8
%af=load atomic i32,i32*@sml_check_flag unordered,align 4
%ag=icmp eq i32%af,0
br i1%ag,label%ai,label%ah
ah:
call void@sml_check(i32 inreg%af)
br label%ai
ai:
%aj=load i8*,i8**%c,align 8
%ak=icmp eq i8*%aj,null
br i1%ak,label%al,label%aF
al:
store i8*null,i8**%c,align 8
%am=icmp eq i32%ae,0
br i1%am,label%bs,label%an
an:
store i8*null,i8**%d,align 8
store i8*null,i8**%f,align 8
%ao=load i8*,i8**@_SMLZ9Subscript,align 8
store i8*%ao,i8**%c,align 8
%ap=call i8*@sml_alloc(i32 inreg 20)#0
%aq=getelementptr inbounds i8,i8*%ap,i64 -4
%ar=bitcast i8*%aq to i32*
store i32 1342177296,i32*%ar,align 4
store i8*%ap,i8**%d,align 8
%as=load i8*,i8**%c,align 8
store i8*null,i8**%c,align 8
%at=bitcast i8*%ap to i8**
store i8*%as,i8**%at,align 8
%au=getelementptr inbounds i8,i8*%ap,i64 8
%av=bitcast i8*%au to i8**
store i8*getelementptr inbounds(<{[4x i8],i32,[36x i8]}>,<{[4x i8],i32,[36x i8]}>*@u,i64 0,i32 2,i64 0),i8**%av,align 8
%aw=getelementptr inbounds i8,i8*%ap,i64 16
%ax=bitcast i8*%aw to i32*
store i32 3,i32*%ax,align 4
%ay=call i8*@sml_alloc(i32 inreg 60)#0
%az=getelementptr inbounds i8,i8*%ay,i64 -4
%aA=bitcast i8*%az to i32*
store i32 1342177336,i32*%aA,align 4
%aB=getelementptr inbounds i8,i8*%ay,i64 56
%aC=bitcast i8*%aB to i32*
store i32 1,i32*%aC,align 4
%aD=load i8*,i8**%d,align 8
%aE=bitcast i8*%ay to i8**
store i8*%aD,i8**%aE,align 8
call void@sml_raise(i8*inreg%ay)#1
unreachable
aF:
%aG=load i8*,i8**%f,align 8
%aH=bitcast i8*%aG to i32*
%aI=load i32,i32*%aH,align 4
%aJ=icmp eq i32%aI,0
br i1%aJ,label%aO,label%aK
aK:
%aL=getelementptr inbounds i8,i8*%aj,i64%Y
%aM=bitcast i8*%aL to i8**
%aN=load i8*,i8**%aM,align 8
br label%aX
aO:
%aP=getelementptr inbounds i8,i8*%aG,i64 4
%aQ=bitcast i8*%aP to i32*
%aR=load i32,i32*%aQ,align 4
%aS=call i8*@sml_alloc(i32 inreg%aR)#0
%aT=getelementptr inbounds i8,i8*%aS,i64 -4
%aU=bitcast i8*%aT to i32*
store i32%aR,i32*%aU,align 4
%aV=load i8*,i8**%c,align 8
%aW=getelementptr inbounds i8,i8*%aV,i64%Y
call void@llvm.memcpy.p0i8.p0i8.i32(i8*%aS,i8*%aW,i32%aR,i1 false)
br label%aX
aX:
%aY=phi i8*[%aV,%aO],[%aj,%aK]
%aZ=phi i8*[%aS,%aO],[%aN,%aK]
store i8*%aZ,i8**%e,align 8
%a0=getelementptr inbounds i8,i8*%aY,i64%Z
%a1=bitcast i8*%a0 to i8**
%a2=load i8*,i8**%a1,align 8
store i8*%a2,i8**%c,align 8
%a3=icmp eq i32%ae,0
br i1%a3,label%br,label%a4
a4:
%a5=add nsw i32%ae,-1
%a6=load i8*,i8**%f,align 8
%a7=getelementptr inbounds i8,i8*%a6,i64 4
%a8=bitcast i8*%a7 to i32*
%a9=load i32,i32*%a8,align 4
%ba=bitcast i8*%a6 to i32*
%bb=load i32,i32*%ba,align 4
%bc=call i8*@sml_alloc(i32 inreg%y)#0
%bd=getelementptr inbounds i8,i8*%bc,i64 -4
%be=bitcast i8*%bd to i32*
store i32%aa,i32*%be,align 4
call void@llvm.memset.p0i8.i32(i8*%bc,i8 0,i32%y,i1 false)
%bf=icmp eq i32%bb,0
%bg=load i8*,i8**%e,align 8
store i8*null,i8**%e,align 8
%bh=getelementptr inbounds i8,i8*%bc,i64%Y
br i1%bf,label%bi,label%bj
bi:
call void@llvm.memcpy.p0i8.p0i8.i32(i8*%bh,i8*%bg,i32%a9,i1 false)
br label%bl
bj:
%bk=bitcast i8*%bh to i8**
store i8*%bg,i8**%bk,align 8
br label%bl
bl:
%bm=load i8*,i8**%d,align 8
store i8*null,i8**%d,align 8
%bn=getelementptr inbounds i8,i8*%bc,i64%Z
%bo=bitcast i8*%bn to i8**
store i8*%bm,i8**%bo,align 8
%bp=getelementptr inbounds i8,i8*%bc,i64%ab
%bq=bitcast i8*%bp to i32*
store i32%x,i32*%bq,align 4
br label%ac
br:
store i8*null,i8**%e,align 8
store i8*null,i8**%c,align 8
br label%bs
bs:
%bt=load i8*,i8**%d,align 8
store i8*null,i8**%d,align 8
store i8*%bt,i8**%c,align 8
br label%bu
bu:
%bv=phi i8*[%ca,%cj],[null,%bs]
store i8*%bv,i8**%d,align 8
%bw=load atomic i32,i32*@sml_check_flag unordered,align 4
%bx=icmp eq i32%bw,0
br i1%bx,label%bz,label%by
by:
call void@sml_check(i32 inreg%bw)
br label%bz
bz:
%bA=load i8*,i8**%c,align 8
%bB=icmp eq i8*%bA,null
br i1%bB,label%bC,label%bE
bC:
%bD=load i8*,i8**%d,align 8
ret i8*%bD
bE:
%bF=load i8*,i8**%f,align 8
%bG=bitcast i8*%bF to i32*
%bH=load i32,i32*%bG,align 4
%bI=icmp eq i32%bH,0
br i1%bI,label%bN,label%bJ
bJ:
%bK=getelementptr inbounds i8,i8*%bA,i64%Y
%bL=bitcast i8*%bK to i8**
%bM=load i8*,i8**%bL,align 8
br label%bY
bN:
%bO=getelementptr inbounds i8,i8*%bF,i64 4
%bP=bitcast i8*%bO to i32*
%bQ=load i32,i32*%bP,align 4
%bR=call i8*@sml_alloc(i32 inreg%bQ)#0
%bS=getelementptr inbounds i8,i8*%bR,i64 -4
%bT=bitcast i8*%bS to i32*
store i32%bQ,i32*%bT,align 4
%bU=load i8*,i8**%c,align 8
%bV=getelementptr inbounds i8,i8*%bU,i64%Y
call void@llvm.memcpy.p0i8.p0i8.i32(i8*%bR,i8*%bV,i32%bQ,i1 false)
%bW=load i8*,i8**%f,align 8
%bX=bitcast i8*%bW to i32*
br label%bY
bY:
%bZ=phi i32*[%bX,%bN],[%bG,%bJ]
%b0=phi i8*[%bW,%bN],[%bF,%bJ]
%b1=phi i8*[%bU,%bN],[%bA,%bJ]
%b2=phi i8*[%bR,%bN],[%bM,%bJ]
store i8*%b2,i8**%e,align 8
%b3=getelementptr inbounds i8,i8*%b1,i64%Z
%b4=bitcast i8*%b3 to i8**
%b5=load i8*,i8**%b4,align 8
store i8*%b5,i8**%c,align 8
%b6=getelementptr inbounds i8,i8*%b0,i64 4
%b7=bitcast i8*%b6 to i32*
%b8=load i32,i32*%b7,align 4
%b9=load i32,i32*%bZ,align 4
%ca=call i8*@sml_alloc(i32 inreg%y)#0
%cb=getelementptr inbounds i8,i8*%ca,i64 -4
%cc=bitcast i8*%cb to i32*
store i32%aa,i32*%cc,align 4
call void@llvm.memset.p0i8.i32(i8*%ca,i8 0,i32%y,i1 false)
%cd=icmp eq i32%b9,0
%ce=load i8*,i8**%e,align 8
store i8*null,i8**%e,align 8
%cf=getelementptr inbounds i8,i8*%ca,i64%Y
br i1%cd,label%cg,label%ch
cg:
call void@llvm.memcpy.p0i8.p0i8.i32(i8*%cf,i8*%ce,i32%b8,i1 false)
br label%cj
ch:
%ci=bitcast i8*%cf to i8**
store i8*%ce,i8**%ci,align 8
br label%cj
cj:
%ck=load i8*,i8**%d,align 8
store i8*null,i8**%d,align 8
%cl=getelementptr inbounds i8,i8*%ca,i64%Z
%cm=bitcast i8*%cl to i8**
store i8*%ck,i8**%cm,align 8
%cn=getelementptr inbounds i8,i8*%ca,i64%ab
%co=bitcast i8*%cn to i32*
store i32%x,i32*%co,align 4
br label%bu
}
define fastcc i8*@_SMLFN4List4takeE(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*)*@_SMLLLN4List4takeE_168 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*)*@_SMLLLN4List4takeE_168 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*@_SMLLLN4List4dropE_173(i8*inreg%a,i8*inreg%b)#4 gc"smlsharp"{
%c=alloca i8*,align 8
%d=alloca i8*,align 8
call void@llvm.gcroot(i8**%c,i8*null)#0
call void@llvm.gcroot(i8**%d,i8*null)#0
%e=bitcast i8*%a to i32*
%f=load i32,i32*%e,align 4
%g=getelementptr inbounds i8,i8*%b,i64 8
%h=bitcast i8*%g to i32*
%i=load i32,i32*%h,align 4
%j=icmp sgt i32%i,-1
br i1%j,label%k,label%s
k:
%l=add i32%f,7
%m=add i32%f,-1
%n=sub i32 0,%f
%o=and i32%m,%n
%p=add i32%l,%o
%q=and i32%p,-8
%r=sext i32%q to i64
br label%K
s:
%t=load i8*,i8**@_SMLZ9Subscript,align 8
store i8*%t,i8**%c,align 8
%u=call i8*@sml_alloc(i32 inreg 20)#0
%v=getelementptr inbounds i8,i8*%u,i64 -4
%w=bitcast i8*%v to i32*
store i32 1342177296,i32*%w,align 4
store i8*%u,i8**%d,align 8
%x=load i8*,i8**%c,align 8
store i8*null,i8**%c,align 8
%y=bitcast i8*%u to i8**
store i8*%x,i8**%y,align 8
%z=getelementptr inbounds i8,i8*%u,i64 8
%A=bitcast i8*%z to i8**
store i8*getelementptr inbounds(<{[4x i8],i32,[36x i8]}>,<{[4x i8],i32,[36x i8]}>*@y,i64 0,i32 2,i64 0),i8**%A,align 8
%B=getelementptr inbounds i8,i8*%u,i64 16
%C=bitcast i8*%B to i32*
store i32 3,i32*%C,align 4
%D=call i8*@sml_alloc(i32 inreg 60)#0
%E=getelementptr inbounds i8,i8*%D,i64 -4
%F=bitcast i8*%E to i32*
store i32 1342177336,i32*%F,align 4
%G=getelementptr inbounds i8,i8*%D,i64 56
%H=bitcast i8*%G to i32*
store i32 1,i32*%H,align 4
%I=load i8*,i8**%d,align 8
%J=bitcast i8*%D to i8**
store i8*%I,i8**%J,align 8
call void@sml_raise(i8*inreg%D)#1
unreachable
K:
%L=phi i8*[%as,%ar],[%b,%k]
%M=phi i32[%at,%ar],[%i,%k]
%N=bitcast i8*%L to i8**
%O=load i8*,i8**%N,align 8
store i8*%O,i8**%c,align 8
%P=load atomic i32,i32*@sml_check_flag unordered,align 4
%Q=icmp eq i32%P,0
br i1%Q,label%T,label%R
R:
call void@sml_check(i32 inreg%P)
%S=load i8*,i8**%c,align 8
br label%T
T:
%U=phi i8*[%S,%R],[%O,%K]
%V=icmp eq i8*%U,null
%W=icmp eq i32%M,0
br i1%V,label%X,label%aq
X:
br i1%W,label%au,label%Y
Y:
%Z=load i8*,i8**@_SMLZ9Subscript,align 8
store i8*%Z,i8**%c,align 8
%aa=call i8*@sml_alloc(i32 inreg 20)#0
%ab=getelementptr inbounds i8,i8*%aa,i64 -4
%ac=bitcast i8*%ab to i32*
store i32 1342177296,i32*%ac,align 4
store i8*%aa,i8**%d,align 8
%ad=load i8*,i8**%c,align 8
store i8*null,i8**%c,align 8
%ae=bitcast i8*%aa to i8**
store i8*%ad,i8**%ae,align 8
%af=getelementptr inbounds i8,i8*%aa,i64 8
%ag=bitcast i8*%af to i8**
store i8*getelementptr inbounds(<{[4x i8],i32,[36x i8]}>,<{[4x i8],i32,[36x i8]}>*@x,i64 0,i32 2,i64 0),i8**%ag,align 8
%ah=getelementptr inbounds i8,i8*%aa,i64 16
%ai=bitcast i8*%ah to i32*
store i32 3,i32*%ai,align 4
%aj=call i8*@sml_alloc(i32 inreg 60)#0
%ak=getelementptr inbounds i8,i8*%aj,i64 -4
%al=bitcast i8*%ak to i32*
store i32 1342177336,i32*%al,align 4
%am=getelementptr inbounds i8,i8*%aj,i64 56
%an=bitcast i8*%am to i32*
store i32 1,i32*%an,align 4
%ao=load i8*,i8**%d,align 8
%ap=bitcast i8*%aj to i8**
store i8*%ao,i8**%ap,align 8
call void@sml_raise(i8*inreg%aj)#1
unreachable
aq:
br i1%W,label%au,label%ar
ar:
%as=getelementptr inbounds i8,i8*%U,i64%r
%at=add nsw i32%M,-1
br label%K
au:
ret i8*%U
}
define fastcc i8*@_SMLFN4List4dropE(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%b,i32*%e,align 4
%h=getelementptr inbounds i8,i8*%d,i64 8
%i=bitcast i8*%h to i32*
store i32 0,i32*%i,align 4
%j=call i8*@sml_alloc(i32 inreg 28)#0
%k=getelementptr inbounds i8,i8*%j,i64 -4
%l=bitcast i8*%k to i32*
store i32 1342177304,i32*%l,align 4
%m=load i8*,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 void(...)**
store void(...)*bitcast(i8*(i8*,i8*)*@_SMLLLN4List4dropE_173 to void(...)*),void(...)**%p,align 8
%q=getelementptr inbounds i8,i8*%j,i64 16
%r=bitcast i8*%q to void(...)**
store void(...)*bitcast(i8*(i8*,i8*)*@_SMLLLN4List4dropE_173 to void(...)*),void(...)**%r,align 8
%s=getelementptr inbounds i8,i8*%j,i64 24
%t=bitcast i8*%s to i32*
store i32 -2147483647,i32*%t,align 4
ret i8*%j
}
define internal fastcc i8*@_SMLLLN4List3revE_176(i8*inreg%a,i8*inreg%b)#4 gc"smlsharp"{
F:
%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=getelementptr inbounds i8,i8*%a,i64 4
%h=bitcast i8*%g to i32*
%i=load i32,i32*%h,align 4
%j=add i32%i,-1
%k=sub i32 0,%i
%l=and i32%j,%k
%m=add i32%i,7
%n=add i32%m,%l
%o=and i32%n,-8
%p=add i32%o,15
%q=and i32%p,-8
%r=lshr i32%n,3
%s=lshr i32%l,3
%t=sub nsw i32%r,%s
%u=shl i32 1,%t
%v=bitcast i8*%a to i32*
%w=load i32,i32*%v,align 4
%x=or i32%u,%w
%y=or i32%q,4
store i8*%b,i8**%c,align 8
%z=sext i32%l to i64
%A=sext i32%o to i64
%B=or i32%q,1342177280
%C=sext i32%q to i64
br label%D
D:
%E=phi i8*[%au,%aD],[null,%F]
store i8*%E,i8**%d,align 8
%G=load atomic i32,i32*@sml_check_flag unordered,align 4
%H=icmp eq i32%G,0
br i1%H,label%J,label%I
I:
call void@sml_check(i32 inreg%G)
br label%J
J:
%K=load i8*,i8**%c,align 8
%L=icmp eq i8*%K,null
br i1%L,label%M,label%O
M:
%N=load i8*,i8**%d,align 8
ret i8*%N
O:
%P=load i8*,i8**%f,align 8
%Q=bitcast i8*%P to i32*
%R=load i32,i32*%Q,align 4
%S=icmp eq i32%R,0
br i1%S,label%X,label%T
T:
%U=getelementptr inbounds i8,i8*%K,i64%z
%V=bitcast i8*%U to i8**
%W=load i8*,i8**%V,align 8
br label%ai
X:
%Y=getelementptr inbounds i8,i8*%P,i64 4
%Z=bitcast i8*%Y to i32*
%aa=load i32,i32*%Z,align 4
%ab=call i8*@sml_alloc(i32 inreg%aa)#0
%ac=getelementptr inbounds i8,i8*%ab,i64 -4
%ad=bitcast i8*%ac to i32*
store i32%aa,i32*%ad,align 4
%ae=load i8*,i8**%c,align 8
%af=getelementptr inbounds i8,i8*%ae,i64%z
call void@llvm.memcpy.p0i8.p0i8.i32(i8*%ab,i8*%af,i32%aa,i1 false)
%ag=load i8*,i8**%f,align 8
%ah=bitcast i8*%ag to i32*
br label%ai
ai:
%aj=phi i32*[%ah,%X],[%Q,%T]
%ak=phi i8*[%ag,%X],[%P,%T]
%al=phi i8*[%ae,%X],[%K,%T]
%am=phi i8*[%ab,%X],[%W,%T]
store i8*%am,i8**%e,align 8
%an=getelementptr inbounds i8,i8*%al,i64%A
%ao=bitcast i8*%an to i8**
%ap=load i8*,i8**%ao,align 8
store i8*%ap,i8**%c,align 8
%aq=getelementptr inbounds i8,i8*%ak,i64 4
%ar=bitcast i8*%aq to i32*
%as=load i32,i32*%ar,align 4
%at=load i32,i32*%aj,align 4
%au=call i8*@sml_alloc(i32 inreg%y)#0
%av=getelementptr inbounds i8,i8*%au,i64 -4
%aw=bitcast i8*%av to i32*
store i32%B,i32*%aw,align 4
call void@llvm.memset.p0i8.i32(i8*%au,i8 0,i32%y,i1 false)
%ax=icmp eq i32%at,0
%ay=load i8*,i8**%e,align 8
store i8*null,i8**%e,align 8
%az=getelementptr inbounds i8,i8*%au,i64%z
br i1%ax,label%aA,label%aB
aA:
call void@llvm.memcpy.p0i8.p0i8.i32(i8*%az,i8*%ay,i32%as,i1 false)
br label%aD
aB:
%aC=bitcast i8*%az to i8**
store i8*%ay,i8**%aC,align 8
br label%aD
aD:
%aE=load i8*,i8**%d,align 8
store i8*null,i8**%d,align 8
%aF=getelementptr inbounds i8,i8*%au,i64%A
%aG=bitcast i8*%aF to i8**
store i8*%aE,i8**%aG,align 8
%aH=getelementptr inbounds i8,i8*%au,i64%C
%aI=bitcast i8*%aH to i32*
store i32%x,i32*%aI,align 4
br label%D
}
define fastcc i8*@_SMLFN4List3revE(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*)*@_SMLLLN4List3revE_176 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*)*@_SMLLLN4List3revE_176 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*@_SMLLLN4List6concatE_179(i8*inreg%a,i8*inreg%b)#4 gc"smlsharp"{
G:
%c=alloca i8*,align 8
%d=alloca i8*,align 8
%e=alloca i8*,align 8
%f=alloca i8*,align 8
%g=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
call void@llvm.gcroot(i8**%g,i8*null)#0
store i8*%a,i8**%f,align 8
%h=getelementptr inbounds i8,i8*%a,i64 4
%i=bitcast i8*%h to i32*
%j=load i32,i32*%i,align 4
%k=add i32%j,-1
%l=sub i32 0,%j
%m=and i32%k,%l
%n=add i32%j,7
%o=add i32%n,%m
%p=and i32%o,-8
%q=add i32%p,15
%r=and i32%q,-8
%s=lshr i32%o,3
%t=lshr i32%m,3
%u=sub nsw i32%s,%t
%v=shl i32 1,%u
%w=bitcast i8*%a to i32*
%x=load i32,i32*%w,align 4
%y=or i32%v,%x
%z=or i32%r,4
%A=sext i32%m to i64
%B=sext i32%p to i64
%C=or i32%r,1342177280
%D=sext i32%r to i64
br label%E
E:
%F=phi i8*[%b,%G],[%bd,%bb]
%H=phi i8*[null,%G],[%bc,%bb]
store i8*%F,i8**%c,align 8
store i8*%H,i8**%d,align 8
%I=load atomic i32,i32*@sml_check_flag unordered,align 4
%J=icmp eq i32%I,0
br i1%J,label%M,label%K
K:
call void@sml_check(i32 inreg%I)
%L=load i8*,i8**%c,align 8
br label%M
M:
%N=phi i8*[%L,%K],[%F,%E]
%O=icmp eq i8*%N,null
br i1%O,label%P,label%aW
P:
%Q=load i8*,i8**%d,align 8
store i8*null,i8**%d,align 8
store i8*%Q,i8**%c,align 8
br label%R
R:
%S=phi i8*[%aH,%aQ],[null,%P]
store i8*%S,i8**%d,align 8
%T=load atomic i32,i32*@sml_check_flag unordered,align 4
%U=icmp eq i32%T,0
br i1%U,label%W,label%V
V:
call void@sml_check(i32 inreg%T)
br label%W
W:
%X=load i8*,i8**%c,align 8
%Y=icmp eq i8*%X,null
br i1%Y,label%Z,label%ab
Z:
%aa=load i8*,i8**%d,align 8
ret i8*%aa
ab:
%ac=load i8*,i8**%f,align 8
%ad=bitcast i8*%ac to i32*
%ae=load i32,i32*%ad,align 4
%af=icmp eq i32%ae,0
br i1%af,label%ak,label%ag
ag:
%ah=getelementptr inbounds i8,i8*%X,i64%A
%ai=bitcast i8*%ah to i8**
%aj=load i8*,i8**%ai,align 8
br label%av
ak:
%al=getelementptr inbounds i8,i8*%ac,i64 4
%am=bitcast i8*%al to i32*
%an=load i32,i32*%am,align 4
%ao=call i8*@sml_alloc(i32 inreg%an)#0
%ap=getelementptr inbounds i8,i8*%ao,i64 -4
%aq=bitcast i8*%ap to i32*
store i32%an,i32*%aq,align 4
%ar=load i8*,i8**%c,align 8
%as=getelementptr inbounds i8,i8*%ar,i64%A
call void@llvm.memcpy.p0i8.p0i8.i32(i8*%ao,i8*%as,i32%an,i1 false)
%at=load i8*,i8**%f,align 8
%au=bitcast i8*%at to i32*
br label%av
av:
%aw=phi i32*[%au,%ak],[%ad,%ag]
%ax=phi i8*[%at,%ak],[%ac,%ag]
%ay=phi i8*[%ar,%ak],[%X,%ag]
%az=phi i8*[%ao,%ak],[%aj,%ag]
store i8*%az,i8**%e,align 8
%aA=getelementptr inbounds i8,i8*%ay,i64%B
%aB=bitcast i8*%aA to i8**
%aC=load i8*,i8**%aB,align 8
store i8*%aC,i8**%c,align 8
%aD=getelementptr inbounds i8,i8*%ax,i64 4
%aE=bitcast i8*%aD to i32*
%aF=load i32,i32*%aE,align 4
%aG=load i32,i32*%aw,align 4
%aH=call i8*@sml_alloc(i32 inreg%z)#0
%aI=getelementptr inbounds i8,i8*%aH,i64 -4
%aJ=bitcast i8*%aI to i32*
store i32%C,i32*%aJ,align 4
call void@llvm.memset.p0i8.i32(i8*%aH,i8 0,i32%z,i1 false)
%aK=icmp eq i32%aG,0
%aL=load i8*,i8**%e,align 8
store i8*null,i8**%e,align 8
%aM=getelementptr inbounds i8,i8*%aH,i64%A
br i1%aK,label%aN,label%aO
aN:
call void@llvm.memcpy.p0i8.p0i8.i32(i8*%aM,i8*%aL,i32%aF,i1 false)
br label%aQ
aO:
%aP=bitcast i8*%aM to i8**
store i8*%aL,i8**%aP,align 8
br label%aQ
aQ:
%aR=load i8*,i8**%d,align 8
store i8*null,i8**%d,align 8
%aS=getelementptr inbounds i8,i8*%aH,i64%B
%aT=bitcast i8*%aS to i8**
store i8*%aR,i8**%aT,align 8
%aU=getelementptr inbounds i8,i8*%aH,i64%D
%aV=bitcast i8*%aU to i32*
store i32%y,i32*%aV,align 4
br label%R
aW:
%aX=bitcast i8*%N to i8**
%aY=load i8*,i8**%aX,align 8
%aZ=getelementptr inbounds i8,i8*%N,i64 8
%a0=bitcast i8*%aZ to i8**
%a1=load i8*,i8**%a0,align 8
store i8*%a1,i8**%g,align 8
%a2=load i8*,i8**%d,align 8
store i8*null,i8**%d,align 8
store i8*%aY,i8**%c,align 8
br label%a3
a3:
%a4=phi i8*[%bK,%bT],[%a2,%aW]
store i8*%a4,i8**%d,align 8
%a5=load atomic i32,i32*@sml_check_flag unordered,align 4
%a6=icmp eq i32%a5,0
br i1%a6,label%a8,label%a7
a7:
call void@sml_check(i32 inreg%a5)
br label%a8
a8:
%a9=load i8*,i8**%c,align 8
%ba=icmp eq i8*%a9,null
br i1%ba,label%bb,label%be
bb:
store i8*null,i8**%c,align 8
%bc=load i8*,i8**%d,align 8
store i8*null,i8**%d,align 8
%bd=load i8*,i8**%g,align 8
store i8*null,i8**%g,align 8
br label%E
be:
%bf=load i8*,i8**%f,align 8
%bg=bitcast i8*%bf to i32*
%bh=load i32,i32*%bg,align 4
%bi=icmp eq i32%bh,0
br i1%bi,label%bn,label%bj
bj:
%bk=getelementptr inbounds i8,i8*%a9,i64%A
%bl=bitcast i8*%bk to i8**
%bm=load i8*,i8**%bl,align 8
br label%by
bn:
%bo=getelementptr inbounds i8,i8*%bf,i64 4
%bp=bitcast i8*%bo to i32*
%bq=load i32,i32*%bp,align 4
%br=call i8*@sml_alloc(i32 inreg%bq)#0
%bs=getelementptr inbounds i8,i8*%br,i64 -4
%bt=bitcast i8*%bs to i32*
store i32%bq,i32*%bt,align 4
%bu=load i8*,i8**%c,align 8
%bv=getelementptr inbounds i8,i8*%bu,i64%A
call void@llvm.memcpy.p0i8.p0i8.i32(i8*%br,i8*%bv,i32%bq,i1 false)
%bw=load i8*,i8**%f,align 8
%bx=bitcast i8*%bw to i32*
br label%by
by:
%bz=phi i32*[%bx,%bn],[%bg,%bj]
%bA=phi i8*[%bw,%bn],[%bf,%bj]
%bB=phi i8*[%bu,%bn],[%a9,%bj]
%bC=phi i8*[%br,%bn],[%bm,%bj]
store i8*%bC,i8**%e,align 8
%bD=getelementptr inbounds i8,i8*%bB,i64%B
%bE=bitcast i8*%bD to i8**
%bF=load i8*,i8**%bE,align 8
store i8*%bF,i8**%c,align 8
%bG=getelementptr inbounds i8,i8*%bA,i64 4
%bH=bitcast i8*%bG to i32*
%bI=load i32,i32*%bH,align 4
%bJ=load i32,i32*%bz,align 4
%bK=call i8*@sml_alloc(i32 inreg%z)#0
%bL=getelementptr inbounds i8,i8*%bK,i64 -4
%bM=bitcast i8*%bL to i32*
store i32%C,i32*%bM,align 4
call void@llvm.memset.p0i8.i32(i8*%bK,i8 0,i32%z,i1 false)
%bN=icmp eq i32%bJ,0
%bO=load i8*,i8**%e,align 8
store i8*null,i8**%e,align 8
%bP=getelementptr inbounds i8,i8*%bK,i64%A
br i1%bN,label%bQ,label%bR
bQ:
call void@llvm.memcpy.p0i8.p0i8.i32(i8*%bP,i8*%bO,i32%bI,i1 false)
br label%bT
bR:
%bS=bitcast i8*%bP to i8**
store i8*%bO,i8**%bS,align 8
br label%bT
bT:
%bU=load i8*,i8**%d,align 8
store i8*null,i8**%d,align 8
%bV=getelementptr inbounds i8,i8*%bK,i64%B
%bW=bitcast i8*%bV to i8**
store i8*%bU,i8**%bW,align 8
%bX=getelementptr inbounds i8,i8*%bK,i64%D
%bY=bitcast i8*%bX to i32*
store i32%y,i32*%bY,align 4
br label%a3
}
define fastcc i8*@_SMLFN4List6concatE(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*)*@_SMLLLN4List6concatE_179 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*)*@_SMLLLN4List6concatE_179 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*@_SMLLLN4List9revAppendE_182(i8*inreg%a,i8*inreg%b)#4 gc"smlsharp"{
K:
%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=getelementptr inbounds i8,i8*%a,i64 4
%h=bitcast i8*%g to i32*
%i=load i32,i32*%h,align 4
%j=add i32%i,-1
%k=sub i32 0,%i
%l=and i32%j,%k
%m=add i32%i,7
%n=add i32%m,%l
%o=and i32%n,-8
%p=add i32%o,15
%q=and i32%p,-8
%r=lshr i32%n,3
%s=lshr i32%l,3
%t=sub nsw i32%r,%s
%u=shl i32 1,%t
%v=bitcast i8*%a to i32*
%w=load i32,i32*%v,align 4
%x=or i32%u,%w
%y=or i32%q,4
%z=bitcast i8*%b to i8**
%A=load i8*,i8**%z,align 8
%B=getelementptr inbounds i8,i8*%b,i64 8
%C=bitcast i8*%B to i8**
%D=load i8*,i8**%C,align 8
store i8*%A,i8**%c,align 8
%E=sext i32%l to i64
%F=sext i32%o to i64
%G=or i32%q,1342177280
%H=sext i32%q to i64
br label%I
I:
%J=phi i8*[%az,%aI],[%D,%K]
store i8*%J,i8**%d,align 8
%L=load atomic i32,i32*@sml_check_flag unordered,align 4
%M=icmp eq i32%L,0
br i1%M,label%O,label%N
N:
call void@sml_check(i32 inreg%L)
br label%O
O:
%P=load i8*,i8**%c,align 8
%Q=icmp eq i8*%P,null
br i1%Q,label%R,label%T
R:
%S=load i8*,i8**%d,align 8
ret i8*%S
T:
%U=load i8*,i8**%f,align 8
%V=bitcast i8*%U to i32*
%W=load i32,i32*%V,align 4
%X=icmp eq i32%W,0
br i1%X,label%ac,label%Y
Y:
%Z=getelementptr inbounds i8,i8*%P,i64%E
%aa=bitcast i8*%Z to i8**
%ab=load i8*,i8**%aa,align 8
br label%an
ac:
%ad=getelementptr inbounds i8,i8*%U,i64 4
%ae=bitcast i8*%ad to i32*
%af=load i32,i32*%ae,align 4
%ag=call i8*@sml_alloc(i32 inreg%af)#0
%ah=getelementptr inbounds i8,i8*%ag,i64 -4
%ai=bitcast i8*%ah to i32*
store i32%af,i32*%ai,align 4
%aj=load i8*,i8**%c,align 8
%ak=getelementptr inbounds i8,i8*%aj,i64%E
call void@llvm.memcpy.p0i8.p0i8.i32(i8*%ag,i8*%ak,i32%af,i1 false)
%al=load i8*,i8**%f,align 8
%am=bitcast i8*%al to i32*
br label%an
an:
%ao=phi i32*[%am,%ac],[%V,%Y]
%ap=phi i8*[%al,%ac],[%U,%Y]
%aq=phi i8*[%aj,%ac],[%P,%Y]
%ar=phi i8*[%ag,%ac],[%ab,%Y]
store i8*%ar,i8**%e,align 8
%as=getelementptr inbounds i8,i8*%aq,i64%F
%at=bitcast i8*%as to i8**
%au=load i8*,i8**%at,align 8
store i8*%au,i8**%c,align 8
%av=getelementptr inbounds i8,i8*%ap,i64 4
%aw=bitcast i8*%av to i32*
%ax=load i32,i32*%aw,align 4
%ay=load i32,i32*%ao,align 4
%az=call i8*@sml_alloc(i32 inreg%y)#0
%aA=getelementptr inbounds i8,i8*%az,i64 -4
%aB=bitcast i8*%aA to i32*
store i32%G,i32*%aB,align 4
call void@llvm.memset.p0i8.i32(i8*%az,i8 0,i32%y,i1 false)
%aC=icmp eq i32%ay,0
%aD=load i8*,i8**%e,align 8
store i8*null,i8**%e,align 8
%aE=getelementptr inbounds i8,i8*%az,i64%E
br i1%aC,label%aF,label%aG
aF:
call void@llvm.memcpy.p0i8.p0i8.i32(i8*%aE,i8*%aD,i32%ax,i1 false)
br label%aI
aG:
%aH=bitcast i8*%aE to i8**
store i8*%aD,i8**%aH,align 8
br label%aI
aI:
%aJ=load i8*,i8**%d,align 8
store i8*null,i8**%d,align 8
%aK=getelementptr inbounds i8,i8*%az,i64%F
%aL=bitcast i8*%aK to i8**
store i8*%aJ,i8**%aL,align 8
%aM=getelementptr inbounds i8,i8*%az,i64%H
%aN=bitcast i8*%aM to i32*
store i32%x,i32*%aN,align 4
br label%I
}
define fastcc i8*@_SMLFN4List9revAppendE(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*)*@_SMLLLN4List9revAppendE_182 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*)*@_SMLLLN4List9revAppendE_182 to void(...)*),void(...)**%t,align 8
%u=getelementptr inbounds i8,i8*%l,i64 24
%v=bitcast i8*%u to i32*
store i32 -2147483647,i32*%v,align 4
ret i8*%l
}
define internal fastcc void@_SMLLLN4List3appE_185(i8*inreg%a,i8*inreg%b)#4 gc"smlsharp"{
%c=alloca i8*,align 8
%d=alloca i8*,align 8
call void@llvm.gcroot(i8**%c,i8*null)#0
call void@llvm.gcroot(i8**%d,i8*null)#0
store i8*%a,i8**%d,align 8
%e=getelementptr inbounds i8,i8*%a,i64 12
%f=bitcast i8*%e to i32*
%g=load i32,i32*%f,align 4
%h=add i32%g,-1
%i=sub i32 0,%g
%j=and i32%h,%i
%k=add i32%g,7
%l=add i32%k,%j
%m=and i32%l,-8
store i8*%b,i8**%c,align 8
%n=sext i32%j to i64
%o=sext i32%m to i64
%p=bitcast i8**%d to i8***
br label%q
q:
%r=load atomic i32,i32*@sml_check_flag unordered,align 4
%s=icmp eq i32%r,0
br i1%s,label%u,label%t
t:
call void@sml_check(i32 inreg%r)
br label%u
u:
%v=load i8*,i8**%c,align 8
%w=icmp eq i8*%v,null
br i1%w,label%x,label%y
x:
ret void
y:
%z=load i8*,i8**%d,align 8
%A=getelementptr inbounds i8,i8*%z,i64 8
%B=bitcast i8*%A to i32*
%C=load i32,i32*%B,align 4
%D=icmp eq i32%C,0
br i1%D,label%J,label%E
E:
%F=bitcast i8*%z to i8**
%G=getelementptr inbounds i8,i8*%v,i64%n
%H=bitcast i8*%G to i8**
%I=load i8*,i8**%H,align 8
br label%T
J:
%K=getelementptr inbounds i8,i8*%z,i64 12
%L=bitcast i8*%K to i32*
%M=load i32,i32*%L,align 4
%N=call i8*@sml_alloc(i32 inreg%M)#0
%O=getelementptr inbounds i8,i8*%N,i64 -4
%P=bitcast i8*%O to i32*
store i32%M,i32*%P,align 4
%Q=load i8*,i8**%c,align 8
%R=getelementptr inbounds i8,i8*%Q,i64%n
call void@llvm.memcpy.p0i8.p0i8.i32(i8*%N,i8*%R,i32%M,i1 false)
%S=load i8**,i8***%p,align 8
br label%T
T:
%U=phi i8**[%F,%E],[%S,%J]
%V=phi i8*[%v,%E],[%Q,%J]
%W=phi i8*[%I,%E],[%N,%J]
%X=getelementptr inbounds i8,i8*%V,i64%o
%Y=bitcast i8*%X to i8**
%Z=load i8*,i8**%Y,align 8
store i8*%Z,i8**%c,align 8
%aa=load i8*,i8**%U,align 8
%ab=getelementptr inbounds i8,i8*%aa,i64 16
%ac=bitcast i8*%ab to i8*(i8*,i8*)**
%ad=load i8*(i8*,i8*)*,i8*(i8*,i8*)**%ac,align 8
%ae=bitcast i8*%aa to i8**
%af=load i8*,i8**%ae,align 8
%ag=call fastcc i8*%ad(i8*inreg%af,i8*inreg%W)
br label%q
}
define internal fastcc i8*@_SMLLLN4List3appE_186(i8*inreg%a,i8*inreg%b)#3 gc"smlsharp"{
%c=alloca i8*,align 8
%d=alloca i8*,align 8
call void@llvm.gcroot(i8**%c,i8*null)#0
call void@llvm.gcroot(i8**%d,i8*null)#0
store i8*%b,i8**%c,align 8
%e=bitcast i8*%a to i32*
%f=load i32,i32*%e,align 4
%g=getelementptr inbounds i8,i8*%a,i64 4
%h=bitcast i8*%g to i32*
%i=load i32,i32*%h,align 4
%j=call i8*@sml_alloc(i32 inreg 20)#0
%k=getelementptr inbounds i8,i8*%j,i64 -4
%l=bitcast i8*%k to i32*
store i32 1342177296,i32*%l,align 4
store i8*%j,i8**%d,align 8
%m=load i8*,i8**%c,align 8
store i8*null,i8**%c,align 8
%n=bitcast i8*%j to i8**
store i8*%m,i8**%n,align 8
%o=getelementptr inbounds i8,i8*%j,i64 8
%p=bitcast i8*%o to i32*
store i32%f,i32*%p,align 4
%q=getelementptr inbounds i8,i8*%j,i64 12
%r=bitcast i8*%q to i32*
store i32%i,i32*%r,align 4
%s=getelementptr inbounds i8,i8*%j,i64 16
%t=bitcast i8*%s to i32*
store i32 1,i32*%t,align 4
%u=call i8*@sml_alloc(i32 inreg 28)#0
%v=getelementptr inbounds i8,i8*%u,i64 -4
%w=bitcast i8*%v to i32*
store i32 1342177304,i32*%w,align 4
%x=load i8*,i8**%d,align 8
%y=bitcast i8*%u to i8**
store i8*%x,i8**%y,align 8
%z=getelementptr inbounds i8,i8*%u,i64 8
%A=bitcast i8*%z to void(...)**
store void(...)*bitcast(void(i8*,i8*)*@_SMLLLN4List3appE_185 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*)*@_SMLLLN4List3appE_250 to void(...)*),void(...)**%C,align 8
%D=getelementptr inbounds i8,i8*%u,i64 24
%E=bitcast i8*%D to i32*
store i32 -2147483647,i32*%E,align 4
ret i8*%u
}
define fastcc i8*@_SMLFN4List3appE(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*)*@_SMLLLN4List3appE_186 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*)*@_SMLLLN4List3appE_186 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*@_SMLLLN4List3mapE_189(i8*inreg%a,i8*inreg%b)#4 gc"smlsharp"{
S:
%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=getelementptr inbounds i8,i8*%a,i64 12
%h=bitcast i8*%g to i32*
%i=load i32,i32*%h,align 4
%j=add i32%i,-1
%k=sub i32 0,%i
%l=and i32%j,%k
%m=add i32%i,7
%n=add i32%m,%l
%o=and i32%n,-8
%p=getelementptr inbounds i8,i8*%a,i64 20
%q=bitcast i8*%p to i32*
%r=load i32,i32*%q,align 4
%s=add i32%r,-1
%t=sub i32 0,%r
%u=and i32%s,%t
%v=add i32%r,7
%w=add i32%v,%u
%x=and i32%w,-8
%y=add i32%x,15
%z=and i32%y,-8
%A=lshr i32%w,3
%B=lshr i32%u,3
%C=sub nsw i32%A,%B
%D=shl i32 1,%C
%E=getelementptr inbounds i8,i8*%a,i64 16
%F=bitcast i8*%E to i32*
%G=load i32,i32*%F,align 4
%H=or i32%D,%G
%I=or i32%z,4
%J=sext i32%l to i64
%K=sext i32%o to i64
%L=bitcast i8**%f to i8***
%M=or i32%z,1342177280
%N=sext i32%u to i64
%O=sext i32%x to i64
%P=sext i32%z to i64
br label%Q
Q:
%R=phi i8*[%b,%S],[%b5,%bZ]
%T=phi i8*[null,%S],[%bQ,%bZ]
store i8*%R,i8**%c,align 8
store i8*%T,i8**%d,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],[%R,%Q]
%aa=icmp eq i8*%Z,null
br i1%aa,label%ab,label%ba
ab:
%ac=load i8*,i8**%d,align 8
store i8*null,i8**%d,align 8
store i8*%ac,i8**%c,align 8
br label%ad
ad:
%ae=phi i8*[%aV,%a4],[null,%ab]
store i8*%ae,i8**%d,align 8
%af=load atomic i32,i32*@sml_check_flag unordered,align 4
%ag=icmp eq i32%af,0
br i1%ag,label%ai,label%ah
ah:
call void@sml_check(i32 inreg%af)
br label%ai
ai:
%aj=load i8*,i8**%c,align 8
%ak=icmp eq i8*%aj,null
br i1%ak,label%al,label%an
al:
%am=load i8*,i8**%d,align 8
ret i8*%am
an:
%ao=load i8*,i8**%f,align 8
%ap=getelementptr inbounds i8,i8*%ao,i64 16
%aq=bitcast i8*%ap to i32*
%ar=load i32,i32*%aq,align 4
%as=icmp eq i32%ar,0
br i1%as,label%ax,label%at
at:
%au=getelementptr inbounds i8,i8*%aj,i64%N
%av=bitcast i8*%au to i8**
%aw=load i8*,i8**%av,align 8
br label%aK
ax:
%ay=getelementptr inbounds i8,i8*%ao,i64 20
%az=bitcast i8*%ay to i32*
%aA=load i32,i32*%az,align 4
%aB=call i8*@sml_alloc(i32 inreg%aA)#0
%aC=getelementptr inbounds i8,i8*%aB,i64 -4
%aD=bitcast i8*%aC to i32*
store i32%aA,i32*%aD,align 4
%aE=load i8*,i8**%c,align 8
%aF=getelementptr inbounds i8,i8*%aE,i64%N
call void@llvm.memcpy.p0i8.p0i8.i32(i8*%aB,i8*%aF,i32%aA,i1 false)
%aG=load i8*,i8**%f,align 8
%aH=getelementptr inbounds i8,i8*%aG,i64 16
%aI=bitcast i8*%aH to i32*
%aJ=load i32,i32*%aI,align 4
br label%aK
aK:
%aL=phi i32[%aJ,%ax],[%ar,%at]
%aM=phi i8*[%aG,%ax],[%ao,%at]
%aN=phi i8*[%aE,%ax],[%aj,%at]
%aO=phi i8*[%aB,%ax],[%aw,%at]
store i8*%aO,i8**%e,align 8
%aP=getelementptr inbounds i8,i8*%aN,i64%O
%aQ=bitcast i8*%aP to i8**
%aR=load i8*,i8**%aQ,align 8
store i8*%aR,i8**%c,align 8
%aS=getelementptr inbounds i8,i8*%aM,i64 20
%aT=bitcast i8*%aS to i32*
%aU=load i32,i32*%aT,align 4
%aV=call i8*@sml_alloc(i32 inreg%I)#0
%aW=getelementptr inbounds i8,i8*%aV,i64 -4
%aX=bitcast i8*%aW to i32*
store i32%M,i32*%aX,align 4
call void@llvm.memset.p0i8.i32(i8*%aV,i8 0,i32%I,i1 false)
%aY=icmp eq i32%aL,0
%aZ=load i8*,i8**%e,align 8
store i8*null,i8**%e,align 8
%a0=getelementptr inbounds i8,i8*%aV,i64%N
br i1%aY,label%a1,label%a2
a1:
call void@llvm.memcpy.p0i8.p0i8.i32(i8*%a0,i8*%aZ,i32%aU,i1 false)
br label%a4
a2:
%a3=bitcast i8*%a0 to i8**
store i8*%aZ,i8**%a3,align 8
br label%a4
a4:
%a5=load i8*,i8**%d,align 8
store i8*null,i8**%d,align 8
%a6=getelementptr inbounds i8,i8*%aV,i64%O
%a7=bitcast i8*%a6 to i8**
store i8*%a5,i8**%a7,align 8
%a8=getelementptr inbounds i8,i8*%aV,i64%P
%a9=bitcast i8*%a8 to i32*
store i32%H,i32*%a9,align 4
br label%ad
ba:
%bb=load i8*,i8**%f,align 8
%bc=getelementptr inbounds i8,i8*%bb,i64 8
%bd=bitcast i8*%bc to i32*
%be=load i32,i32*%bd,align 4
%bf=icmp eq i32%be,0
br i1%bf,label%bl,label%bg
bg:
%bh=bitcast i8*%bb to i8**
%bi=getelementptr inbounds i8,i8*%Z,i64%J
%bj=bitcast i8*%bi to i8**
%bk=load i8*,i8**%bj,align 8
br label%bv
bl:
%bm=getelementptr inbounds i8,i8*%bb,i64 12
%bn=bitcast i8*%bm to i32*
%bo=load i32,i32*%bn,align 4
%bp=call i8*@sml_alloc(i32 inreg%bo)#0
%bq=getelementptr inbounds i8,i8*%bp,i64 -4
%br=bitcast i8*%bq to i32*
store i32%bo,i32*%br,align 4
%bs=load i8*,i8**%c,align 8
%bt=getelementptr inbounds i8,i8*%bs,i64%J
call void@llvm.memcpy.p0i8.p0i8.i32(i8*%bp,i8*%bt,i32%bo,i1 false)
%bu=load i8**,i8***%L,align 8
br label%bv
bv:
%bw=phi i8**[%bh,%bg],[%bu,%bl]
%bx=phi i8*[%Z,%bg],[%bs,%bl]
%by=phi i8*[%bk,%bg],[%bp,%bl]
store i8*null,i8**%c,align 8
%bz=getelementptr inbounds i8,i8*%bx,i64%K
%bA=bitcast i8*%bz to i8**
%bB=load i8*,i8**%bA,align 8
store i8*%bB,i8**%e,align 8
%bC=load i8*,i8**%bw,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
%bI=call fastcc i8*%bF(i8*inreg%bH,i8*inreg%by)
store i8*%bI,i8**%c,align 8
%bJ=load i8*,i8**%f,align 8
%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*%bJ,i64 16
%bO=bitcast i8*%bN to i32*
%bP=load i32,i32*%bO,align 4
%bQ=call i8*@sml_alloc(i32 inreg%I)#0
%bR=getelementptr inbounds i8,i8*%bQ,i64 -4
%bS=bitcast i8*%bR to i32*
store i32%M,i32*%bS,align 4
call void@llvm.memset.p0i8.i32(i8*%bQ,i8 0,i32%I,i1 false)
%bT=icmp eq i32%bP,0
%bU=load i8*,i8**%c,align 8
store i8*null,i8**%c,align 8
%bV=getelementptr inbounds i8,i8*%bQ,i64%N
br i1%bT,label%bW,label%bX
bW:
call void@llvm.memcpy.p0i8.p0i8.i32(i8*%bV,i8*%bU,i32%bM,i1 false)
br label%bZ
bX:
%bY=bitcast i8*%bV to i8**
store i8*%bU,i8**%bY,align 8
br label%bZ
bZ:
%b0=load i8*,i8**%d,align 8
store i8*null,i8**%d,align 8
%b1=getelementptr inbounds i8,i8*%bQ,i64%O
%b2=bitcast i8*%b1 to i8**
store i8*%b0,i8**%b2,align 8
%b3=getelementptr inbounds i8,i8*%bQ,i64%P
%b4=bitcast i8*%b3 to i32*
store i32%H,i32*%b4,align 4
%b5=load i8*,i8**%e,align 8
store i8*null,i8**%e,align 8
br label%Q
}
define internal fastcc i8*@_SMLLLN4List3mapE_190(i8*inreg%a,i8*inreg%b)#3 gc"smlsharp"{
%c=alloca i8*,align 8
%d=alloca i8*,align 8
call void@llvm.gcroot(i8**%c,i8*null)#0
call void@llvm.gcroot(i8**%d,i8*null)#0
store i8*%b,i8**%c,align 8
%e=bitcast i8*%a to i32*
%f=load i32,i32*%e,align 4
%g=getelementptr inbounds i8,i8*%a,i64 4
%h=bitcast i8*%g to i32*
%i=load i32,i32*%h,align 4
%j=getelementptr inbounds i8,i8*%a,i64 8
%k=bitcast i8*%j to i32*
%l=load i32,i32*%k,align 4
%m=getelementptr inbounds i8,i8*%a,i64 12
%n=bitcast i8*%m to i32*
%o=load i32,i32*%n,align 4
%p=call i8*@sml_alloc(i32 inreg 28)#0
%q=getelementptr inbounds i8,i8*%p,i64 -4
%r=bitcast i8*%q to i32*
store i32 1342177304,i32*%r,align 4
store i8*%p,i8**%d,align 8
%s=load i8*,i8**%c,align 8
store i8*null,i8**%c,align 8
%t=bitcast i8*%p to i8**
store i8*%s,i8**%t,align 8
%u=getelementptr inbounds i8,i8*%p,i64 8
%v=bitcast i8*%u to i32*
store i32%f,i32*%v,align 4
%w=getelementptr inbounds i8,i8*%p,i64 12
%x=bitcast i8*%w to i32*
store i32%i,i32*%x,align 4
%y=getelementptr inbounds i8,i8*%p,i64 16
%z=bitcast i8*%y to i32*
store i32%l,i32*%z,align 4
%A=getelementptr inbounds i8,i8*%p,i64 20
%B=bitcast i8*%A to i32*
store i32%o,i32*%B,align 4
%C=getelementptr inbounds i8,i8*%p,i64 24
%D=bitcast i8*%C to i32*
store i32 1,i32*%D,align 4
%E=call i8*@sml_alloc(i32 inreg 28)#0
%F=getelementptr inbounds i8,i8*%E,i64 -4
%G=bitcast i8*%F to i32*
store i32 1342177304,i32*%G,align 4
%H=load i8*,i8**%d,align 8
%I=bitcast i8*%E to i8**
store i8*%H,i8**%I,align 8
%J=getelementptr inbounds i8,i8*%E,i64 8
%K=bitcast i8*%J to void(...)**
store void(...)*bitcast(i8*(i8*,i8*)*@_SMLLLN4List3mapE_189 to void(...)*),void(...)**%K,align 8
%L=getelementptr inbounds i8,i8*%E,i64 16
%M=bitcast i8*%L to void(...)**
store void(...)*bitcast(i8*(i8*,i8*)*@_SMLLLN4List3mapE_189 to void(...)*),void(...)**%M,align 8
%N=getelementptr inbounds i8,i8*%E,i64 24
%O=bitcast i8*%N to i32*
store i32 -2147483647,i32*%O,align 4
ret i8*%E
}
define fastcc i8*@_SMLFN4List3mapE(i32 inreg%a,i32 inreg%b,i32 inreg%c,i32 inreg%d)#3 gc"smlsharp"{
%e=alloca i8*,align 8
call void@llvm.gcroot(i8**%e,i8*null)#0
%f=call i8*@sml_alloc(i32 inreg 20)#0
%g=bitcast i8*%f to i32*
%h=getelementptr inbounds i8,i8*%f,i64 -4
%i=bitcast i8*%h to i32*
store i32 1342177296,i32*%i,align 4
store i8*%f,i8**%e,align 8
store i32%a,i32*%g,align 4
%j=getelementptr inbounds i8,i8*%f,i64 4
%k=bitcast i8*%j to i32*
store i32%b,i32*%k,align 4
%l=getelementptr inbounds i8,i8*%f,i64 8
%m=bitcast i8*%l to i32*
store i32%c,i32*%m,align 4
%n=getelementptr inbounds i8,i8*%f,i64 12
%o=bitcast i8*%n to i32*
store i32%d,i32*%o,align 4
%p=getelementptr inbounds i8,i8*%f,i64 16
%q=bitcast i8*%p to i32*
store i32 0,i32*%q,align 4
%r=call i8*@sml_alloc(i32 inreg 28)#0
%s=getelementptr inbounds i8,i8*%r,i64 -4
%t=bitcast i8*%s to i32*
store i32 1342177304,i32*%t,align 4
%u=load i8*,i8**%e,align 8
%v=bitcast i8*%r to i8**
store i8*%u,i8**%v,align 8
%w=getelementptr inbounds i8,i8*%r,i64 8
%x=bitcast i8*%w to void(...)**
store void(...)*bitcast(i8*(i8*,i8*)*@_SMLLLN4List3mapE_190 to void(...)*),void(...)**%x,align 8
%y=getelementptr inbounds i8,i8*%r,i64 16
%z=bitcast i8*%y to void(...)**
store void(...)*bitcast(i8*(i8*,i8*)*@_SMLLLN4List3mapE_190 to void(...)*),void(...)**%z,align 8
%A=getelementptr inbounds i8,i8*%r,i64 24
%B=bitcast i8*%A to i32*
store i32 -2147483647,i32*%B,align 4
ret i8*%r
}
define internal fastcc i8*@_SMLLLN4List10mapPartialE_193(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**%f,align 8
%g=getelementptr inbounds i8,i8*%a,i64 12
%h=bitcast i8*%g to i32*
%i=load i32,i32*%h,align 4
%j=add i32%i,-1
%k=sub i32 0,%i
%l=and i32%j,%k
%m=add i32%i,7
%n=add i32%m,%l
%o=and i32%n,-8
%p=getelementptr inbounds i8,i8*%a,i64 20
%q=bitcast i8*%p to i32*
%r=load i32,i32*%q,align 4
%s=add i32%r,-1
%t=sub i32 0,%r
%u=and i32%s,%t
%v=add i32%r,7
%w=add i32%v,%u
%x=and i32%w,-8
%y=add i32%x,15
%z=and i32%y,-8
%A=lshr i32%w,3
%B=lshr i32%u,3
%C=sub nsw i32%A,%B
%D=shl i32 1,%C
%E=getelementptr inbounds i8,i8*%a,i64 16
%F=bitcast i8*%E to i32*
%G=load i32,i32*%F,align 4
%H=or i32%D,%G
%I=or i32%z,4
store i8*%b,i8**%c,align 8
store i8*null,i8**%d,align 8
%J=sext i32%l to i64
%K=sext i32%o to i64
%L=bitcast i8**%f to i8***
%M=sext i32%u to i64
%N=or i32%z,1342177280
%O=sext i32%x to i64
%P=sext i32%z to i64
br label%Q
Q:
%R=load atomic i32,i32*@sml_check_flag unordered,align 4
%S=icmp eq i32%R,0
br i1%S,label%U,label%T
T:
call void@sml_check(i32 inreg%R)
br label%U
U:
%V=load i8*,i8**%c,align 8
%W=icmp eq i8*%V,null
br i1%W,label%X,label%a6
X:
%Y=load i8*,i8**%d,align 8
store i8*null,i8**%d,align 8
store i8*%Y,i8**%c,align 8
br label%Z
Z:
%aa=phi i8*[%aR,%a0],[null,%X]
store i8*%aa,i8**%d,align 8
%ab=load atomic i32,i32*@sml_check_flag unordered,align 4
%ac=icmp eq i32%ab,0
br i1%ac,label%ae,label%ad
ad:
call void@sml_check(i32 inreg%ab)
br label%ae
ae:
%af=load i8*,i8**%c,align 8
%ag=icmp eq i8*%af,null
br i1%ag,label%ah,label%aj
ah:
%ai=load i8*,i8**%d,align 8
ret i8*%ai
aj:
%ak=load i8*,i8**%f,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:
%aq=getelementptr inbounds i8,i8*%af,i64%M
%ar=bitcast i8*%aq to i8**
%as=load i8*,i8**%ar,align 8
br label%aG
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
%aA=load i8*,i8**%c,align 8
%aB=getelementptr inbounds i8,i8*%aA,i64%M
call void@llvm.memcpy.p0i8.p0i8.i32(i8*%ax,i8*%aB,i32%aw,i1 false)
%aC=load i8*,i8**%f,align 8
%aD=getelementptr inbounds i8,i8*%aC,i64 16
%aE=bitcast i8*%aD to i32*
%aF=load i32,i32*%aE,align 4
br label%aG
aG:
%aH=phi i32[%aF,%at],[%an,%ap]
%aI=phi i8*[%aC,%at],[%ak,%ap]
%aJ=phi i8*[%aA,%at],[%af,%ap]
%aK=phi i8*[%ax,%at],[%as,%ap]
store i8*%aK,i8**%e,align 8
%aL=getelementptr inbounds i8,i8*%aJ,i64%O
%aM=bitcast i8*%aL to i8**
%aN=load i8*,i8**%aM,align 8
store i8*%aN,i8**%c,align 8
%aO=getelementptr inbounds i8,i8*%aI,i64 20
%aP=bitcast i8*%aO to i32*
%aQ=load i32,i32*%aP,align 4
%aR=call i8*@sml_alloc(i32 inreg%I)#0
%aS=getelementptr inbounds i8,i8*%aR,i64 -4
%aT=bitcast i8*%aS to i32*
store i32%N,i32*%aT,align 4
call void@llvm.memset.p0i8.i32(i8*%aR,i8 0,i32%I,i1 false)
%aU=icmp eq i32%aH,0
%aV=load i8*,i8**%e,align 8
store i8*null,i8**%e,align 8
%aW=getelementptr inbounds i8,i8*%aR,i64%M
br i1%aU,label%aX,label%aY
aX:
call void@llvm.memcpy.p0i8.p0i8.i32(i8*%aW,i8*%aV,i32%aQ,i1 false)
br label%a0
aY:
%aZ=bitcast i8*%aW to i8**
store i8*%aV,i8**%aZ,align 8
br label%a0
a0:
%a1=load i8*,i8**%d,align 8
store i8*null,i8**%d,align 8
%a2=getelementptr inbounds i8,i8*%aR,i64%O
%a3=bitcast i8*%a2 to i8**
store i8*%a1,i8**%a3,align 8
%a4=getelementptr inbounds i8,i8*%aR,i64%P
%a5=bitcast i8*%a4 to i32*
store i32%H,i32*%a5,align 4
br label%Z
a6:
%a7=load i8*,i8**%f,align 8
%a8=getelementptr inbounds i8,i8*%a7,i64 8
%a9=bitcast i8*%a8 to i32*
%ba=load i32,i32*%a9,align 4
%bb=icmp eq i32%ba,0
br i1%bb,label%bh,label%bc
bc:
%bd=bitcast i8*%a7 to i8**
%be=getelementptr inbounds i8,i8*%V,i64%J
%bf=bitcast i8*%be to i8**
%bg=load i8*,i8**%bf,align 8
br label%br
bh:
%bi=getelementptr inbounds i8,i8*%a7,i64 12
%bj=bitcast i8*%bi to i32*
%bk=load i32,i32*%bj,align 4
%bl=call i8*@sml_alloc(i32 inreg%bk)#0
%bm=getelementptr inbounds i8,i8*%bl,i64 -4
%bn=bitcast i8*%bm to i32*
store i32%bk,i32*%bn,align 4
%bo=load i8*,i8**%c,align 8
%bp=getelementptr inbounds i8,i8*%bo,i64%J
call void@llvm.memcpy.p0i8.p0i8.i32(i8*%bl,i8*%bp,i32%bk,i1 false)
%bq=load i8**,i8***%L,align 8
br label%br
br:
%bs=phi i8**[%bd,%bc],[%bq,%bh]
%bt=phi i8*[%V,%bc],[%bo,%bh]
%bu=phi i8*[%bg,%bc],[%bl,%bh]
%bv=getelementptr inbounds i8,i8*%bt,i64%K
%bw=bitcast i8*%bv to i8**
%bx=load i8*,i8**%bw,align 8
store i8*%bx,i8**%c,align 8
%by=load i8*,i8**%bs,align 8
%bz=getelementptr inbounds i8,i8*%by,i64 16
%bA=bitcast i8*%bz to i8*(i8*,i8*)**
%bB=load i8*(i8*,i8*)*,i8*(i8*,i8*)**%bA,align 8
%bC=bitcast i8*%by to i8**
%bD=load i8*,i8**%bC,align 8
%bE=call fastcc i8*%bB(i8*inreg%bD,i8*inreg%bu)
store i8*%bE,i8**%e,align 8
%bF=icmp eq i8*%bE,null
br i1%bF,label%bG,label%bI
bG:
store i8*null,i8**%e,align 8
br label%bH
bH:
br label%Q
bI:
%bJ=load i8*,i8**%f,align 8
%bK=getelementptr inbounds i8,i8*%bJ,i64 16
%bL=bitcast i8*%bK to i32*
%bM=load i32,i32*%bL,align 4
%bN=icmp eq i32%bM,0
br i1%bN,label%bS,label%bO
bO:
store i8*null,i8**%e,align 8
%bP=getelementptr inbounds i8,i8*%bE,i64%M
%bQ=bitcast i8*%bP to i8**
%bR=load i8*,i8**%bQ,align 8
br label%b5
bS:
%bT=getelementptr inbounds i8,i8*%bJ,i64 20
%bU=bitcast i8*%bT to i32*
%bV=load i32,i32*%bU,align 4
%bW=call i8*@sml_alloc(i32 inreg%bV)#0
%bX=getelementptr inbounds i8,i8*%bW,i64 -4
%bY=bitcast i8*%bX to i32*
store i32%bV,i32*%bY,align 4
%bZ=load i8*,i8**%e,align 8
store i8*null,i8**%e,align 8
%b0=getelementptr inbounds i8,i8*%bZ,i64%M
call void@llvm.memcpy.p0i8.p0i8.i32(i8*%bW,i8*%b0,i32%bV,i1 false)
%b1=load i8*,i8**%f,align 8
%b2=getelementptr inbounds i8,i8*%b1,i64 16
%b3=bitcast i8*%b2 to i32*
%b4=load i32,i32*%b3,align 4
br label%b5
b5:
%b6=phi i32[%b4,%bS],[%bM,%bO]
%b7=phi i8*[%b1,%bS],[%bJ,%bO]
%b8=phi i8*[%bW,%bS],[%bR,%bO]
store i8*%b8,i8**%e,align 8
%b9=getelementptr inbounds i8,i8*%b7,i64 20
%ca=bitcast i8*%b9 to i32*
%cb=load i32,i32*%ca,align 4
%cc=call i8*@sml_alloc(i32 inreg%I)#0
%cd=getelementptr inbounds i8,i8*%cc,i64 -4
%ce=bitcast i8*%cd to i32*
store i32%N,i32*%ce,align 4
call void@llvm.memset.p0i8.i32(i8*%cc,i8 0,i32%I,i1 false)
%cf=icmp eq i32%b6,0
%cg=load i8*,i8**%e,align 8
store i8*null,i8**%e,align 8
%ch=getelementptr inbounds i8,i8*%cc,i64%M
br i1%cf,label%ci,label%cj
ci:
call void@llvm.memcpy.p0i8.p0i8.i32(i8*%ch,i8*%cg,i32%cb,i1 false)
br label%cl
cj:
%ck=bitcast i8*%ch to i8**
store i8*%cg,i8**%ck,align 8
br label%cl
cl:
%cm=load i8*,i8**%d,align 8
%cn=getelementptr inbounds i8,i8*%cc,i64%O
%co=bitcast i8*%cn to i8**
store i8*%cm,i8**%co,align 8
%cp=getelementptr inbounds i8,i8*%cc,i64%P
%cq=bitcast i8*%cp to i32*
store i32%H,i32*%cq,align 4
store i8*%cc,i8**%d,align 8
br label%bH
}
define internal fastcc i8*@_SMLLLN4List10mapPartialE_194(i8*inreg%a,i8*inreg%b)#3 gc"smlsharp"{
%c=alloca i8*,align 8
%d=alloca i8*,align 8
call void@llvm.gcroot(i8**%c,i8*null)#0
call void@llvm.gcroot(i8**%d,i8*null)#0
store i8*%b,i8**%c,align 8
%e=bitcast i8*%a to i32*
%f=load i32,i32*%e,align 4
%g=getelementptr inbounds i8,i8*%a,i64 4
%h=bitcast i8*%g to i32*
%i=load i32,i32*%h,align 4
%j=getelementptr inbounds i8,i8*%a,i64 8
%k=bitcast i8*%j to i32*
%l=load i32,i32*%k,align 4
%m=getelementptr inbounds i8,i8*%a,i64 12
%n=bitcast i8*%m to i32*
%o=load i32,i32*%n,align 4
%p=call i8*@sml_alloc(i32 inreg 28)#0
%q=getelementptr inbounds i8,i8*%p,i64 -4
%r=bitcast i8*%q to i32*
store i32 1342177304,i32*%r,align 4
store i8*%p,i8**%d,align 8
%s=load i8*,i8**%c,align 8
store i8*null,i8**%c,align 8
%t=bitcast i8*%p to i8**
store i8*%s,i8**%t,align 8
%u=getelementptr inbounds i8,i8*%p,i64 8
%v=bitcast i8*%u to i32*
store i32%f,i32*%v,align 4
%w=getelementptr inbounds i8,i8*%p,i64 12
%x=bitcast i8*%w to i32*
store i32%i,i32*%x,align 4
%y=getelementptr inbounds i8,i8*%p,i64 16
%z=bitcast i8*%y to i32*
store i32%l,i32*%z,align 4
%A=getelementptr inbounds i8,i8*%p,i64 20
%B=bitcast i8*%A to i32*
store i32%o,i32*%B,align 4
%C=getelementptr inbounds i8,i8*%p,i64 24
%D=bitcast i8*%C to i32*
store i32 1,i32*%D,align 4
%E=call i8*@sml_alloc(i32 inreg 28)#0
%F=getelementptr inbounds i8,i8*%E,i64 -4
%G=bitcast i8*%F to i32*
store i32 1342177304,i32*%G,align 4
%H=load i8*,i8**%d,align 8
%I=bitcast i8*%E to i8**
store i8*%H,i8**%I,align 8
%J=getelementptr inbounds i8,i8*%E,i64 8
%K=bitcast i8*%J to void(...)**
store void(...)*bitcast(i8*(i8*,i8*)*@_SMLLLN4List10mapPartialE_193 to void(...)*),void(...)**%K,align 8
%L=getelementptr inbounds i8,i8*%E,i64 16
%M=bitcast i8*%L to void(...)**
store void(...)*bitcast(i8*(i8*,i8*)*@_SMLLLN4List10mapPartialE_193 to void(...)*),void(...)**%M,align 8
%N=getelementptr inbounds i8,i8*%E,i64 24
%O=bitcast i8*%N to i32*
store i32 -2147483647,i32*%O,align 4
ret i8*%E
}
define fastcc i8*@_SMLFN4List10mapPartialE(i32 inreg%a,i32 inreg%b,i32 inreg%c,i32 inreg%d)#3 gc"smlsharp"{
%e=alloca i8*,align 8
call void@llvm.gcroot(i8**%e,i8*null)#0
%f=call i8*@sml_alloc(i32 inreg 20)#0
%g=bitcast i8*%f to i32*
%h=getelementptr inbounds i8,i8*%f,i64 -4
%i=bitcast i8*%h to i32*
store i32 1342177296,i32*%i,align 4
store i8*%f,i8**%e,align 8
store i32%a,i32*%g,align 4
%j=getelementptr inbounds i8,i8*%f,i64 4
%k=bitcast i8*%j to i32*
store i32%b,i32*%k,align 4
%l=getelementptr inbounds i8,i8*%f,i64 8
%m=bitcast i8*%l to i32*
store i32%c,i32*%m,align 4
%n=getelementptr inbounds i8,i8*%f,i64 12
%o=bitcast i8*%n to i32*
store i32%d,i32*%o,align 4
%p=getelementptr inbounds i8,i8*%f,i64 16
%q=bitcast i8*%p to i32*
store i32 0,i32*%q,align 4
%r=call i8*@sml_alloc(i32 inreg 28)#0
%s=getelementptr inbounds i8,i8*%r,i64 -4
%t=bitcast i8*%s to i32*
store i32 1342177304,i32*%t,align 4
%u=load i8*,i8**%e,align 8
%v=bitcast i8*%r to i8**
store i8*%u,i8**%v,align 8
%w=getelementptr inbounds i8,i8*%r,i64 8
%x=bitcast i8*%w to void(...)**
store void(...)*bitcast(i8*(i8*,i8*)*@_SMLLLN4List10mapPartialE_194 to void(...)*),void(...)**%x,align 8
%y=getelementptr inbounds i8,i8*%r,i64 16
%z=bitcast i8*%y to void(...)**
store void(...)*bitcast(i8*(i8*,i8*)*@_SMLLLN4List10mapPartialE_194 to void(...)*),void(...)**%z,align 8
%A=getelementptr inbounds i8,i8*%r,i64 24
%B=bitcast i8*%A to i32*
store i32 -2147483647,i32*%B,align 4
ret i8*%r
}
define internal fastcc i8*@_SMLLLN4List4findE_197(i8*inreg%a,i8*inreg%b)#4 gc"smlsharp"{
%c=alloca i8*,align 8
%d=alloca i8*,align 8
%e=alloca i8*,align 8
call void@llvm.gcroot(i8**%c,i8*null)#0
call void@llvm.gcroot(i8**%d,i8*null)#0
call void@llvm.gcroot(i8**%e,i8*null)#0
store i8*%a,i8**%e,align 8
%f=getelementptr inbounds i8,i8*%a,i64 12
%g=bitcast i8*%f to i32*
%h=load i32,i32*%g,align 4
%i=add i32%h,-1
%j=sub i32 0,%h
%k=and i32%i,%j
%l=add i32%h,7
%m=add i32%l,%k
%n=and i32%m,-8
%o=getelementptr inbounds i8,i8*%a,i64 8
%p=bitcast i8*%o to i32*
%q=load i32,i32*%p,align 4
%r=or i32%n,4
store i8*%b,i8**%c,align 8
%s=sext i32%k to i64
%t=sext i32%n to i64
%u=bitcast i8**%e to i8***
br label%v
v:
%w=load atomic i32,i32*@sml_check_flag unordered,align 4
%x=icmp eq i32%w,0
br i1%x,label%z,label%y
y:
call void@sml_check(i32 inreg%w)
br label%z
z:
%A=load i8*,i8**%c,align 8
%B=icmp eq i8*%A,null
br i1%B,label%C,label%D
C:
ret i8*null
D:
%E=load i8*,i8**%e,align 8
%F=getelementptr inbounds i8,i8*%E,i64 8
%G=bitcast i8*%F to i32*
%H=load i32,i32*%G,align 4
%I=icmp eq i32%H,0
br i1%I,label%O,label%J
J:
%K=bitcast i8*%E to i8**
%L=getelementptr inbounds i8,i8*%A,i64%s
%M=bitcast i8*%L to i8**
%N=load i8*,i8**%M,align 8
br label%Y
O:
%P=getelementptr inbounds i8,i8*%E,i64 12
%Q=bitcast i8*%P to i32*
%R=load i32,i32*%Q,align 4
%S=call i8*@sml_alloc(i32 inreg%R)#0
%T=getelementptr inbounds i8,i8*%S,i64 -4
%U=bitcast i8*%T to i32*
store i32%R,i32*%U,align 4
%V=load i8*,i8**%c,align 8
%W=getelementptr inbounds i8,i8*%V,i64%s
call void@llvm.memcpy.p0i8.p0i8.i32(i8*%S,i8*%W,i32%R,i1 false)
%X=load i8**,i8***%u,align 8
br label%Y
Y:
%Z=phi i8**[%X,%O],[%K,%J]
%aa=phi i8*[%V,%O],[%A,%J]
%ab=phi i8*[%S,%O],[%N,%J]
store i8*%ab,i8**%d,align 8
%ac=getelementptr inbounds i8,i8*%aa,i64%t
%ad=bitcast i8*%ac to i8**
%ae=load i8*,i8**%ad,align 8
store i8*%ae,i8**%c,align 8
%af=load i8*,i8**%Z,align 8
%ag=getelementptr inbounds i8,i8*%af,i64 16
%ah=bitcast i8*%ag to i8*(i8*,i8*)**
%ai=load i8*(i8*,i8*)*,i8*(i8*,i8*)**%ah,align 8
%aj=bitcast i8*%af to i8**
%ak=load i8*,i8**%aj,align 8
%al=call fastcc i8*%ai(i8*inreg%ak,i8*inreg%ab)
%am=bitcast i8*%al to i32*
%an=load i32,i32*%am,align 4
%ao=icmp eq i32%an,0
br i1%ao,label%aK,label%ap
ap:
store i8*null,i8**%c,align 8
%aq=load i8*,i8**%e,align 8
%ar=getelementptr inbounds i8,i8*%aq,i64 12
%as=bitcast i8*%ar to i32*
%at=load i32,i32*%as,align 4
store i8*null,i8**%e,align 8
%au=getelementptr inbounds i8,i8*%aq,i64 8
%av=bitcast i8*%au to i32*
%aw=load i32,i32*%av,align 4
%ax=call i8*@sml_alloc(i32 inreg%r)#0
%ay=or i32%n,1342177280
%az=getelementptr inbounds i8,i8*%ax,i64 -4
%aA=bitcast i8*%az to i32*
store i32%ay,i32*%aA,align 4
call void@llvm.memset.p0i8.i32(i8*%ax,i8 0,i32%r,i1 false)
%aB=icmp eq i32%aw,0
%aC=load i8*,i8**%d,align 8
%aD=getelementptr inbounds i8,i8*%ax,i64%s
br i1%aB,label%aE,label%aF
aE:
call void@llvm.memcpy.p0i8.p0i8.i32(i8*%aD,i8*%aC,i32%at,i1 false)
br label%aH
aF:
%aG=bitcast i8*%aD to i8**
store i8*%aC,i8**%aG,align 8
br label%aH
aH:
%aI=getelementptr inbounds i8,i8*%ax,i64%t
%aJ=bitcast i8*%aI to i32*
store i32%q,i32*%aJ,align 4
ret i8*%ax
aK:
store i8*null,i8**%d,align 8
br label%v
}
define internal fastcc i8*@_SMLLLN4List4findE_198(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*)*@_SMLLLN4List4findE_197 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*)*@_SMLLLN4List4findE_197 to void(...)*),void(...)**%C,align 8
%D=getelementptr inbounds i8,i8*%u,i64 24
%E=bitcast i8*%D to i32*
store i32 -2147483647,i32*%E,align 4
ret i8*%u
}
define fastcc i8*@_SMLFN4List4findE(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*)*@_SMLLLN4List4findE_198 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*)*@_SMLLLN4List4findE_198 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*@_SMLLLN4List6filterE_201(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=getelementptr inbounds i8,i8*%a,i64 12
%h=bitcast i8*%g to i32*
%i=load i32,i32*%h,align 4
%j=add i32%i,-1
%k=sub i32 0,%i
%l=and i32%j,%k
%m=add i32%i,7
%n=add i32%m,%l
%o=and i32%n,-8
%p=add i32%o,15
%q=and i32%p,-8
%r=lshr i32%n,3
%s=lshr i32%l,3
%t=sub nsw i32%r,%s
%u=shl i32 1,%t
%v=getelementptr inbounds i8,i8*%a,i64 8
%w=bitcast i8*%v to i32*
%x=load i32,i32*%w,align 4
%y=or i32%u,%x
%z=or i32%q,4
store i8*%b,i8**%c,align 8
%A=sext i32%l to i64
%B=sext i32%o to i64
%C=bitcast i8**%f to i8***
%D=or i32%q,1342177280
%E=sext i32%q to i64
br label%F
F:
%G=phi i8*[null,%H],[%bZ,%bY]
store i8*%G,i8**%d,align 8
%I=load atomic i32,i32*@sml_check_flag unordered,align 4
%J=icmp eq i32%I,0
br i1%J,label%L,label%K
K:
call void@sml_check(i32 inreg%I)
br label%L
L:
%M=load i8*,i8**%c,align 8
%N=icmp eq i8*%M,null
br i1%N,label%O,label%aX
O:
%P=load i8*,i8**%d,align 8
store i8*null,i8**%d,align 8
store i8*%P,i8**%c,align 8
br label%Q
Q:
%R=phi i8*[%aI,%aR],[null,%O]
store i8*%R,i8**%d,align 8
%S=load atomic i32,i32*@sml_check_flag unordered,align 4
%T=icmp eq i32%S,0
br i1%T,label%V,label%U
U:
call void@sml_check(i32 inreg%S)
br label%V
V:
%W=load i8*,i8**%c,align 8
%X=icmp eq i8*%W,null
br i1%X,label%Y,label%aa
Y:
%Z=load i8*,i8**%d,align 8
ret i8*%Z
aa:
%ab=load i8*,i8**%f,align 8
%ac=getelementptr inbounds i8,i8*%ab,i64 8
%ad=bitcast i8*%ac to i32*
%ae=load i32,i32*%ad,align 4
%af=icmp eq i32%ae,0
br i1%af,label%ak,label%ag
ag:
%ah=getelementptr inbounds i8,i8*%W,i64%A
%ai=bitcast i8*%ah to i8**
%aj=load i8*,i8**%ai,align 8
br label%ax
ak:
%al=getelementptr inbounds i8,i8*%ab,i64 12
%am=bitcast i8*%al to i32*
%an=load i32,i32*%am,align 4
%ao=call i8*@sml_alloc(i32 inreg%an)#0
%ap=getelementptr inbounds i8,i8*%ao,i64 -4
%aq=bitcast i8*%ap to i32*
store i32%an,i32*%aq,align 4
%ar=load i8*,i8**%c,align 8
%as=getelementptr inbounds i8,i8*%ar,i64%A
call void@llvm.memcpy.p0i8.p0i8.i32(i8*%ao,i8*%as,i32%an,i1 false)
%at=load i8*,i8**%f,align 8
%au=getelementptr inbounds i8,i8*%at,i64 8
%av=bitcast i8*%au to i32*
%aw=load i32,i32*%av,align 4
br label%ax
ax:
%ay=phi i32[%aw,%ak],[%ae,%ag]
%az=phi i8*[%at,%ak],[%ab,%ag]
%aA=phi i8*[%ar,%ak],[%W,%ag]
%aB=phi i8*[%ao,%ak],[%aj,%ag]
store i8*%aB,i8**%e,align 8
%aC=getelementptr inbounds i8,i8*%aA,i64%B
%aD=bitcast i8*%aC to i8**
%aE=load i8*,i8**%aD,align 8
store i8*%aE,i8**%c,align 8
%aF=getelementptr inbounds i8,i8*%az,i64 12
%aG=bitcast i8*%aF to i32*
%aH=load i32,i32*%aG,align 4
%aI=call i8*@sml_alloc(i32 inreg%z)#0
%aJ=getelementptr inbounds i8,i8*%aI,i64 -4
%aK=bitcast i8*%aJ to i32*
store i32%D,i32*%aK,align 4
call void@llvm.memset.p0i8.i32(i8*%aI,i8 0,i32%z,i1 false)
%aL=icmp eq i32%ay,0
%aM=load i8*,i8**%e,align 8
store i8*null,i8**%e,align 8
%aN=getelementptr inbounds i8,i8*%aI,i64%A
br i1%aL,label%aO,label%aP
aO:
call void@llvm.memcpy.p0i8.p0i8.i32(i8*%aN,i8*%aM,i32%aH,i1 false)
br label%aR
aP:
%aQ=bitcast i8*%aN to i8**
store i8*%aM,i8**%aQ,align 8
br label%aR
aR:
%aS=load i8*,i8**%d,align 8
store i8*null,i8**%d,align 8
%aT=getelementptr inbounds i8,i8*%aI,i64%B
%aU=bitcast i8*%aT to i8**
store i8*%aS,i8**%aU,align 8
%aV=getelementptr inbounds i8,i8*%aI,i64%E
%aW=bitcast i8*%aV to i32*
store i32%y,i32*%aW,align 4
br label%Q
aX:
%aY=load i8*,i8**%f,align 8
%aZ=getelementptr inbounds i8,i8*%aY,i64 8
%a0=bitcast i8*%aZ to i32*
%a1=load i32,i32*%a0,align 4
%a2=icmp eq i32%a1,0
br i1%a2,label%a8,label%a3
a3:
%a4=bitcast i8*%aY to i8**
%a5=getelementptr inbounds i8,i8*%M,i64%A
%a6=bitcast i8*%a5 to i8**
%a7=load i8*,i8**%a6,align 8
br label%bi
a8:
%a9=getelementptr inbounds i8,i8*%aY,i64 12
%ba=bitcast i8*%a9 to i32*
%bb=load i32,i32*%ba,align 4
%bc=call i8*@sml_alloc(i32 inreg%bb)#0
%bd=getelementptr inbounds i8,i8*%bc,i64 -4
%be=bitcast i8*%bd to i32*
store i32%bb,i32*%be,align 4
%bf=load i8*,i8**%c,align 8
%bg=getelementptr inbounds i8,i8*%bf,i64%A
call void@llvm.memcpy.p0i8.p0i8.i32(i8*%bc,i8*%bg,i32%bb,i1 false)
%bh=load i8**,i8***%C,align 8
br label%bi
bi:
%bj=phi i8**[%bh,%a8],[%a4,%a3]
%bk=phi i8*[%bf,%a8],[%M,%a3]
%bl=phi i8*[%bc,%a8],[%a7,%a3]
store i8*%bl,i8**%e,align 8
%bm=getelementptr inbounds i8,i8*%bk,i64%B
%bn=bitcast i8*%bm to i8**
%bo=load i8*,i8**%bn,align 8
store i8*%bo,i8**%c,align 8
%bp=load i8*,i8**%bj,align 8
%bq=getelementptr inbounds i8,i8*%bp,i64 16
%br=bitcast i8*%bq to i8*(i8*,i8*)**
%bs=load i8*(i8*,i8*)*,i8*(i8*,i8*)**%br,align 8
%bt=bitcast i8*%bp to i8**
%bu=load i8*,i8**%bt,align 8
%bv=call fastcc i8*%bs(i8*inreg%bu,i8*inreg%bl)
%bw=bitcast i8*%bv to i32*
%bx=load i32,i32*%bw,align 4
%by=icmp eq i32%bx,0
br i1%by,label%bW,label%bz
bz:
%bA=load i8*,i8**%f,align 8
%bB=getelementptr inbounds i8,i8*%bA,i64 12
%bC=bitcast i8*%bB to i32*
%bD=load i32,i32*%bC,align 4
%bE=getelementptr inbounds i8,i8*%bA,i64 8
%bF=bitcast i8*%bE to i32*
%bG=load i32,i32*%bF,align 4
%bH=call i8*@sml_alloc(i32 inreg%z)#0
%bI=getelementptr inbounds i8,i8*%bH,i64 -4
%bJ=bitcast i8*%bI to i32*
store i32%D,i32*%bJ,align 4
call void@llvm.memset.p0i8.i32(i8*%bH,i8 0,i32%z,i1 false)
%bK=icmp eq i32%bG,0
%bL=load i8*,i8**%e,align 8
store i8*null,i8**%e,align 8
%bM=getelementptr inbounds i8,i8*%bH,i64%A
br i1%bK,label%bN,label%bO
bN:
call void@llvm.memcpy.p0i8.p0i8.i32(i8*%bM,i8*%bL,i32%bD,i1 false)
br label%bQ
bO:
%bP=bitcast i8*%bM to i8**
store i8*%bL,i8**%bP,align 8
br label%bQ
bQ:
%bR=load i8*,i8**%d,align 8
store i8*null,i8**%d,align 8
%bS=getelementptr inbounds i8,i8*%bH,i64%B
%bT=bitcast i8*%bS to i8**
store i8*%bR,i8**%bT,align 8
%bU=getelementptr inbounds i8,i8*%bH,i64%E
%bV=bitcast i8*%bU to i32*
store i32%y,i32*%bV,align 4
br label%bY
bW:
store i8*null,i8**%e,align 8
%bX=load i8*,i8**%d,align 8
store i8*null,i8**%d,align 8
br label%bY
bY:
%bZ=phi i8*[%bH,%bQ],[%bX,%bW]
br label%F
}
define internal fastcc i8*@_SMLLLN4List6filterE_202(i8*inreg%a,i8*inreg%b)#3 gc"smlsharp"{
%c=alloca i8*,align 8
%d=alloca i8*,align 8
call void@llvm.gcroot(i8**%c,i8*null)#0
call void@llvm.gcroot(i8**%d,i8*null)#0
store i8*%b,i8**%c,align 8
%e=bitcast i8*%a to i32*
%f=load i32,i32*%e,align 4
%g=getelementptr inbounds i8,i8*%a,i64 4
%h=bitcast i8*%g to i32*
%i=load i32,i32*%h,align 4
%j=call i8*@sml_alloc(i32 inreg 20)#0
%k=getelementptr inbounds i8,i8*%j,i64 -4
%l=bitcast i8*%k to i32*
store i32 1342177296,i32*%l,align 4
store i8*%j,i8**%d,align 8
%m=load i8*,i8**%c,align 8
store i8*null,i8**%c,align 8
%n=bitcast i8*%j to i8**
store i8*%m,i8**%n,align 8
%o=getelementptr inbounds i8,i8*%j,i64 8
%p=bitcast i8*%o to i32*
store i32%f,i32*%p,align 4
%q=getelementptr inbounds i8,i8*%j,i64 12
%r=bitcast i8*%q to i32*
store i32%i,i32*%r,align 4
%s=getelementptr inbounds i8,i8*%j,i64 16
%t=bitcast i8*%s to i32*
store i32 1,i32*%t,align 4
%u=call i8*@sml_alloc(i32 inreg 28)#0
%v=getelementptr inbounds i8,i8*%u,i64 -4
%w=bitcast i8*%v to i32*
store i32 1342177304,i32*%w,align 4
%x=load i8*,i8**%d,align 8
%y=bitcast i8*%u to i8**
store i8*%x,i8**%y,align 8
%z=getelementptr inbounds i8,i8*%u,i64 8
%A=bitcast i8*%z to void(...)**
store void(...)*bitcast(i8*(i8*,i8*)*@_SMLLLN4List6filterE_201 to void(...)*),void(...)**%A,align 8
%B=getelementptr inbounds i8,i8*%u,i64 16
%C=bitcast i8*%B to void(...)**
store void(...)*bitcast(i8*(i8*,i8*)*@_SMLLLN4List6filterE_201 to void(...)*),void(...)**%C,align 8
%D=getelementptr inbounds i8,i8*%u,i64 24
%E=bitcast i8*%D to i32*
store i32 -2147483647,i32*%E,align 4
ret i8*%u
}
define fastcc i8*@_SMLFN4List6filterE(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*)*@_SMLLLN4List6filterE_202 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*)*@_SMLLLN4List6filterE_202 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*@_SMLLLN4List9partitionE_205(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
%g=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
call void@llvm.gcroot(i8**%g,i8*null)#0
store i8*%a,i8**%g,align 8
%h=getelementptr inbounds i8,i8*%a,i64 12
%i=bitcast i8*%h to i32*
%j=load i32,i32*%i,align 4
%k=add i32%j,-1
%l=sub i32 0,%j
%m=and i32%k,%l
%n=add i32%j,7
%o=add i32%n,%m
%p=and i32%o,-8
%q=add i32%p,15
%r=and i32%q,-8
%s=lshr i32%o,3
%t=lshr i32%m,3
%u=sub nsw i32%s,%t
%v=shl i32 1,%u
%w=getelementptr inbounds i8,i8*%a,i64 8
%x=bitcast i8*%w to i32*
%y=load i32,i32*%x,align 4
%z=or i32%v,%y
%A=or i32%r,4
store i8*%b,i8**%c,align 8
store i8*null,i8**%d,align 8
store i8*null,i8**%e,align 8
%B=sext i32%m to i64
%C=sext i32%p to i64
%D=bitcast i8**%g to i8***
%E=or i32%r,1342177280
%F=sext i32%r to i64
br label%G
G:
%H=load atomic i32,i32*@sml_check_flag unordered,align 4
%I=icmp eq i32%H,0
br i1%I,label%K,label%J
J:
call void@sml_check(i32 inreg%H)
br label%K
K:
%L=load i8*,i8**%c,align 8
%M=icmp eq i8*%L,null
br i1%M,label%N,label%b4
N:
%O=load i8*,i8**%d,align 8
store i8*null,i8**%d,align 8
store i8*%O,i8**%c,align 8
br label%P
P:
%Q=phi i8*[%aI,%aR],[null,%N]
store i8*%Q,i8**%d,align 8
%R=load atomic i32,i32*@sml_check_flag unordered,align 4
%S=icmp eq i32%R,0
br i1%S,label%U,label%T
T:
call void@sml_check(i32 inreg%R)
br label%U
U:
%V=load i8*,i8**%c,align 8
%W=icmp eq i8*%V,null
br i1%W,label%X,label%aa
X:
%Y=load i8*,i8**%d,align 8
store i8*null,i8**%d,align 8
store i8*%Y,i8**%f,align 8
%Z=load i8*,i8**%e,align 8
store i8*null,i8**%e,align 8
store i8*%Z,i8**%c,align 8
br label%aX
aa:
%ab=load i8*,i8**%g,align 8
%ac=getelementptr inbounds i8,i8*%ab,i64 8
%ad=bitcast i8*%ac to i32*
%ae=load i32,i32*%ad,align 4
%af=icmp eq i32%ae,0
br i1%af,label%ak,label%ag
ag:
%ah=getelementptr inbounds i8,i8*%V,i64%B
%ai=bitcast i8*%ah to i8**
%aj=load i8*,i8**%ai,align 8
br label%ax
ak:
%al=getelementptr inbounds i8,i8*%ab,i64 12
%am=bitcast i8*%al to i32*
%an=load i32,i32*%am,align 4
%ao=call i8*@sml_alloc(i32 inreg%an)#0
%ap=getelementptr inbounds i8,i8*%ao,i64 -4
%aq=bitcast i8*%ap to i32*
store i32%an,i32*%aq,align 4
%ar=load i8*,i8**%c,align 8
%as=getelementptr inbounds i8,i8*%ar,i64%B
call void@llvm.memcpy.p0i8.p0i8.i32(i8*%ao,i8*%as,i32%an,i1 false)
%at=load i8*,i8**%g,align 8
%au=getelementptr inbounds i8,i8*%at,i64 8
%av=bitcast i8*%au to i32*
%aw=load i32,i32*%av,align 4
br label%ax
ax:
%ay=phi i32[%aw,%ak],[%ae,%ag]
%az=phi i8*[%at,%ak],[%ab,%ag]
%aA=phi i8*[%ar,%ak],[%V,%ag]
%aB=phi i8*[%ao,%ak],[%aj,%ag]
store i8*%aB,i8**%f,align 8
%aC=getelementptr inbounds i8,i8*%aA,i64%C
%aD=bitcast i8*%aC to i8**
%aE=load i8*,i8**%aD,align 8
store i8*%aE,i8**%c,align 8
%aF=getelementptr inbounds i8,i8*%az,i64 12
%aG=bitcast i8*%aF to i32*
%aH=load i32,i32*%aG,align 4
%aI=call i8*@sml_alloc(i32 inreg%A)#0
%aJ=getelementptr inbounds i8,i8*%aI,i64 -4
%aK=bitcast i8*%aJ to i32*
store i32%E,i32*%aK,align 4
call void@llvm.memset.p0i8.i32(i8*%aI,i8 0,i32%A,i1 false)
%aL=icmp eq i32%ay,0
%aM=load i8*,i8**%f,align 8
store i8*null,i8**%f,align 8
%aN=getelementptr inbounds i8,i8*%aI,i64%B
br i1%aL,label%aO,label%aP
aO:
call void@llvm.memcpy.p0i8.p0i8.i32(i8*%aN,i8*%aM,i32%aH,i1 false)
br label%aR
aP:
%aQ=bitcast i8*%aN to i8**
store i8*%aM,i8**%aQ,align 8
br label%aR
aR:
%aS=load i8*,i8**%d,align 8
store i8*null,i8**%d,align 8
%aT=getelementptr inbounds i8,i8*%aI,i64%C
%aU=bitcast i8*%aT to i8**
store i8*%aS,i8**%aU,align 8
%aV=getelementptr inbounds i8,i8*%aI,i64%F
%aW=bitcast i8*%aV to i32*
store i32%z,i32*%aW,align 4
br label%P
aX:
%aY=phi i8*[%bP,%bY],[null,%X]
store i8*%aY,i8**%d,align 8
%aZ=load atomic i32,i32*@sml_check_flag unordered,align 4
%a0=icmp eq i32%aZ,0
br i1%a0,label%a2,label%a1
a1:
call void@sml_check(i32 inreg%aZ)
br label%a2
a2:
%a3=load i8*,i8**%c,align 8
%a4=icmp eq i8*%a3,null
br i1%a4,label%a5,label%bh
a5:
store i8*null,i8**%g,align 8
%a6=load i8*,i8**%d,align 8
store i8*null,i8**%d,align 8
store i8*%a6,i8**%c,align 8
%a7=call i8*@sml_alloc(i32 inreg 20)#0
%a8=getelementptr inbounds i8,i8*%a7,i64 -4
%a9=bitcast i8*%a8 to i32*
store i32 1342177296,i32*%a9,align 4
%ba=load i8*,i8**%f,align 8
%bb=bitcast i8*%a7 to i8**
store i8*%ba,i8**%bb,align 8
%bc=load i8*,i8**%c,align 8
%bd=getelementptr inbounds i8,i8*%a7,i64 8
%be=bitcast i8*%bd to i8**
store i8*%bc,i8**%be,align 8
%bf=getelementptr inbounds i8,i8*%a7,i64 16
%bg=bitcast i8*%bf to i32*
store i32 3,i32*%bg,align 4
ret i8*%a7
bh:
%bi=load i8*,i8**%g,align 8
%bj=getelementptr inbounds i8,i8*%bi,i64 8
%bk=bitcast i8*%bj to i32*
%bl=load i32,i32*%bk,align 4
%bm=icmp eq i32%bl,0
br i1%bm,label%br,label%bn
bn:
%bo=getelementptr inbounds i8,i8*%a3,i64%B
%bp=bitcast i8*%bo to i8**
%bq=load i8*,i8**%bp,align 8
br label%bE
br:
%bs=getelementptr inbounds i8,i8*%bi,i64 12
%bt=bitcast i8*%bs to i32*
%bu=load i32,i32*%bt,align 4
%bv=call i8*@sml_alloc(i32 inreg%bu)#0
%bw=getelementptr inbounds i8,i8*%bv,i64 -4
%bx=bitcast i8*%bw to i32*
store i32%bu,i32*%bx,align 4
%by=load i8*,i8**%c,align 8
%bz=getelementptr inbounds i8,i8*%by,i64%B
call void@llvm.memcpy.p0i8.p0i8.i32(i8*%bv,i8*%bz,i32%bu,i1 false)
%bA=load i8*,i8**%g,align 8
%bB=getelementptr inbounds i8,i8*%bA,i64 8
%bC=bitcast i8*%bB to i32*
%bD=load i32,i32*%bC,align 4
br label%bE
bE:
%bF=phi i32[%bD,%br],[%bl,%bn]
%bG=phi i8*[%bA,%br],[%bi,%bn]
%bH=phi i8*[%by,%br],[%a3,%bn]
%bI=phi i8*[%bv,%br],[%bq,%bn]
store i8*%bI,i8**%e,align 8
%bJ=getelementptr inbounds i8,i8*%bH,i64%C
%bK=bitcast i8*%bJ to i8**
%bL=load i8*,i8**%bK,align 8
store i8*%bL,i8**%c,align 8
%bM=getelementptr inbounds i8,i8*%bG,i64 12
%bN=bitcast i8*%bM to i32*
%bO=load i32,i32*%bN,align 4
%bP=call i8*@sml_alloc(i32 inreg%A)#0
%bQ=getelementptr inbounds i8,i8*%bP,i64 -4
%bR=bitcast i8*%bQ to i32*
store i32%E,i32*%bR,align 4
call void@llvm.memset.p0i8.i32(i8*%bP,i8 0,i32%A,i1 false)
%bS=icmp eq i32%bF,0
%bT=load i8*,i8**%e,align 8
store i8*null,i8**%e,align 8
%bU=getelementptr inbounds i8,i8*%bP,i64%B
br i1%bS,label%bV,label%bW
bV:
call void@llvm.memcpy.p0i8.p0i8.i32(i8*%bU,i8*%bT,i32%bO,i1 false)
br label%bY
bW:
%bX=bitcast i8*%bU to i8**
store i8*%bT,i8**%bX,align 8
br label%bY
bY:
%bZ=load i8*,i8**%d,align 8
store i8*null,i8**%d,align 8
%b0=getelementptr inbounds i8,i8*%bP,i64%C
%b1=bitcast i8*%b0 to i8**
store i8*%bZ,i8**%b1,align 8
%b2=getelementptr inbounds i8,i8*%bP,i64%F
%b3=bitcast i8*%b2 to i32*
store i32%z,i32*%b3,align 4
br label%aX
b4:
%b5=load i8*,i8**%g,align 8
%b6=getelementptr inbounds i8,i8*%b5,i64 8
%b7=bitcast i8*%b6 to i32*
%b8=load i32,i32*%b7,align 4
%b9=icmp eq i32%b8,0
br i1%b9,label%cf,label%ca
ca:
%cb=bitcast i8*%b5 to i8**
%cc=getelementptr inbounds i8,i8*%L,i64%B
%cd=bitcast i8*%cc to i8**
%ce=load i8*,i8**%cd,align 8
br label%cp
cf:
%cg=getelementptr inbounds i8,i8*%b5,i64 12
%ch=bitcast i8*%cg to i32*
%ci=load i32,i32*%ch,align 4
%cj=call i8*@sml_alloc(i32 inreg%ci)#0
%ck=getelementptr inbounds i8,i8*%cj,i64 -4
%cl=bitcast i8*%ck to i32*
store i32%ci,i32*%cl,align 4
%cm=load i8*,i8**%c,align 8
%cn=getelementptr inbounds i8,i8*%cm,i64%B
call void@llvm.memcpy.p0i8.p0i8.i32(i8*%cj,i8*%cn,i32%ci,i1 false)
%co=load i8**,i8***%D,align 8
br label%cp
cp:
%cq=phi i8**[%co,%cf],[%cb,%ca]
%cr=phi i8*[%cm,%cf],[%L,%ca]
%cs=phi i8*[%cj,%cf],[%ce,%ca]
store i8*%cs,i8**%f,align 8
%ct=getelementptr inbounds i8,i8*%cr,i64%C
%cu=bitcast i8*%ct to i8**
%cv=load i8*,i8**%cu,align 8
store i8*%cv,i8**%c,align 8
%cw=load i8*,i8**%cq,align 8
%cx=getelementptr inbounds i8,i8*%cw,i64 16
%cy=bitcast i8*%cx to i8*(i8*,i8*)**
%cz=load i8*(i8*,i8*)*,i8*(i8*,i8*)**%cy,align 8
%cA=bitcast i8*%cw to i8**
%cB=load i8*,i8**%cA,align 8
%cC=call fastcc i8*%cz(i8*inreg%cB,i8*inreg%cs)
%cD=bitcast i8*%cC to i32*
%cE=load i32,i32*%cD,align 4
%cF=icmp eq i32%cE,0
%cG=load i8*,i8**%g,align 8
%cH=getelementptr inbounds i8,i8*%cG,i64 12
%cI=bitcast i8*%cH to i32*
%cJ=load i32,i32*%cI,align 4
%cK=getelementptr inbounds i8,i8*%cG,i64 8
%cL=bitcast i8*%cK to i32*
%cM=load i32,i32*%cL,align 4
%cN=call i8*@sml_alloc(i32 inreg%A)#0
%cO=getelementptr inbounds i8,i8*%cN,i64 -4
%cP=bitcast i8*%cO to i32*
store i32%E,i32*%cP,align 4
call void@llvm.memset.p0i8.i32(i8*%cN,i8 0,i32%A,i1 false)
%cQ=icmp eq i32%cM,0
%cR=load i8*,i8**%f,align 8
store i8*null,i8**%f,align 8
%cS=getelementptr inbounds i8,i8*%cN,i64%B
br i1%cF,label%c4,label%cT
cT:
br i1%cQ,label%cU,label%cV
cU:
call void@llvm.memcpy.p0i8.p0i8.i32(i8*%cS,i8*%cR,i32%cJ,i1 false)
br label%cX
cV:
%cW=bitcast i8*%cS to i8**
store i8*%cR,i8**%cW,align 8
br label%cX
cX:
%cY=load i8*,i8**%d,align 8
%cZ=getelementptr inbounds i8,i8*%cN,i64%C
%c0=bitcast i8*%cZ to i8**
store i8*%cY,i8**%c0,align 8
%c1=getelementptr inbounds i8,i8*%cN,i64%F
%c2=bitcast i8*%c1 to i32*
store i32%z,i32*%c2,align 4
store i8*%cN,i8**%d,align 8
br label%c3
c3:
br label%G
c4:
br i1%cQ,label%c5,label%c6
c5:
call void@llvm.memcpy.p0i8.p0i8.i32(i8*%cS,i8*%cR,i32%cJ,i1 false)
br label%c8
c6:
%c7=bitcast i8*%cS to i8**
store i8*%cR,i8**%c7,align 8
br label%c8
c8:
%c9=load i8*,i8**%e,align 8
%da=getelementptr inbounds i8,i8*%cN,i64%C
%db=bitcast i8*%da to i8**
store i8*%c9,i8**%db,align 8
%dc=getelementptr inbounds i8,i8*%cN,i64%F
%dd=bitcast i8*%dc to i32*
store i32%z,i32*%dd,align 4
store i8*%cN,i8**%e,align 8
br label%c3
}
define internal fastcc i8*@_SMLLLN4List9partitionE_206(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*)*@_SMLLLN4List9partitionE_205 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*)*@_SMLLLN4List9partitionE_205 to void(...)*),void(...)**%C,align 8
%D=getelementptr inbounds i8,i8*%u,i64 24
%E=bitcast i8*%D to i32*
store i32 -2147483647,i32*%E,align 4
ret i8*%u
}
define fastcc i8*@_SMLFN4List9partitionE(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*)*@_SMLLLN4List9partitionE_206 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*)*@_SMLLLN4List9partitionE_206 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*@_SMLLLN4List5foldlE_209(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
%f=alloca i8*,align 8
%g=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
call void@llvm.gcroot(i8**%g,i8*null)#0
store i8*%a,i8**%f,align 8
store i8*%b,i8**%c,align 8
%h=load atomic i32,i32*@sml_check_flag unordered,align 4
%i=icmp eq i32%h,0
br i1%i,label%l,label%j
j:
call void@sml_check(i32 inreg%h)
%k=load i8*,i8**%f,align 8
br label%l
l:
%m=phi i8*[%k,%j],[%a,%n]
%o=getelementptr inbounds i8,i8*%m,i64 20
%p=bitcast i8*%o to i32*
%q=load i32,i32*%p,align 4
%r=add i32%q,-1
%s=sub i32 0,%q
%t=and i32%r,%s
%u=add i32%t,%q
%v=add i32%u,7
%w=and i32%v,-8
%x=getelementptr inbounds i8,i8*%m,i64 28
%y=bitcast i8*%x to i32*
%z=load i32,i32*%y,align 4
%A=add i32%z,-1
%B=add i32%A,%u
%C=sub i32 0,%z
%D=and i32%B,%C
%E=add i32%z,7
%F=add i32%E,%D
%G=and i32%F,-8
%H=lshr i32%D,3
%I=lshr i32%t,3
%J=sub nsw i32%H,%I
%K=getelementptr inbounds i8,i8*%m,i64 24
%L=bitcast i8*%K to i32*
%M=load i32,i32*%L,align 4
%N=shl i32%M,%J
%O=getelementptr inbounds i8,i8*%m,i64 16
%P=bitcast i8*%O to i32*
%Q=load i32,i32*%P,align 4
%R=or i32%N,%Q
%S=or i32%G,4
%T=icmp eq i32%M,0
br i1%T,label%Y,label%U
U:
%V=getelementptr inbounds i8,i8*%m,i64 8
%W=bitcast i8*%V to i8**
%X=load i8*,i8**%W,align 8
br label%ae
Y:
%Z=call i8*@sml_alloc(i32 inreg%z)#0
%aa=getelementptr inbounds i8,i8*%Z,i64 -4
%ab=bitcast i8*%aa to i32*
store i32%z,i32*%ab,align 4
%ac=load i8*,i8**%f,align 8
%ad=getelementptr inbounds i8,i8*%ac,i64 8
call void@llvm.memcpy.p0i8.p0i8.i32(i8*%Z,i8*%ad,i32%z,i1 false)
br label%ae
ae:
%af=phi i8*[%X,%U],[%Z,%Y]
%ag=load i8*,i8**%c,align 8
%ah=sext i32%t to i64
%ai=sext i32%w to i64
%aj=bitcast i8**%f to i8***
%ak=or i32%G,1342177280
%al=sext i32%D to i64
%am=sext i32%G to i64
br label%an
an:
%ao=phi i8*[%bA,%bv],[%ag,%ae]
%ap=phi i8*[%bz,%bv],[%af,%ae]
store i8*%ap,i8**%d,align 8
%aq=icmp eq i8*%ao,null
br i1%aq,label%ar,label%as
ar:
ret i8*%ap
as:
%at=load i8*,i8**%f,align 8
%au=getelementptr inbounds i8,i8*%at,i64 16
%av=bitcast i8*%au to i32*
%aw=load i32,i32*%av,align 4
%ax=icmp eq i32%aw,0
br i1%ax,label%aD,label%ay
ay:
%az=bitcast i8*%at to i8**
%aA=getelementptr inbounds i8,i8*%ao,i64%ah
%aB=bitcast i8*%aA to i8**
%aC=load i8*,i8**%aB,align 8
br label%aR
aD:
%aE=getelementptr inbounds i8,i8*%at,i64 20
%aF=bitcast i8*%aE to i32*
%aG=load i32,i32*%aF,align 4
%aH=call i8*@sml_alloc(i32 inreg%aG)#0
%aI=getelementptr inbounds i8,i8*%aH,i64 -4
%aJ=bitcast i8*%aI to i32*
store i32%aG,i32*%aJ,align 4
%aK=load i8*,i8**%c,align 8
%aL=getelementptr inbounds i8,i8*%aK,i64%ah
call void@llvm.memcpy.p0i8.p0i8.i32(i8*%aH,i8*%aL,i32%aG,i1 false)
%aM=load i8**,i8***%aj,align 8
%aN=bitcast i8**%aM to i8*
%aO=getelementptr inbounds i8*,i8**%aM,i64 2
%aP=bitcast i8**%aO to i32*
%aQ=load i32,i32*%aP,align 4
br label%aR
aR:
%aS=phi i32[%aQ,%aD],[%aw,%ay]
%aT=phi i8*[%aN,%aD],[%at,%ay]
%aU=phi i8**[%aM,%aD],[%az,%ay]
%aV=phi i8*[%aK,%aD],[%ao,%ay]
%aW=phi i8*[%aH,%aD],[%aC,%ay]
store i8*%aW,i8**%e,align 8
%aX=getelementptr inbounds i8,i8*%aV,i64%ai
%aY=bitcast i8*%aX to i8**
%aZ=load i8*,i8**%aY,align 8
store i8*%aZ,i8**%g,align 8
%a0=load i8*,i8**%aU,align 8
%a1=getelementptr inbounds i8,i8*%a0,i64 16
%a2=bitcast i8*%a1 to i8*(i8*,i8*)**
%a3=load i8*(i8*,i8*)*,i8*(i8*,i8*)**%a2,align 8
%a4=bitcast i8*%a0 to i8**
%a5=load i8*,i8**%a4,align 8
store i8*%a5,i8**%c,align 8
%a6=getelementptr inbounds i8,i8*%aT,i64 20
%a7=bitcast i8*%a6 to i32*
%a8=load i32,i32*%a7,align 4
%a9=getelementptr inbounds i8,i8*%aT,i64 28
%ba=bitcast i8*%a9 to i32*
%bb=load i32,i32*%ba,align 4
%bc=getelementptr inbounds i8,i8*%aT,i64 24
%bd=bitcast i8*%bc to i32*
%be=load i32,i32*%bd,align 4
%bf=call i8*@sml_alloc(i32 inreg%S)#0
%bg=getelementptr inbounds i8,i8*%bf,i64 -4
%bh=bitcast i8*%bg to i32*
store i32%ak,i32*%bh,align 4
call void@llvm.memset.p0i8.i32(i8*%bf,i8 0,i32%S,i1 false)
%bi=icmp eq i32%aS,0
%bj=load i8*,i8**%e,align 8
store i8*null,i8**%e,align 8
%bk=getelementptr inbounds i8,i8*%bf,i64%ah
br i1%bi,label%bl,label%bm
bl:
call void@llvm.memcpy.p0i8.p0i8.i32(i8*%bk,i8*%bj,i32%a8,i1 false)
br label%bo
bm:
%bn=bitcast i8*%bk to i8**
store i8*%bj,i8**%bn,align 8
br label%bo
bo:
%bp=icmp eq i32%be,0
%bq=load i8*,i8**%d,align 8
store i8*null,i8**%d,align 8
%br=getelementptr inbounds i8,i8*%bf,i64%al
br i1%bp,label%bs,label%bt
bs:
call void@llvm.memcpy.p0i8.p0i8.i32(i8*%br,i8*%bq,i32%bb,i1 false)
br label%bv
bt:
%bu=bitcast i8*%br to i8**
store i8*%bq,i8**%bu,align 8
br label%bv
bv:
%bw=getelementptr inbounds i8,i8*%bf,i64%am
%bx=bitcast i8*%bw to i32*
store i32%R,i32*%bx,align 4
%by=load i8*,i8**%c,align 8
store i8*null,i8**%c,align 8
%bz=call fastcc i8*%a3(i8*inreg%by,i8*inreg%bf)
%bA=load i8*,i8**%g,align 8
store i8*null,i8**%g,align 8
store i8*%bA,i8**%c,align 8
br label%an
}
define internal fastcc i8*@_SMLLLN4List5foldlE_210(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 16
%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 20
%n=bitcast i8*%m to i32*
%o=load i32,i32*%n,align 4
%p=getelementptr inbounds i8,i8*%a,i64 8
%q=bitcast i8*%p to i32*
%r=load i32,i32*%q,align 4
%s=getelementptr inbounds i8,i8*%a,i64 12
%t=bitcast i8*%s to i32*
%u=load i32,i32*%t,align 4
%v=call i8*@sml_alloc(i32 inreg 36)#0
%w=getelementptr inbounds i8,i8*%v,i64 -4
%x=bitcast i8*%w to i32*
store i32 1342177312,i32*%x,align 4
store i8*%v,i8**%e,align 8
%y=load i8*,i8**%d,align 8
store i8*null,i8**%d,align 8
%z=bitcast i8*%v to i8**
store i8*%y,i8**%z,align 8
%A=icmp eq i32%h,0
%B=load i8*,i8**%c,align 8
store i8*null,i8**%c,align 8
%C=getelementptr inbounds i8,i8*%v,i64 8
br i1%A,label%D,label%E
D:
call void@llvm.memcpy.p0i8.p0i8.i32(i8*%C,i8*%B,i32%o,i1 false)
br label%G
E:
%F=bitcast i8*%C to i8**
store i8*%B,i8**%F,align 8
br label%G
G:
%H=getelementptr inbounds i8,i8*%v,i64 16
%I=bitcast i8*%H to i32*
store i32%r,i32*%I,align 4
%J=getelementptr inbounds i8,i8*%v,i64 20
%K=bitcast i8*%J to i32*
store i32%u,i32*%K,align 4
%L=getelementptr inbounds i8,i8*%v,i64 24
%M=bitcast i8*%L to i32*
store i32%h,i32*%M,align 4
%N=getelementptr inbounds i8,i8*%v,i64 28
%O=bitcast i8*%N to i32*
store i32%o,i32*%O,align 4
%P=getelementptr inbounds i8,i8*%v,i64 32
%Q=bitcast i8*%P to i32*
store i32%j,i32*%Q,align 4
%R=call i8*@sml_alloc(i32 inreg 28)#0
%S=getelementptr inbounds i8,i8*%R,i64 -4
%T=bitcast i8*%S to i32*
store i32 1342177304,i32*%T,align 4
%U=load i8*,i8**%e,align 8
%V=bitcast i8*%R to i8**
store i8*%U,i8**%V,align 8
%W=getelementptr inbounds i8,i8*%R,i64 8
%X=bitcast i8*%W to void(...)**
store void(...)*bitcast(i8*(i8*,i8*)*@_SMLLLN4List5foldlE_209 to void(...)*),void(...)**%X,align 8
%Y=getelementptr inbounds i8,i8*%R,i64 16
%Z=bitcast i8*%Y to void(...)**
store void(...)*bitcast(i8*(i8*,i8*)*@_SMLLLN4List5foldlE_209 to void(...)*),void(...)**%Z,align 8
%aa=getelementptr inbounds i8,i8*%R,i64 24
%ab=bitcast i8*%aa to i32*
store i32 1,i32*%ab,align 4
ret i8*%R
}
define internal fastcc i8*@_SMLLLN4List5foldlE_211(i8*inreg%a,i8*inreg%b)#3 gc"smlsharp"{
%c=alloca i8*,align 8
%d=alloca i8*,align 8
call void@llvm.gcroot(i8**%c,i8*null)#0
call void@llvm.gcroot(i8**%d,i8*null)#0
store i8*%b,i8**%c,align 8
%e=bitcast i8*%a to i32*
%f=load i32,i32*%e,align 4
%g=getelementptr inbounds i8,i8*%a,i64 4
%h=bitcast i8*%g to i32*
%i=load i32,i32*%h,align 4
%j=getelementptr inbounds i8,i8*%a,i64 8
%k=bitcast i8*%j to i32*
%l=load i32,i32*%k,align 4
%m=getelementptr inbounds i8,i8*%a,i64 12
%n=bitcast i8*%m to i32*
%o=load i32,i32*%n,align 4
%p=call i8*@sml_alloc(i32 inreg 28)#0
%q=getelementptr inbounds i8,i8*%p,i64 -4
%r=bitcast i8*%q to i32*
store i32 1342177304,i32*%r,align 4
store i8*%p,i8**%d,align 8
%s=load i8*,i8**%c,align 8
store i8*null,i8**%c,align 8
%t=bitcast i8*%p to i8**
store i8*%s,i8**%t,align 8
%u=getelementptr inbounds i8,i8*%p,i64 8
%v=bitcast i8*%u to i32*
store i32%f,i32*%v,align 4
%w=getelementptr inbounds i8,i8*%p,i64 12
%x=bitcast i8*%w to i32*
store i32%i,i32*%x,align 4
%y=getelementptr inbounds i8,i8*%p,i64 16
%z=bitcast i8*%y to i32*
store i32%l,i32*%z,align 4
%A=getelementptr inbounds i8,i8*%p,i64 20
%B=bitcast i8*%A to i32*
store i32%o,i32*%B,align 4
%C=getelementptr inbounds i8,i8*%p,i64 24
%D=bitcast i8*%C to i32*
store i32 1,i32*%D,align 4
%E=call i8*@sml_alloc(i32 inreg 28)#0
%F=getelementptr inbounds i8,i8*%E,i64 -4
%G=bitcast i8*%F to i32*
store i32 1342177304,i32*%G,align 4
%H=load i8*,i8**%d,align 8
%I=bitcast i8*%E to i8**
store i8*%H,i8**%I,align 8
%J=getelementptr inbounds i8,i8*%E,i64 8
%K=bitcast i8*%J to void(...)**
store void(...)*bitcast(i8*(i8*,i8*)*@_SMLLLN4List5foldlE_210 to void(...)*),void(...)**%K,align 8
%L=getelementptr inbounds i8,i8*%E,i64 16
%M=bitcast i8*%L to void(...)**
store void(...)*bitcast(i8*(i8*,i8*)*@_SMLLLN4List5foldlE_210 to void(...)*),void(...)**%M,align 8
%N=getelementptr inbounds i8,i8*%E,i64 24
%O=bitcast i8*%N to i32*
store i32 1,i32*%O,align 4
ret i8*%E
}
define fastcc i8*@_SMLFN4List5foldlE(i32 inreg%a,i32 inreg%b,i32 inreg%c,i32 inreg%d)#3 gc"smlsharp"{
%e=alloca i8*,align 8
call void@llvm.gcroot(i8**%e,i8*null)#0
%f=call i8*@sml_alloc(i32 inreg 20)#0
%g=bitcast i8*%f to i32*
%h=getelementptr inbounds i8,i8*%f,i64 -4
%i=bitcast i8*%h to i32*
store i32 1342177296,i32*%i,align 4
store i8*%f,i8**%e,align 8
store i32%a,i32*%g,align 4
%j=getelementptr inbounds i8,i8*%f,i64 4
%k=bitcast i8*%j to i32*
store i32%b,i32*%k,align 4
%l=getelementptr inbounds i8,i8*%f,i64 8
%m=bitcast i8*%l to i32*
store i32%c,i32*%m,align 4
%n=getelementptr inbounds i8,i8*%f,i64 12
%o=bitcast i8*%n to i32*
store i32%d,i32*%o,align 4
%p=getelementptr inbounds i8,i8*%f,i64 16
%q=bitcast i8*%p to i32*
store i32 0,i32*%q,align 4
%r=call i8*@sml_alloc(i32 inreg 28)#0
%s=getelementptr inbounds i8,i8*%r,i64 -4
%t=bitcast i8*%s to i32*
store i32 1342177304,i32*%t,align 4
%u=load i8*,i8**%e,align 8
%v=bitcast i8*%r to i8**
store i8*%u,i8**%v,align 8
%w=getelementptr inbounds i8,i8*%r,i64 8
%x=bitcast i8*%w to void(...)**
store void(...)*bitcast(i8*(i8*,i8*)*@_SMLLLN4List5foldlE_211 to void(...)*),void(...)**%x,align 8
%y=getelementptr inbounds i8,i8*%r,i64 16
%z=bitcast i8*%y to void(...)**
store void(...)*bitcast(i8*(i8*,i8*)*@_SMLLLN4List5foldlE_211 to void(...)*),void(...)**%z,align 8
%A=getelementptr inbounds i8,i8*%r,i64 24
%B=bitcast i8*%A to i32*
store i32 -2147483647,i32*%B,align 4
ret i8*%r
}
define internal fastcc i8*@_SMLLLN4List5foldrE_214(i8*inreg%a,i8*inreg%b)#4 gc"smlsharp"{
X:
%c=alloca i8*,align 8
%d=alloca i8*,align 8
%e=alloca i8*,align 8
%f=alloca i8*,align 8
%g=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
call void@llvm.gcroot(i8**%g,i8*null)#0
store i8*%a,i8**%f,align 8
%h=getelementptr inbounds i8,i8*%a,i64 20
%i=bitcast i8*%h to i32*
%j=load i32,i32*%i,align 4
%k=add i32%j,-1
%l=sub i32 0,%j
%m=and i32%k,%l
%n=add i32%m,%j
%o=add i32%n,7
%p=and i32%o,-8
%q=add i32%p,15
%r=and i32%q,-8
%s=lshr i32%o,3
%t=lshr i32%m,3
%u=sub nsw i32%s,%t
%v=shl i32 1,%u
%w=getelementptr inbounds i8,i8*%a,i64 16
%x=bitcast i8*%w to i32*
%y=load i32,i32*%x,align 4
%z=or i32%v,%y
%A=or i32%r,4
%B=getelementptr inbounds i8,i8*%a,i64 28
%C=bitcast i8*%B to i32*
%D=load i32,i32*%C,align 4
%E=add i32%D,-1
%F=add i32%E,%n
%G=sub i32 0,%D
%H=and i32%F,%G
%I=add i32%D,7
%J=add i32%I,%H
%K=lshr i32%H,3
%L=sub nsw i32%K,%t
%M=getelementptr inbounds i8,i8*%a,i64 24
%N=bitcast i8*%M to i32*
%O=load i32,i32*%N,align 4
%P=shl i32%O,%L
%Q=or i32%P,%y
store i8*%b,i8**%c,align 8
%R=sext i32%m to i64
%S=sext i32%p to i64
%T=or i32%r,1342177280
%U=sext i32%r to i64
br label%V
V:
%W=phi i8*[%aV,%a4],[null,%X]
store i8*%W,i8**%d,align 8
%Y=load atomic i32,i32*@sml_check_flag unordered,align 4
%Z=icmp eq i32%Y,0
br i1%Z,label%ab,label%aa
aa:
call void@sml_check(i32 inreg%Y)
br label%ab
ab:
%ac=load i8*,i8**%c,align 8
%ad=icmp eq i8*%ac,null
br i1%ad,label%ae,label%an
ae:
%af=and i32%J,-8
%ag=or i32%af,4
%ah=load i8*,i8**%d,align 8
store i8*null,i8**%d,align 8
store i8*%ah,i8**%c,align 8
%ai=load i8*,i8**%f,align 8
%aj=getelementptr inbounds i8,i8*%ai,i64 24
%ak=bitcast i8*%aj to i32*
%al=load i32,i32*%ak,align 4
%am=icmp eq i32%al,0
br i1%am,label%be,label%ba
an:
%ao=load i8*,i8**%f,align 8
%ap=getelementptr inbounds i8,i8*%ao,i64 16
%aq=bitcast i8*%ap to i32*
%ar=load i32,i32*%aq,align 4
%as=icmp eq i32%ar,0
br i1%as,label%ax,label%at
at:
%au=getelementptr inbounds i8,i8*%ac,i64%R
%av=bitcast i8*%au to i8**
%aw=load i8*,i8**%av,align 8
br label%aK
ax:
%ay=getelementptr inbounds i8,i8*%ao,i64 20
%az=bitcast i8*%ay to i32*
%aA=load i32,i32*%az,align 4
%aB=call i8*@sml_alloc(i32 inreg%aA)#0
%aC=getelementptr inbounds i8,i8*%aB,i64 -4
%aD=bitcast i8*%aC to i32*
store i32%aA,i32*%aD,align 4
%aE=load i8*,i8**%c,align 8
%aF=getelementptr inbounds i8,i8*%aE,i64%R
call void@llvm.memcpy.p0i8.p0i8.i32(i8*%aB,i8*%aF,i32%aA,i1 false)
%aG=load i8*,i8**%f,align 8
%aH=getelementptr inbounds i8,i8*%aG,i64 16
%aI=bitcast i8*%aH to i32*
%aJ=load i32,i32*%aI,align 4
br label%aK
aK:
%aL=phi i32[%aJ,%ax],[%ar,%at]
%aM=phi i8*[%aG,%ax],[%ao,%at]
%aN=phi i8*[%aE,%ax],[%ac,%at]
%aO=phi i8*[%aB,%ax],[%aw,%at]
store i8*%aO,i8**%e,align 8
%aP=getelementptr inbounds i8,i8*%aN,i64%S
%aQ=bitcast i8*%aP to i8**
%aR=load i8*,i8**%aQ,align 8
store i8*%aR,i8**%c,align 8
%aS=getelementptr inbounds i8,i8*%aM,i64 20
%aT=bitcast i8*%aS to i32*
%aU=load i32,i32*%aT,align 4
%aV=call i8*@sml_alloc(i32 inreg%A)#0
%aW=getelementptr inbounds i8,i8*%aV,i64 -4
%aX=bitcast i8*%aW to i32*
store i32%T,i32*%aX,align 4
call void@llvm.memset.p0i8.i32(i8*%aV,i8 0,i32%A,i1 false)
%aY=icmp eq i32%aL,0
%aZ=load i8*,i8**%e,align 8
store i8*null,i8**%e,align 8
%a0=getelementptr inbounds i8,i8*%aV,i64%R
br i1%aY,label%a1,label%a2
a1:
call void@llvm.memcpy.p0i8.p0i8.i32(i8*%a0,i8*%aZ,i32%aU,i1 false)
br label%a4
a2:
%a3=bitcast i8*%a0 to i8**
store i8*%aZ,i8**%a3,align 8
br label%a4
a4:
%a5=load i8*,i8**%d,align 8
store i8*null,i8**%d,align 8
%a6=getelementptr inbounds i8,i8*%aV,i64%S
%a7=bitcast i8*%a6 to i8**
store i8*%a5,i8**%a7,align 8
%a8=getelementptr inbounds i8,i8*%aV,i64%U
%a9=bitcast i8*%a8 to i32*
store i32%z,i32*%a9,align 4
br label%V
ba:
%bb=getelementptr inbounds i8,i8*%ai,i64 8
%bc=bitcast i8*%bb to i8**
%bd=load i8*,i8**%bc,align 8
br label%bn
be:
%bf=getelementptr inbounds i8,i8*%ai,i64 28
%bg=bitcast i8*%bf to i32*
%bh=load i32,i32*%bg,align 4
%bi=call i8*@sml_alloc(i32 inreg%bh)#0
%bj=getelementptr inbounds i8,i8*%bi,i64 -4
%bk=bitcast i8*%bj to i32*
store i32%bh,i32*%bk,align 4
%bl=load i8*,i8**%f,align 8
%bm=getelementptr inbounds i8,i8*%bl,i64 8
call void@llvm.memcpy.p0i8.p0i8.i32(i8*%bi,i8*%bm,i32%bh,i1 false)
br label%bn
bn:
%bo=phi i8*[%bd,%ba],[%bi,%be]
%bp=bitcast i8**%f to i8***
%bq=or i32%af,1342177280
%br=sext i32%H to i64
%bs=sext i32%af to i64
br label%bt
bt:
%bu=phi i8*[%cK,%cG],[%bo,%bn]
store i8*%bu,i8**%d,align 8
%bv=load atomic i32,i32*@sml_check_flag unordered,align 4
%bw=icmp eq i32%bv,0
br i1%bw,label%by,label%bx
bx:
call void@sml_check(i32 inreg%bv)
br label%by
by:
%bz=load i8*,i8**%c,align 8
%bA=icmp eq i8*%bz,null
br i1%bA,label%bB,label%bD
bB:
%bC=load i8*,i8**%d,align 8
ret i8*%bC
bD:
%bE=load i8*,i8**%f,align 8
%bF=getelementptr inbounds i8,i8*%bE,i64 16
%bG=bitcast i8*%bF to i32*
%bH=load i32,i32*%bG,align 4
%bI=icmp eq i32%bH,0
br i1%bI,label%bO,label%bJ
bJ:
%bK=bitcast i8*%bE to i8**
%bL=getelementptr inbounds i8,i8*%bz,i64%R
%bM=bitcast i8*%bL to i8**
%bN=load i8*,i8**%bM,align 8
br label%b2
bO:
%bP=getelementptr inbounds i8,i8*%bE,i64 20
%bQ=bitcast i8*%bP to i32*
%bR=load i32,i32*%bQ,align 4
%bS=call i8*@sml_alloc(i32 inreg%bR)#0
%bT=getelementptr inbounds i8,i8*%bS,i64 -4
%bU=bitcast i8*%bT to i32*
store i32%bR,i32*%bU,align 4
%bV=load i8*,i8**%c,align 8
%bW=getelementptr inbounds i8,i8*%bV,i64%R
call void@llvm.memcpy.p0i8.p0i8.i32(i8*%bS,i8*%bW,i32%bR,i1 false)
%bX=load i8**,i8***%bp,align 8
%bY=bitcast i8**%bX to i8*
%bZ=getelementptr inbounds i8*,i8**%bX,i64 2
%b0=bitcast i8**%bZ to i32*
%b1=load i32,i32*%b0,align 4
br label%b2
b2:
%b3=phi i32[%b1,%bO],[%bH,%bJ]
%b4=phi i8*[%bY,%bO],[%bE,%bJ]
%b5=phi i8**[%bX,%bO],[%bK,%bJ]
%b6=phi i8*[%bV,%bO],[%bz,%bJ]
%b7=phi i8*[%bS,%bO],[%bN,%bJ]
store i8*%b7,i8**%e,align 8
%b8=getelementptr inbounds i8,i8*%b6,i64%S
%b9=bitcast i8*%b8 to i8**
%ca=load i8*,i8**%b9,align 8
store i8*%ca,i8**%g,align 8
%cb=load i8*,i8**%b5,align 8
%cc=getelementptr inbounds i8,i8*%cb,i64 16
%cd=bitcast i8*%cc to i8*(i8*,i8*)**
%ce=load i8*(i8*,i8*)*,i8*(i8*,i8*)**%cd,align 8
%cf=bitcast i8*%cb to i8**
%cg=load i8*,i8**%cf,align 8
store i8*%cg,i8**%c,align 8
%ch=getelementptr inbounds i8,i8*%b4,i64 20
%ci=bitcast i8*%ch to i32*
%cj=load i32,i32*%ci,align 4
%ck=getelementptr inbounds i8,i8*%b4,i64 28
%cl=bitcast i8*%ck to i32*
%cm=load i32,i32*%cl,align 4
%cn=getelementptr inbounds i8,i8*%b4,i64 24
%co=bitcast i8*%cn to i32*
%cp=load i32,i32*%co,align 4
%cq=call i8*@sml_alloc(i32 inreg%ag)#0
%cr=getelementptr inbounds i8,i8*%cq,i64 -4
%cs=bitcast i8*%cr to i32*
store i32%bq,i32*%cs,align 4
call void@llvm.memset.p0i8.i32(i8*%cq,i8 0,i32%ag,i1 false)
%ct=icmp eq i32%b3,0
%cu=load i8*,i8**%e,align 8
store i8*null,i8**%e,align 8
%cv=getelementptr inbounds i8,i8*%cq,i64%R
br i1%ct,label%cw,label%cx
cw:
call void@llvm.memcpy.p0i8.p0i8.i32(i8*%cv,i8*%cu,i32%cj,i1 false)
br label%cz
cx:
%cy=bitcast i8*%cv to i8**
store i8*%cu,i8**%cy,align 8
br label%cz
cz:
%cA=icmp eq i32%cp,0
%cB=load i8*,i8**%d,align 8
store i8*null,i8**%d,align 8
%cC=getelementptr inbounds i8,i8*%cq,i64%br
br i1%cA,label%cD,label%cE
cD:
call void@llvm.memcpy.p0i8.p0i8.i32(i8*%cC,i8*%cB,i32%cm,i1 false)
br label%cG
cE:
%cF=bitcast i8*%cC to i8**
store i8*%cB,i8**%cF,align 8
br label%cG
cG:
%cH=getelementptr inbounds i8,i8*%cq,i64%bs
%cI=bitcast i8*%cH to i32*
store i32%Q,i32*%cI,align 4
%cJ=load i8*,i8**%c,align 8
store i8*null,i8**%c,align 8
%cK=call fastcc i8*%ce(i8*inreg%cJ,i8*inreg%cq)
%cL=load i8*,i8**%g,align 8
store i8*null,i8**%g,align 8
store i8*%cL,i8**%c,align 8
br label%bt
}
define internal fastcc i8*@_SMLLLN4List5foldrE_215(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 16
%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 20
%n=bitcast i8*%m to i32*
%o=load i32,i32*%n,align 4
%p=getelementptr inbounds i8,i8*%a,i64 8
%q=bitcast i8*%p to i32*
%r=load i32,i32*%q,align 4
%s=getelementptr inbounds i8,i8*%a,i64 12
%t=bitcast i8*%s to i32*
%u=load i32,i32*%t,align 4
%v=call i8*@sml_alloc(i32 inreg 36)#0
%w=getelementptr inbounds i8,i8*%v,i64 -4
%x=bitcast i8*%w to i32*
store i32 1342177312,i32*%x,align 4
store i8*%v,i8**%e,align 8
%y=load i8*,i8**%d,align 8
store i8*null,i8**%d,align 8
%z=bitcast i8*%v to i8**
store i8*%y,i8**%z,align 8
%A=icmp eq i32%h,0
%B=load i8*,i8**%c,align 8
store i8*null,i8**%c,align 8
%C=getelementptr inbounds i8,i8*%v,i64 8
br i1%A,label%D,label%E
D:
call void@llvm.memcpy.p0i8.p0i8.i32(i8*%C,i8*%B,i32%o,i1 false)
br label%G
E:
%F=bitcast i8*%C to i8**
store i8*%B,i8**%F,align 8
br label%G
G:
%H=getelementptr inbounds i8,i8*%v,i64 16
%I=bitcast i8*%H to i32*
store i32%r,i32*%I,align 4
%J=getelementptr inbounds i8,i8*%v,i64 20
%K=bitcast i8*%J to i32*
store i32%u,i32*%K,align 4
%L=getelementptr inbounds i8,i8*%v,i64 24
%M=bitcast i8*%L to i32*
store i32%h,i32*%M,align 4
%N=getelementptr inbounds i8,i8*%v,i64 28
%O=bitcast i8*%N to i32*
store i32%o,i32*%O,align 4
%P=getelementptr inbounds i8,i8*%v,i64 32
%Q=bitcast i8*%P to i32*
store i32%j,i32*%Q,align 4
%R=call i8*@sml_alloc(i32 inreg 28)#0
%S=getelementptr inbounds i8,i8*%R,i64 -4
%T=bitcast i8*%S to i32*
store i32 1342177304,i32*%T,align 4
%U=load i8*,i8**%e,align 8
%V=bitcast i8*%R to i8**
store i8*%U,i8**%V,align 8
%W=getelementptr inbounds i8,i8*%R,i64 8
%X=bitcast i8*%W to void(...)**
store void(...)*bitcast(i8*(i8*,i8*)*@_SMLLLN4List5foldrE_214 to void(...)*),void(...)**%X,align 8
%Y=getelementptr inbounds i8,i8*%R,i64 16
%Z=bitcast i8*%Y to void(...)**
store void(...)*bitcast(i8*(i8*,i8*)*@_SMLLLN4List5foldrE_214 to void(...)*),void(...)**%Z,align 8
%aa=getelementptr inbounds i8,i8*%R,i64 24
%ab=bitcast i8*%aa to i32*
store i32 1,i32*%ab,align 4
ret i8*%R
}
define internal fastcc i8*@_SMLLLN4List5foldrE_216(i8*inreg%a,i8*inreg%b)#3 gc"smlsharp"{
%c=alloca i8*,align 8
%d=alloca i8*,align 8
call void@llvm.gcroot(i8**%c,i8*null)#0
call void@llvm.gcroot(i8**%d,i8*null)#0
store i8*%b,i8**%c,align 8
%e=bitcast i8*%a to i32*
%f=load i32,i32*%e,align 4
%g=getelementptr inbounds i8,i8*%a,i64 4
%h=bitcast i8*%g to i32*
%i=load i32,i32*%h,align 4
%j=getelementptr inbounds i8,i8*%a,i64 8
%k=bitcast i8*%j to i32*
%l=load i32,i32*%k,align 4
%m=getelementptr inbounds i8,i8*%a,i64 12
%n=bitcast i8*%m to i32*
%o=load i32,i32*%n,align 4
%p=call i8*@sml_alloc(i32 inreg 28)#0
%q=getelementptr inbounds i8,i8*%p,i64 -4
%r=bitcast i8*%q to i32*
store i32 1342177304,i32*%r,align 4
store i8*%p,i8**%d,align 8
%s=load i8*,i8**%c,align 8
store i8*null,i8**%c,align 8
%t=bitcast i8*%p to i8**
store i8*%s,i8**%t,align 8
%u=getelementptr inbounds i8,i8*%p,i64 8
%v=bitcast i8*%u to i32*
store i32%f,i32*%v,align 4
%w=getelementptr inbounds i8,i8*%p,i64 12
%x=bitcast i8*%w to i32*
store i32%i,i32*%x,align 4
%y=getelementptr inbounds i8,i8*%p,i64 16
%z=bitcast i8*%y to i32*
store i32%l,i32*%z,align 4
%A=getelementptr inbounds i8,i8*%p,i64 20
%B=bitcast i8*%A to i32*
store i32%o,i32*%B,align 4
%C=getelementptr inbounds i8,i8*%p,i64 24
%D=bitcast i8*%C to i32*
store i32 1,i32*%D,align 4
%E=call i8*@sml_alloc(i32 inreg 28)#0
%F=getelementptr inbounds i8,i8*%E,i64 -4
%G=bitcast i8*%F to i32*
store i32 1342177304,i32*%G,align 4
%H=load i8*,i8**%d,align 8
%I=bitcast i8*%E to i8**
store i8*%H,i8**%I,align 8
%J=getelementptr inbounds i8,i8*%E,i64 8
%K=bitcast i8*%J to void(...)**
store void(...)*bitcast(i8*(i8*,i8*)*@_SMLLLN4List5foldrE_215 to void(...)*),void(...)**%K,align 8
%L=getelementptr inbounds i8,i8*%E,i64 16
%M=bitcast i8*%L to void(...)**
store void(...)*bitcast(i8*(i8*,i8*)*@_SMLLLN4List5foldrE_215 to void(...)*),void(...)**%M,align 8
%N=getelementptr inbounds i8,i8*%E,i64 24
%O=bitcast i8*%N to i32*
store i32 1,i32*%O,align 4
ret i8*%E
}
define fastcc i8*@_SMLFN4List5foldrE(i32 inreg%a,i32 inreg%b,i32 inreg%c,i32 inreg%d)#3 gc"smlsharp"{
%e=alloca i8*,align 8
call void@llvm.gcroot(i8**%e,i8*null)#0
%f=call i8*@sml_alloc(i32 inreg 20)#0
%g=bitcast i8*%f to i32*
%h=getelementptr inbounds i8,i8*%f,i64 -4
%i=bitcast i8*%h to i32*
store i32 1342177296,i32*%i,align 4
store i8*%f,i8**%e,align 8
store i32%a,i32*%g,align 4
%j=getelementptr inbounds i8,i8*%f,i64 4
%k=bitcast i8*%j to i32*
store i32%b,i32*%k,align 4
%l=getelementptr inbounds i8,i8*%f,i64 8
%m=bitcast i8*%l to i32*
store i32%c,i32*%m,align 4
%n=getelementptr inbounds i8,i8*%f,i64 12
%o=bitcast i8*%n to i32*
store i32%d,i32*%o,align 4
%p=getelementptr inbounds i8,i8*%f,i64 16
%q=bitcast i8*%p to i32*
store i32 0,i32*%q,align 4
%r=call i8*@sml_alloc(i32 inreg 28)#0
%s=getelementptr inbounds i8,i8*%r,i64 -4
%t=bitcast i8*%s to i32*
store i32 1342177304,i32*%t,align 4
%u=load i8*,i8**%e,align 8
%v=bitcast i8*%r to i8**
store i8*%u,i8**%v,align 8
%w=getelementptr inbounds i8,i8*%r,i64 8
%x=bitcast i8*%w to void(...)**
store void(...)*bitcast(i8*(i8*,i8*)*@_SMLLLN4List5foldrE_216 to void(...)*),void(...)**%x,align 8
%y=getelementptr inbounds i8,i8*%r,i64 16
%z=bitcast i8*%y to void(...)**
store void(...)*bitcast(i8*(i8*,i8*)*@_SMLLLN4List5foldrE_216 to void(...)*),void(...)**%z,align 8
%A=getelementptr inbounds i8,i8*%r,i64 24
%B=bitcast i8*%A to i32*
store i32 -2147483647,i32*%B,align 4
ret i8*%r
}
define internal fastcc i32@_SMLLLN4List6existsE_219(i8*inreg%a,i8*inreg%b)#4 gc"smlsharp"{
%c=alloca i8*,align 8
%d=alloca i8*,align 8
call void@llvm.gcroot(i8**%c,i8*null)#0
call void@llvm.gcroot(i8**%d,i8*null)#0
store i8*%a,i8**%d,align 8
%e=getelementptr inbounds i8,i8*%a,i64 12
%f=bitcast i8*%e to i32*
%g=load i32,i32*%f,align 4
%h=add i32%g,-1
%i=sub i32 0,%g
%j=and i32%h,%i
%k=add i32%g,7
%l=add i32%k,%j
%m=and i32%l,-8
store i8*%b,i8**%c,align 8
%n=sext i32%j to i64
%o=sext i32%m to i64
%p=bitcast i8**%d to i8***
br label%q
q:
%r=load atomic i32,i32*@sml_check_flag unordered,align 4
%s=icmp eq i32%r,0
br i1%s,label%u,label%t
t:
call void@sml_check(i32 inreg%r)
br label%u
u:
%v=load i8*,i8**%c,align 8
%w=icmp eq i8*%v,null
br i1%w,label%x,label%z
x:
%y=phi i32[0,%u],[1,%U]
ret i32%y
z:
%A=load i8*,i8**%d,align 8
%B=getelementptr inbounds i8,i8*%A,i64 8
%C=bitcast i8*%B to i32*
%D=load i32,i32*%C,align 4
%E=icmp eq i32%D,0
br i1%E,label%K,label%F
F:
%G=bitcast i8*%A to i8**
%H=getelementptr inbounds i8,i8*%v,i64%n
%I=bitcast i8*%H to i8**
%J=load i8*,i8**%I,align 8
br label%U
K:
%L=getelementptr inbounds i8,i8*%A,i64 12
%M=bitcast i8*%L to i32*
%N=load i32,i32*%M,align 4
%O=call i8*@sml_alloc(i32 inreg%N)#0
%P=getelementptr inbounds i8,i8*%O,i64 -4
%Q=bitcast i8*%P to i32*
store i32%N,i32*%Q,align 4
%R=load i8*,i8**%c,align 8
%S=getelementptr inbounds i8,i8*%R,i64%n
call void@llvm.memcpy.p0i8.p0i8.i32(i8*%O,i8*%S,i32%N,i1 false)
%T=load i8**,i8***%p,align 8
br label%U
U:
%V=phi i8**[%G,%F],[%T,%K]
%W=phi i8*[%v,%F],[%R,%K]
%X=phi i8*[%J,%F],[%O,%K]
%Y=getelementptr inbounds i8,i8*%W,i64%o
%Z=bitcast i8*%Y to i8**
%aa=load i8*,i8**%Z,align 8
store i8*%aa,i8**%c,align 8
%ab=load i8*,i8**%V,align 8
%ac=getelementptr inbounds i8,i8*%ab,i64 16
%ad=bitcast i8*%ac to i8*(i8*,i8*)**
%ae=load i8*(i8*,i8*)*,i8*(i8*,i8*)**%ad,align 8
%af=bitcast i8*%ab to i8**
%ag=load i8*,i8**%af,align 8
%ah=call fastcc i8*%ae(i8*inreg%ag,i8*inreg%X)
%ai=bitcast i8*%ah to i32*
%aj=load i32,i32*%ai,align 4
%ak=icmp eq i32%aj,0
br i1%ak,label%q,label%x
}
define internal fastcc i8*@_SMLLLN4List6existsE_220(i8*inreg%a,i8*inreg%b)#3 gc"smlsharp"{
%c=alloca i8*,align 8
%d=alloca i8*,align 8
call void@llvm.gcroot(i8**%c,i8*null)#0
call void@llvm.gcroot(i8**%d,i8*null)#0
store i8*%b,i8**%c,align 8
%e=bitcast i8*%a to i32*
%f=load i32,i32*%e,align 4
%g=getelementptr inbounds i8,i8*%a,i64 4
%h=bitcast i8*%g to i32*
%i=load i32,i32*%h,align 4
%j=call i8*@sml_alloc(i32 inreg 20)#0
%k=getelementptr inbounds i8,i8*%j,i64 -4
%l=bitcast i8*%k to i32*
store i32 1342177296,i32*%l,align 4
store i8*%j,i8**%d,align 8
%m=load i8*,i8**%c,align 8
store i8*null,i8**%c,align 8
%n=bitcast i8*%j to i8**
store i8*%m,i8**%n,align 8
%o=getelementptr inbounds i8,i8*%j,i64 8
%p=bitcast i8*%o to i32*
store i32%f,i32*%p,align 4
%q=getelementptr inbounds i8,i8*%j,i64 12
%r=bitcast i8*%q to i32*
store i32%i,i32*%r,align 4
%s=getelementptr inbounds i8,i8*%j,i64 16
%t=bitcast i8*%s to i32*
store i32 1,i32*%t,align 4
%u=call i8*@sml_alloc(i32 inreg 28)#0
%v=getelementptr inbounds i8,i8*%u,i64 -4
%w=bitcast i8*%v to i32*
store i32 1342177304,i32*%w,align 4
%x=load i8*,i8**%d,align 8
%y=bitcast i8*%u to i8**
store i8*%x,i8**%y,align 8
%z=getelementptr inbounds i8,i8*%u,i64 8
%A=bitcast i8*%z to void(...)**
store void(...)*bitcast(i32(i8*,i8*)*@_SMLLLN4List6existsE_219 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*)*@_SMLLLN4List6existsE_259 to void(...)*),void(...)**%C,align 8
%D=getelementptr inbounds i8,i8*%u,i64 24
%E=bitcast i8*%D to i32*
store i32 -2147483647,i32*%E,align 4
ret i8*%u
}
define fastcc i8*@_SMLFN4List6existsE(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*)*@_SMLLLN4List6existsE_220 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*)*@_SMLLLN4List6existsE_220 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 i32@_SMLLLN4List3allE_223(i8*inreg%a,i8*inreg%b)#4 gc"smlsharp"{
%c=alloca i8*,align 8
%d=alloca i8*,align 8
call void@llvm.gcroot(i8**%c,i8*null)#0
call void@llvm.gcroot(i8**%d,i8*null)#0
store i8*%a,i8**%d,align 8
%e=getelementptr inbounds i8,i8*%a,i64 12
%f=bitcast i8*%e to i32*
%g=load i32,i32*%f,align 4
%h=add i32%g,-1
%i=sub i32 0,%g
%j=and i32%h,%i
%k=add i32%g,7
%l=add i32%k,%j
%m=and i32%l,-8
store i8*%b,i8**%c,align 8
%n=sext i32%j to i64
%o=sext i32%m to i64
%p=bitcast i8**%d to i8***
br label%q
q:
%r=load atomic i32,i32*@sml_check_flag unordered,align 4
%s=icmp eq i32%r,0
br i1%s,label%u,label%t
t:
call void@sml_check(i32 inreg%r)
br label%u
u:
%v=load i8*,i8**%c,align 8
%w=icmp eq i8*%v,null
br i1%w,label%x,label%z
x:
%y=phi i32[1,%u],[0,%U]
ret i32%y
z:
%A=load i8*,i8**%d,align 8
%B=getelementptr inbounds i8,i8*%A,i64 8
%C=bitcast i8*%B to i32*
%D=load i32,i32*%C,align 4
%E=icmp eq i32%D,0
br i1%E,label%K,label%F
F:
%G=bitcast i8*%A to i8**
%H=getelementptr inbounds i8,i8*%v,i64%n
%I=bitcast i8*%H to i8**
%J=load i8*,i8**%I,align 8
br label%U
K:
%L=getelementptr inbounds i8,i8*%A,i64 12
%M=bitcast i8*%L to i32*
%N=load i32,i32*%M,align 4
%O=call i8*@sml_alloc(i32 inreg%N)#0
%P=getelementptr inbounds i8,i8*%O,i64 -4
%Q=bitcast i8*%P to i32*
store i32%N,i32*%Q,align 4
%R=load i8*,i8**%c,align 8
%S=getelementptr inbounds i8,i8*%R,i64%n
call void@llvm.memcpy.p0i8.p0i8.i32(i8*%O,i8*%S,i32%N,i1 false)
%T=load i8**,i8***%p,align 8
br label%U
U:
%V=phi i8**[%G,%F],[%T,%K]
%W=phi i8*[%v,%F],[%R,%K]
%X=phi i8*[%J,%F],[%O,%K]
%Y=getelementptr inbounds i8,i8*%W,i64%o
%Z=bitcast i8*%Y to i8**
%aa=load i8*,i8**%Z,align 8
store i8*%aa,i8**%c,align 8
%ab=load i8*,i8**%V,align 8
%ac=getelementptr inbounds i8,i8*%ab,i64 16
%ad=bitcast i8*%ac to i8*(i8*,i8*)**
%ae=load i8*(i8*,i8*)*,i8*(i8*,i8*)**%ad,align 8
%af=bitcast i8*%ab to i8**
%ag=load i8*,i8**%af,align 8
%ah=call fastcc i8*%ae(i8*inreg%ag,i8*inreg%X)
%ai=bitcast i8*%ah to i32*
%aj=load i32,i32*%ai,align 4
%ak=icmp eq i32%aj,0
br i1%ak,label%x,label%q
}
define internal fastcc i8*@_SMLLLN4List3allE_224(i8*inreg%a,i8*inreg%b)#3 gc"smlsharp"{
%c=alloca i8*,align 8
%d=alloca i8*,align 8
call void@llvm.gcroot(i8**%c,i8*null)#0
call void@llvm.gcroot(i8**%d,i8*null)#0
store i8*%b,i8**%c,align 8
%e=bitcast i8*%a to i32*
%f=load i32,i32*%e,align 4
%g=getelementptr inbounds i8,i8*%a,i64 4
%h=bitcast i8*%g to i32*
%i=load i32,i32*%h,align 4
%j=call i8*@sml_alloc(i32 inreg 20)#0
%k=getelementptr inbounds i8,i8*%j,i64 -4
%l=bitcast i8*%k to i32*
store i32 1342177296,i32*%l,align 4
store i8*%j,i8**%d,align 8
%m=load i8*,i8**%c,align 8
store i8*null,i8**%c,align 8
%n=bitcast i8*%j to i8**
store i8*%m,i8**%n,align 8
%o=getelementptr inbounds i8,i8*%j,i64 8
%p=bitcast i8*%o to i32*
store i32%f,i32*%p,align 4
%q=getelementptr inbounds i8,i8*%j,i64 12
%r=bitcast i8*%q to i32*
store i32%i,i32*%r,align 4
%s=getelementptr inbounds i8,i8*%j,i64 16
%t=bitcast i8*%s to i32*
store i32 1,i32*%t,align 4
%u=call i8*@sml_alloc(i32 inreg 28)#0
%v=getelementptr inbounds i8,i8*%u,i64 -4
%w=bitcast i8*%v to i32*
store i32 1342177304,i32*%w,align 4
%x=load i8*,i8**%d,align 8
%y=bitcast i8*%u to i8**
store i8*%x,i8**%y,align 8
%z=getelementptr inbounds i8,i8*%u,i64 8
%A=bitcast i8*%z to void(...)**
store void(...)*bitcast(i32(i8*,i8*)*@_SMLLLN4List3allE_223 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*)*@_SMLLLN4List3allE_261 to void(...)*),void(...)**%C,align 8
%D=getelementptr inbounds i8,i8*%u,i64 24
%E=bitcast i8*%D to i32*
store i32 -2147483647,i32*%E,align 4
ret i8*%u
}
define fastcc i8*@_SMLFN4List3allE(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*)*@_SMLLLN4List3allE_224 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*)*@_SMLLLN4List3allE_224 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*@_SMLLLN4List8tabulateE_228(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
%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
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%l,label%i
i:
call void@sml_check(i32 inreg%g)
%j=load i8*,i8**%c,align 8
%k=load i8*,i8**%f,align 8
br label%l
l:
%m=phi i8*[%k,%i],[%a,%n]
%o=phi i8*[%j,%i],[%b,%n]
%p=getelementptr inbounds i8,i8*%m,i64 4
%q=bitcast i8*%p to i32*
%r=load i32,i32*%q,align 4
%s=add i32%r,-1
%t=sub i32 0,%r
%u=and i32%s,%t
%v=add i32%r,7
%w=add i32%v,%u
%x=and i32%w,-8
%y=add i32%x,15
%z=and i32%y,-8
%A=lshr i32%w,3
%B=lshr i32%u,3
%C=sub nsw i32%A,%B
%D=shl i32 1,%C
%E=bitcast i8*%m to i32*
%F=load i32,i32*%E,align 4
%G=or i32%D,%F
%H=or i32%z,4
%I=bitcast i8*%o to i32*
%J=load i32,i32*%I,align 4
%K=getelementptr inbounds i8,i8*%o,i64 8
%L=bitcast i8*%K to i8**
%M=load i8*,i8**%L,align 8
store i8*%M,i8**%c,align 8
%N=icmp sgt i32%J,-1
br i1%N,label%O,label%T
O:
%P=or i32%z,1342177280
%Q=sext i32%u to i64
%R=sext i32%x to i64
%S=sext i32%z to i64
br label%al
T:
store i8*null,i8**%f,align 8
%U=load i8*,i8**@_SMLZ4Size,align 8
store i8*%U,i8**%c,align 8
%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
store i8*%V,i8**%d,align 8
%Y=load i8*,i8**%c,align 8
store i8*null,i8**%c,align 8
%Z=bitcast i8*%V to i8**
store i8*%Y,i8**%Z,align 8
%aa=getelementptr inbounds i8,i8*%V,i64 8
%ab=bitcast i8*%aa to i8**
store i8*getelementptr inbounds(<{[4x i8],i32,[37x i8]}>,<{[4x i8],i32,[37x i8]}>*@N,i64 0,i32 2,i64 0),i8**%ab,align 8
%ac=getelementptr inbounds i8,i8*%V,i64 16
%ad=bitcast i8*%ac to i32*
store i32 3,i32*%ad,align 4
%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**%d,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=phi i8*[%bB,%bK],[null,%O]
%an=phi i32[%bi,%bK],[0,%O]
store i8*%am,i8**%d,align 8
%ao=icmp slt i32%an,%J
br i1%ao,label%bh,label%ap
ap:
store i8*null,i8**%d,align 8
store i8*%am,i8**%c,align 8
br label%aq
aq:
%ar=phi i8*[%bg,%ba],[%am,%ap]
%as=phi i8*[%a1,%ba],[null,%ap]
store i8*%as,i8**%d,align 8
%at=icmp eq i8*%ar,null
br i1%at,label%au,label%av
au:
ret i8*%as
av:
%aw=load i8*,i8**%f,align 8
%ax=bitcast i8*%aw to i32*
%ay=load i32,i32*%ax,align 4
%az=icmp eq i32%ay,0
br i1%az,label%aE,label%aA
aA:
%aB=getelementptr inbounds i8,i8*%ar,i64%Q
%aC=bitcast i8*%aB to i8**
%aD=load i8*,i8**%aC,align 8
br label%aP
aE:
%aF=getelementptr inbounds i8,i8*%aw,i64 4
%aG=bitcast i8*%aF to i32*
%aH=load i32,i32*%aG,align 4
%aI=call i8*@sml_alloc(i32 inreg%aH)#0
%aJ=getelementptr inbounds i8,i8*%aI,i64 -4
%aK=bitcast i8*%aJ to i32*
store i32%aH,i32*%aK,align 4
%aL=load i8*,i8**%c,align 8
%aM=getelementptr inbounds i8,i8*%aL,i64%Q
call void@llvm.memcpy.p0i8.p0i8.i32(i8*%aI,i8*%aM,i32%aH,i1 false)
%aN=load i8*,i8**%f,align 8
%aO=bitcast i8*%aN to i32*
br label%aP
aP:
%aQ=phi i32*[%aO,%aE],[%ax,%aA]
%aR=phi i8*[%aN,%aE],[%aw,%aA]
%aS=phi i8*[%aL,%aE],[%ar,%aA]
%aT=phi i8*[%aI,%aE],[%aD,%aA]
store i8*%aT,i8**%e,align 8
%aU=getelementptr inbounds i8,i8*%aS,i64%R
%aV=bitcast i8*%aU to i8**
%aW=load i8*,i8**%aV,align 8
store i8*%aW,i8**%c,align 8
%aX=getelementptr inbounds i8,i8*%aR,i64 4
%aY=bitcast i8*%aX to i32*
%aZ=load i32,i32*%aY,align 4
%a0=load i32,i32*%aQ,align 4
%a1=call i8*@sml_alloc(i32 inreg%H)#0
%a2=getelementptr inbounds i8,i8*%a1,i64 -4
%a3=bitcast i8*%a2 to i32*
store i32%P,i32*%a3,align 4
call void@llvm.memset.p0i8.i32(i8*%a1,i8 0,i32%H,i1 false)
%a4=icmp eq i32%a0,0
%a5=load i8*,i8**%e,align 8
store i8*null,i8**%e,align 8
%a6=getelementptr inbounds i8,i8*%a1,i64%Q
br i1%a4,label%a7,label%a8
a7:
call void@llvm.memcpy.p0i8.p0i8.i32(i8*%a6,i8*%a5,i32%aZ,i1 false)
br label%ba
a8:
%a9=bitcast i8*%a6 to i8**
store i8*%a5,i8**%a9,align 8
br label%ba
ba:
%bb=load i8*,i8**%d,align 8
store i8*null,i8**%d,align 8
%bc=getelementptr inbounds i8,i8*%a1,i64%R
%bd=bitcast i8*%bc to i8**
store i8*%bb,i8**%bd,align 8
%be=getelementptr inbounds i8,i8*%a1,i64%S
%bf=bitcast i8*%be to i32*
store i32%G,i32*%bf,align 4
%bg=load i8*,i8**%c,align 8
br label%aq
bh:
%bi=add nuw nsw i32%an,1
%bj=load i8*,i8**%c,align 8
%bk=getelementptr inbounds i8,i8*%bj,i64 16
%bl=bitcast i8*%bk to i8*(i8*,i8*)**
%bm=load i8*(i8*,i8*)*,i8*(i8*,i8*)**%bl,align 8
%bn=bitcast i8*%bj to i8**
%bo=load i8*,i8**%bn,align 8
store i8*%bo,i8**%e,align 8
%bp=call i8*@sml_alloc(i32 inreg 4)#0
%bq=bitcast i8*%bp to i32*
%br=getelementptr inbounds i8,i8*%bp,i64 -4
%bs=bitcast i8*%br to i32*
store i32 4,i32*%bs,align 4
store i32%an,i32*%bq,align 4
%bt=load i8*,i8**%e,align 8
store i8*null,i8**%e,align 8
%bu=call fastcc i8*%bm(i8*inreg%bt,i8*inreg%bp)
store i8*%bu,i8**%e,align 8
%bv=load i8*,i8**%f,align 8
%bw=getelementptr inbounds i8,i8*%bv,i64 4
%bx=bitcast i8*%bw to i32*
%by=load i32,i32*%bx,align 4
%bz=bitcast i8*%bv to i32*
%bA=load i32,i32*%bz,align 4
%bB=call i8*@sml_alloc(i32 inreg%H)#0
%bC=getelementptr inbounds i8,i8*%bB,i64 -4
%bD=bitcast i8*%bC to i32*
store i32%P,i32*%bD,align 4
call void@llvm.memset.p0i8.i32(i8*%bB,i8 0,i32%H,i1 false)
%bE=icmp eq i32%bA,0
%bF=load i8*,i8**%e,align 8
store i8*null,i8**%e,align 8
%bG=getelementptr inbounds i8,i8*%bB,i64%Q
br i1%bE,label%bH,label%bI
bH:
call void@llvm.memcpy.p0i8.p0i8.i32(i8*%bG,i8*%bF,i32%by,i1 false)
br label%bK
bI:
%bJ=bitcast i8*%bG to i8**
store i8*%bF,i8**%bJ,align 8
br label%bK
bK:
%bL=load i8*,i8**%d,align 8
store i8*null,i8**%d,align 8
%bM=getelementptr inbounds i8,i8*%bB,i64%R
%bN=bitcast i8*%bM to i8**
store i8*%bL,i8**%bN,align 8
%bO=getelementptr inbounds i8,i8*%bB,i64%S
%bP=bitcast i8*%bO to i32*
store i32%G,i32*%bP,align 4
br label%al
}
define fastcc i8*@_SMLFN4List8tabulateE(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*)*@_SMLLLN4List8tabulateE_228 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*)*@_SMLLLN4List8tabulateE_228 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 i32@_SMLLLN4List7collateE_231(i8*inreg%a,i8*inreg%b)#4 gc"smlsharp"{
S:
%c=alloca i8*,align 8
%d=alloca i8*,align 8
%e=alloca i8*,align 8
%f=alloca i8*,align 8
%g=alloca i8*,align 8
%h=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
call void@llvm.gcroot(i8**%g,i8*null)#0
call void@llvm.gcroot(i8**%h,i8*null)#0
store i8*%a,i8**%g,align 8
%i=getelementptr inbounds i8,i8*%a,i64 12
%j=bitcast i8*%i to i32*
%k=load i32,i32*%j,align 4
%l=add i32%k,-1
%m=sub i32 0,%k
%n=and i32%l,%m
%o=add i32%n,%k
%p=add i32%o,7
%q=and i32%p,-8
%r=add i32%l,%o
%s=and i32%r,%m
%t=add i32%k,7
%u=add i32%t,%s
%v=and i32%u,-8
%w=lshr i32%s,3
%x=lshr i32%n,3
%y=sub nsw i32%w,%x
%z=getelementptr inbounds i8,i8*%a,i64 8
%A=bitcast i8*%z to i32*
%B=load i32,i32*%A,align 4
%C=shl i32%B,%y
%D=or i32%C,%B
%E=or i32%v,4
%F=bitcast i8*%b to i8**
%G=load i8*,i8**%F,align 8
%H=getelementptr inbounds i8,i8*%b,i64 8
%I=bitcast i8*%H to i8**
%J=load i8*,i8**%I,align 8
%K=sext i32%n to i64
%L=sext i32%q to i64
%M=bitcast i8**%g to i8***
%N=or i32%v,1342177280
%O=sext i32%s to i64
%P=sext i32%v to i64
br label%Q
Q:
%R=phi i8*[%G,%S],[%bM,%bL]
%T=phi i8*[%J,%S],[%bN,%bL]
store i8*%R,i8**%c,align 8
store i8*%T,i8**%d,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],[%R,%Q]
%aa=icmp eq i8*%Z,null
br i1%aa,label%ab,label%ah
ab:
%ac=load i8*,i8**%d,align 8
%ad=icmp eq i8*%ac,null
%ae=select i1%ad,i32 0,i32 2
br label%af
af:
%ag=phi i32[%ae,%ab],[%bJ,%bD],[1,%aA]
ret i32%ag
ah:
%ai=load i8*,i8**%g,align 8
%aj=getelementptr inbounds i8,i8*%ai,i64 8
%ak=bitcast i8*%aj to i32*
%al=load i32,i32*%ak,align 4
%am=icmp eq i32%al,0
br i1%am,label%ar,label%an
an:
%ao=getelementptr inbounds i8,i8*%Z,i64%K
%ap=bitcast i8*%ao to i8**
%aq=load i8*,i8**%ap,align 8
br label%aA
ar:
%as=getelementptr inbounds i8,i8*%ai,i64 12
%at=bitcast i8*%as to i32*
%au=load i32,i32*%at,align 4
%av=call i8*@sml_alloc(i32 inreg%au)#0
%aw=getelementptr inbounds i8,i8*%av,i64 -4
%ax=bitcast i8*%aw to i32*
store i32%au,i32*%ax,align 4
%ay=load i8*,i8**%c,align 8
%az=getelementptr inbounds i8,i8*%ay,i64%K
call void@llvm.memcpy.p0i8.p0i8.i32(i8*%av,i8*%az,i32%au,i1 false)
br label%aA
aA:
%aB=phi i8*[%ay,%ar],[%Z,%an]
%aC=phi i8*[%av,%ar],[%aq,%an]
store i8*%aC,i8**%e,align 8
%aD=getelementptr inbounds i8,i8*%aB,i64%L
%aE=bitcast i8*%aD to i8**
%aF=load i8*,i8**%aE,align 8
store i8*%aF,i8**%c,align 8
%aG=load i8*,i8**%d,align 8
%aH=icmp eq i8*%aG,null
br i1%aH,label%af,label%aI
aI:
%aJ=load i8*,i8**%g,align 8
%aK=getelementptr inbounds i8,i8*%aJ,i64 8
%aL=bitcast i8*%aK to i32*
%aM=load i32,i32*%aL,align 4
%aN=icmp eq i32%aM,0
br i1%aN,label%aT,label%aO
aO:
%aP=bitcast i8*%aJ to i8**
%aQ=getelementptr inbounds i8,i8*%aG,i64%K
%aR=bitcast i8*%aQ to i8**
%aS=load i8*,i8**%aR,align 8
br label%a7
aT:
%aU=getelementptr inbounds i8,i8*%aJ,i64 12
%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
%a1=getelementptr inbounds i8,i8*%a0,i64%K
call void@llvm.memcpy.p0i8.p0i8.i32(i8*%aX,i8*%a1,i32%aW,i1 false)
%a2=load i8**,i8***%M,align 8
%a3=bitcast i8**%a2 to i8*
%a4=getelementptr inbounds i8*,i8**%a2,i64 1
%a5=bitcast i8**%a4 to i32*
%a6=load i32,i32*%a5,align 4
br label%a7
a7:
%a8=phi i32[%a6,%aT],[%aM,%aO]
%a9=phi i8*[%a3,%aT],[%aJ,%aO]
%ba=phi i8**[%a2,%aT],[%aP,%aO]
%bb=phi i8*[%a0,%aT],[%aG,%aO]
%bc=phi i8*[%aX,%aT],[%aS,%aO]
store i8*%bc,i8**%f,align 8
%bd=getelementptr inbounds i8,i8*%bb,i64%L
%be=bitcast i8*%bd to i8**
%bf=load i8*,i8**%be,align 8
store i8*%bf,i8**%d,align 8
%bg=load i8*,i8**%ba,align 8
%bh=getelementptr inbounds i8,i8*%bg,i64 16
%bi=bitcast i8*%bh to i8*(i8*,i8*)**
%bj=load i8*(i8*,i8*)*,i8*(i8*,i8*)**%bi,align 8
%bk=bitcast i8*%bg to i8**
%bl=load i8*,i8**%bk,align 8
store i8*%bl,i8**%h,align 8
%bm=getelementptr inbounds i8,i8*%a9,i64 12
%bn=bitcast i8*%bm to i32*
%bo=load i32,i32*%bn,align 4
%bp=call i8*@sml_alloc(i32 inreg%E)#0
%bq=getelementptr inbounds i8,i8*%bp,i64 -4
%br=bitcast i8*%bq to i32*
store i32%N,i32*%br,align 4
call void@llvm.memset.p0i8.i32(i8*%bp,i8 0,i32%E,i1 false)
%bs=icmp eq i32%a8,0
%bt=load i8*,i8**%e,align 8
store i8*null,i8**%e,align 8
%bu=getelementptr inbounds i8,i8*%bp,i64%K
br i1%bs,label%bv,label%by
bv:
call void@llvm.memcpy.p0i8.p0i8.i32(i8*%bu,i8*%bt,i32%bo,i1 false)
%bw=load i8*,i8**%f,align 8
store i8*null,i8**%f,align 8
%bx=getelementptr inbounds i8,i8*%bp,i64%O
call void@llvm.memcpy.p0i8.p0i8.i32(i8*%bx,i8*%bw,i32%bo,i1 false)
br label%bD
by:
%bz=bitcast i8*%bu to i8**
store i8*%bt,i8**%bz,align 8
%bA=load i8*,i8**%f,align 8
store i8*null,i8**%f,align 8
%bB=getelementptr inbounds i8,i8*%bp,i64%O
%bC=bitcast i8*%bB to i8**
store i8*%bA,i8**%bC,align 8
br label%bD
bD:
%bE=getelementptr inbounds i8,i8*%bp,i64%P
%bF=bitcast i8*%bE to i32*
store i32%D,i32*%bF,align 4
%bG=load i8*,i8**%h,align 8
store i8*null,i8**%h,align 8
%bH=call fastcc i8*%bj(i8*inreg%bG,i8*inreg%bp)
%bI=bitcast i8*%bH to i32*
%bJ=load i32,i32*%bI,align 4
%bK=icmp eq i32%bJ,0
br i1%bK,label%bL,label%af
bL:
%bM=load i8*,i8**%c,align 8
%bN=load i8*,i8**%d,align 8
store i8*null,i8**%c,align 8
store i8*null,i8**%d,align 8
br label%Q
}
define internal fastcc i8*@_SMLLLN4List7collateE_232(i8*inreg%a,i8*inreg%b)#3 gc"smlsharp"{
%c=alloca i8*,align 8
%d=alloca i8*,align 8
call void@llvm.gcroot(i8**%c,i8*null)#0
call void@llvm.gcroot(i8**%d,i8*null)#0
store i8*%b,i8**%c,align 8
%e=bitcast i8*%a to i32*
%f=load i32,i32*%e,align 4
%g=getelementptr inbounds i8,i8*%a,i64 4
%h=bitcast i8*%g to i32*
%i=load i32,i32*%h,align 4
%j=call i8*@sml_alloc(i32 inreg 20)#0
%k=getelementptr inbounds i8,i8*%j,i64 -4
%l=bitcast i8*%k to i32*
store i32 1342177296,i32*%l,align 4
store i8*%j,i8**%d,align 8
%m=load i8*,i8**%c,align 8
store i8*null,i8**%c,align 8
%n=bitcast i8*%j to i8**
store i8*%m,i8**%n,align 8
%o=getelementptr inbounds i8,i8*%j,i64 8
%p=bitcast i8*%o to i32*
store i32%f,i32*%p,align 4
%q=getelementptr inbounds i8,i8*%j,i64 12
%r=bitcast i8*%q to i32*
store i32%i,i32*%r,align 4
%s=getelementptr inbounds i8,i8*%j,i64 16
%t=bitcast i8*%s to i32*
store i32 1,i32*%t,align 4
%u=call i8*@sml_alloc(i32 inreg 28)#0
%v=getelementptr inbounds i8,i8*%u,i64 -4
%w=bitcast i8*%v to i32*
store i32 1342177304,i32*%w,align 4
%x=load i8*,i8**%d,align 8
%y=bitcast i8*%u to i8**
store i8*%x,i8**%y,align 8
%z=getelementptr inbounds i8,i8*%u,i64 8
%A=bitcast i8*%z to void(...)**
store void(...)*bitcast(i32(i8*,i8*)*@_SMLLLN4List7collateE_231 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*)*@_SMLLLN4List7collateE_264 to void(...)*),void(...)**%C,align 8
%D=getelementptr inbounds i8,i8*%u,i64 24
%E=bitcast i8*%D to i32*
store i32 -2147483647,i32*%E,align 4
ret i8*%u
}
define fastcc i8*@_SMLFN4List7collateE(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*)*@_SMLLLN4List7collateE_232 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*)*@_SMLLLN4List7collateE_232 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*@_SMLLLN4List4nullE_235(i8*inreg%a,i8*inreg%b)#3 gc"smlsharp"{
%c=icmp eq i8*%b,null
%d=zext i1%c to i32
%e=tail call i8*@sml_alloc(i32 inreg 4)#0
%f=bitcast i8*%e to i32*
%g=getelementptr inbounds i8,i8*%e,i64 -4
%h=bitcast i8*%g to i32*
store i32 4,i32*%h,align 4
store i32%d,i32*%f,align 4
ret i8*%e
}
define internal fastcc i8*@_SMLLLN4List4nullE_236(i8*inreg%a,i8*inreg%b,i8*inreg%c)#3 gc"smlsharp"{
ret 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*)
}
define internal fastcc i8*@_SMLLLN4List6lengthE_237(i8*inreg%a,i8*inreg%b)#4 gc"smlsharp"{
%c=tail call fastcc i32@_SMLLLN4List6lengthE_137(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*@_SMLLLN4List6lengthE_238(i8*inreg%a,i8*inreg%b,i8*inreg%c)#3 gc"smlsharp"{
%d=bitcast i8*%c to i32*
%e=load i32,i32*%d,align 4
%f=tail call fastcc i8*@_SMLFN4List6lengthE(i32 inreg undef,i32 inreg%e)
ret i8*%f
}
define internal fastcc i8*@_SMLLLN4List1_VE_239(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*@_SMLFN4List1_VE(i32 inreg%e,i32 inreg%g)
ret i8*%h
}
define internal fastcc i8*@_SMLLLN4List2hdE_240(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*@_SMLFN4List2hdE(i32 inreg%e,i32 inreg%g)
ret i8*%h
}
define internal fastcc i8*@_SMLLLN4List2tlE_241(i8*inreg%a,i8*inreg%b,i8*inreg%c)#3 gc"smlsharp"{
%d=bitcast i8*%c to i32*
%e=load i32,i32*%d,align 4
%f=tail call fastcc i8*@_SMLFN4List2tlE(i32 inreg undef,i32 inreg%e)
ret i8*%f
}
define internal fastcc i8*@_SMLLLN4List4lastE_242(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*@_SMLFN4List4lastE(i32 inreg%e,i32 inreg%g)
ret i8*%h
}
define internal fastcc i8*@_SMLLLN4List7getItemE_243(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*@_SMLFN4List7getItemE(i32 inreg%e,i32 inreg%g)
ret i8*%h
}
define internal fastcc i8*@_SMLLLN4List3nthE_244(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*@_SMLFN4List3nthE(i32 inreg%e,i32 inreg%g)
ret i8*%h
}
define internal fastcc i8*@_SMLLLN4List4takeE_245(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*@_SMLFN4List4takeE(i32 inreg%e,i32 inreg%g)
ret i8*%h
}
define internal fastcc i8*@_SMLLLN4List4dropE_246(i8*inreg%a,i8*inreg%b,i8*inreg%c)#3 gc"smlsharp"{
%d=bitcast i8*%c to i32*
%e=load i32,i32*%d,align 4
%f=tail call fastcc i8*@_SMLFN4List4dropE(i32 inreg undef,i32 inreg%e)
ret i8*%f
}
define internal fastcc i8*@_SMLLLN4List3revE_247(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*@_SMLFN4List3revE(i32 inreg%e,i32 inreg%g)
ret i8*%h
}
define internal fastcc i8*@_SMLLLN4List6concatE_248(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*@_SMLFN4List6concatE(i32 inreg%e,i32 inreg%g)
ret i8*%h
}
define internal fastcc i8*@_SMLLLN4List9revAppendE_249(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*@_SMLFN4List9revAppendE(i32 inreg%e,i32 inreg%g)
ret i8*%h
}
define internal fastcc i8*@_SMLLLN4List3appE_250(i8*inreg%a,i8*inreg%b)#4 gc"smlsharp"{
tail call fastcc void@_SMLLLN4List3appE_185(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*@_SMLLLN4List3appE_251(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*@_SMLFN4List3appE(i32 inreg%e,i32 inreg%g)
ret i8*%h
}
define internal fastcc i8*@_SMLLLN4List3mapE_252(i8*inreg%a,i8*inreg%b,i8*inreg%c,i8*inreg%d,i8*inreg%e)#3 gc"smlsharp"{
%f=bitcast i8*%b to i32*
%g=load i32,i32*%f,align 4
%h=bitcast i8*%c to i32*
%i=load i32,i32*%h,align 4
%j=bitcast i8*%d to i32*
%k=load i32,i32*%j,align 4
%l=bitcast i8*%e to i32*
%m=load i32,i32*%l,align 4
%n=tail call fastcc i8*@_SMLFN4List3mapE(i32 inreg%g,i32 inreg%i,i32 inreg%k,i32 inreg%m)
ret i8*%n
}
define internal fastcc i8*@_SMLLLN4List10mapPartialE_253(i8*inreg%a,i8*inreg%b,i8*inreg%c,i8*inreg%d,i8*inreg%e)#3 gc"smlsharp"{
%f=bitcast i8*%b to i32*
%g=load i32,i32*%f,align 4
%h=bitcast i8*%c to i32*
%i=load i32,i32*%h,align 4
%j=bitcast i8*%d to i32*
%k=load i32,i32*%j,align 4
%l=bitcast i8*%e to i32*
%m=load i32,i32*%l,align 4
%n=tail call fastcc i8*@_SMLFN4List10mapPartialE(i32 inreg%g,i32 inreg%i,i32 inreg%k,i32 inreg%m)
ret i8*%n
}
define internal fastcc i8*@_SMLLLN4List4findE_254(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*@_SMLFN4List4findE(i32 inreg%e,i32 inreg%g)
ret i8*%h
}
define internal fastcc i8*@_SMLLLN4List6filterE_255(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*@_SMLFN4List6filterE(i32 inreg%e,i32 inreg%g)
ret i8*%h
}
define internal fastcc i8*@_SMLLLN4List9partitionE_256(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*@_SMLFN4List9partitionE(i32 inreg%e,i32 inreg%g)
ret i8*%h
}
define internal fastcc i8*@_SMLLLN4List5foldlE_257(i8*inreg%a,i8*inreg%b,i8*inreg%c,i8*inreg%d,i8*inreg%e)#3 gc"smlsharp"{
%f=bitcast i8*%b to i32*
%g=load i32,i32*%f,align 4
%h=bitcast i8*%c to i32*
%i=load i32,i32*%h,align 4
%j=bitcast i8*%d to i32*
%k=load i32,i32*%j,align 4
%l=bitcast i8*%e to i32*
%m=load i32,i32*%l,align 4
%n=tail call fastcc i8*@_SMLFN4List5foldlE(i32 inreg%g,i32 inreg%i,i32 inreg%k,i32 inreg%m)
ret i8*%n
}
define internal fastcc i8*@_SMLLLN4List5foldrE_258(i8*inreg%a,i8*inreg%b,i8*inreg%c,i8*inreg%d,i8*inreg%e)#3 gc"smlsharp"{
%f=bitcast i8*%b to i32*
%g=load i32,i32*%f,align 4
%h=bitcast i8*%c to i32*
%i=load i32,i32*%h,align 4
%j=bitcast i8*%d to i32*
%k=load i32,i32*%j,align 4
%l=bitcast i8*%e to i32*
%m=load i32,i32*%l,align 4
%n=tail call fastcc i8*@_SMLFN4List5foldrE(i32 inreg%g,i32 inreg%i,i32 inreg%k,i32 inreg%m)
ret i8*%n
}
define internal fastcc i8*@_SMLLLN4List6existsE_259(i8*inreg%a,i8*inreg%b)#4 gc"smlsharp"{
%c=tail call fastcc i32@_SMLLLN4List6existsE_219(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*@_SMLLLN4List6existsE_260(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*@_SMLFN4List6existsE(i32 inreg%e,i32 inreg%g)
ret i8*%h
}
define internal fastcc i8*@_SMLLLN4List3allE_261(i8*inreg%a,i8*inreg%b)#4 gc"smlsharp"{
%c=tail call fastcc i32@_SMLLLN4List3allE_223(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*@_SMLLLN4List3allE_262(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*@_SMLFN4List3allE(i32 inreg%e,i32 inreg%g)
ret i8*%h
}
define internal fastcc i8*@_SMLLLN4List8tabulateE_263(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*@_SMLFN4List8tabulateE(i32 inreg%e,i32 inreg%g)
ret i8*%h
}
define internal fastcc i8*@_SMLLLN4List7collateE_264(i8*inreg%a,i8*inreg%b)#4 gc"smlsharp"{
%c=tail call fastcc i32@_SMLLLN4List7collateE_231(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*@_SMLLLN4List7collateE_265(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*@_SMLFN4List7collateE(i32 inreg%e,i32 inreg%g)
ret i8*%h
}
declare void@llvm.memcpy.p0i8.p0i8.i32(i8*,i8*,i32,i1)#0
declare void@llvm.memset.p0i8.i32(i8*,i8,i32,i1)#0
attributes#0={nounwind}
attributes#1={noreturn}
attributes#2={noreturn nounwind}
attributes#3={nounwind uwtable}
attributes#4={uwtable}
