@sml_check_flag=external local_unnamed_addr global i32
@_SMLZN4Char11toRawStringE=external local_unnamed_addr global i8*
@_SMLZN4Char8toStringE=external local_unnamed_addr global i8*
@_SMLZN4Char9toCStringE=external local_unnamed_addr global i8*
@_SMLZ9Subscript=external unnamed_addr constant i8*
@_SMLZ4Size=external unnamed_addr constant i8*
@_SMLZ8Overflow=external unnamed_addr constant i8*
@a=private unnamed_addr constant<{[4x i8],i32,i8*,void(...)*,void(...)*,i32}><{[4x i8]zeroinitializer,i32 -805306344,i8*null,void(...)*bitcast(i8*(i8*)*@_SMLFN6String9substringE to void(...)*),void(...)*bitcast(i8*(i8*,i8*)*@_SMLLLN6String9substringE_184 to void(...)*),i32 -2147483647}>,align 8
@b=private unnamed_addr constant<{[4x i8],i32,[38x i8]}><{[4x i8]zeroinitializer,i32 -2147483610,[38x i8]c"src/basis/main/String.sml:59.19(1590)\00"}>,align 8
@c=private unnamed_addr constant<{[4x i8],i32,[38x i8]}><{[4x i8]zeroinitializer,i32 -2147483610,[38x i8]c"src/basis/main/String.sml:68.51(1874)\00"}>,align 8
@d=private unnamed_addr constant<{[4x i8],i32,i8*,void(...)*,void(...)*,i32}><{[4x i8]zeroinitializer,i32 -805306344,i8*null,void(...)*bitcast(i8*(i8*)*@_SMLFN6String7extractE to void(...)*),void(...)*bitcast(i8*(i8*,i8*)*@_SMLLLN6String7extractE_185 to void(...)*),i32 -2147483647}>,align 8
@e=private unnamed_addr constant<{[4x i8],i32,[38x i8]}><{[4x i8]zeroinitializer,i32 -2147483610,[38x i8]c"src/basis/main/String.sml:77.17(2149)\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*(i8*)*@_SMLFN6String1_ZE to void(...)*),void(...)*bitcast(i8*(i8*,i8*)*@_SMLLLN6String1_ZE_186 to void(...)*),i32 -2147483647}>,align 8
@g=private unnamed_addr constant<{[4x i8],i32,[38x i8]}><{[4x i8]zeroinitializer,i32 -2147483610,[38x i8]c"src/basis/main/String.sml:94.39(2749)\00"}>,align 8
@h=private unnamed_addr constant<{[4x i8],i32,[38x i8]}><{[4x i8]zeroinitializer,i32 -2147483610,[38x i8]c"src/basis/main/String.sml:94.28(2738)\00"}>,align 8
@i=private unnamed_addr constant<{[4x i8],i32,[38x i8]}><{[4x i8]zeroinitializer,i32 -2147483610,[38x i8]c"src/basis/main/String.sml:92.37(2643)\00"}>,align 8
@j=private unnamed_addr constant<{[4x i8],i32,[38x i8]}><{[4x i8]zeroinitializer,i32 -2147483610,[38x i8]c"src/basis/main/String.sml:95.68(2856)\00"}>,align 8
@k=private unnamed_addr constant<{[4x i8],i32,[38x i8]}><{[4x i8]zeroinitializer,i32 -2147483610,[38x i8]c"src/basis/main/String.sml:96.18(2879)\00"}>,align 8
@l=private unnamed_addr constant<{[4x i8],i32,i8*,void(...)*,void(...)*,i32}><{[4x i8]zeroinitializer,i32 -805306344,i8*null,void(...)*bitcast(i8*(i8*)*@_SMLFN6String10concatWithE to void(...)*),void(...)*bitcast(i8*(i8*,i8*)*@_SMLLLN6String10concatWithE_187 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*(i8*)*@_SMLFN6String9translateE to void(...)*),void(...)*bitcast(i8*(i8*,i8*)*@_SMLLLN6String9translateE_188 to void(...)*),i32 -2147483647}>,align 8
@n=private unnamed_addr constant<{[4x i8],i32,i8*,void(...)*,void(...)*,i32}><{[4x i8]zeroinitializer,i32 -805306344,i8*null,void(...)*bitcast(i8*(i8)*@_SMLFN6String3strE to void(...)*),void(...)*bitcast(i8*(i8*,i8*)*@_SMLLLN6String3strE_189 to void(...)*),i32 -2147483647}>,align 8
@o=private unnamed_addr constant<{[4x i8],i32,i8*,void(...)*,void(...)*,i32}><{[4x i8]zeroinitializer,i32 -805306344,i8*null,void(...)*bitcast(i8*(i8*)*@_SMLFN6String7explodeE to void(...)*),void(...)*bitcast(i8*(i8*,i8*)*@_SMLLLN6String7explodeE_190 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*(i8*)*@_SMLFN6String8isPrefixE to void(...)*),void(...)*bitcast(i8*(i8*,i8*)*@_SMLLLN6String8isPrefixE_192 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*(i8*)*@_SMLFN6String8isSuffixE to void(...)*),void(...)*bitcast(i8*(i8*,i8*)*@_SMLLLN6String8isSuffixE_194 to void(...)*),i32 -2147483647}>,align 8
@r=private unnamed_addr constant<{[4x i8],i32,i8*,void(...)*,void(...)*,i32}><{[4x i8]zeroinitializer,i32 -805306344,i8*null,void(...)*bitcast(i8*(i8*)*@_SMLFN6String11isSubstringE to void(...)*),void(...)*bitcast(i8*(i8*,i8*)*@_SMLLLN6String11isSubstringE_196 to void(...)*),i32 -2147483647}>,align 8
@s=private unnamed_addr constant<{[4x i8],i32,i8*,void(...)*,void(...)*,i32}><{[4x i8]zeroinitializer,i32 -805306344,i8*null,void(...)*bitcast(i8*(i8*)*@_SMLFN6String6tokensE to void(...)*),void(...)*bitcast(i8*(i8*,i8*)*@_SMLLLN6String6tokensE_197 to void(...)*),i32 -2147483647}>,align 8
@t=private unnamed_addr constant<{[4x i8],i32,i32,i32,i8*,i32}><{[4x i8]zeroinitializer,i32 -805306352,i32 0,i32 0,i8*null,i32 2}>,align 8
@u=private unnamed_addr constant<{[4x i8],i32,i8*,void(...)*,void(...)*,i32}><{[4x i8]zeroinitializer,i32 -805306344,i8*null,void(...)*bitcast(i8*(i8*)*@_SMLFN6String6fieldsE to void(...)*),void(...)*bitcast(i8*(i8*,i8*)*@_SMLLLN6String6fieldsE_198 to void(...)*),i32 -2147483647}>,align 8
@v=private unnamed_addr constant<{[4x i8],i32,i8*,void(...)*,void(...)*,i32}><{[4x i8]zeroinitializer,i32 -805306344,i8*null,void(...)*bitcast(i8*(i8*)*@_SMLFN6String8toStringE to void(...)*),void(...)*bitcast(i8*(i8*,i8*)*@_SMLLLN6String8toStringE_199 to void(...)*),i32 -2147483647}>,align 8
@w=private unnamed_addr constant<{[4x i8],i32,i8*,void(...)*,void(...)*,i32}><{[4x i8]zeroinitializer,i32 -805306344,i8*null,void(...)*bitcast(i8*(i8*)*@_SMLFN6String11toRawStringE to void(...)*),void(...)*bitcast(i8*(i8*,i8*)*@_SMLLLN6String11toRawStringE_200 to void(...)*),i32 -2147483647}>,align 8
@x=private unnamed_addr constant<{[4x i8],i32,i8*,void(...)*,void(...)*,i32}><{[4x i8]zeroinitializer,i32 -805306344,i8*null,void(...)*bitcast(i8*(i8*)*@_SMLFN6String9toCStringE to void(...)*),void(...)*bitcast(i8*(i8*,i8*)*@_SMLLLN6String9toCStringE_201 to void(...)*),i32 -2147483647}>,align 8
@y=private unnamed_addr constant<{[4x i8],i32,i8*,void(...)*,void(...)*,i32}><{[4x i8]zeroinitializer,i32 -805306344,i8*null,void(...)*bitcast(i8*(i8*)*@_SMLLLN6String10fromStringE_160 to void(...)*),void(...)*bitcast(i8*(i8*,i8*)*@_SMLLLN6String10fromStringE_203 to void(...)*),i32 -2147483647}>,align 8
@z=private unnamed_addr constant<{[4x i8],i32,i8*,void(...)*,void(...)*,i32}><{[4x i8]zeroinitializer,i32 -805306344,i8*null,void(...)*bitcast(i8*(i8*)*@_SMLFN6String10fromStringE to void(...)*),void(...)*bitcast(i8*(i8*,i8*)*@_SMLLLN6String10fromStringE_204 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*(i8*)*@_SMLLL4scan_165 to void(...)*),void(...)*bitcast(i8*(i8*,i8*)*@_SMLLL4scan_206 to void(...)*),i32 -2147483647}>,align 8
@B=private unnamed_addr constant<{[4x i8],i32,[1x i8]}><{[4x i8]zeroinitializer,i32 -2147483647,[1x i8]zeroinitializer}>,align 8
@C=private unnamed_addr constant<{[4x i8],i32,i8*,i32}><{[4x i8]zeroinitializer,i32 -805306360,i8*getelementptr inbounds(i8,i8*getelementptr inbounds(<{[4x i8],i32,[1x i8]}>,<{[4x i8],i32,[1x i8]}>*@B,i32 0,i32 0,i32 0),i32 8),i32 1}>,align 8
@D=private unnamed_addr constant<{[4x i8],i32,i8*,void(...)*,void(...)*,i32}><{[4x i8]zeroinitializer,i32 -805306344,i8*null,void(...)*bitcast(i8*(i8*)*@_SMLFN6String11fromCStringE to void(...)*),void(...)*bitcast(i8*(i8*,i8*)*@_SMLLLN6String11fromCStringE_207 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(i32(i8*)*@_SMLFN6String7compareE to void(...)*),void(...)*bitcast(i8*(i8*,i8*)*@_SMLLLN6String7compareE_208 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(i32(i8*)*@_SMLFN6String1_RE to void(...)*),void(...)*bitcast(i8*(i8*,i8*)*@_SMLLLN6String1_RE_209 to void(...)*),i32 -2147483647}>,align 8
@G=private unnamed_addr constant<{[4x i8],i32,i8*,void(...)*,void(...)*,i32}><{[4x i8]zeroinitializer,i32 -805306344,i8*null,void(...)*bitcast(i32(i8*)*@_SMLFN6String2_R_SE to void(...)*),void(...)*bitcast(i8*(i8*,i8*)*@_SMLLLN6String2_R_SE_210 to void(...)*),i32 -2147483647}>,align 8
@H=private unnamed_addr constant<{[4x i8],i32,i8*,void(...)*,void(...)*,i32}><{[4x i8]zeroinitializer,i32 -805306344,i8*null,void(...)*bitcast(i32(i8*)*@_SMLFN6String1_TE to void(...)*),void(...)*bitcast(i8*(i8*,i8*)*@_SMLLLN6String1_TE_211 to void(...)*),i32 -2147483647}>,align 8
@I=private unnamed_addr constant<{[4x i8],i32,i8*,void(...)*,void(...)*,i32}><{[4x i8]zeroinitializer,i32 -805306344,i8*null,void(...)*bitcast(i32(i8*)*@_SMLFN6String2_T_SE to void(...)*),void(...)*bitcast(i8*(i8*,i8*)*@_SMLLLN6String2_T_SE_212 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)*@_SMLFN6String4scanE to void(...)*),void(...)*bitcast(i8*(i8*,i8*,i8*)*@_SMLLLN6String4scanE_213 to void(...)*),i32 -2147483647}>,align 8
@_SMLZN6String7maxSizeE=local_unnamed_addr constant i32 268435454
@_SMLZN6String7explodeE=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*)
@_SMLZN6String10concatWithE=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*)
@_SMLZN6String8isPrefixE=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*)
@_SMLZN6String8isSuffixE=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*)
@_SMLZN6String11isSubstringE=local_unnamed_addr constant i8*bitcast(i8**getelementptr inbounds(<{[4x i8],i32,i8*,void(...)*,void(...)*,i32}>,<{[4x i8],i32,i8*,void(...)*,void(...)*,i32}>*@r,i64 0,i32 2)to i8*)
@_SMLZN6String9translateE=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*)
@_SMLZN6String7extractE=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*)
@_SMLZN6String9substringE=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*)
@_SMLZN6String1_ZE=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*)
@_SMLZN6String3strE=local_unnamed_addr constant i8*bitcast(i8**getelementptr inbounds(<{[4x i8],i32,i8*,void(...)*,void(...)*,i32}>,<{[4x i8],i32,i8*,void(...)*,void(...)*,i32}>*@n,i64 0,i32 2)to i8*)
@_SMLZN6String6tokensE=local_unnamed_addr constant i8*bitcast(i8**getelementptr inbounds(<{[4x i8],i32,i8*,void(...)*,void(...)*,i32}>,<{[4x i8],i32,i8*,void(...)*,void(...)*,i32}>*@s,i64 0,i32 2)to i8*)
@_SMLZN6String6fieldsE=local_unnamed_addr constant i8*bitcast(i8**getelementptr inbounds(<{[4x i8],i32,i8*,void(...)*,void(...)*,i32}>,<{[4x i8],i32,i8*,void(...)*,void(...)*,i32}>*@u,i64 0,i32 2)to i8*)
@_SMLZN6String7compareE=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*)
@_SMLZN6String1_RE=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*)
@_SMLZN6String2_R_SE=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*)
@_SMLZN6String1_TE=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*)
@_SMLZN6String2_T_SE=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*)
@_SMLZN6String8toStringE=local_unnamed_addr constant i8*bitcast(i8**getelementptr inbounds(<{[4x i8],i32,i8*,void(...)*,void(...)*,i32}>,<{[4x i8],i32,i8*,void(...)*,void(...)*,i32}>*@v,i64 0,i32 2)to i8*)
@_SMLZN6String11toRawStringE=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*)
@_SMLZN6String4scanE=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*)
@_SMLZN6String10fromStringE=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*)
@_SMLZN6String9toCStringE=local_unnamed_addr constant i8*bitcast(i8**getelementptr inbounds(<{[4x i8],i32,i8*,void(...)*,void(...)*,i32}>,<{[4x i8],i32,i8*,void(...)*,void(...)*,i32}>*@x,i64 0,i32 2)to i8*)
@_SMLZN6String11fromCStringE=local_unnamed_addr constant i8*bitcast(i8**getelementptr inbounds(<{[4x i8],i32,i8*,void(...)*,void(...)*,i32}>,<{[4x i8],i32,i8*,void(...)*,void(...)*,i32}>*@D,i64 0,i32 2)to i8*)
@_SML_ftab1ef93e13728790b1_String=external global i8
@K=private unnamed_addr global i8 0
declare void@llvm.gcroot(i8**,i8*)#0
declare{i32,i1}@llvm.sadd.with.overflow.i32(i32,i32)#0
declare i8*@sml_alloc(i32 inreg)local_unnamed_addr#0
declare void@sml_check(i32 inreg)local_unnamed_addr
declare void@sml_gcroot(i8*,void()*,i8*,i8*)local_unnamed_addr#0
declare i32@sml_memcmp(i8*,i32,i8*,i32,i32)local_unnamed_addr
declare i32@sml_personality(...)#0
declare void@sml_raise(i8*inreg)local_unnamed_addr#1
declare i8*@_SMLFN10CharVector8fromListE(i8*inreg)local_unnamed_addr#2 gc"smlsharp"
declare i8*@_SMLFN17SMLSharp__ScanChar11scanRepeat1E(i32 inreg,i32 inreg,i32 inreg,i32 inreg)local_unnamed_addr#2 gc"smlsharp"
declare i8*@_SMLFN17SMLSharp__ScanChar16scanEscapeSpacesE(i32 inreg,i32 inreg)local_unnamed_addr#2 gc"smlsharp"
declare i8*@_SMLFN17SMLSharp__ScanChar8scanCharE(i32 inreg,i32 inreg)local_unnamed_addr#2 gc"smlsharp"
declare i8*@_SMLFN17SMLSharp__ScanChar9scanCCharE(i32 inreg,i32 inreg)local_unnamed_addr#2 gc"smlsharp"
declare i8*@_SMLFN9StringCvt10scanStringE(i32 inreg,i32 inreg)local_unnamed_addr#2 gc"smlsharp"
declare i8*@_SMLFN9Substring11isSubstringE(i8*inreg)local_unnamed_addr#2 gc"smlsharp"
declare i8*@_SMLFN9Substring4fullE(i8*inreg)local_unnamed_addr#2 gc"smlsharp"
declare i8*@_SMLFN9Substring7explodeE(i8*inreg)local_unnamed_addr#2 gc"smlsharp"
declare i8*@_SMLFN9Substring8isPrefixE(i8*inreg)local_unnamed_addr#2 gc"smlsharp"
declare i8*@_SMLFN9Substring8isSuffixE(i8*inreg)local_unnamed_addr#2 gc"smlsharp"
declare i8*@_SMLFN9Substring9translateE(i8*inreg)local_unnamed_addr#2 gc"smlsharp"
declare void@_SML_main5c37eb24573fc5f9_StringCvt()local_unnamed_addr#2 gc"smlsharp"
declare void@_SML_main4fb8d2c1f12728b2_SMLSharp_ScanChar()local_unnamed_addr#2 gc"smlsharp"
declare void@_SML_maince7036f3433e1102_Char()local_unnamed_addr#2 gc"smlsharp"
declare void@_SML_mainadbb5309e852b68c_CharVector()local_unnamed_addr#2 gc"smlsharp"
declare void@_SML_main145db56e6796da5b_Substring()local_unnamed_addr#2 gc"smlsharp"
declare void@_SML_load5c37eb24573fc5f9_StringCvt(i8*)local_unnamed_addr
declare void@_SML_load4fb8d2c1f12728b2_SMLSharp_ScanChar(i8*)local_unnamed_addr
declare void@_SML_loadce7036f3433e1102_Char(i8*)local_unnamed_addr
declare void@_SML_loadadbb5309e852b68c_CharVector(i8*)local_unnamed_addr
declare void@_SML_load145db56e6796da5b_Substring(i8*)local_unnamed_addr
define private void@_SML_tabb1ef93e13728790b1_String()#3{
unreachable
}
define void@_SML_load1ef93e13728790b1_String(i8*%a)local_unnamed_addr#0{
%b=load i8,i8*@K,align 1
%c=icmp eq i8%b,0
br i1%c,label%e,label%d
d:
ret void
e:
store i8 1,i8*@K,align 1
tail call void@_SML_load5c37eb24573fc5f9_StringCvt(i8*%a)#0
tail call void@_SML_load4fb8d2c1f12728b2_SMLSharp_ScanChar(i8*%a)#0
tail call void@_SML_loadce7036f3433e1102_Char(i8*%a)#0
tail call void@_SML_loadadbb5309e852b68c_CharVector(i8*%a)#0
tail call void@_SML_load145db56e6796da5b_Substring(i8*%a)#0
tail call void@sml_gcroot(i8*%a,void()*@_SML_tabb1ef93e13728790b1_String,i8*@_SML_ftab1ef93e13728790b1_String,i8*null)#0
ret void
}
define void@_SML_main1ef93e13728790b1_String()local_unnamed_addr#2 gc"smlsharp"{
%a=load i8,i8*@K,align 1
%b=and i8%a,2
%c=icmp eq i8%b,0
br i1%c,label%e,label%d
d:
ret void
e:
store i8 3,i8*@K,align 1
tail call void@_SML_main5c37eb24573fc5f9_StringCvt()#2
tail call void@_SML_main4fb8d2c1f12728b2_SMLSharp_ScanChar()#2
tail call void@_SML_maince7036f3433e1102_Char()#2
tail call void@_SML_mainadbb5309e852b68c_CharVector()#2
tail call void@_SML_main145db56e6796da5b_Substring()#2
br label%d
}
define fastcc i8*@_SMLFN6String9substringE(i8*inreg%a)#2 gc"smlsharp"{
%b=alloca i8*,align 8
%c=alloca i8*,align 8
call void@llvm.gcroot(i8**%b,i8*null)#0
call void@llvm.gcroot(i8**%c,i8*null)#0
%d=bitcast i8*%a to i8**
%e=load i8*,i8**%d,align 8
store i8*%e,i8**%b,align 8
%f=getelementptr inbounds i8,i8*%a,i64 8
%g=bitcast i8*%f to i32*
%h=load i32,i32*%g,align 4
%i=getelementptr inbounds i8,i8*%a,i64 12
%j=bitcast i8*%i to i32*
%k=load i32,i32*%j,align 4
%l=getelementptr inbounds i8,i8*%e,i64 -4
%m=bitcast i8*%l to i32*
%n=load i32,i32*%m,align 4
%o=and i32%n,268435455
%p=icmp uge i32%h,%o
%q=icmp slt i32%k,0
%r=xor i32%h,-1
%s=add i32%o,%r
%t=icmp slt i32%s,%k
%u=or i1%q,%p
%v=or i1%t,%u
br i1%v,label%w,label%O
w:
%x=load i8*,i8**@_SMLZ9Subscript,align 8
store i8*%x,i8**%b,align 8
%y=call i8*@sml_alloc(i32 inreg 20)#0
%z=getelementptr inbounds i8,i8*%y,i64 -4
%A=bitcast i8*%z to i32*
store i32 1342177296,i32*%A,align 4
store i8*%y,i8**%c,align 8
%B=load i8*,i8**%b,align 8
store i8*null,i8**%b,align 8
%C=bitcast i8*%y to i8**
store i8*%B,i8**%C,align 8
%D=getelementptr inbounds i8,i8*%y,i64 8
%E=bitcast i8*%D to i8**
store i8*getelementptr inbounds(<{[4x i8],i32,[38x i8]}>,<{[4x i8],i32,[38x i8]}>*@b,i64 0,i32 2,i64 0),i8**%E,align 8
%F=getelementptr inbounds i8,i8*%y,i64 16
%G=bitcast i8*%F to i32*
store i32 3,i32*%G,align 4
%H=call i8*@sml_alloc(i32 inreg 60)#0
%I=getelementptr inbounds i8,i8*%H,i64 -4
%J=bitcast i8*%I to i32*
store i32 1342177336,i32*%J,align 4
%K=getelementptr inbounds i8,i8*%H,i64 56
%L=bitcast i8*%K to i32*
store i32 1,i32*%L,align 4
%M=load i8*,i8**%c,align 8
%N=bitcast i8*%H to i8**
store i8*%M,i8**%N,align 8
call void@sml_raise(i8*inreg%H)#1
unreachable
O:
%P=add nsw i32%k,1
%Q=call i8*@sml_alloc(i32 inreg%P)#0
%R=getelementptr inbounds i8,i8*%Q,i64 -4
%S=bitcast i8*%R to i32*
store i32%P,i32*%S,align 4
%T=sext i32%k to i64
%U=getelementptr inbounds i8,i8*%Q,i64%T
store i8 0,i8*%U,align 1
%V=load i8*,i8**%b,align 8
%W=sext i32%h to i64
%X=getelementptr inbounds i8,i8*%V,i64%W
call void@llvm.memcpy.p0i8.p0i8.i32(i8*%Q,i8*%X,i32%k,i1 false)
ret i8*%Q
}
define fastcc i8*@_SMLFN6String7extractE(i8*inreg%a)#2 gc"smlsharp"{
%b=alloca i8*,align 8
%c=alloca i8*,align 8
call void@llvm.gcroot(i8**%b,i8*null)#0
call void@llvm.gcroot(i8**%c,i8*null)#0
%d=bitcast i8*%a to i8**
%e=load i8*,i8**%d,align 8
store i8*%e,i8**%b,align 8
%f=getelementptr inbounds i8,i8*%a,i64 8
%g=bitcast i8*%f to i32*
%h=load i32,i32*%g,align 4
%i=getelementptr inbounds i8,i8*%a,i64 16
%j=bitcast i8*%i to i8**
%k=load i8*,i8**%j,align 8
%l=icmp eq i8*%k,null
br i1%l,label%m,label%Y
m:
%n=getelementptr inbounds i8,i8*%e,i64 -4
%o=bitcast i8*%n to i32*
%p=load i32,i32*%o,align 4
%q=and i32%p,268435455
%r=icmp ult i32%h,%q
br i1%r,label%K,label%s
s:
%t=load i8*,i8**@_SMLZ9Subscript,align 8
store i8*%t,i8**%b,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**%c,align 8
%x=load i8*,i8**%b,align 8
store i8*null,i8**%b,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,[38x i8]}>,<{[4x i8],i32,[38x i8]}>*@c,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**%c,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=xor i32%h,-1
%M=add i32%q,%L
%N=add nsw i32%M,1
%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=sext i32%M to i64
%S=getelementptr inbounds i8,i8*%O,i64%R
store i8 0,i8*%S,align 1
%T=load i8*,i8**%b,align 8
%U=sext i32%h to i64
%V=getelementptr inbounds i8,i8*%T,i64%U
call void@llvm.memcpy.p0i8.p0i8.i32(i8*%O,i8*%V,i32%M,i1 false)
br label%W
W:
%X=phi i8*[%O,%K],[%aG,%aE]
ret i8*%X
Y:
%Z=bitcast i8*%k to i32*
%aa=load i32,i32*%Z,align 4
%ab=getelementptr inbounds i8,i8*%e,i64 -4
%ac=bitcast i8*%ab to i32*
%ad=load i32,i32*%ac,align 4
%ae=and i32%ad,268435455
%af=icmp uge i32%h,%ae
%ag=icmp slt i32%aa,0
%ah=xor i32%h,-1
%ai=add i32%ae,%ah
%aj=icmp slt i32%ai,%aa
%ak=or i1%ag,%af
%al=or i1%aj,%ak
br i1%al,label%am,label%aE
am:
%an=load i8*,i8**@_SMLZ9Subscript,align 8
store i8*%an,i8**%b,align 8
%ao=call i8*@sml_alloc(i32 inreg 20)#0
%ap=getelementptr inbounds i8,i8*%ao,i64 -4
%aq=bitcast i8*%ap to i32*
store i32 1342177296,i32*%aq,align 4
store i8*%ao,i8**%c,align 8
%ar=load i8*,i8**%b,align 8
store i8*null,i8**%b,align 8
%as=bitcast i8*%ao to i8**
store i8*%ar,i8**%as,align 8
%at=getelementptr inbounds i8,i8*%ao,i64 8
%au=bitcast i8*%at to i8**
store i8*getelementptr inbounds(<{[4x i8],i32,[38x i8]}>,<{[4x i8],i32,[38x i8]}>*@b,i64 0,i32 2,i64 0),i8**%au,align 8
%av=getelementptr inbounds i8,i8*%ao,i64 16
%aw=bitcast i8*%av to i32*
store i32 3,i32*%aw,align 4
%ax=call i8*@sml_alloc(i32 inreg 60)#0
%ay=getelementptr inbounds i8,i8*%ax,i64 -4
%az=bitcast i8*%ay to i32*
store i32 1342177336,i32*%az,align 4
%aA=getelementptr inbounds i8,i8*%ax,i64 56
%aB=bitcast i8*%aA to i32*
store i32 1,i32*%aB,align 4
%aC=load i8*,i8**%c,align 8
%aD=bitcast i8*%ax to i8**
store i8*%aC,i8**%aD,align 8
call void@sml_raise(i8*inreg%ax)#1
unreachable
aE:
%aF=add nsw i32%aa,1
%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=sext i32%aa to i64
%aK=getelementptr inbounds i8,i8*%aG,i64%aJ
store i8 0,i8*%aK,align 1
%aL=load i8*,i8**%b,align 8
%aM=sext i32%h to i64
%aN=getelementptr inbounds i8,i8*%aL,i64%aM
call void@llvm.memcpy.p0i8.p0i8.i32(i8*%aG,i8*%aN,i32%aa,i1 false)
br label%W
}
define fastcc i8*@_SMLFN6String1_ZE(i8*inreg%a)#2 gc"smlsharp"personality i32(...)*@sml_personality{
%b=alloca i8*,align 8
%c=alloca i8*,align 8
call void@llvm.gcroot(i8**%b,i8*null)#0
call void@llvm.gcroot(i8**%c,i8*null)#0
%d=bitcast i8*%a to i8**
%e=load i8*,i8**%d,align 8
store i8*%e,i8**%b,align 8
%f=getelementptr inbounds i8,i8*%a,i64 8
%g=bitcast i8*%f to i8**
%h=load i8*,i8**%g,align 8
store i8*%h,i8**%c,align 8
%i=getelementptr inbounds i8,i8*%e,i64 -4
%j=bitcast i8*%i to i32*
%k=load i32,i32*%j,align 4
%l=and i32%k,268435455
%m=add nsw i32%l,-1
%n=getelementptr inbounds i8,i8*%h,i64 -4
%o=bitcast i8*%n to i32*
%p=load i32,i32*%o,align 4
%q=and i32%p,268435455
%r=add nsw i32%q,-1
%s=add nsw i32%r,%m
%t=icmp ugt i32%s,268435454
br i1%t,label%F,label%u
u:
%v=add nsw i32%m,%q
%w=call i8*@sml_alloc(i32 inreg%v)#0
%x=getelementptr inbounds i8,i8*%w,i64 -4
%y=bitcast i8*%x to i32*
store i32%v,i32*%y,align 4
%z=sext i32%s to i64
%A=getelementptr inbounds i8,i8*%w,i64%z
store i8 0,i8*%A,align 1
%B=load i8*,i8**%b,align 8
call void@llvm.memcpy.p0i8.p0i8.i32(i8*%w,i8*%B,i32%m,i1 false)
%C=load i8*,i8**%c,align 8
%D=sext i32%m to i64
%E=getelementptr inbounds i8,i8*%w,i64%D
call void@llvm.memcpy.p0i8.p0i8.i32(i8*%E,i8*%C,i32%r,i1 false)
ret i8*%w
F:
store i8*null,i8**%c,align 8
%G=load i8*,i8**@_SMLZ4Size,align 8
store i8*%G,i8**%b,align 8
%H=call i8*@sml_alloc(i32 inreg 20)#0
%I=getelementptr inbounds i8,i8*%H,i64 -4
%J=bitcast i8*%I to i32*
store i32 1342177296,i32*%J,align 4
store i8*%H,i8**%c,align 8
%K=load i8*,i8**%b,align 8
store i8*null,i8**%b,align 8
%L=bitcast i8*%H to i8**
store i8*%K,i8**%L,align 8
%M=getelementptr inbounds i8,i8*%H,i64 8
%N=bitcast i8*%M to i8**
store i8*getelementptr inbounds(<{[4x i8],i32,[38x i8]}>,<{[4x i8],i32,[38x i8]}>*@e,i64 0,i32 2,i64 0),i8**%N,align 8
%O=getelementptr inbounds i8,i8*%H,i64 16
%P=bitcast i8*%O to i32*
store i32 3,i32*%P,align 4
%Q=call i8*@sml_alloc(i32 inreg 60)#0
%R=getelementptr inbounds i8,i8*%Q,i64 -4
%S=bitcast i8*%R to i32*
store i32 1342177336,i32*%S,align 4
%T=getelementptr inbounds i8,i8*%Q,i64 56
%U=bitcast i8*%T to i32*
store i32 1,i32*%U,align 4
%V=load i8*,i8**%c,align 8
%W=bitcast i8*%Q to i8**
store i8*%V,i8**%W,align 8
call void@sml_raise(i8*inreg%Q)#1
unreachable
}
define internal fastcc i8*@_SMLLLN6String10concatWithE_122(i8*inreg%a,i8*inreg%b)#2 gc"smlsharp"personality i32(...)*@sml_personality{
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
store i8*%b,i8**%c,align 8
%g=icmp eq i8*%b,null
%h=bitcast i8*%a to i32**
br i1%g,label%i,label%l
i:
%j=phi i8*[getelementptr inbounds(<{[4x i8],i32,[1x i8]}>,<{[4x i8],i32,[1x i8]}>*@B,i64 0,i32 2,i64 0),%k],[%n,%l]
ret i8*%j
l:
%m=bitcast i8*%b to i8**
%n=load i8*,i8**%m,align 8
%o=getelementptr inbounds i8,i8*%b,i64 8
%p=bitcast i8*%o to i8**
%q=load i8*,i8**%p,align 8
%r=icmp eq i8*%q,null
br i1%r,label%i,label%s
s:
%t=load i32*,i32**%h,align 8
%u=getelementptr inbounds i32,i32*%t,i64 -1
%v=load i32,i32*%u,align 4
%w=and i32%v,268435455
%x=add nsw i32%w,-1
%y=call i8*@sml_alloc(i32 inreg 20)#0
%z=getelementptr inbounds i8,i8*%y,i64 -4
%A=bitcast i8*%z to i32*
store i32 1342177296,i32*%A,align 4
%B=getelementptr inbounds i8,i8*%y,i64 12
%C=bitcast i8*%B to i32*
store i32 0,i32*%C,align 1
%D=load i8*,i8**%c,align 8
br label%E
E:
%F=phi i8*[%bi,%bg],[%y,%s]
%G=phi i8*[%bn,%bg],[%D,%s]
%H=phi i32[%bh,%bg],[0,%s]
%I=bitcast i8*%F to i8**
store i8*%G,i8**%I,align 8
%J=getelementptr inbounds i8,i8*%F,i64 8
%K=bitcast i8*%J to i32*
store i32%H,i32*%K,align 4
%L=getelementptr inbounds i8,i8*%F,i64 16
%M=bitcast i8*%L to i32*
store i32 1,i32*%M,align 4
store i8*%F,i8**%d,align 8
%N=load atomic i32,i32*@sml_check_flag unordered,align 4
%O=icmp eq i32%N,0
br i1%O,label%R,label%P
P:
call void@sml_check(i32 inreg%N)
%Q=load i8*,i8**%d,align 8
br label%R
R:
%S=phi i8*[%Q,%P],[%F,%E]
%T=bitcast i8*%S to i8**
%U=load i8*,i8**%T,align 8
%V=icmp eq i8*%U,null
br i1%V,label%W,label%aa
W:
store i8*null,i8**%d,align 8
%X=getelementptr inbounds i8,i8*%S,i64 8
%Y=bitcast i8*%X to i32*
%Z=load i32,i32*%Y,align 4
br label%bS
aa:
%ab=bitcast i8*%U to i8**
%ac=load i8*,i8**%ab,align 8
%ad=getelementptr inbounds i8,i8*%U,i64 8
%ae=bitcast i8*%ad to i8**
%af=load i8*,i8**%ae,align 8
store i8*%af,i8**%e,align 8
%ag=icmp eq i8*%af,null
br i1%ag,label%ah,label%aF
ah:
store i8*null,i8**%e,align 8
store i8*null,i8**%d,align 8
%ai=getelementptr inbounds i8,i8*%S,i64 8
%aj=bitcast i8*%ai to i32*
%ak=load i32,i32*%aj,align 4
%al=getelementptr inbounds i8,i8*%ac,i64 -4
%am=bitcast i8*%al to i32*
%an=load i32,i32*%am,align 4
%ao=and i32%an,268435455
%ap=add nsw i32%ao,-1
%aq=call{i32,i1}@llvm.sadd.with.overflow.i32(i32%ak,i32%ap)#0
%ar=extractvalue{i32,i1}%aq,1
br i1%ar,label%as,label%aD
as:
store i8*null,i8**%f,align 8
%at=load i8*,i8**@_SMLZ8Overflow,align 8
store i8*%at,i8**%c,align 8
%au=call i8*@sml_alloc(i32 inreg 20)#0
%av=getelementptr inbounds i8,i8*%au,i64 -4
%aw=bitcast i8*%av to i32*
store i32 1342177296,i32*%aw,align 4
%ax=load i8*,i8**%c,align 8
%ay=bitcast i8*%au to i8**
store i8*%ax,i8**%ay,align 8
%az=getelementptr inbounds i8,i8*%au,i64 8
%aA=bitcast i8*%az to i8**
store i8*getelementptr inbounds(<{[4x i8],i32,[38x i8]}>,<{[4x i8],i32,[38x i8]}>*@i,i64 0,i32 2,i64 0),i8**%aA,align 8
%aB=getelementptr inbounds i8,i8*%au,i64 16
%aC=bitcast i8*%aB to i32*
store i32 3,i32*%aC,align 4
store i8*%au,i8**%c,align 8
br label%bo
aD:
%aE=add nsw i32%ap,%ak
br label%bS
aF:
store i8*null,i8**%d,align 8
%aG=getelementptr inbounds i8,i8*%S,i64 8
%aH=bitcast i8*%aG to i32*
%aI=load i32,i32*%aH,align 4
%aJ=getelementptr inbounds i8,i8*%ac,i64 -4
%aK=bitcast i8*%aJ to i32*
%aL=load i32,i32*%aK,align 4
%aM=and i32%aL,268435455
%aN=add nsw i32%aM,-1
%aO=call{i32,i1}@llvm.sadd.with.overflow.i32(i32%aI,i32%aN)#0
%aP=extractvalue{i32,i1}%aO,1
br i1%aP,label%aQ,label%a1
aQ:
store i8*null,i8**%e,align 8
store i8*null,i8**%f,align 8
%aR=load i8*,i8**@_SMLZ8Overflow,align 8
store i8*%aR,i8**%c,align 8
%aS=call i8*@sml_alloc(i32 inreg 20)#0
%aT=getelementptr inbounds i8,i8*%aS,i64 -4
%aU=bitcast i8*%aT to i32*
store i32 1342177296,i32*%aU,align 4
%aV=load i8*,i8**%c,align 8
%aW=bitcast i8*%aS to i8**
store i8*%aV,i8**%aW,align 8
%aX=getelementptr inbounds i8,i8*%aS,i64 8
%aY=bitcast i8*%aX to i8**
store i8*getelementptr inbounds(<{[4x i8],i32,[38x i8]}>,<{[4x i8],i32,[38x i8]}>*@g,i64 0,i32 2,i64 0),i8**%aY,align 8
%aZ=getelementptr inbounds i8,i8*%aS,i64 16
%a0=bitcast i8*%aZ to i32*
store i32 3,i32*%a0,align 4
store i8*%aS,i8**%c,align 8
br label%bo
a1:
%a2=add nsw i32%aN,%aI
%a3=call{i32,i1}@llvm.sadd.with.overflow.i32(i32%a2,i32%x)#0
%a4=extractvalue{i32,i1}%a3,1
br i1%a4,label%a5,label%bg
a5:
store i8*null,i8**%e,align 8
store i8*null,i8**%f,align 8
%a6=load i8*,i8**@_SMLZ8Overflow,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**%c,align 8
%bb=bitcast i8*%a7 to i8**
store i8*%ba,i8**%bb,align 8
%bc=getelementptr inbounds i8,i8*%a7,i64 8
%bd=bitcast i8*%bc to i8**
store i8*getelementptr inbounds(<{[4x i8],i32,[38x i8]}>,<{[4x i8],i32,[38x i8]}>*@h,i64 0,i32 2,i64 0),i8**%bd,align 8
%be=getelementptr inbounds i8,i8*%a7,i64 16
%bf=bitcast i8*%be to i32*
store i32 3,i32*%bf,align 4
store i8*%a7,i8**%c,align 8
br label%bo
bg:
%bh=add nsw i32%a2,%x
%bi=call i8*@sml_alloc(i32 inreg 20)#0
%bj=getelementptr inbounds i8,i8*%bi,i64 -4
%bk=bitcast i8*%bj to i32*
store i32 1342177296,i32*%bk,align 4
%bl=getelementptr inbounds i8,i8*%bi,i64 12
%bm=bitcast i8*%bl to i32*
store i32 0,i32*%bm,align 1
%bn=load i8*,i8**%e,align 8
store i8*null,i8**%e,align 8
br label%E
bo:
%bp=phi i8*[%a6,%a5],[%aR,%aQ],[%at,%as]
%bq=phi i8*[%ba,%a5],[%aV,%aQ],[%ax,%as]
%br=icmp eq i8*%bq,%bp
br i1%br,label%bs,label%bK
bs:
%bt=load i8*,i8**@_SMLZ4Size,align 8
store i8*%bt,i8**%c,align 8
%bu=call i8*@sml_alloc(i32 inreg 20)#0
%bv=getelementptr inbounds i8,i8*%bu,i64 -4
%bw=bitcast i8*%bv to i32*
store i32 1342177296,i32*%bw,align 4
store i8*%bu,i8**%d,align 8
%bx=load i8*,i8**%c,align 8
store i8*null,i8**%c,align 8
%by=bitcast i8*%bu to i8**
store i8*%bx,i8**%by,align 8
%bz=getelementptr inbounds i8,i8*%bu,i64 8
%bA=bitcast i8*%bz to i8**
store i8*getelementptr inbounds(<{[4x i8],i32,[38x i8]}>,<{[4x i8],i32,[38x i8]}>*@j,i64 0,i32 2,i64 0),i8**%bA,align 8
%bB=getelementptr inbounds i8,i8*%bu,i64 16
%bC=bitcast i8*%bB to i32*
store i32 3,i32*%bC,align 4
%bD=call i8*@sml_alloc(i32 inreg 60)#0
%bE=getelementptr inbounds i8,i8*%bD,i64 -4
%bF=bitcast i8*%bE to i32*
store i32 1342177336,i32*%bF,align 4
%bG=getelementptr inbounds i8,i8*%bD,i64 56
%bH=bitcast i8*%bG to i32*
store i32 1,i32*%bH,align 4
%bI=load i8*,i8**%d,align 8
%bJ=bitcast i8*%bD to i8**
store i8*%bI,i8**%bJ,align 8
call void@sml_raise(i8*inreg%bD)#1
unreachable
bK:
%bL=call i8*@sml_alloc(i32 inreg 60)#0
%bM=getelementptr inbounds i8,i8*%bL,i64 -4
%bN=bitcast i8*%bM to i32*
store i32 1342177336,i32*%bN,align 4
%bO=getelementptr inbounds i8,i8*%bL,i64 56
%bP=bitcast i8*%bO to i32*
store i32 1,i32*%bP,align 4
%bQ=load i8*,i8**%c,align 8
%bR=bitcast i8*%bL to i8**
store i8*%bQ,i8**%bR,align 8
call void@sml_raise(i8*inreg%bL)#1
unreachable
bS:
%bT=phi i32[%Z,%W],[%aE,%aD]
%bU=icmp ugt i32%bT,268435454
br i1%bU,label%cc,label%bV
bV:
%bW=add nsw i32%bT,1
%bX=call i8*@sml_alloc(i32 inreg%bW)#0
%bY=getelementptr inbounds i8,i8*%bX,i64 -4
%bZ=bitcast i8*%bY to i32*
store i32%bW,i32*%bZ,align 4
%b0=sext i32%bT to i64
%b1=getelementptr inbounds i8,i8*%bX,i64%b0
store i8 0,i8*%b1,align 1
store i8*%bX,i8**%d,align 8
%b2=call i8*@sml_alloc(i32 inreg 20)#0
%b3=getelementptr inbounds i8,i8*%b2,i64 -4
%b4=bitcast i8*%b3 to i32*
store i32 1342177296,i32*%b4,align 4
%b5=bitcast i8*%b2 to i64*
store i64 0,i64*%b5,align 4
%b6=load i8*,i8**%c,align 8
store i8*null,i8**%c,align 8
%b7=getelementptr inbounds i8,i8*%b2,i64 8
%b8=bitcast i8*%b7 to i8**
store i8*%b6,i8**%b8,align 8
%b9=getelementptr inbounds i8,i8*%b2,i64 16
%ca=bitcast i8*%b9 to i32*
store i32 2,i32*%ca,align 4
%cb=bitcast i8**%f to i8***
br label%cu
cc:
store i8*null,i8**%f,align 8
%cd=load i8*,i8**@_SMLZ4Size,align 8
store i8*%cd,i8**%c,align 8
%ce=call i8*@sml_alloc(i32 inreg 20)#0
%cf=getelementptr inbounds i8,i8*%ce,i64 -4
%cg=bitcast i8*%cf to i32*
store i32 1342177296,i32*%cg,align 4
store i8*%ce,i8**%d,align 8
%ch=load i8*,i8**%c,align 8
store i8*null,i8**%c,align 8
%ci=bitcast i8*%ce to i8**
store i8*%ch,i8**%ci,align 8
%cj=getelementptr inbounds i8,i8*%ce,i64 8
%ck=bitcast i8*%cj to i8**
store i8*getelementptr inbounds(<{[4x i8],i32,[38x i8]}>,<{[4x i8],i32,[38x i8]}>*@k,i64 0,i32 2,i64 0),i8**%ck,align 8
%cl=getelementptr inbounds i8,i8*%ce,i64 16
%cm=bitcast i8*%cl to i32*
store i32 3,i32*%cm,align 4
%cn=call i8*@sml_alloc(i32 inreg 60)#0
%co=getelementptr inbounds i8,i8*%cn,i64 -4
%cp=bitcast i8*%co to i32*
store i32 1342177336,i32*%cp,align 4
%cq=getelementptr inbounds i8,i8*%cn,i64 56
%cr=bitcast i8*%cq to i32*
store i32 1,i32*%cr,align 4
%cs=load i8*,i8**%d,align 8
%ct=bitcast i8*%cn to i8**
store i8*%cs,i8**%ct,align 8
call void@sml_raise(i8*inreg%cn)#1
unreachable
cu:
%cv=phi i8*[%c6,%cY],[%b2,%bV]
store i8*%cv,i8**%c,align 8
%cw=load atomic i32,i32*@sml_check_flag unordered,align 4
%cx=icmp eq i32%cw,0
br i1%cx,label%cA,label%cy
cy:
call void@sml_check(i32 inreg%cw)
%cz=load i8*,i8**%c,align 8
br label%cA
cA:
%cB=phi i8*[%cz,%cy],[%cv,%cu]
%cC=bitcast i8*%cB to i32*
%cD=load i32,i32*%cC,align 4
%cE=getelementptr inbounds i8,i8*%cB,i64 8
%cF=bitcast i8*%cE to i8**
%cG=load i8*,i8**%cF,align 8
%cH=icmp eq i8*%cG,null
br i1%cH,label%dh,label%cI
cI:
%cJ=bitcast i8*%cG to i8**
%cK=load i8*,i8**%cJ,align 8
%cL=getelementptr inbounds i8,i8*%cG,i64 8
%cM=bitcast i8*%cL to i8**
%cN=load i8*,i8**%cM,align 8
store i8*%cN,i8**%c,align 8
%cO=getelementptr inbounds i8,i8*%cK,i64 -4
%cP=bitcast i8*%cO to i32*
%cQ=load i32,i32*%cP,align 4
%cR=and i32%cQ,268435455
%cS=add nsw i32%cR,-1
%cT=load i8*,i8**%d,align 8
%cU=sext i32%cD to i64
%cV=getelementptr inbounds i8,i8*%cT,i64%cU
call void@llvm.memmove.p0i8.p0i8.i32(i8*%cV,i8*%cK,i32%cS,i1 false)
%cW=load i8*,i8**%c,align 8
%cX=icmp eq i8*%cW,null
br i1%cX,label%dh,label%cY
cY:
%cZ=add nsw i32%cS,%cD
%c0=load i8**,i8***%cb,align 8
%c1=load i8*,i8**%c0,align 8
%c2=load i8*,i8**%d,align 8
%c3=sext i32%cZ to i64
%c4=getelementptr inbounds i8,i8*%c2,i64%c3
call void@llvm.memmove.p0i8.p0i8.i32(i8*%c4,i8*%c1,i32%x,i1 false)
%c5=add nsw i32%cZ,%x
%c6=call i8*@sml_alloc(i32 inreg 20)#0
%c7=bitcast i8*%c6 to i32*
%c8=getelementptr inbounds i8,i8*%c6,i64 -4
%c9=bitcast i8*%c8 to i32*
store i32 1342177296,i32*%c9,align 4
%da=getelementptr inbounds i8,i8*%c6,i64 4
%db=bitcast i8*%da to i32*
store i32 0,i32*%db,align 1
store i32%c5,i32*%c7,align 4
%dc=load i8*,i8**%c,align 8
store i8*null,i8**%c,align 8
%dd=getelementptr inbounds i8,i8*%c6,i64 8
%de=bitcast i8*%dd to i8**
store i8*%dc,i8**%de,align 8
%df=getelementptr inbounds i8,i8*%c6,i64 16
%dg=bitcast i8*%df to i32*
store i32 2,i32*%dg,align 4
br label%cu
dh:
%di=load i8*,i8**%d,align 8
ret i8*%di
}
define fastcc i8*@_SMLFN6String10concatWithE(i8*inreg%a)#4 gc"smlsharp"{
%b=alloca i8*,align 8
%c=alloca i8*,align 8
call void@llvm.gcroot(i8**%b,i8*null)#0
call void@llvm.gcroot(i8**%c,i8*null)#0
store i8*%a,i8**%b,align 8
%d=call i8*@sml_alloc(i32 inreg 12)#0
%e=getelementptr inbounds i8,i8*%d,i64 -4
%f=bitcast i8*%e to i32*
store i32 1342177288,i32*%f,align 4
store i8*%d,i8**%c,align 8
%g=load i8*,i8**%b,align 8
store i8*null,i8**%b,align 8
%h=bitcast i8*%d to i8**
store i8*%g,i8**%h,align 8
%i=getelementptr inbounds i8,i8*%d,i64 8
%j=bitcast i8*%i to i32*
store i32 1,i32*%j,align 4
%k=call i8*@sml_alloc(i32 inreg 28)#0
%l=getelementptr inbounds i8,i8*%k,i64 -4
%m=bitcast i8*%l to i32*
store i32 1342177304,i32*%m,align 4
%n=load i8*,i8**%c,align 8
%o=bitcast i8*%k to i8**
store i8*%n,i8**%o,align 8
%p=getelementptr inbounds i8,i8*%k,i64 8
%q=bitcast i8*%p to void(...)**
store void(...)*bitcast(i8*(i8*,i8*)*@_SMLLLN6String10concatWithE_122 to void(...)*),void(...)**%q,align 8
%r=getelementptr inbounds i8,i8*%k,i64 16
%s=bitcast i8*%r to void(...)**
store void(...)*bitcast(i8*(i8*,i8*)*@_SMLLLN6String10concatWithE_122 to void(...)*),void(...)**%s,align 8
%t=getelementptr inbounds i8,i8*%k,i64 24
%u=bitcast i8*%t to i32*
store i32 -2147483647,i32*%u,align 4
ret i8*%k
}
define internal fastcc i8*@_SMLLLN6String9translateE_125(i8*inreg%a,i8*inreg%b)#2 gc"smlsharp"{
%c=alloca i8*,align 8
%d=alloca i8*,align 8
call void@llvm.gcroot(i8**%c,i8*null)#0
call void@llvm.gcroot(i8**%d,i8*null)#0
store i8*%a,i8**%d,align 8
store i8*%b,i8**%c,align 8
%e=load atomic i32,i32*@sml_check_flag unordered,align 4
%f=icmp eq i32%e,0
br i1%f,label%g,label%i
g:
%h=bitcast i8*%a to i8**
br label%l
i:
call void@sml_check(i32 inreg%e)
%j=bitcast i8**%d to i8***
%k=load i8**,i8***%j,align 8
br label%l
l:
%m=phi i8**[%k,%i],[%h,%g]
store i8*null,i8**%d,align 8
%n=load i8*,i8**%m,align 8
%o=call fastcc i8*@_SMLFN9Substring9translateE(i8*inreg%n)
%p=getelementptr inbounds i8,i8*%o,i64 16
%q=bitcast i8*%p to i8*(i8*,i8*)**
%r=load i8*(i8*,i8*)*,i8*(i8*,i8*)**%q,align 8
%s=bitcast i8*%o to i8**
%t=load i8*,i8**%s,align 8
store i8*%t,i8**%d,align 8
%u=load i8*,i8**%c,align 8
store i8*null,i8**%c,align 8
%v=call fastcc i8*@_SMLFN9Substring4fullE(i8*inreg%u)
%w=load i8*,i8**%d,align 8
%x=tail call fastcc i8*%r(i8*inreg%w,i8*inreg%v)
ret i8*%x
}
define fastcc i8*@_SMLFN6String9translateE(i8*inreg%a)#4 gc"smlsharp"{
%b=alloca i8*,align 8
%c=alloca i8*,align 8
call void@llvm.gcroot(i8**%b,i8*null)#0
call void@llvm.gcroot(i8**%c,i8*null)#0
store i8*%a,i8**%b,align 8
%d=call i8*@sml_alloc(i32 inreg 12)#0
%e=getelementptr inbounds i8,i8*%d,i64 -4
%f=bitcast i8*%e to i32*
store i32 1342177288,i32*%f,align 4
store i8*%d,i8**%c,align 8
%g=load i8*,i8**%b,align 8
store i8*null,i8**%b,align 8
%h=bitcast i8*%d to i8**
store i8*%g,i8**%h,align 8
%i=getelementptr inbounds i8,i8*%d,i64 8
%j=bitcast i8*%i to i32*
store i32 1,i32*%j,align 4
%k=call i8*@sml_alloc(i32 inreg 28)#0
%l=getelementptr inbounds i8,i8*%k,i64 -4
%m=bitcast i8*%l to i32*
store i32 1342177304,i32*%m,align 4
%n=load i8*,i8**%c,align 8
%o=bitcast i8*%k to i8**
store i8*%n,i8**%o,align 8
%p=getelementptr inbounds i8,i8*%k,i64 8
%q=bitcast i8*%p to void(...)**
store void(...)*bitcast(i8*(i8*,i8*)*@_SMLLLN6String9translateE_125 to void(...)*),void(...)**%q,align 8
%r=getelementptr inbounds i8,i8*%k,i64 16
%s=bitcast i8*%r to void(...)**
store void(...)*bitcast(i8*(i8*,i8*)*@_SMLLLN6String9translateE_125 to void(...)*),void(...)**%s,align 8
%t=getelementptr inbounds i8,i8*%k,i64 24
%u=bitcast i8*%t to i32*
store i32 -2147483647,i32*%u,align 4
ret i8*%k
}
define fastcc i8*@_SMLFN6String3strE(i8 inreg%a)#4 gc"smlsharp"{
%b=tail call i8*@sml_alloc(i32 inreg 2)#0
%c=getelementptr inbounds i8,i8*%b,i64 -4
%d=bitcast i8*%c to i32*
store i32 2,i32*%d,align 4
%e=getelementptr inbounds i8,i8*%b,i64 1
store i8 0,i8*%e,align 1
store i8%a,i8*%b,align 1
ret i8*%b
}
define fastcc i8*@_SMLFN6String7explodeE(i8*inreg%a)#2 gc"smlsharp"{
i:
%b=alloca i8*,align 8
call void@llvm.gcroot(i8**%b,i8*null)#0
store i8*%a,i8**%b,align 8
%c=load atomic i32,i32*@sml_check_flag unordered,align 4
%d=icmp eq i32%c,0
br i1%d,label%g,label%e
e:
call void@sml_check(i32 inreg%c)
%f=load i8*,i8**%b,align 8
br label%g
g:
%h=phi i8*[%f,%e],[%a,%i]
store i8*null,i8**%b,align 8
%j=call fastcc i8*@_SMLFN9Substring4fullE(i8*inreg%h)
%k=tail call fastcc i8*@_SMLFN9Substring7explodeE(i8*inreg%j)
ret i8*%k
}
define internal fastcc i32@_SMLLLN6String8isPrefixE_132(i8*inreg%a,i8*inreg%b)#2 gc"smlsharp"{
%c=alloca i8*,align 8
%d=alloca i8*,align 8
call void@llvm.gcroot(i8**%c,i8*null)#0
call void@llvm.gcroot(i8**%d,i8*null)#0
store i8*%a,i8**%d,align 8
store i8*%b,i8**%c,align 8
%e=load atomic i32,i32*@sml_check_flag unordered,align 4
%f=icmp eq i32%e,0
br i1%f,label%g,label%i
g:
%h=bitcast i8*%a to i8**
br label%l
i:
call void@sml_check(i32 inreg%e)
%j=bitcast i8**%d to i8***
%k=load i8**,i8***%j,align 8
br label%l
l:
%m=phi i8**[%k,%i],[%h,%g]
store i8*null,i8**%d,align 8
%n=load i8*,i8**%m,align 8
%o=call fastcc i8*@_SMLFN9Substring8isPrefixE(i8*inreg%n)
%p=getelementptr inbounds i8,i8*%o,i64 16
%q=bitcast i8*%p to i8*(i8*,i8*)**
%r=load i8*(i8*,i8*)*,i8*(i8*,i8*)**%q,align 8
%s=bitcast i8*%o to i8**
%t=load i8*,i8**%s,align 8
store i8*%t,i8**%d,align 8
%u=load i8*,i8**%c,align 8
store i8*null,i8**%c,align 8
%v=call fastcc i8*@_SMLFN9Substring4fullE(i8*inreg%u)
%w=load i8*,i8**%d,align 8
store i8*null,i8**%d,align 8
%x=call fastcc i8*%r(i8*inreg%w,i8*inreg%v)
%y=bitcast i8*%x to i32*
%z=load i32,i32*%y,align 4
ret i32%z
}
define fastcc i8*@_SMLFN6String8isPrefixE(i8*inreg%a)#4 gc"smlsharp"{
%b=alloca i8*,align 8
%c=alloca i8*,align 8
call void@llvm.gcroot(i8**%b,i8*null)#0
call void@llvm.gcroot(i8**%c,i8*null)#0
store i8*%a,i8**%b,align 8
%d=call i8*@sml_alloc(i32 inreg 12)#0
%e=getelementptr inbounds i8,i8*%d,i64 -4
%f=bitcast i8*%e to i32*
store i32 1342177288,i32*%f,align 4
store i8*%d,i8**%c,align 8
%g=load i8*,i8**%b,align 8
store i8*null,i8**%b,align 8
%h=bitcast i8*%d to i8**
store i8*%g,i8**%h,align 8
%i=getelementptr inbounds i8,i8*%d,i64 8
%j=bitcast i8*%i to i32*
store i32 1,i32*%j,align 4
%k=call i8*@sml_alloc(i32 inreg 28)#0
%l=getelementptr inbounds i8,i8*%k,i64 -4
%m=bitcast i8*%l to i32*
store i32 1342177304,i32*%m,align 4
%n=load i8*,i8**%c,align 8
%o=bitcast i8*%k to i8**
store i8*%n,i8**%o,align 8
%p=getelementptr inbounds i8,i8*%k,i64 8
%q=bitcast i8*%p to void(...)**
store void(...)*bitcast(i32(i8*,i8*)*@_SMLLLN6String8isPrefixE_132 to void(...)*),void(...)**%q,align 8
%r=getelementptr inbounds i8,i8*%k,i64 16
%s=bitcast i8*%r to void(...)**
store void(...)*bitcast(i8*(i8*,i8*)*@_SMLLLN6String8isPrefixE_191 to void(...)*),void(...)**%s,align 8
%t=getelementptr inbounds i8,i8*%k,i64 24
%u=bitcast i8*%t to i32*
store i32 -2147483647,i32*%u,align 4
ret i8*%k
}
define internal fastcc i32@_SMLLLN6String8isSuffixE_135(i8*inreg%a,i8*inreg%b)#2 gc"smlsharp"{
%c=alloca i8*,align 8
%d=alloca i8*,align 8
call void@llvm.gcroot(i8**%c,i8*null)#0
call void@llvm.gcroot(i8**%d,i8*null)#0
store i8*%a,i8**%d,align 8
store i8*%b,i8**%c,align 8
%e=load atomic i32,i32*@sml_check_flag unordered,align 4
%f=icmp eq i32%e,0
br i1%f,label%g,label%i
g:
%h=bitcast i8*%a to i8**
br label%l
i:
call void@sml_check(i32 inreg%e)
%j=bitcast i8**%d to i8***
%k=load i8**,i8***%j,align 8
br label%l
l:
%m=phi i8**[%k,%i],[%h,%g]
store i8*null,i8**%d,align 8
%n=load i8*,i8**%m,align 8
%o=call fastcc i8*@_SMLFN9Substring8isSuffixE(i8*inreg%n)
%p=getelementptr inbounds i8,i8*%o,i64 16
%q=bitcast i8*%p to i8*(i8*,i8*)**
%r=load i8*(i8*,i8*)*,i8*(i8*,i8*)**%q,align 8
%s=bitcast i8*%o to i8**
%t=load i8*,i8**%s,align 8
store i8*%t,i8**%d,align 8
%u=load i8*,i8**%c,align 8
store i8*null,i8**%c,align 8
%v=call fastcc i8*@_SMLFN9Substring4fullE(i8*inreg%u)
%w=load i8*,i8**%d,align 8
store i8*null,i8**%d,align 8
%x=call fastcc i8*%r(i8*inreg%w,i8*inreg%v)
%y=bitcast i8*%x to i32*
%z=load i32,i32*%y,align 4
ret i32%z
}
define fastcc i8*@_SMLFN6String8isSuffixE(i8*inreg%a)#4 gc"smlsharp"{
%b=alloca i8*,align 8
%c=alloca i8*,align 8
call void@llvm.gcroot(i8**%b,i8*null)#0
call void@llvm.gcroot(i8**%c,i8*null)#0
store i8*%a,i8**%b,align 8
%d=call i8*@sml_alloc(i32 inreg 12)#0
%e=getelementptr inbounds i8,i8*%d,i64 -4
%f=bitcast i8*%e to i32*
store i32 1342177288,i32*%f,align 4
store i8*%d,i8**%c,align 8
%g=load i8*,i8**%b,align 8
store i8*null,i8**%b,align 8
%h=bitcast i8*%d to i8**
store i8*%g,i8**%h,align 8
%i=getelementptr inbounds i8,i8*%d,i64 8
%j=bitcast i8*%i to i32*
store i32 1,i32*%j,align 4
%k=call i8*@sml_alloc(i32 inreg 28)#0
%l=getelementptr inbounds i8,i8*%k,i64 -4
%m=bitcast i8*%l to i32*
store i32 1342177304,i32*%m,align 4
%n=load i8*,i8**%c,align 8
%o=bitcast i8*%k to i8**
store i8*%n,i8**%o,align 8
%p=getelementptr inbounds i8,i8*%k,i64 8
%q=bitcast i8*%p to void(...)**
store void(...)*bitcast(i32(i8*,i8*)*@_SMLLLN6String8isSuffixE_135 to void(...)*),void(...)**%q,align 8
%r=getelementptr inbounds i8,i8*%k,i64 16
%s=bitcast i8*%r to void(...)**
store void(...)*bitcast(i8*(i8*,i8*)*@_SMLLLN6String8isSuffixE_193 to void(...)*),void(...)**%s,align 8
%t=getelementptr inbounds i8,i8*%k,i64 24
%u=bitcast i8*%t to i32*
store i32 -2147483647,i32*%u,align 4
ret i8*%k
}
define internal fastcc i32@_SMLLLN6String11isSubstringE_138(i8*inreg%a,i8*inreg%b)#2 gc"smlsharp"{
%c=alloca i8*,align 8
%d=alloca i8*,align 8
call void@llvm.gcroot(i8**%c,i8*null)#0
call void@llvm.gcroot(i8**%d,i8*null)#0
store i8*%a,i8**%d,align 8
store i8*%b,i8**%c,align 8
%e=load atomic i32,i32*@sml_check_flag unordered,align 4
%f=icmp eq i32%e,0
br i1%f,label%g,label%i
g:
%h=bitcast i8*%a to i8**
br label%l
i:
call void@sml_check(i32 inreg%e)
%j=bitcast i8**%d to i8***
%k=load i8**,i8***%j,align 8
br label%l
l:
%m=phi i8**[%k,%i],[%h,%g]
store i8*null,i8**%d,align 8
%n=load i8*,i8**%m,align 8
%o=call fastcc i8*@_SMLFN9Substring11isSubstringE(i8*inreg%n)
%p=getelementptr inbounds i8,i8*%o,i64 16
%q=bitcast i8*%p to i8*(i8*,i8*)**
%r=load i8*(i8*,i8*)*,i8*(i8*,i8*)**%q,align 8
%s=bitcast i8*%o to i8**
%t=load i8*,i8**%s,align 8
store i8*%t,i8**%d,align 8
%u=load i8*,i8**%c,align 8
store i8*null,i8**%c,align 8
%v=call fastcc i8*@_SMLFN9Substring4fullE(i8*inreg%u)
%w=load i8*,i8**%d,align 8
store i8*null,i8**%d,align 8
%x=call fastcc i8*%r(i8*inreg%w,i8*inreg%v)
%y=bitcast i8*%x to i32*
%z=load i32,i32*%y,align 4
ret i32%z
}
define fastcc i8*@_SMLFN6String11isSubstringE(i8*inreg%a)#4 gc"smlsharp"{
%b=alloca i8*,align 8
%c=alloca i8*,align 8
call void@llvm.gcroot(i8**%b,i8*null)#0
call void@llvm.gcroot(i8**%c,i8*null)#0
store i8*%a,i8**%b,align 8
%d=call i8*@sml_alloc(i32 inreg 12)#0
%e=getelementptr inbounds i8,i8*%d,i64 -4
%f=bitcast i8*%e to i32*
store i32 1342177288,i32*%f,align 4
store i8*%d,i8**%c,align 8
%g=load i8*,i8**%b,align 8
store i8*null,i8**%b,align 8
%h=bitcast i8*%d to i8**
store i8*%g,i8**%h,align 8
%i=getelementptr inbounds i8,i8*%d,i64 8
%j=bitcast i8*%i to i32*
store i32 1,i32*%j,align 4
%k=call i8*@sml_alloc(i32 inreg 28)#0
%l=getelementptr inbounds i8,i8*%k,i64 -4
%m=bitcast i8*%l to i32*
store i32 1342177304,i32*%m,align 4
%n=load i8*,i8**%c,align 8
%o=bitcast i8*%k to i8**
store i8*%n,i8**%o,align 8
%p=getelementptr inbounds i8,i8*%k,i64 8
%q=bitcast i8*%p to void(...)**
store void(...)*bitcast(i32(i8*,i8*)*@_SMLLLN6String11isSubstringE_138 to void(...)*),void(...)**%q,align 8
%r=getelementptr inbounds i8,i8*%k,i64 16
%s=bitcast i8*%r to void(...)**
store void(...)*bitcast(i8*(i8*,i8*)*@_SMLLLN6String11isSubstringE_195 to void(...)*),void(...)**%s,align 8
%t=getelementptr inbounds i8,i8*%k,i64 24
%u=bitcast i8*%t to i32*
store i32 -2147483647,i32*%u,align 4
ret i8*%k
}
define internal fastcc i8*@_SMLLLN6String6tokensE_142(i8*inreg%a,i8*inreg%b)#2 gc"smlsharp"{
o:
%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=getelementptr inbounds i8,i8*%b,i64 -4
%h=bitcast i8*%g to i32*
%i=load i32,i32*%h,align 4
%j=and i32%i,268435455
%k=add nsw i32%j,-1
%l=bitcast i8**%f to i8***
br label%m
m:
%n=phi i8*[%bS,%bR],[bitcast(i32*getelementptr inbounds(<{[4x i8],i32,i32,i32,i8*,i32}>,<{[4x i8],i32,i32,i32,i8*,i32}>*@t,i64 0,i32 2)to i8*),%o]
store i8*%n,i8**%d,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**%d,align 8
br label%t
t:
%u=phi i8*[%s,%r],[%n,%m]
%v=bitcast i8*%u to i32*
%w=load i32,i32*%v,align 4
%x=getelementptr inbounds i8,i8*%u,i64 4
%y=bitcast i8*%x to i32*
%z=load i32,i32*%y,align 4
%A=getelementptr inbounds i8,i8*%u,i64 8
%B=bitcast i8*%A to i8**
%C=load i8*,i8**%B,align 8
store i8*%C,i8**%d,align 8
%D=icmp sgt i32%k,%z
br i1%D,label%a2,label%E
E:
store i8*null,i8**%f,align 8
%F=icmp eq i32%z,%w
br i1%F,label%G,label%H
G:
store i8*null,i8**%c,align 8
store i8*null,i8**%d,align 8
br label%ac
H:
%I=sub nsw i32%z,%w
%J=add nsw i32%I,1
%K=call i8*@sml_alloc(i32 inreg%J)#0
%L=getelementptr inbounds i8,i8*%K,i64 -4
%M=bitcast i8*%L to i32*
store i32%J,i32*%M,align 4
store i8*%K,i8**%e,align 8
%N=sext i32%I to i64
%O=getelementptr inbounds i8,i8*%K,i64%N
store i8 0,i8*%O,align 1
%P=load i8*,i8**%c,align 8
store i8*null,i8**%c,align 8
%Q=sext i32%w to i64
%R=getelementptr inbounds i8,i8*%P,i64%Q
call void@llvm.memmove.p0i8.p0i8.i32(i8*%K,i8*%R,i32%I,i1 false)
%S=call i8*@sml_alloc(i32 inreg 20)#0
%T=getelementptr inbounds i8,i8*%S,i64 -4
%U=bitcast i8*%T to i32*
store i32 1342177296,i32*%U,align 4
%V=load i8*,i8**%e,align 8
store i8*null,i8**%e,align 8
%W=bitcast i8*%S to i8**
store i8*%V,i8**%W,align 8
%X=load i8*,i8**%d,align 8
store i8*null,i8**%d,align 8
%Y=getelementptr inbounds i8,i8*%S,i64 8
%Z=bitcast i8*%Y to i8**
store i8*%X,i8**%Z,align 8
%aa=getelementptr inbounds i8,i8*%S,i64 16
%ab=bitcast i8*%aa to i32*
store i32 3,i32*%ab,align 4
br label%ac
ac:
%ad=phi i8*[%S,%H],[%C,%G]
store i8*%ad,i8**%c,align 8
%ae=call i8*@sml_alloc(i32 inreg 20)#0
%af=getelementptr inbounds i8,i8*%ae,i64 -4
%ag=bitcast i8*%af to i32*
store i32 1342177296,i32*%ag,align 4
%ah=load i8*,i8**%c,align 8
store i8*null,i8**%c,align 8
%ai=bitcast i8*%ae to i8**
store i8*%ah,i8**%ai,align 8
br label%aj
aj:
%ak=phi i8*[%aW,%aD],[%ae,%ac]
%al=phi i8*[%a1,%aD],[null,%ac]
%am=getelementptr inbounds i8,i8*%ak,i64 8
%an=bitcast i8*%am to i8**
store i8*%al,i8**%an,align 8
%ao=getelementptr inbounds i8,i8*%ak,i64 16
%ap=bitcast i8*%ao to i32*
store i32 3,i32*%ap,align 4
store i8*%ak,i8**%c,align 8
%aq=load atomic i32,i32*@sml_check_flag unordered,align 4
%ar=icmp eq i32%aq,0
br i1%ar,label%au,label%as
as:
call void@sml_check(i32 inreg%aq)
%at=load i8*,i8**%c,align 8
br label%au
au:
%av=phi i8*[%at,%as],[%ak,%aj]
%aw=bitcast i8*%av to i8**
%ax=load i8*,i8**%aw,align 8
%ay=icmp eq i8*%ax,null
br i1%ay,label%az,label%aD
az:
%aA=getelementptr inbounds i8,i8*%av,i64 8
%aB=bitcast i8*%aA to i8**
%aC=load i8*,i8**%aB,align 8
ret i8*%aC
aD:
%aE=bitcast i8*%ax to i8**
%aF=load i8*,i8**%aE,align 8
store i8*%aF,i8**%d,align 8
%aG=getelementptr inbounds i8,i8*%ax,i64 8
%aH=bitcast i8*%aG to i8**
%aI=load i8*,i8**%aH,align 8
store i8*%aI,i8**%e,align 8
%aJ=getelementptr inbounds i8,i8*%av,i64 8
%aK=bitcast i8*%aJ to i8**
%aL=load i8*,i8**%aK,align 8
store i8*%aL,i8**%c,align 8
%aM=call i8*@sml_alloc(i32 inreg 20)#0
%aN=getelementptr inbounds i8,i8*%aM,i64 -4
%aO=bitcast i8*%aN to i32*
store i32 1342177296,i32*%aO,align 4
store i8*%aM,i8**%f,align 8
%aP=load i8*,i8**%d,align 8
store i8*null,i8**%d,align 8
%aQ=bitcast i8*%aM to i8**
store i8*%aP,i8**%aQ,align 8
%aR=load i8*,i8**%c,align 8
store i8*null,i8**%c,align 8
%aS=getelementptr inbounds i8,i8*%aM,i64 8
%aT=bitcast i8*%aS to i8**
store i8*%aR,i8**%aT,align 8
%aU=getelementptr inbounds i8,i8*%aM,i64 16
%aV=bitcast i8*%aU to i32*
store i32 3,i32*%aV,align 4
%aW=call i8*@sml_alloc(i32 inreg 20)#0
%aX=getelementptr inbounds i8,i8*%aW,i64 -4
%aY=bitcast i8*%aX to i32*
store i32 1342177296,i32*%aY,align 4
%aZ=load i8*,i8**%e,align 8
store i8*null,i8**%e,align 8
%a0=bitcast i8*%aW to i8**
store i8*%aZ,i8**%a0,align 8
%a1=load i8*,i8**%f,align 8
store i8*null,i8**%f,align 8
br label%aj
a2:
%a3=load i8**,i8***%l,align 8
%a4=load i8*,i8**%a3,align 8
%a5=getelementptr inbounds i8,i8*%a4,i64 16
%a6=bitcast i8*%a5 to i8*(i8*,i8*)**
%a7=load i8*(i8*,i8*)*,i8*(i8*,i8*)**%a6,align 8
%a8=bitcast i8*%a4 to i8**
%a9=load i8*,i8**%a8,align 8
store i8*%a9,i8**%e,align 8
%ba=load i8*,i8**%c,align 8
%bb=sext i32%z to i64
%bc=getelementptr inbounds i8,i8*%ba,i64%bb
%bd=load i8,i8*%bc,align 1
%be=call i8*@sml_alloc(i32 inreg 1)#0
%bf=getelementptr inbounds i8,i8*%be,i64 -4
%bg=bitcast i8*%bf to i32*
store i32 1,i32*%bg,align 4
store i8%bd,i8*%be,align 1
%bh=load i8*,i8**%e,align 8
store i8*null,i8**%e,align 8
%bi=call fastcc i8*%a7(i8*inreg%bh,i8*inreg%be)
%bj=bitcast i8*%bi to i32*
%bk=load i32,i32*%bj,align 4
%bl=icmp eq i32%bk,0
%bm=add nsw i32%z,1
br i1%bl,label%bY,label%bn
bn:
%bo=icmp eq i32%z,%w
br i1%bo,label%bK,label%bp
bp:
%bq=sub nsw i32%z,%w
%br=add nsw i32%bq,1
%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
store i8*%bs,i8**%e,align 8
%bv=sext i32%bq to i64
%bw=getelementptr inbounds i8,i8*%bs,i64%bv
store i8 0,i8*%bw,align 1
%bx=load i8*,i8**%c,align 8
%by=sext i32%w to i64
%bz=getelementptr inbounds i8,i8*%bx,i64%by
call void@llvm.memmove.p0i8.p0i8.i32(i8*%bs,i8*%bz,i32%bq,i1 false)
%bA=call i8*@sml_alloc(i32 inreg 20)#0
%bB=getelementptr inbounds i8,i8*%bA,i64 -4
%bC=bitcast i8*%bB to i32*
store i32 1342177296,i32*%bC,align 4
%bD=load i8*,i8**%e,align 8
store i8*null,i8**%e,align 8
%bE=bitcast i8*%bA to i8**
store i8*%bD,i8**%bE,align 8
%bF=load i8*,i8**%d,align 8
%bG=getelementptr inbounds i8,i8*%bA,i64 8
%bH=bitcast i8*%bG to i8**
store i8*%bF,i8**%bH,align 8
%bI=getelementptr inbounds i8,i8*%bA,i64 16
%bJ=bitcast i8*%bI to i32*
store i32 3,i32*%bJ,align 4
store i8*%bA,i8**%d,align 8
br label%bK
bK:
%bL=call i8*@sml_alloc(i32 inreg 20)#0
%bM=bitcast i8*%bL to i32*
%bN=getelementptr inbounds i8,i8*%bL,i64 -4
%bO=bitcast i8*%bN to i32*
store i32 1342177296,i32*%bO,align 4
store i32%bm,i32*%bM,align 4
%bP=getelementptr inbounds i8,i8*%bL,i64 4
%bQ=bitcast i8*%bP to i32*
store i32%bm,i32*%bQ,align 4
br label%bR
bR:
%bS=phi i8*[%bL,%bK],[%bZ,%bY]
%bT=load i8*,i8**%d,align 8
store i8*null,i8**%d,align 8
%bU=getelementptr inbounds i8,i8*%bS,i64 8
%bV=bitcast i8*%bU to i8**
store i8*%bT,i8**%bV,align 8
%bW=getelementptr inbounds i8,i8*%bS,i64 16
%bX=bitcast i8*%bW to i32*
store i32 2,i32*%bX,align 4
br label%m
bY:
%bZ=call i8*@sml_alloc(i32 inreg 20)#0
%b0=bitcast i8*%bZ to i32*
%b1=getelementptr inbounds i8,i8*%bZ,i64 -4
%b2=bitcast i8*%b1 to i32*
store i32 1342177296,i32*%b2,align 4
store i32%w,i32*%b0,align 4
%b3=getelementptr inbounds i8,i8*%bZ,i64 4
%b4=bitcast i8*%b3 to i32*
store i32%bm,i32*%b4,align 4
br label%bR
}
define fastcc i8*@_SMLFN6String6tokensE(i8*inreg%a)#4 gc"smlsharp"{
%b=alloca i8*,align 8
%c=alloca i8*,align 8
call void@llvm.gcroot(i8**%b,i8*null)#0
call void@llvm.gcroot(i8**%c,i8*null)#0
store i8*%a,i8**%b,align 8
%d=call i8*@sml_alloc(i32 inreg 12)#0
%e=getelementptr inbounds i8,i8*%d,i64 -4
%f=bitcast i8*%e to i32*
store i32 1342177288,i32*%f,align 4
store i8*%d,i8**%c,align 8
%g=load i8*,i8**%b,align 8
store i8*null,i8**%b,align 8
%h=bitcast i8*%d to i8**
store i8*%g,i8**%h,align 8
%i=getelementptr inbounds i8,i8*%d,i64 8
%j=bitcast i8*%i to i32*
store i32 1,i32*%j,align 4
%k=call i8*@sml_alloc(i32 inreg 28)#0
%l=getelementptr inbounds i8,i8*%k,i64 -4
%m=bitcast i8*%l to i32*
store i32 1342177304,i32*%m,align 4
%n=load i8*,i8**%c,align 8
%o=bitcast i8*%k to i8**
store i8*%n,i8**%o,align 8
%p=getelementptr inbounds i8,i8*%k,i64 8
%q=bitcast i8*%p to void(...)**
store void(...)*bitcast(i8*(i8*,i8*)*@_SMLLLN6String6tokensE_142 to void(...)*),void(...)**%q,align 8
%r=getelementptr inbounds i8,i8*%k,i64 16
%s=bitcast i8*%r to void(...)**
store void(...)*bitcast(i8*(i8*,i8*)*@_SMLLLN6String6tokensE_142 to void(...)*),void(...)**%s,align 8
%t=getelementptr inbounds i8,i8*%k,i64 24
%u=bitcast i8*%t to i32*
store i32 -2147483647,i32*%u,align 4
ret i8*%k
}
define internal fastcc i8*@_SMLLLN6String6fieldsE_146(i8*inreg%a,i8*inreg%b)#2 gc"smlsharp"{
p:
%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=getelementptr inbounds i8,i8*%b,i64 -4
%i=bitcast i8*%h to i32*
%j=load i32,i32*%i,align 4
%k=and i32%j,268435455
%l=add nsw i32%k,-1
%m=bitcast i8**%f to i8***
br label%n
n:
%o=phi i8*[%bM,%bL],[bitcast(i32*getelementptr inbounds(<{[4x i8],i32,i32,i32,i8*,i32}>,<{[4x i8],i32,i32,i32,i8*,i32}>*@t,i64 0,i32 2)to i8*),%p]
store i8*%o,i8**%d,align 8
%q=load atomic i32,i32*@sml_check_flag unordered,align 4
%r=icmp eq i32%q,0
br i1%r,label%u,label%s
s:
call void@sml_check(i32 inreg%q)
%t=load i8*,i8**%d,align 8
br label%u
u:
%v=phi i8*[%t,%s],[%o,%n]
%w=bitcast i8*%v to i32*
%x=load i32,i32*%w,align 4
%y=getelementptr inbounds i8,i8*%v,i64 4
%z=bitcast i8*%y to i32*
%A=load i32,i32*%z,align 4
%B=getelementptr inbounds i8,i8*%v,i64 8
%C=bitcast i8*%B to i8**
%D=load i8*,i8**%C,align 8
store i8*%D,i8**%d,align 8
%E=icmp sgt i32%l,%A
br i1%E,label%aY,label%F
F:
store i8*null,i8**%f,align 8
%G=sub nsw i32%A,%x
%H=add nsw i32%G,1
%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
store i8*%I,i8**%e,align 8
%L=sext i32%G to i64
%M=getelementptr inbounds i8,i8*%I,i64%L
store i8 0,i8*%M,align 1
%N=load i8*,i8**%c,align 8
store i8*null,i8**%c,align 8
%O=sext i32%x to i64
%P=getelementptr inbounds i8,i8*%N,i64%O
call void@llvm.memmove.p0i8.p0i8.i32(i8*%I,i8*%P,i32%G,i1 false)
%Q=call i8*@sml_alloc(i32 inreg 20)#0
%R=getelementptr inbounds i8,i8*%Q,i64 -4
%S=bitcast i8*%R to i32*
store i32 1342177296,i32*%S,align 4
store i8*%Q,i8**%c,align 8
%T=load i8*,i8**%e,align 8
store i8*null,i8**%e,align 8
%U=bitcast i8*%Q to i8**
store i8*%T,i8**%U,align 8
%V=load i8*,i8**%d,align 8
store i8*null,i8**%d,align 8
%W=getelementptr inbounds i8,i8*%Q,i64 8
%X=bitcast i8*%W to i8**
store i8*%V,i8**%X,align 8
%Y=getelementptr inbounds i8,i8*%Q,i64 16
%Z=bitcast i8*%Y to i32*
store i32 3,i32*%Z,align 4
%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
%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
br label%af
af:
%ag=phi i8*[%aS,%az],[%aa,%F]
%ah=phi i8*[%aX,%az],[null,%F]
%ai=getelementptr inbounds i8,i8*%ag,i64 8
%aj=bitcast i8*%ai to i8**
store i8*%ah,i8**%aj,align 8
%ak=getelementptr inbounds i8,i8*%ag,i64 16
%al=bitcast i8*%ak to i32*
store i32 3,i32*%al,align 4
store i8*%ag,i8**%c,align 8
%am=load atomic i32,i32*@sml_check_flag unordered,align 4
%an=icmp eq i32%am,0
br i1%an,label%aq,label%ao
ao:
call void@sml_check(i32 inreg%am)
%ap=load i8*,i8**%c,align 8
br label%aq
aq:
%ar=phi i8*[%ap,%ao],[%ag,%af]
%as=bitcast i8*%ar to i8**
%at=load i8*,i8**%as,align 8
%au=icmp eq i8*%at,null
br i1%au,label%av,label%az
av:
%aw=getelementptr inbounds i8,i8*%ar,i64 8
%ax=bitcast i8*%aw to i8**
%ay=load i8*,i8**%ax,align 8
ret i8*%ay
az:
%aA=bitcast i8*%at to i8**
%aB=load i8*,i8**%aA,align 8
store i8*%aB,i8**%d,align 8
%aC=getelementptr inbounds i8,i8*%at,i64 8
%aD=bitcast i8*%aC to i8**
%aE=load i8*,i8**%aD,align 8
store i8*%aE,i8**%e,align 8
%aF=getelementptr inbounds i8,i8*%ar,i64 8
%aG=bitcast i8*%aF to i8**
%aH=load i8*,i8**%aG,align 8
store i8*%aH,i8**%c,align 8
%aI=call i8*@sml_alloc(i32 inreg 20)#0
%aJ=getelementptr inbounds i8,i8*%aI,i64 -4
%aK=bitcast i8*%aJ to i32*
store i32 1342177296,i32*%aK,align 4
store i8*%aI,i8**%f,align 8
%aL=load i8*,i8**%d,align 8
store i8*null,i8**%d,align 8
%aM=bitcast i8*%aI to i8**
store i8*%aL,i8**%aM,align 8
%aN=load i8*,i8**%c,align 8
store i8*null,i8**%c,align 8
%aO=getelementptr inbounds i8,i8*%aI,i64 8
%aP=bitcast i8*%aO to i8**
store i8*%aN,i8**%aP,align 8
%aQ=getelementptr inbounds i8,i8*%aI,i64 16
%aR=bitcast i8*%aQ to i32*
store i32 3,i32*%aR,align 4
%aS=call i8*@sml_alloc(i32 inreg 20)#0
%aT=getelementptr inbounds i8,i8*%aS,i64 -4
%aU=bitcast i8*%aT to i32*
store i32 1342177296,i32*%aU,align 4
%aV=load i8*,i8**%e,align 8
store i8*null,i8**%e,align 8
%aW=bitcast i8*%aS to i8**
store i8*%aV,i8**%aW,align 8
%aX=load i8*,i8**%f,align 8
store i8*null,i8**%f,align 8
br label%af
aY:
%aZ=load i8**,i8***%m,align 8
%a0=load i8*,i8**%aZ,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**%e,align 8
%a6=load i8*,i8**%c,align 8
%a7=sext i32%A to i64
%a8=getelementptr inbounds i8,i8*%a6,i64%a7
%a9=load i8,i8*%a8,align 1
%ba=call i8*@sml_alloc(i32 inreg 1)#0
%bb=getelementptr inbounds i8,i8*%ba,i64 -4
%bc=bitcast i8*%bb to i32*
store i32 1,i32*%bc,align 4
store i8%a9,i8*%ba,align 1
%bd=load i8*,i8**%e,align 8
store i8*null,i8**%e,align 8
%be=call fastcc i8*%a3(i8*inreg%bd,i8*inreg%ba)
%bf=bitcast i8*%be to i32*
%bg=load i32,i32*%bf,align 4
%bh=icmp eq i32%bg,0
%bi=add nsw i32%A,1
br i1%bh,label%bS,label%bj
bj:
%bk=sub nsw i32%A,%x
%bl=add nsw i32%bk,1
%bm=call i8*@sml_alloc(i32 inreg%bl)#0
%bn=getelementptr inbounds i8,i8*%bm,i64 -4
%bo=bitcast i8*%bn to i32*
store i32%bl,i32*%bo,align 4
store i8*%bm,i8**%e,align 8
%bp=sext i32%bk to i64
%bq=getelementptr inbounds i8,i8*%bm,i64%bp
store i8 0,i8*%bq,align 1
%br=load i8*,i8**%c,align 8
%bs=sext i32%x to i64
%bt=getelementptr inbounds i8,i8*%br,i64%bs
call void@llvm.memmove.p0i8.p0i8.i32(i8*%bm,i8*%bt,i32%bk,i1 false)
%bu=call i8*@sml_alloc(i32 inreg 20)#0
%bv=getelementptr inbounds i8,i8*%bu,i64 -4
%bw=bitcast i8*%bv to i32*
store i32 1342177296,i32*%bw,align 4
store i8*%bu,i8**%g,align 8
%bx=load i8*,i8**%e,align 8
store i8*null,i8**%e,align 8
%by=bitcast i8*%bu to i8**
store i8*%bx,i8**%by,align 8
%bz=load i8*,i8**%d,align 8
store i8*null,i8**%d,align 8
%bA=getelementptr inbounds i8,i8*%bu,i64 8
%bB=bitcast i8*%bA to i8**
store i8*%bz,i8**%bB,align 8
%bC=getelementptr inbounds i8,i8*%bu,i64 16
%bD=bitcast i8*%bC to i32*
store i32 3,i32*%bD,align 4
%bE=call i8*@sml_alloc(i32 inreg 20)#0
%bF=bitcast i8*%bE to i32*
%bG=getelementptr inbounds i8,i8*%bE,i64 -4
%bH=bitcast i8*%bG to i32*
store i32 1342177296,i32*%bH,align 4
store i32%bi,i32*%bF,align 4
%bI=getelementptr inbounds i8,i8*%bE,i64 4
%bJ=bitcast i8*%bI to i32*
store i32%bi,i32*%bJ,align 4
%bK=load i8*,i8**%g,align 8
store i8*null,i8**%g,align 8
br label%bL
bL:
%bM=phi i8*[%bE,%bj],[%bT,%bS]
%bN=phi i8*[%bK,%bj],[%bZ,%bS]
%bO=getelementptr inbounds i8,i8*%bM,i64 8
%bP=bitcast i8*%bO to i8**
store i8*%bN,i8**%bP,align 8
%bQ=getelementptr inbounds i8,i8*%bM,i64 16
%bR=bitcast i8*%bQ to i32*
store i32 2,i32*%bR,align 4
br label%n
bS:
%bT=call i8*@sml_alloc(i32 inreg 20)#0
%bU=bitcast i8*%bT to i32*
%bV=getelementptr inbounds i8,i8*%bT,i64 -4
%bW=bitcast i8*%bV to i32*
store i32 1342177296,i32*%bW,align 4
store i32%x,i32*%bU,align 4
%bX=getelementptr inbounds i8,i8*%bT,i64 4
%bY=bitcast i8*%bX to i32*
store i32%bi,i32*%bY,align 4
%bZ=load i8*,i8**%d,align 8
store i8*null,i8**%d,align 8
br label%bL
}
define fastcc i8*@_SMLFN6String6fieldsE(i8*inreg%a)#4 gc"smlsharp"{
%b=alloca i8*,align 8
%c=alloca i8*,align 8
call void@llvm.gcroot(i8**%b,i8*null)#0
call void@llvm.gcroot(i8**%c,i8*null)#0
store i8*%a,i8**%b,align 8
%d=call i8*@sml_alloc(i32 inreg 12)#0
%e=getelementptr inbounds i8,i8*%d,i64 -4
%f=bitcast i8*%e to i32*
store i32 1342177288,i32*%f,align 4
store i8*%d,i8**%c,align 8
%g=load i8*,i8**%b,align 8
store i8*null,i8**%b,align 8
%h=bitcast i8*%d to i8**
store i8*%g,i8**%h,align 8
%i=getelementptr inbounds i8,i8*%d,i64 8
%j=bitcast i8*%i to i32*
store i32 1,i32*%j,align 4
%k=call i8*@sml_alloc(i32 inreg 28)#0
%l=getelementptr inbounds i8,i8*%k,i64 -4
%m=bitcast i8*%l to i32*
store i32 1342177304,i32*%m,align 4
%n=load i8*,i8**%c,align 8
%o=bitcast i8*%k to i8**
store i8*%n,i8**%o,align 8
%p=getelementptr inbounds i8,i8*%k,i64 8
%q=bitcast i8*%p to void(...)**
store void(...)*bitcast(i8*(i8*,i8*)*@_SMLLLN6String6fieldsE_146 to void(...)*),void(...)**%q,align 8
%r=getelementptr inbounds i8,i8*%k,i64 16
%s=bitcast i8*%r to void(...)**
store void(...)*bitcast(i8*(i8*,i8*)*@_SMLLLN6String6fieldsE_146 to void(...)*),void(...)**%s,align 8
%t=getelementptr inbounds i8,i8*%k,i64 24
%u=bitcast i8*%t to i32*
store i32 -2147483647,i32*%u,align 4
ret i8*%k
}
define fastcc i8*@_SMLFN6String8toStringE(i8*inreg%a)#2 gc"smlsharp"{
%b=alloca i8*,align 8
%c=alloca i8*,align 8
call void@llvm.gcroot(i8**%b,i8*null)#0
call void@llvm.gcroot(i8**%c,i8*null)#0
store i8*%a,i8**%b,align 8
%d=load atomic i32,i32*@sml_check_flag unordered,align 4
%e=icmp eq i32%d,0
br i1%e,label%g,label%f
f:
call void@sml_check(i32 inreg%d)
br label%g
g:
%h=load i8*,i8**@_SMLZN4Char8toStringE,align 8
%i=call fastcc i8*@_SMLFN9Substring9translateE(i8*inreg%h)
%j=getelementptr inbounds i8,i8*%i,i64 16
%k=bitcast i8*%j to i8*(i8*,i8*)**
%l=load i8*(i8*,i8*)*,i8*(i8*,i8*)**%k,align 8
%m=bitcast i8*%i to i8**
%n=load i8*,i8**%m,align 8
store i8*%n,i8**%c,align 8
%o=load i8*,i8**%b,align 8
store i8*null,i8**%b,align 8
%p=call fastcc i8*@_SMLFN9Substring4fullE(i8*inreg%o)
%q=load i8*,i8**%c,align 8
%r=tail call fastcc i8*%l(i8*inreg%q,i8*inreg%p)
ret i8*%r
}
define fastcc i8*@_SMLFN6String11toRawStringE(i8*inreg%a)#2 gc"smlsharp"{
%b=alloca i8*,align 8
%c=alloca i8*,align 8
call void@llvm.gcroot(i8**%b,i8*null)#0
call void@llvm.gcroot(i8**%c,i8*null)#0
store i8*%a,i8**%b,align 8
%d=load atomic i32,i32*@sml_check_flag unordered,align 4
%e=icmp eq i32%d,0
br i1%e,label%g,label%f
f:
call void@sml_check(i32 inreg%d)
br label%g
g:
%h=load i8*,i8**@_SMLZN4Char11toRawStringE,align 8
%i=call fastcc i8*@_SMLFN9Substring9translateE(i8*inreg%h)
%j=getelementptr inbounds i8,i8*%i,i64 16
%k=bitcast i8*%j to i8*(i8*,i8*)**
%l=load i8*(i8*,i8*)*,i8*(i8*,i8*)**%k,align 8
%m=bitcast i8*%i to i8**
%n=load i8*,i8**%m,align 8
store i8*%n,i8**%c,align 8
%o=load i8*,i8**%b,align 8
store i8*null,i8**%b,align 8
%p=call fastcc i8*@_SMLFN9Substring4fullE(i8*inreg%o)
%q=load i8*,i8**%c,align 8
%r=tail call fastcc i8*%l(i8*inreg%q,i8*inreg%p)
ret i8*%r
}
define fastcc i8*@_SMLFN6String9toCStringE(i8*inreg%a)#2 gc"smlsharp"{
%b=alloca i8*,align 8
%c=alloca i8*,align 8
call void@llvm.gcroot(i8**%b,i8*null)#0
call void@llvm.gcroot(i8**%c,i8*null)#0
store i8*%a,i8**%b,align 8
%d=load atomic i32,i32*@sml_check_flag unordered,align 4
%e=icmp eq i32%d,0
br i1%e,label%g,label%f
f:
call void@sml_check(i32 inreg%d)
br label%g
g:
%h=load i8*,i8**@_SMLZN4Char9toCStringE,align 8
%i=call fastcc i8*@_SMLFN9Substring9translateE(i8*inreg%h)
%j=getelementptr inbounds i8,i8*%i,i64 16
%k=bitcast i8*%j to i8*(i8*,i8*)**
%l=load i8*(i8*,i8*)*,i8*(i8*,i8*)**%k,align 8
%m=bitcast i8*%i to i8**
%n=load i8*,i8**%m,align 8
store i8*%n,i8**%c,align 8
%o=load i8*,i8**%b,align 8
store i8*null,i8**%b,align 8
%p=call fastcc i8*@_SMLFN9Substring4fullE(i8*inreg%o)
%q=load i8*,i8**%c,align 8
%r=tail call fastcc i8*%l(i8*inreg%q,i8*inreg%p)
ret i8*%r
}
define internal fastcc i8*@_SMLLLN6String4scanE_157(i8*inreg%a,i8*inreg%b)#2 gc"smlsharp"{
m:
%c=alloca i8*,align 8
%d=alloca i8*,align 8
%e=alloca i8*,align 8
call void@llvm.gcroot(i8**%c,i8*null)#0
call void@llvm.gcroot(i8**%d,i8*null)#0
call void@llvm.gcroot(i8**%e,i8*null)#0
store i8*%a,i8**%e,align 8
store i8*%b,i8**%c,align 8
%f=load atomic i32,i32*@sml_check_flag unordered,align 4
%g=icmp eq i32%f,0
br i1%g,label%k,label%h
h:
call void@sml_check(i32 inreg%f)
%i=load i8*,i8**%e,align 8
%j=load i8*,i8**%c,align 8
br label%k
k:
%l=phi i8*[%j,%h],[%b,%m]
%n=phi i8*[%i,%h],[%a,%m]
%o=getelementptr inbounds i8,i8*%n,i64 12
%p=bitcast i8*%o to i32*
%q=load i32,i32*%p,align 4
%r=add i32%q,3
%s=sub i32 0,%q
%t=and i32%r,%s
%u=add i32%q,7
%v=add i32%u,%t
%w=and i32%v,-8
%x=lshr i32%t,3
%y=getelementptr inbounds i8,i8*%n,i64 8
%z=bitcast i8*%y to i32*
%A=load i32,i32*%z,align 4
%B=shl i32%A,%x
%C=or i32%w,4
%D=and i32%u,%s
%E=add i32%u,%D
%F=and i32%E,-8
%G=lshr i32%D,3
%H=shl i32%A,%G
%I=or i32%H,1
%J=or i32%F,4
%K=bitcast i8*%n to i8**
%L=load i8*,i8**%K,align 8
%M=getelementptr inbounds i8,i8*%L,i64 16
%N=bitcast i8*%M to i8*(i8*,i8*)**
%O=load i8*(i8*,i8*)*,i8*(i8*,i8*)**%N,align 8
%P=bitcast i8*%L to i8**
%Q=load i8*,i8**%P,align 8
%R=call fastcc i8*%O(i8*inreg%Q,i8*inreg%l)
%S=icmp eq i8*%R,null
%T=load i8*,i8**%e,align 8
br i1%S,label%U,label%ay
U:
%V=getelementptr inbounds i8,i8*%T,i64 12
%W=bitcast i8*%V to i32*
%X=load i32,i32*%W,align 4
store i8*null,i8**%e,align 8
%Y=getelementptr inbounds i8,i8*%T,i64 8
%Z=bitcast i8*%Y to i32*
%aa=load i32,i32*%Z,align 4
%ab=call i8*@sml_alloc(i32 inreg%J)#0
%ac=or i32%F,1342177280
%ad=getelementptr inbounds i8,i8*%ab,i64 -4
%ae=bitcast i8*%ad to i32*
store i32%ac,i32*%ae,align 4
store i8*%ab,i8**%d,align 8
call void@llvm.memset.p0i8.i32(i8*%ab,i8 0,i32%J,i1 false)
%af=bitcast i8*%ab to i8**
store i8*getelementptr inbounds(<{[4x i8],i32,[1x i8]}>,<{[4x i8],i32,[1x i8]}>*@B,i64 0,i32 2,i64 0),i8**%af,align 8
%ag=icmp eq i32%aa,0
%ah=load i8*,i8**%c,align 8
store i8*null,i8**%c,align 8
%ai=sext i32%D to i64
%aj=getelementptr inbounds i8,i8*%ab,i64%ai
br i1%ag,label%ak,label%al
ak:
call void@llvm.memcpy.p0i8.p0i8.i32(i8*%aj,i8*%ah,i32%X,i1 false)
br label%an
al:
%am=bitcast i8*%aj to i8**
store i8*%ah,i8**%am,align 8
br label%an
an:
%ao=sext i32%F to i64
%ap=getelementptr inbounds i8,i8*%ab,i64%ao
%aq=bitcast i8*%ap to i32*
store i32%I,i32*%aq,align 4
%ar=call i8*@sml_alloc(i32 inreg 12)#0
%as=getelementptr inbounds i8,i8*%ar,i64 -4
%at=bitcast i8*%as to i32*
store i32 1342177288,i32*%at,align 4
%au=load i8*,i8**%d,align 8
%av=bitcast i8*%ar to i8**
store i8*%au,i8**%av,align 8
%aw=getelementptr inbounds i8,i8*%ar,i64 8
%ax=bitcast i8*%aw to i32*
store i32 1,i32*%ax,align 4
ret i8*%ar
ay:
%az=getelementptr inbounds i8,i8*%T,i64 8
%aA=bitcast i8*%az to i32*
%aB=load i32,i32*%aA,align 4
%aC=getelementptr inbounds i8,i8*%T,i64 12
%aD=bitcast i8*%aC to i32*
%aE=load i32,i32*%aD,align 4
%aF=call fastcc i8*@_SMLFN17SMLSharp__ScanChar16scanEscapeSpacesE(i32 inreg%aB,i32 inreg%aE)
%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=bitcast i8**%e to i8***
%aM=load i8**,i8***%aL,align 8
%aN=load i8*,i8**%aM,align 8
%aO=call fastcc i8*%aI(i8*inreg%aK,i8*inreg%aN)
%aP=getelementptr inbounds i8,i8*%aO,i64 16
%aQ=bitcast i8*%aP to i8*(i8*,i8*)**
%aR=load i8*(i8*,i8*)*,i8*(i8*,i8*)**%aQ,align 8
%aS=bitcast i8*%aO to i8**
%aT=load i8*,i8**%aS,align 8
%aU=load i8*,i8**%c,align 8
%aV=call fastcc i8*%aR(i8*inreg%aT,i8*inreg%aU)
%aW=icmp eq i8*%aV,null
br i1%aW,label%aX,label%bh
aX:
%aY=load i8*,i8**%e,align 8
%aZ=getelementptr inbounds i8,i8*%aY,i64 12
%a0=bitcast i8*%aZ to i32*
%a1=load i32,i32*%a0,align 4
%a2=getelementptr inbounds i8,i8*%aY,i64 8
%a3=bitcast i8*%a2 to i32*
%a4=load i32,i32*%a3,align 4
%a5=call i8*@sml_alloc(i32 inreg%C)#0
%a6=or i32%w,1342177280
%a7=bitcast i8*%a5 to i32*
%a8=getelementptr inbounds i8,i8*%a5,i64 -4
%a9=bitcast i8*%a8 to i32*
store i32%a6,i32*%a9,align 4
call void@llvm.memset.p0i8.i32(i8*%a5,i8 0,i32%C,i1 false)
store i32 0,i32*%a7,align 4
%ba=icmp eq i32%a4,0
%bb=load i8*,i8**%c,align 8
store i8*null,i8**%c,align 8
%bc=sext i32%t to i64
%bd=getelementptr inbounds i8,i8*%a5,i64%bc
br i1%ba,label%be,label%bf
be:
call void@llvm.memcpy.p0i8.p0i8.i32(i8*%bd,i8*%bb,i32%a1,i1 false)
br label%b1
bf:
%bg=bitcast i8*%bd to i8**
store i8*%bb,i8**%bg,align 8
br label%b1
bh:
%bi=bitcast i8*%aV to i8**
%bj=load i8*,i8**%bi,align 8
store i8*%bj,i8**%c,align 8
%bk=load i8*,i8**%e,align 8
%bl=getelementptr inbounds i8,i8*%bk,i64 8
%bm=bitcast i8*%bl to i32*
%bn=load i32,i32*%bm,align 4
%bo=icmp eq i32%bn,0
br i1%bo,label%bu,label%bp
bp:
store i8*null,i8**%c,align 8
%bq=sext i32%t to i64
%br=getelementptr inbounds i8,i8*%bj,i64%bq
%bs=bitcast i8*%br to i8**
%bt=load i8*,i8**%bs,align 8
br label%bI
bu:
%bv=getelementptr inbounds i8,i8*%bk,i64 12
%bw=bitcast i8*%bv to i32*
%bx=load i32,i32*%bw,align 4
%by=call i8*@sml_alloc(i32 inreg%bx)#0
%bz=getelementptr inbounds i8,i8*%by,i64 -4
%bA=bitcast i8*%bz to i32*
store i32%bx,i32*%bA,align 4
%bB=load i8*,i8**%c,align 8
store i8*null,i8**%c,align 8
%bC=sext i32%t to i64
%bD=getelementptr inbounds i8,i8*%bB,i64%bC
call void@llvm.memcpy.p0i8.p0i8.i32(i8*%by,i8*%bD,i32%bx,i1 false)
%bE=load i8*,i8**%e,align 8
%bF=getelementptr inbounds i8,i8*%bE,i64 8
%bG=bitcast i8*%bF to i32*
%bH=load i32,i32*%bG,align 4
br label%bI
bI:
%bJ=phi i64[%bC,%bu],[%bq,%bp]
%bK=phi i32[%bH,%bu],[%bn,%bp]
%bL=phi i8*[%bE,%bu],[%bk,%bp]
%bM=phi i8*[%by,%bu],[%bt,%bp]
store i8*%bM,i8**%c,align 8
%bN=getelementptr inbounds i8,i8*%bL,i64 12
%bO=bitcast i8*%bN to i32*
%bP=load i32,i32*%bO,align 4
%bQ=call i8*@sml_alloc(i32 inreg%C)#0
%bR=or i32%w,1342177280
%bS=bitcast i8*%bQ to i32*
%bT=getelementptr inbounds i8,i8*%bQ,i64 -4
%bU=bitcast i8*%bT to i32*
store i32%bR,i32*%bU,align 4
call void@llvm.memset.p0i8.i32(i8*%bQ,i8 0,i32%C,i1 false)
store i32 1,i32*%bS,align 4
%bV=icmp eq i32%bK,0
%bW=load i8*,i8**%c,align 8
store i8*null,i8**%c,align 8
%bX=getelementptr inbounds i8,i8*%bQ,i64%bJ
br i1%bV,label%bY,label%bZ
bY:
call void@llvm.memcpy.p0i8.p0i8.i32(i8*%bX,i8*%bW,i32%bP,i1 false)
br label%b1
bZ:
%b0=bitcast i8*%bX to i8**
store i8*%bW,i8**%b0,align 8
br label%b1
b1:
%b2=phi i8*[%a5,%bf],[%a5,%be],[%bQ,%bZ],[%bQ,%bY]
%b3=phi i32*[%a7,%bf],[%a7,%be],[%bS,%bZ],[%bS,%bY]
%b4=sext i32%w to i64
%b5=getelementptr inbounds i8,i8*%b2,i64%b4
%b6=bitcast i8*%b5 to i32*
store i32%B,i32*%b6,align 4
store i8*%b2,i8**%c,align 8
%b7=load i32,i32*%b3,align 4
%b8=load i8*,i8**%e,align 8
%b9=getelementptr inbounds i8,i8*%b8,i64 8
%ca=bitcast i8*%b9 to i32*
%cb=load i32,i32*%ca,align 4
%cc=icmp eq i32%cb,0
br i1%cc,label%ci,label%cd
cd:
store i8*null,i8**%c,align 8
%ce=sext i32%t to i64
%cf=getelementptr inbounds i8,i8*%b2,i64%ce
%cg=bitcast i8*%cf to i8**
%ch=load i8*,i8**%cg,align 8
br label%cw
ci:
%cj=getelementptr inbounds i8,i8*%b8,i64 12
%ck=bitcast i8*%cj to i32*
%cl=load i32,i32*%ck,align 4
%cm=call i8*@sml_alloc(i32 inreg%cl)#0
%cn=getelementptr inbounds i8,i8*%cm,i64 -4
%co=bitcast i8*%cn to i32*
store i32%cl,i32*%co,align 4
%cp=load i8*,i8**%c,align 8
store i8*null,i8**%c,align 8
%cq=sext i32%t to i64
%cr=getelementptr inbounds i8,i8*%cp,i64%cq
call void@llvm.memcpy.p0i8.p0i8.i32(i8*%cm,i8*%cr,i32%cl,i1 false)
%cs=load i8*,i8**%e,align 8
%ct=getelementptr inbounds i8,i8*%cs,i64 8
%cu=bitcast i8*%ct to i32*
%cv=load i32,i32*%cu,align 4
br label%cw
cw:
%cx=phi i32[%cv,%ci],[%cb,%cd]
%cy=phi i8*[%cs,%ci],[%b8,%cd]
%cz=phi i8*[%cm,%ci],[%ch,%cd]
store i8*%cz,i8**%c,align 8
%cA=getelementptr inbounds i8,i8*%cy,i64 12
%cB=bitcast i8*%cA to i32*
%cC=load i32,i32*%cB,align 4
%cD=call fastcc i8*@_SMLFN17SMLSharp__ScanChar11scanRepeat1E(i32 inreg%cx,i32 inreg%cC,i32 inreg 0,i32 inreg 1)
%cE=getelementptr inbounds i8,i8*%cD,i64 16
%cF=bitcast i8*%cE to i8*(i8*,i8*)**
%cG=load i8*(i8*,i8*)*,i8*(i8*,i8*)**%cF,align 8
%cH=bitcast i8*%cD to i8**
%cI=load i8*,i8**%cH,align 8
store i8*%cI,i8**%d,align 8
%cJ=load i8*,i8**%e,align 8
%cK=getelementptr inbounds i8,i8*%cJ,i64 8
%cL=bitcast i8*%cK to i32*
%cM=load i32,i32*%cL,align 4
%cN=getelementptr inbounds i8,i8*%cJ,i64 12
%cO=bitcast i8*%cN to i32*
%cP=load i32,i32*%cO,align 4
%cQ=call fastcc i8*@_SMLFN17SMLSharp__ScanChar8scanCharE(i32 inreg%cM,i32 inreg%cP)
%cR=load i8*,i8**%d,align 8
store i8*null,i8**%d,align 8
%cS=call fastcc i8*%cG(i8*inreg%cR,i8*inreg%cQ)
%cT=getelementptr inbounds i8,i8*%cS,i64 16
%cU=bitcast i8*%cT to i8*(i8*,i8*)**
%cV=load i8*(i8*,i8*)*,i8*(i8*,i8*)**%cU,align 8
%cW=bitcast i8*%cS to i8**
%cX=load i8*,i8**%cW,align 8
%cY=load i8**,i8***%aL,align 8
%cZ=load i8*,i8**%cY,align 8
%c0=call fastcc i8*%cV(i8*inreg%cX,i8*inreg%cZ)
%c1=getelementptr inbounds i8,i8*%c0,i64 16
%c2=bitcast i8*%c1 to i8*(i8*,i8*)**
%c3=load i8*(i8*,i8*)*,i8*(i8*,i8*)**%c2,align 8
%c4=bitcast i8*%c0 to i8**
%c5=load i8*,i8**%c4,align 8
%c6=load i8*,i8**%c,align 8
%c7=call fastcc i8*%c3(i8*inreg%c5,i8*inreg%c6)
%c8=icmp eq i8*%c7,null
br i1%c8,label%c9,label%dH
c9:
%da=icmp eq i32%b7,0
br i1%da,label%dG,label%db
db:
%dc=load i8*,i8**%e,align 8
%dd=getelementptr inbounds i8,i8*%dc,i64 12
%de=bitcast i8*%dd to i32*
%df=load i32,i32*%de,align 4
store i8*null,i8**%e,align 8
%dg=getelementptr inbounds i8,i8*%dc,i64 8
%dh=bitcast i8*%dg to i32*
%di=load i32,i32*%dh,align 4
%dj=call i8*@sml_alloc(i32 inreg%J)#0
%dk=or i32%F,1342177280
%dl=getelementptr inbounds i8,i8*%dj,i64 -4
%dm=bitcast i8*%dl to i32*
store i32%dk,i32*%dm,align 4
store i8*%dj,i8**%d,align 8
call void@llvm.memset.p0i8.i32(i8*%dj,i8 0,i32%J,i1 false)
%dn=bitcast i8*%dj to i8**
store i8*getelementptr inbounds(<{[4x i8],i32,[1x i8]}>,<{[4x i8],i32,[1x i8]}>*@B,i64 0,i32 2,i64 0),i8**%dn,align 8
%do=icmp eq i32%di,0
%dp=load i8*,i8**%c,align 8
store i8*null,i8**%c,align 8
%dq=sext i32%D to i64
%dr=getelementptr inbounds i8,i8*%dj,i64%dq
br i1%do,label%ds,label%dt
ds:
call void@llvm.memcpy.p0i8.p0i8.i32(i8*%dr,i8*%dp,i32%df,i1 false)
br label%dv
dt:
%du=bitcast i8*%dr to i8**
store i8*%dp,i8**%du,align 8
br label%dv
dv:
%dw=sext i32%F to i64
%dx=getelementptr inbounds i8,i8*%dj,i64%dw
%dy=bitcast i8*%dx to i32*
store i32%I,i32*%dy,align 4
%dz=call i8*@sml_alloc(i32 inreg 12)#0
%dA=getelementptr inbounds i8,i8*%dz,i64 -4
%dB=bitcast i8*%dA to i32*
store i32 1342177288,i32*%dB,align 4
%dC=load i8*,i8**%d,align 8
%dD=bitcast i8*%dz to i8**
store i8*%dC,i8**%dD,align 8
%dE=getelementptr inbounds i8,i8*%dz,i64 8
%dF=bitcast i8*%dE to i32*
store i32 1,i32*%dF,align 4
ret i8*%dz
dG:
ret i8*null
dH:
%dI=bitcast i8*%c7 to i8**
%dJ=load i8*,i8**%dI,align 8
store i8*%dJ,i8**%c,align 8
%dK=bitcast i8*%dJ to i8**
%dL=load i8*,i8**%dK,align 8
store i8*%dL,i8**%d,align 8
%dM=load i8*,i8**%e,align 8
%dN=getelementptr inbounds i8,i8*%dM,i64 8
%dO=bitcast i8*%dN to i32*
%dP=load i32,i32*%dO,align 4
%dQ=icmp eq i32%dP,0
br i1%dQ,label%dW,label%dR
dR:
store i8*null,i8**%c,align 8
%dS=sext i32%D to i64
%dT=getelementptr inbounds i8,i8*%dJ,i64%dS
%dU=bitcast i8*%dT to i8**
%dV=load i8*,i8**%dU,align 8
br label%d7
dW:
%dX=getelementptr inbounds i8,i8*%dM,i64 12
%dY=bitcast i8*%dX to i32*
%dZ=load i32,i32*%dY,align 4
%d0=call i8*@sml_alloc(i32 inreg%dZ)#0
%d1=getelementptr inbounds i8,i8*%d0,i64 -4
%d2=bitcast i8*%d1 to i32*
store i32%dZ,i32*%d2,align 4
%d3=load i8*,i8**%c,align 8
store i8*null,i8**%c,align 8
%d4=sext i32%D to i64
%d5=getelementptr inbounds i8,i8*%d3,i64%d4
call void@llvm.memcpy.p0i8.p0i8.i32(i8*%d0,i8*%d5,i32%dZ,i1 false)
%d6=load i8*,i8**%d,align 8
br label%d7
d7:
%d8=phi i64[%d4,%dW],[%dS,%dR]
%d9=phi i8*[%d6,%dW],[%dL,%dR]
%ea=phi i8*[%d0,%dW],[%dV,%dR]
store i8*%ea,i8**%c,align 8
store i8*null,i8**%d,align 8
%eb=call fastcc i8*@_SMLFN10CharVector8fromListE(i8*inreg%d9)
store i8*%eb,i8**%d,align 8
%ec=load i8*,i8**%e,align 8
%ed=getelementptr inbounds i8,i8*%ec,i64 12
%ee=bitcast i8*%ed to i32*
%ef=load i32,i32*%ee,align 4
store i8*null,i8**%e,align 8
%eg=getelementptr inbounds i8,i8*%ec,i64 8
%eh=bitcast i8*%eg to i32*
%ei=load i32,i32*%eh,align 4
%ej=call i8*@sml_alloc(i32 inreg%J)#0
%ek=or i32%F,1342177280
%el=getelementptr inbounds i8,i8*%ej,i64 -4
%em=bitcast i8*%el to i32*
store i32%ek,i32*%em,align 4
store i8*%ej,i8**%e,align 8
call void@llvm.memset.p0i8.i32(i8*%ej,i8 0,i32%J,i1 false)
%en=load i8*,i8**%d,align 8
%eo=bitcast i8*%ej to i8**
store i8*null,i8**%d,align 8
store i8*%en,i8**%eo,align 8
%ep=icmp eq i32%ei,0
%eq=load i8*,i8**%c,align 8
store i8*null,i8**%c,align 8
%er=getelementptr inbounds i8,i8*%ej,i64%d8
br i1%ep,label%es,label%et
es:
call void@llvm.memcpy.p0i8.p0i8.i32(i8*%er,i8*%eq,i32%ef,i1 false)
br label%ev
et:
%eu=bitcast i8*%er to i8**
store i8*%eq,i8**%eu,align 8
br label%ev
ev:
%ew=sext i32%F to i64
%ex=getelementptr inbounds i8,i8*%ej,i64%ew
%ey=bitcast i8*%ex to i32*
store i32%I,i32*%ey,align 4
%ez=call i8*@sml_alloc(i32 inreg 12)#0
%eA=getelementptr inbounds i8,i8*%ez,i64 -4
%eB=bitcast i8*%eA to i32*
store i32 1342177288,i32*%eB,align 4
%eC=load i8*,i8**%e,align 8
%eD=bitcast i8*%ez to i8**
store i8*%eC,i8**%eD,align 8
%eE=getelementptr inbounds i8,i8*%ez,i64 8
%eF=bitcast i8*%eE to i32*
store i32 1,i32*%eF,align 4
ret i8*%ez
}
define internal fastcc i8*@_SMLLLN6String4scanE_158(i32 inreg%a,i32 inreg%b,i8*inreg%c)unnamed_addr#4 gc"smlsharp"{
%d=alloca i8*,align 8
%e=alloca i8*,align 8
call void@llvm.gcroot(i8**%d,i8*null)#0
call void@llvm.gcroot(i8**%e,i8*null)#0
store i8*%c,i8**%d,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**%e,align 8
%i=load i8*,i8**%d,align 8
store i8*null,i8**%d,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 i32*
store i32%a,i32*%l,align 4
%m=getelementptr inbounds i8,i8*%f,i64 12
%n=bitcast i8*%m to i32*
store i32%b,i32*%n,align 4
%o=getelementptr inbounds i8,i8*%f,i64 16
%p=bitcast i8*%o to i32*
store i32 1,i32*%p,align 4
%q=call i8*@sml_alloc(i32 inreg 28)#0
%r=getelementptr inbounds i8,i8*%q,i64 -4
%s=bitcast i8*%r to i32*
store i32 1342177304,i32*%s,align 4
%t=load i8*,i8**%e,align 8
%u=bitcast i8*%q to i8**
store i8*%t,i8**%u,align 8
%v=getelementptr inbounds i8,i8*%q,i64 8
%w=bitcast i8*%v to void(...)**
store void(...)*bitcast(i8*(i8*,i8*)*@_SMLLLN6String4scanE_157 to void(...)*),void(...)**%w,align 8
%x=getelementptr inbounds i8,i8*%q,i64 16
%y=bitcast i8*%x to void(...)**
store void(...)*bitcast(i8*(i8*,i8*)*@_SMLLLN6String4scanE_157 to void(...)*),void(...)**%y,align 8
%z=getelementptr inbounds i8,i8*%q,i64 24
%A=bitcast i8*%z to i32*
store i32 1,i32*%A,align 4
ret i8*%q
}
define internal fastcc i8*@_SMLLLN6String10fromStringE_160(i8*inreg%a)#2 gc"smlsharp"{
i:
%b=alloca i8*,align 8
call void@llvm.gcroot(i8**%b,i8*null)#0
store i8*%a,i8**%b,align 8
%c=load atomic i32,i32*@sml_check_flag unordered,align 4
%d=icmp eq i32%c,0
br i1%d,label%g,label%e
e:
call void@sml_check(i32 inreg%c)
%f=load i8*,i8**%b,align 8
br label%g
g:
%h=phi i8*[%f,%e],[%a,%i]
%j=tail call fastcc i8*@_SMLLLN6String4scanE_158(i32 inreg 0,i32 inreg 4,i8*inreg%h)
ret i8*%j
}
define fastcc i8*@_SMLFN6String10fromStringE(i8*inreg%a)#2 gc"smlsharp"{
%b=alloca i8*,align 8
call void@llvm.gcroot(i8**%b,i8*null)#0
store i8*%a,i8**%b,align 8
%c=load atomic i32,i32*@sml_check_flag unordered,align 4
%d=icmp eq i32%c,0
br i1%d,label%f,label%e
e:
call void@sml_check(i32 inreg%c)
br label%f
f:
%g=call fastcc i8*@_SMLFN9StringCvt10scanStringE(i32 inreg 1,i32 inreg 8)
%h=getelementptr inbounds i8,i8*%g,i64 16
%i=bitcast i8*%h to i8*(i8*,i8*)**
%j=load i8*(i8*,i8*)*,i8*(i8*,i8*)**%i,align 8
%k=bitcast i8*%g to i8**
%l=load i8*,i8**%k,align 8
%m=call fastcc i8*%j(i8*inreg%l,i8*inreg bitcast(i8**getelementptr inbounds(<{[4x i8],i32,i8*,void(...)*,void(...)*,i32}>,<{[4x i8],i32,i8*,void(...)*,void(...)*,i32}>*@y,i64 0,i32 2)to i8*))
%n=getelementptr inbounds i8,i8*%m,i64 16
%o=bitcast i8*%n to i8*(i8*,i8*)**
%p=load i8*(i8*,i8*)*,i8*(i8*,i8*)**%o,align 8
%q=bitcast i8*%m to i8**
%r=load i8*,i8**%q,align 8
%s=load i8*,i8**%b,align 8
%t=tail call fastcc i8*%p(i8*inreg%r,i8*inreg%s)
ret i8*%t
}
define internal fastcc i8*@_SMLLL4scan_164(i8*inreg%a,i32 inreg%b)#2 gc"smlsharp"{
%c=alloca i8*,align 8
%d=alloca i8*,align 8
call void@llvm.gcroot(i8**%c,i8*null)#0
call void@llvm.gcroot(i8**%d,i8*null)#0
store i8*%a,i8**%c,align 8
%e=load atomic i32,i32*@sml_check_flag unordered,align 4
%f=icmp eq i32%e,0
br i1%f,label%h,label%g
g:
call void@sml_check(i32 inreg%e)
br label%h
h:
%i=call fastcc i8*@_SMLFN17SMLSharp__ScanChar11scanRepeat1E(i32 inreg 0,i32 inreg 4,i32 inreg 0,i32 inreg 1)
%j=getelementptr inbounds i8,i8*%i,i64 16
%k=bitcast i8*%j to i8*(i8*,i8*)**
%l=load i8*(i8*,i8*)*,i8*(i8*,i8*)**%k,align 8
%m=bitcast i8*%i to i8**
%n=load i8*,i8**%m,align 8
store i8*%n,i8**%d,align 8
%o=call fastcc i8*@_SMLFN17SMLSharp__ScanChar9scanCCharE(i32 inreg 0,i32 inreg 4)
%p=load i8*,i8**%d,align 8
store i8*null,i8**%d,align 8
%q=call fastcc i8*%l(i8*inreg%p,i8*inreg%o)
%r=getelementptr inbounds i8,i8*%q,i64 16
%s=bitcast i8*%r to i8*(i8*,i8*)**
%t=load i8*(i8*,i8*)*,i8*(i8*,i8*)**%s,align 8
%u=bitcast i8*%q to i8**
%v=load i8*,i8**%u,align 8
%w=bitcast i8**%c to i8***
%x=load i8**,i8***%w,align 8
store i8*null,i8**%c,align 8
%y=load i8*,i8**%x,align 8
%z=call fastcc i8*%t(i8*inreg%v,i8*inreg%y)
%A=getelementptr inbounds i8,i8*%z,i64 16
%B=bitcast i8*%A to i8*(i8*,i8*)**
%C=load i8*(i8*,i8*)*,i8*(i8*,i8*)**%B,align 8
%D=bitcast i8*%z to i8**
%E=load i8*,i8**%D,align 8
store i8*%E,i8**%c,align 8
%F=call i8*@sml_alloc(i32 inreg 4)#0
%G=bitcast i8*%F to i32*
%H=getelementptr inbounds i8,i8*%F,i64 -4
%I=bitcast i8*%H to i32*
store i32 4,i32*%I,align 4
store i32%b,i32*%G,align 4
%J=load i8*,i8**%c,align 8
store i8*null,i8**%c,align 8
%K=call fastcc i8*%C(i8*inreg%J,i8*inreg%F)
%L=icmp eq i8*%K,null
br i1%L,label%M,label%N
M:
ret i8*null
N:
%O=bitcast i8*%K to i8**
%P=load i8*,i8**%O,align 8
%Q=bitcast i8*%P to i8**
%R=load i8*,i8**%Q,align 8
%S=getelementptr inbounds i8,i8*%P,i64 8
%T=bitcast i8*%S to i32*
%U=load i32,i32*%T,align 4
%V=call fastcc i8*@_SMLFN10CharVector8fromListE(i8*inreg%R)
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=getelementptr inbounds i8,i8*%W,i64 12
%aa=bitcast i8*%Z to i32*
store i32 0,i32*%aa,align 1
%ab=load i8*,i8**%c,align 8
%ac=bitcast i8*%W to i8**
store i8*null,i8**%c,align 8
store i8*%ab,i8**%ac,align 8
%ad=getelementptr inbounds i8,i8*%W,i64 8
%ae=bitcast i8*%ad to i32*
store i32%U,i32*%ae,align 4
%af=getelementptr inbounds i8,i8*%W,i64 16
%ag=bitcast i8*%af to i32*
store i32 1,i32*%ag,align 4
%ah=call i8*@sml_alloc(i32 inreg 12)#0
%ai=getelementptr inbounds i8,i8*%ah,i64 -4
%aj=bitcast i8*%ai to i32*
store i32 1342177288,i32*%aj,align 4
%ak=load i8*,i8**%d,align 8
%al=bitcast i8*%ah to i8**
store i8*%ak,i8**%al,align 8
%am=getelementptr inbounds i8,i8*%ah,i64 8
%an=bitcast i8*%am to i32*
store i32 1,i32*%an,align 4
ret i8*%ah
}
define internal fastcc i8*@_SMLLL4scan_165(i8*inreg%a)#4 gc"smlsharp"{
%b=alloca i8*,align 8
%c=alloca i8*,align 8
call void@llvm.gcroot(i8**%b,i8*null)#0
call void@llvm.gcroot(i8**%c,i8*null)#0
store i8*%a,i8**%b,align 8
%d=call i8*@sml_alloc(i32 inreg 12)#0
%e=getelementptr inbounds i8,i8*%d,i64 -4
%f=bitcast i8*%e to i32*
store i32 1342177288,i32*%f,align 4
store i8*%d,i8**%c,align 8
%g=load i8*,i8**%b,align 8
store i8*null,i8**%b,align 8
%h=bitcast i8*%d to i8**
store i8*%g,i8**%h,align 8
%i=getelementptr inbounds i8,i8*%d,i64 8
%j=bitcast i8*%i to i32*
store i32 1,i32*%j,align 4
%k=call i8*@sml_alloc(i32 inreg 28)#0
%l=getelementptr inbounds i8,i8*%k,i64 -4
%m=bitcast i8*%l to i32*
store i32 1342177304,i32*%m,align 4
%n=load i8*,i8**%c,align 8
%o=bitcast i8*%k to i8**
store i8*%n,i8**%o,align 8
%p=getelementptr inbounds i8,i8*%k,i64 8
%q=bitcast i8*%p to void(...)**
store void(...)*bitcast(i8*(i8*,i32)*@_SMLLL4scan_164 to void(...)*),void(...)**%q,align 8
%r=getelementptr inbounds i8,i8*%k,i64 16
%s=bitcast i8*%r to void(...)**
store void(...)*bitcast(i8*(i8*,i8*)*@_SMLLL4scan_205 to void(...)*),void(...)**%s,align 8
%t=getelementptr inbounds i8,i8*%k,i64 24
%u=bitcast i8*%t to i32*
store i32 -2147483647,i32*%u,align 4
ret i8*%k
}
define fastcc i8*@_SMLFN6String11fromCStringE(i8*inreg%a)#2 gc"smlsharp"{
%b=alloca i8*,align 8
call void@llvm.gcroot(i8**%b,i8*null)#0
store i8*%a,i8**%b,align 8
%c=load atomic i32,i32*@sml_check_flag unordered,align 4
%d=icmp eq i32%c,0
br i1%d,label%e,label%g
e:
%f=bitcast i8*%a to i32*
br label%j
g:
call void@sml_check(i32 inreg%c)
%h=bitcast i8**%b to i32**
%i=load i32*,i32**%h,align 8
br label%j
j:
%k=phi i32*[%i,%g],[%f,%e]
%l=getelementptr inbounds i32,i32*%k,i64 -1
%m=load i32,i32*%l,align 4
%n=and i32%m,268435455
%o=icmp eq i32%n,1
br i1%o,label%p,label%q
p:
ret i8*bitcast(i8**getelementptr inbounds(<{[4x i8],i32,i8*,i32}>,<{[4x i8],i32,i8*,i32}>*@C,i64 0,i32 2)to i8*)
q:
%r=call fastcc i8*@_SMLFN9StringCvt10scanStringE(i32 inreg 1,i32 inreg 8)
%s=getelementptr inbounds i8,i8*%r,i64 16
%t=bitcast i8*%s to i8*(i8*,i8*)**
%u=load i8*(i8*,i8*)*,i8*(i8*,i8*)**%t,align 8
%v=bitcast i8*%r to i8**
%w=load i8*,i8**%v,align 8
%x=call fastcc i8*%u(i8*inreg%w,i8*inreg 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*))
%y=getelementptr inbounds i8,i8*%x,i64 16
%z=bitcast i8*%y to i8*(i8*,i8*)**
%A=load i8*(i8*,i8*)*,i8*(i8*,i8*)**%z,align 8
%B=bitcast i8*%x to i8**
%C=load i8*,i8**%B,align 8
%D=load i8*,i8**%b,align 8
%E=tail call fastcc i8*%A(i8*inreg%C,i8*inreg%D)
ret i8*%E
}
define fastcc i32@_SMLFN6String7compareE(i8*inreg%a)#2 gc"smlsharp"{
i:
%b=alloca i8*,align 8
call void@llvm.gcroot(i8**%b,i8*null)#0
store i8*%a,i8**%b,align 8
%c=load atomic i32,i32*@sml_check_flag unordered,align 4
%d=icmp eq i32%c,0
br i1%d,label%g,label%e
e:
call void@sml_check(i32 inreg%c)
%f=load i8*,i8**%b,align 8
br label%g
g:
%h=phi i8*[%f,%e],[%a,%i]
%j=bitcast i8*%h to i8**
%k=load i8*,i8**%j,align 8
%l=getelementptr inbounds i8,i8*%h,i64 8
%m=bitcast i8*%l to i8**
%n=load i8*,i8**%m,align 8
%o=getelementptr inbounds i8,i8*%k,i64 -4
%p=bitcast i8*%o to i32*
%q=load i32,i32*%p,align 4
%r=and i32%q,268435455
%s=add nsw i32%r,-1
%t=getelementptr inbounds i8,i8*%n,i64 -4
%u=bitcast i8*%t to i32*
%v=load i32,i32*%u,align 4
%w=and i32%v,268435455
%x=add nsw i32%w,-1
%y=icmp ult i32%r,%w
%z=select i1%y,i32%s,i32%x
%A=call i32@sml_memcmp(i8*%k,i32 0,i8*%n,i32 0,i32%z)
%B=icmp eq i32%A,0
%C=sub nsw i32%s,%x
%D=select i1%B,i32%C,i32%A
%E=icmp eq i32%D,0
%F=icmp sgt i32%D,-1
%G=select i1%F,i32 1,i32 2
%H=select i1%E,i32 0,i32%G
ret i32%H
}
define fastcc i32@_SMLFN6String1_RE(i8*inreg%a)#2 gc"smlsharp"{
i:
%b=alloca i8*,align 8
call void@llvm.gcroot(i8**%b,i8*null)#0
store i8*%a,i8**%b,align 8
%c=load atomic i32,i32*@sml_check_flag unordered,align 4
%d=icmp eq i32%c,0
br i1%d,label%g,label%e
e:
call void@sml_check(i32 inreg%c)
%f=load i8*,i8**%b,align 8
br label%g
g:
%h=phi i8*[%f,%e],[%a,%i]
%j=bitcast i8*%h to i8**
%k=load i8*,i8**%j,align 8
%l=getelementptr inbounds i8,i8*%h,i64 8
%m=bitcast i8*%l to i8**
%n=load i8*,i8**%m,align 8
%o=getelementptr inbounds i8,i8*%k,i64 -4
%p=bitcast i8*%o to i32*
%q=load i32,i32*%p,align 4
%r=and i32%q,268435455
%s=add nsw i32%r,-1
%t=getelementptr inbounds i8,i8*%n,i64 -4
%u=bitcast i8*%t to i32*
%v=load i32,i32*%u,align 4
%w=and i32%v,268435455
%x=add nsw i32%w,-1
%y=icmp ult i32%r,%w
%z=select i1%y,i32%s,i32%x
%A=call i32@sml_memcmp(i8*%k,i32 0,i8*%n,i32 0,i32%z)
%B=icmp eq i32%A,0
%C=sub nsw i32%s,%x
%D=select i1%B,i32%C,i32%A
%E=lshr i32%D,31
ret i32%E
}
define fastcc i32@_SMLFN6String2_R_SE(i8*inreg%a)#2 gc"smlsharp"{
i:
%b=alloca i8*,align 8
call void@llvm.gcroot(i8**%b,i8*null)#0
store i8*%a,i8**%b,align 8
%c=load atomic i32,i32*@sml_check_flag unordered,align 4
%d=icmp eq i32%c,0
br i1%d,label%g,label%e
e:
call void@sml_check(i32 inreg%c)
%f=load i8*,i8**%b,align 8
br label%g
g:
%h=phi i8*[%f,%e],[%a,%i]
%j=bitcast i8*%h to i8**
%k=load i8*,i8**%j,align 8
%l=getelementptr inbounds i8,i8*%h,i64 8
%m=bitcast i8*%l to i8**
%n=load i8*,i8**%m,align 8
%o=getelementptr inbounds i8,i8*%k,i64 -4
%p=bitcast i8*%o to i32*
%q=load i32,i32*%p,align 4
%r=and i32%q,268435455
%s=add nsw i32%r,-1
%t=getelementptr inbounds i8,i8*%n,i64 -4
%u=bitcast i8*%t to i32*
%v=load i32,i32*%u,align 4
%w=and i32%v,268435455
%x=add nsw i32%w,-1
%y=icmp ult i32%r,%w
%z=select i1%y,i32%s,i32%x
%A=call i32@sml_memcmp(i8*%k,i32 0,i8*%n,i32 0,i32%z)
%B=icmp eq i32%A,0
%C=sub nsw i32%s,%x
%D=select i1%B,i32%C,i32%A
%E=icmp slt i32%D,1
%F=zext i1%E to i32
ret i32%F
}
define fastcc i32@_SMLFN6String1_TE(i8*inreg%a)#2 gc"smlsharp"{
i:
%b=alloca i8*,align 8
call void@llvm.gcroot(i8**%b,i8*null)#0
store i8*%a,i8**%b,align 8
%c=load atomic i32,i32*@sml_check_flag unordered,align 4
%d=icmp eq i32%c,0
br i1%d,label%g,label%e
e:
call void@sml_check(i32 inreg%c)
%f=load i8*,i8**%b,align 8
br label%g
g:
%h=phi i8*[%f,%e],[%a,%i]
%j=bitcast i8*%h to i8**
%k=load i8*,i8**%j,align 8
%l=getelementptr inbounds i8,i8*%h,i64 8
%m=bitcast i8*%l to i8**
%n=load i8*,i8**%m,align 8
%o=getelementptr inbounds i8,i8*%k,i64 -4
%p=bitcast i8*%o to i32*
%q=load i32,i32*%p,align 4
%r=and i32%q,268435455
%s=add nsw i32%r,-1
%t=getelementptr inbounds i8,i8*%n,i64 -4
%u=bitcast i8*%t to i32*
%v=load i32,i32*%u,align 4
%w=and i32%v,268435455
%x=add nsw i32%w,-1
%y=icmp ult i32%r,%w
%z=select i1%y,i32%s,i32%x
%A=call i32@sml_memcmp(i8*%k,i32 0,i8*%n,i32 0,i32%z)
%B=icmp eq i32%A,0
%C=sub nsw i32%s,%x
%D=select i1%B,i32%C,i32%A
%E=icmp sgt i32%D,0
%F=zext i1%E to i32
ret i32%F
}
define fastcc i32@_SMLFN6String2_T_SE(i8*inreg%a)#2 gc"smlsharp"{
i:
%b=alloca i8*,align 8
call void@llvm.gcroot(i8**%b,i8*null)#0
store i8*%a,i8**%b,align 8
%c=load atomic i32,i32*@sml_check_flag unordered,align 4
%d=icmp eq i32%c,0
br i1%d,label%g,label%e
e:
call void@sml_check(i32 inreg%c)
%f=load i8*,i8**%b,align 8
br label%g
g:
%h=phi i8*[%f,%e],[%a,%i]
%j=bitcast i8*%h to i8**
%k=load i8*,i8**%j,align 8
%l=getelementptr inbounds i8,i8*%h,i64 8
%m=bitcast i8*%l to i8**
%n=load i8*,i8**%m,align 8
%o=getelementptr inbounds i8,i8*%k,i64 -4
%p=bitcast i8*%o to i32*
%q=load i32,i32*%p,align 4
%r=and i32%q,268435455
%s=add nsw i32%r,-1
%t=getelementptr inbounds i8,i8*%n,i64 -4
%u=bitcast i8*%t to i32*
%v=load i32,i32*%u,align 4
%w=and i32%v,268435455
%x=add nsw i32%w,-1
%y=icmp ult i32%r,%w
%z=select i1%y,i32%s,i32%x
%A=call i32@sml_memcmp(i8*%k,i32 0,i8*%n,i32 0,i32%z)
%B=icmp eq i32%A,0
%C=sub nsw i32%s,%x
%D=select i1%B,i32%C,i32%A
%E=lshr i32%D,31
%F=xor i32%E,1
ret i32%F
}
define internal fastcc i8*@_SMLLLN6String4scanE_181(i8*inreg%a,i8*inreg%b)#2 gc"smlsharp"{
l:
%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**%c,align 8
store i8*%b,i8**%d,align 8
%e=load atomic i32,i32*@sml_check_flag unordered,align 4
%f=icmp eq i32%e,0
br i1%f,label%j,label%g
g:
call void@sml_check(i32 inreg%e)
%h=load i8*,i8**%d,align 8
%i=load i8*,i8**%c,align 8
br label%j
j:
%k=phi i8*[%i,%g],[%a,%l]
%m=phi i8*[%h,%g],[%b,%l]
%n=bitcast i8*%k to i32*
%o=load i32,i32*%n,align 4
%p=getelementptr inbounds i8,i8*%k,i64 4
%q=bitcast i8*%p to i32*
%r=load i32,i32*%q,align 4
%s=tail call fastcc i8*@_SMLLLN6String4scanE_158(i32 inreg%o,i32 inreg%r,i8*inreg%m)
ret i8*%s
}
define fastcc i8*@_SMLFN6String4scanE(i32 inreg%a,i32 inreg%b)#4 gc"smlsharp"{
%c=alloca i8*,align 8
call void@llvm.gcroot(i8**%c,i8*null)#0
%d=call i8*@sml_alloc(i32 inreg 12)#0
%e=bitcast i8*%d to i32*
%f=getelementptr inbounds i8,i8*%d,i64 -4
%g=bitcast i8*%f to i32*
store i32 1342177288,i32*%g,align 4
store i8*%d,i8**%c,align 8
store i32%a,i32*%e,align 4
%h=getelementptr inbounds i8,i8*%d,i64 4
%i=bitcast i8*%h to i32*
store i32%b,i32*%i,align 4
%j=getelementptr inbounds i8,i8*%d,i64 8
%k=bitcast i8*%j to i32*
store i32 0,i32*%k,align 4
%l=call i8*@sml_alloc(i32 inreg 28)#0
%m=getelementptr inbounds i8,i8*%l,i64 -4
%n=bitcast i8*%m to i32*
store i32 1342177304,i32*%n,align 4
%o=load i8*,i8**%c,align 8
%p=bitcast i8*%l to i8**
store i8*%o,i8**%p,align 8
%q=getelementptr inbounds i8,i8*%l,i64 8
%r=bitcast i8*%q to void(...)**
store void(...)*bitcast(i8*(i8*,i8*)*@_SMLLLN6String4scanE_181 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*)*@_SMLLLN6String4scanE_181 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*@_SMLLLN6String9substringE_184(i8*inreg%a,i8*inreg%b)#2 gc"smlsharp"{
%c=tail call fastcc i8*@_SMLFN6String9substringE(i8*inreg%b)
ret i8*%c
}
define internal fastcc i8*@_SMLLLN6String7extractE_185(i8*inreg%a,i8*inreg%b)#2 gc"smlsharp"{
%c=tail call fastcc i8*@_SMLFN6String7extractE(i8*inreg%b)
ret i8*%c
}
define internal fastcc i8*@_SMLLLN6String1_ZE_186(i8*inreg%a,i8*inreg%b)#2 gc"smlsharp"{
%c=tail call fastcc i8*@_SMLFN6String1_ZE(i8*inreg%b)
ret i8*%c
}
define internal fastcc i8*@_SMLLLN6String10concatWithE_187(i8*inreg%a,i8*inreg%b)#4 gc"smlsharp"{
%c=tail call fastcc i8*@_SMLFN6String10concatWithE(i8*inreg%b)
ret i8*%c
}
define internal fastcc i8*@_SMLLLN6String9translateE_188(i8*inreg%a,i8*inreg%b)#4 gc"smlsharp"{
%c=tail call fastcc i8*@_SMLFN6String9translateE(i8*inreg%b)
ret i8*%c
}
define internal fastcc i8*@_SMLLLN6String3strE_189(i8*inreg%a,i8*inreg%b)#4 gc"smlsharp"{
%c=load i8,i8*%b,align 1
%d=tail call fastcc i8*@_SMLFN6String3strE(i8 inreg%c)
ret i8*%d
}
define internal fastcc i8*@_SMLLLN6String7explodeE_190(i8*inreg%a,i8*inreg%b)#2 gc"smlsharp"{
%c=tail call fastcc i8*@_SMLFN6String7explodeE(i8*inreg%b)
ret i8*%c
}
define internal fastcc i8*@_SMLLLN6String8isPrefixE_191(i8*inreg%a,i8*inreg%b)#2 gc"smlsharp"{
%c=tail call fastcc i32@_SMLLLN6String8isPrefixE_132(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*@_SMLLLN6String8isPrefixE_192(i8*inreg%a,i8*inreg%b)#4 gc"smlsharp"{
%c=tail call fastcc i8*@_SMLFN6String8isPrefixE(i8*inreg%b)
ret i8*%c
}
define internal fastcc i8*@_SMLLLN6String8isSuffixE_193(i8*inreg%a,i8*inreg%b)#2 gc"smlsharp"{
%c=tail call fastcc i32@_SMLLLN6String8isSuffixE_135(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*@_SMLLLN6String8isSuffixE_194(i8*inreg%a,i8*inreg%b)#4 gc"smlsharp"{
%c=tail call fastcc i8*@_SMLFN6String8isSuffixE(i8*inreg%b)
ret i8*%c
}
define internal fastcc i8*@_SMLLLN6String11isSubstringE_195(i8*inreg%a,i8*inreg%b)#2 gc"smlsharp"{
%c=tail call fastcc i32@_SMLLLN6String11isSubstringE_138(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*@_SMLLLN6String11isSubstringE_196(i8*inreg%a,i8*inreg%b)#4 gc"smlsharp"{
%c=tail call fastcc i8*@_SMLFN6String11isSubstringE(i8*inreg%b)
ret i8*%c
}
define internal fastcc i8*@_SMLLLN6String6tokensE_197(i8*inreg%a,i8*inreg%b)#4 gc"smlsharp"{
%c=tail call fastcc i8*@_SMLFN6String6tokensE(i8*inreg%b)
ret i8*%c
}
define internal fastcc i8*@_SMLLLN6String6fieldsE_198(i8*inreg%a,i8*inreg%b)#4 gc"smlsharp"{
%c=tail call fastcc i8*@_SMLFN6String6fieldsE(i8*inreg%b)
ret i8*%c
}
define internal fastcc i8*@_SMLLLN6String8toStringE_199(i8*inreg%a,i8*inreg%b)#2 gc"smlsharp"{
%c=tail call fastcc i8*@_SMLFN6String8toStringE(i8*inreg%b)
ret i8*%c
}
define internal fastcc i8*@_SMLLLN6String11toRawStringE_200(i8*inreg%a,i8*inreg%b)#2 gc"smlsharp"{
%c=tail call fastcc i8*@_SMLFN6String11toRawStringE(i8*inreg%b)
ret i8*%c
}
define internal fastcc i8*@_SMLLLN6String9toCStringE_201(i8*inreg%a,i8*inreg%b)#2 gc"smlsharp"{
%c=tail call fastcc i8*@_SMLFN6String9toCStringE(i8*inreg%b)
ret i8*%c
}
define internal fastcc i8*@_SMLLLN6String10fromStringE_203(i8*inreg%a,i8*inreg%b)#2 gc"smlsharp"{
%c=tail call fastcc i8*@_SMLLLN6String10fromStringE_160(i8*inreg%b)
ret i8*%c
}
define internal fastcc i8*@_SMLLLN6String10fromStringE_204(i8*inreg%a,i8*inreg%b)#2 gc"smlsharp"{
%c=tail call fastcc i8*@_SMLFN6String10fromStringE(i8*inreg%b)
ret i8*%c
}
define internal fastcc i8*@_SMLLL4scan_205(i8*inreg%a,i8*inreg%b)#2 gc"smlsharp"{
%c=bitcast i8*%b to i32*
%d=load i32,i32*%c,align 4
%e=tail call fastcc i8*@_SMLLL4scan_164(i8*inreg%a,i32 inreg%d)
ret i8*%e
}
define internal fastcc i8*@_SMLLL4scan_206(i8*inreg%a,i8*inreg%b)#4 gc"smlsharp"{
%c=tail call fastcc i8*@_SMLLL4scan_165(i8*inreg%b)
ret i8*%c
}
define internal fastcc i8*@_SMLLLN6String11fromCStringE_207(i8*inreg%a,i8*inreg%b)#2 gc"smlsharp"{
%c=tail call fastcc i8*@_SMLFN6String11fromCStringE(i8*inreg%b)
ret i8*%c
}
define internal fastcc i8*@_SMLLLN6String7compareE_208(i8*inreg%a,i8*inreg%b)#2 gc"smlsharp"{
%c=tail call fastcc i32@_SMLFN6String7compareE(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*@_SMLLLN6String1_RE_209(i8*inreg%a,i8*inreg%b)#2 gc"smlsharp"{
%c=tail call fastcc i32@_SMLFN6String1_RE(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*@_SMLLLN6String2_R_SE_210(i8*inreg%a,i8*inreg%b)#2 gc"smlsharp"{
%c=tail call fastcc i32@_SMLFN6String2_R_SE(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*@_SMLLLN6String1_TE_211(i8*inreg%a,i8*inreg%b)#2 gc"smlsharp"{
%c=tail call fastcc i32@_SMLFN6String1_TE(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*@_SMLLLN6String2_T_SE_212(i8*inreg%a,i8*inreg%b)#2 gc"smlsharp"{
%c=tail call fastcc i32@_SMLFN6String2_T_SE(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*@_SMLLLN6String4scanE_213(i8*inreg%a,i8*inreg%b,i8*inreg%c)#4 gc"smlsharp"{
%d=bitcast i8*%b to i32*
%e=load i32,i32*%d,align 4
%f=bitcast i8*%c to i32*
%g=load i32,i32*%f,align 4
%h=tail call fastcc i8*@_SMLFN6String4scanE(i32 inreg%e,i32 inreg%g)
ret i8*%h
}
declare void@llvm.memcpy.p0i8.p0i8.i32(i8*,i8*,i32,i1)#0
declare void@llvm.memmove.p0i8.p0i8.i32(i8*,i8*,i32,i1)#0
declare void@llvm.memset.p0i8.i32(i8*,i8,i32,i1)#0
attributes#0={nounwind}
attributes#1={noreturn}
attributes#2={uwtable}
attributes#3={noreturn nounwind}
attributes#4={nounwind uwtable}
