@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,[38x i8]}><{[4x i8]zeroinitializer,i32 -2147483610,[38x i8]c"src/basis/main/String.sml:59.19(1590)\00"}>,align 8
@b=private unnamed_addr constant<{[4x i8],i32,i8*,void(...)*,void(...)*,i32}><{[4x i8]zeroinitializer,i32 -805306344,i8*null,void(...)*bitcast(i8*(i8*)*@_SMLFN6String9substringE to void(...)*),void(...)*bitcast(i8*(i8*,i8*)*@_SMLLN6String9substringE_198 to void(...)*),i32 -2147483647}>,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*)*@_SMLLN6String7extractE_199 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*)*@_SMLLN6String1_ZE_200 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*)*@_SMLLN6String10concatWithE_203 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*)*@_SMLFN6String6tokensE to void(...)*),void(...)*bitcast(i8*(i8*,i8*)*@_SMLLN6String6tokensE_205 to void(...)*),i32 -2147483647}>,align 8
@n=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
@o=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*)*@_SMLLN6String6fieldsE_206 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*)*@_SMLL4scan_152 to void(...)*),void(...)*bitcast(i8*(i8*,i8*)*@_SMLL4scan_209 to void(...)*),i32 -2147483647}>,align 8
@q=private unnamed_addr constant<{[4x i8],i32,[1x i8]}><{[4x i8]zeroinitializer,i32 -2147483647,[1x i8]zeroinitializer}>,align 8
@r=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]}>*@q,i32 0,i32 0,i32 0),i32 8),i32 1}>,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*)*@_SMLFN6String11fromCStringE to void(...)*),void(...)*bitcast(i8*(i8*,i8*)*@_SMLLN6String11fromCStringE_210 to void(...)*),i32 -2147483647}>,align 8
@t=private unnamed_addr constant<{[4x i8],i32,i8*,void(...)*,void(...)*,i32}><{[4x i8]zeroinitializer,i32 -805306344,i8*null,void(...)*bitcast(i32(i8*)*@_SMLFN6String7compareE to void(...)*),void(...)*bitcast(i8*(i8*,i8*)*@_SMLLN6String7compareE_212 to void(...)*),i32 -2147483647}>,align 8
@u=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*)*@_SMLLN6String1_RE_213 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(i32(i8*)*@_SMLFN6String2_R_SE to void(...)*),void(...)*bitcast(i8*(i8*,i8*)*@_SMLLN6String2_R_SE_214 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(i32(i8*)*@_SMLFN6String1_TE to void(...)*),void(...)*bitcast(i8*(i8*,i8*)*@_SMLLN6String1_TE_215 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(i32(i8*)*@_SMLFN6String2_T_SE to void(...)*),void(...)*bitcast(i8*(i8*,i8*)*@_SMLLN6String2_T_SE_216 to void(...)*),i32 -2147483647}>,align 8
@_SMLZN6String7maxSizeE=local_unnamed_addr constant i32 268435454
@y=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*)*@_SMLLN6String7explodeE_217 to void(...)*),i32 -2147483647}>,align 8
@_SMLZN6String7explodeE=local_unnamed_addr constant i8*bitcast(i8**getelementptr inbounds(<{[4x i8],i32,i8*,void(...)*,void(...)*,i32}>,<{[4x i8],i32,i8*,void(...)*,void(...)*,i32}>*@y,i64 0,i32 2)to i8*)
@_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*)
@z=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*)*@_SMLLN6String8isPrefixE_219 to void(...)*),i32 -2147483647}>,align 8
@_SMLZN6String8isPrefixE=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*)
@A=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*)*@_SMLLN6String8isSuffixE_221 to void(...)*),i32 -2147483647}>,align 8
@_SMLZN6String8isSuffixE=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*)
@B=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*)*@_SMLLN6String11isSubstringE_223 to void(...)*),i32 -2147483647}>,align 8
@_SMLZN6String11isSubstringE=local_unnamed_addr constant i8*bitcast(i8**getelementptr inbounds(<{[4x i8],i32,i8*,void(...)*,void(...)*,i32}>,<{[4x i8],i32,i8*,void(...)*,void(...)*,i32}>*@B,i64 0,i32 2)to i8*)
@C=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*)*@_SMLLN6String9translateE_224 to void(...)*),i32 -2147483647}>,align 8
@_SMLZN6String9translateE=local_unnamed_addr constant i8*bitcast(i8**getelementptr inbounds(<{[4x i8],i32,i8*,void(...)*,void(...)*,i32}>,<{[4x i8],i32,i8*,void(...)*,void(...)*,i32}>*@C,i64 0,i32 2)to i8*)
@_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}>*@b,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*)
@D=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*)*@_SMLLN6String3strE_225 to void(...)*),i32 -2147483647}>,align 8
@_SMLZN6String3strE=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*)
@_SMLZN6String6tokensE=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*)
@_SMLZN6String6fieldsE=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*)
@_SMLZN6String7compareE=local_unnamed_addr constant i8*bitcast(i8**getelementptr inbounds(<{[4x i8],i32,i8*,void(...)*,void(...)*,i32}>,<{[4x i8],i32,i8*,void(...)*,void(...)*,i32}>*@t,i64 0,i32 2)to i8*)
@_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}>*@u,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}>*@v,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}>*@w,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}>*@x,i64 0,i32 2)to i8*)
@E=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*)*@_SMLLN6String8toStringE_226 to void(...)*),i32 -2147483647}>,align 8
@_SMLZN6String8toStringE=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*)
@F=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*)*@_SMLLN6String11toRawStringE_227 to void(...)*),i32 -2147483647}>,align 8
@_SMLZN6String11toRawStringE=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*)
@G=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*)*@_SMLLN6String4scanE_228 to void(...)*),i32 -2147483647}>,align 8
@_SMLZN6String4scanE=local_unnamed_addr constant i8*bitcast(i8**getelementptr inbounds(<{[4x i8],i32,i8*,void(...)*,void(...)*,i32}>,<{[4x i8],i32,i8*,void(...)*,void(...)*,i32}>*@G,i64 0,i32 2)to i8*)
@H=private unnamed_addr constant<{[4x i8],i32,i8*,void(...)*,void(...)*,i32}><{[4x i8]zeroinitializer,i32 -805306344,i8*null,void(...)*bitcast(i8*(i8*)*@_SMLFN6String10fromStringE to void(...)*),void(...)*bitcast(i8*(i8*,i8*)*@_SMLLN6String10fromStringE_229 to void(...)*),i32 -2147483647}>,align 8
@_SMLZN6String10fromStringE=local_unnamed_addr constant i8*bitcast(i8**getelementptr inbounds(<{[4x i8],i32,i8*,void(...)*,void(...)*,i32}>,<{[4x i8],i32,i8*,void(...)*,void(...)*,i32}>*@H,i64 0,i32 2)to i8*)
@I=private unnamed_addr constant<{[4x i8],i32,i8*,void(...)*,void(...)*,i32}><{[4x i8]zeroinitializer,i32 -805306344,i8*null,void(...)*bitcast(i8*(i8*)*@_SMLFN6String9toCStringE to void(...)*),void(...)*bitcast(i8*(i8*,i8*)*@_SMLLN6String9toCStringE_230 to void(...)*),i32 -2147483647}>,align 8
@_SMLZN6String9toCStringE=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*)
@_SMLZN6String11fromCStringE=local_unnamed_addr constant i8*bitcast(i8**getelementptr inbounds(<{[4x i8],i32,i8*,void(...)*,void(...)*,i32}>,<{[4x i8],i32,i8*,void(...)*,void(...)*,i32}>*@s,i64 0,i32 2)to i8*)
@_SML_ftab1ef93e13728790b1_String=external global i8
@J=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*@J,align 1
%c=icmp eq i8%b,0
br i1%c,label%e,label%d
d:
ret void
e:
store i8 1,i8*@J,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*@J,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*@J,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 internal fastcc i8*@_SMLLN6String16substring__unsafeE_107(i8*inreg%a)unnamed_addr#4 gc"smlsharp"{
%b=alloca i8*,align 8
call void@llvm.gcroot(i8**%b,i8*null)#0
store i8*%a,i8**%b,align 8
%c=getelementptr inbounds i8,i8*%a,i64 8
%d=bitcast i8*%c to i32*
%e=load i32,i32*%d,align 4
%f=getelementptr inbounds i8,i8*%a,i64 12
%g=bitcast i8*%f to i32*
%h=load i32,i32*%g,align 4
%i=add nsw i32%h,1
%j=call i8*@sml_alloc(i32 inreg%i)#0
%k=getelementptr inbounds i8,i8*%j,i64 -4
%l=bitcast i8*%k to i32*
store i32%i,i32*%l,align 4
%m=sext i32%h to i64
%n=getelementptr inbounds i8,i8*%j,i64%m
store i8 0,i8*%n,align 1
%o=bitcast i8**%b to i8***
%p=load i8**,i8***%o,align 8
%q=load i8*,i8**%p,align 8
%r=sext i32%e to i64
%s=getelementptr inbounds i8,i8*%q,i64%r
call void@llvm.memcpy.p0i8.p0i8.i32(i8*%j,i8*%s,i32%h,i1 false)
ret i8*%j
}
define fastcc i8*@_SMLFN6String9substringE(i8*inreg%a)#2 gc"smlsharp"{
j:
%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%h,label%f
f:
call void@sml_check(i32 inreg%d)
%g=load i8*,i8**%b,align 8
br label%h
h:
%i=phi i8*[%g,%f],[%a,%j]
%k=bitcast i8*%i to i8**
%l=load i8*,i8**%k,align 8
store i8*%l,i8**%b,align 8
%m=getelementptr inbounds i8,i8*%i,i64 8
%n=bitcast i8*%m to i32*
%o=load i32,i32*%n,align 4
%p=getelementptr inbounds i8,i8*%i,i64 12
%q=bitcast i8*%p to i32*
%r=load i32,i32*%q,align 4
%s=getelementptr inbounds i8,i8*%l,i64 -4
%t=bitcast i8*%s to i32*
%u=load i32,i32*%t,align 4
%v=and i32%u,268435455
%w=icmp uge i32%o,%v
%x=icmp slt i32%r,0
%y=xor i32%o,-1
%z=add i32%v,%y
%A=icmp slt i32%z,%r
%B=or i1%x,%w
%C=or i1%A,%B
br i1%C,label%D,label%V
D:
%E=load i8*,i8**@_SMLZ9Subscript,align 8
store i8*%E,i8**%b,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**%c,align 8
%I=load i8*,i8**%b,align 8
store i8*null,i8**%b,align 8
%J=bitcast i8*%F to i8**
store i8*%I,i8**%J,align 8
%K=getelementptr inbounds i8,i8*%F,i64 8
%L=bitcast i8*%K to i8**
store i8*getelementptr inbounds(<{[4x i8],i32,[38x i8]}>,<{[4x i8],i32,[38x i8]}>*@a,i64 0,i32 2,i64 0),i8**%L,align 8
%M=getelementptr inbounds i8,i8*%F,i64 16
%N=bitcast i8*%M to i32*
store i32 3,i32*%N,align 4
%O=call i8*@sml_alloc(i32 inreg 60)#0
%P=getelementptr inbounds i8,i8*%O,i64 -4
%Q=bitcast i8*%P to i32*
store i32 1342177336,i32*%Q,align 4
%R=getelementptr inbounds i8,i8*%O,i64 56
%S=bitcast i8*%R to i32*
store i32 1,i32*%S,align 4
%T=load i8*,i8**%c,align 8
%U=bitcast i8*%O to i8**
store i8*%T,i8**%U,align 8
call void@sml_raise(i8*inreg%O)#1
unreachable
V:
%W=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
%Z=load i8*,i8**%b,align 8
%aa=bitcast i8*%W to i8**
store i8*%Z,i8**%aa,align 8
%ab=getelementptr inbounds i8,i8*%W,i64 8
%ac=bitcast i8*%ab to i32*
store i32%o,i32*%ac,align 4
%ad=getelementptr inbounds i8,i8*%W,i64 12
%ae=bitcast i8*%ad to i32*
store i32%r,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=tail call fastcc i8*@_SMLLN6String16substring__unsafeE_107(i8*inreg%W)
ret i8*%ah
}
define fastcc i8*@_SMLFN6String7extractE(i8*inreg%a)#2 gc"smlsharp"{
j:
%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%h,label%f
f:
call void@sml_check(i32 inreg%d)
%g=load i8*,i8**%b,align 8
br label%h
h:
%i=phi i8*[%g,%f],[%a,%j]
%k=bitcast i8*%i to i8**
%l=load i8*,i8**%k,align 8
store i8*%l,i8**%b,align 8
%m=getelementptr inbounds i8,i8*%i,i64 8
%n=bitcast i8*%m to i32*
%o=load i32,i32*%n,align 4
%p=getelementptr inbounds i8,i8*%i,i64 16
%q=bitcast i8*%p to i8**
%r=load i8*,i8**%q,align 8
%s=icmp eq i8*%r,null
br i1%s,label%t,label%ag
t:
%u=getelementptr inbounds i8,i8*%l,i64 -4
%v=bitcast i8*%u to i32*
%w=load i32,i32*%v,align 4
%x=and i32%w,268435455
%y=icmp ult i32%o,%x
br i1%y,label%R,label%z
z:
%A=load i8*,i8**@_SMLZ9Subscript,align 8
store i8*%A,i8**%b,align 8
%B=call i8*@sml_alloc(i32 inreg 20)#0
%C=getelementptr inbounds i8,i8*%B,i64 -4
%D=bitcast i8*%C to i32*
store i32 1342177296,i32*%D,align 4
store i8*%B,i8**%c,align 8
%E=load i8*,i8**%b,align 8
store i8*null,i8**%b,align 8
%F=bitcast i8*%B to i8**
store i8*%E,i8**%F,align 8
%G=getelementptr inbounds i8,i8*%B,i64 8
%H=bitcast i8*%G to i8**
store i8*getelementptr inbounds(<{[4x i8],i32,[38x i8]}>,<{[4x i8],i32,[38x i8]}>*@c,i64 0,i32 2,i64 0),i8**%H,align 8
%I=getelementptr inbounds i8,i8*%B,i64 16
%J=bitcast i8*%I to i32*
store i32 3,i32*%J,align 4
%K=call i8*@sml_alloc(i32 inreg 60)#0
%L=getelementptr inbounds i8,i8*%K,i64 -4
%M=bitcast i8*%L to i32*
store i32 1342177336,i32*%M,align 4
%N=getelementptr inbounds i8,i8*%K,i64 56
%O=bitcast i8*%N to i32*
store i32 1,i32*%O,align 4
%P=load i8*,i8**%c,align 8
%Q=bitcast i8*%K to i8**
store i8*%P,i8**%Q,align 8
call void@sml_raise(i8*inreg%K)#1
unreachable
R:
%S=xor i32%o,-1
%T=add i32%x,%S
%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
%X=load i8*,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
%aa=bitcast i8*%Z to i32*
store i32%o,i32*%aa,align 4
%ab=getelementptr inbounds i8,i8*%U,i64 12
%ac=bitcast i8*%ab to i32*
store i32%T,i32*%ac,align 4
%ad=getelementptr inbounds i8,i8*%U,i64 16
%ae=bitcast i8*%ad to i32*
store i32 1,i32*%ae,align 4
%af=tail call fastcc i8*@_SMLLN6String16substring__unsafeE_107(i8*inreg%U)
ret i8*%af
ag:
%ah=bitcast i8*%r to i32*
%ai=load i32,i32*%ah,align 4
%aj=call i8*@sml_alloc(i32 inreg 20)#0
%ak=getelementptr inbounds i8,i8*%aj,i64 -4
%al=bitcast i8*%ak to i32*
store i32 1342177296,i32*%al,align 4
%am=load i8*,i8**%b,align 8
%an=bitcast i8*%aj to i8**
store i8*%am,i8**%an,align 8
%ao=getelementptr inbounds i8,i8*%aj,i64 8
%ap=bitcast i8*%ao to i32*
store i32%o,i32*%ap,align 4
%aq=getelementptr inbounds i8,i8*%aj,i64 12
%ar=bitcast i8*%aq to i32*
store i32%ai,i32*%ar,align 4
%as=getelementptr inbounds i8,i8*%aj,i64 16
%at=bitcast i8*%as to i32*
store i32 1,i32*%at,align 4
%au=tail call fastcc i8*@_SMLFN6String9substringE(i8*inreg%aj)
ret i8*%au
}
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
store i8*%a,i8**%b,align 8
%d=bitcast i8*%a to i32**
%e=load i32*,i32**%d,align 8
%f=getelementptr inbounds i32,i32*%e,i64 -1
%g=load i32,i32*%f,align 4
%h=and i32%g,268435455
%i=add nsw i32%h,-1
%j=getelementptr inbounds i8,i8*%a,i64 8
%k=bitcast i8*%j to i32**
%l=load i32*,i32**%k,align 8
%m=getelementptr inbounds i32,i32*%l,i64 -1
%n=load i32,i32*%m,align 4
%o=and i32%n,268435455
%p=add nsw i32%o,-1
%q=add nsw i32%p,%i
%r=icmp ugt i32%q,268435454
br i1%r,label%G,label%s
s:
%t=add nsw i32%o,%i
%u=call i8*@sml_alloc(i32 inreg%t)#0
%v=getelementptr inbounds i8,i8*%u,i64 -4
%w=bitcast i8*%v to i32*
store i32%t,i32*%w,align 4
%x=sext i32%q to i64
%y=getelementptr inbounds i8,i8*%u,i64%x
store i8 0,i8*%y,align 1
%z=bitcast i8**%b to i8***
%A=load i8**,i8***%z,align 8
%B=load i8*,i8**%A,align 8
call void@llvm.memcpy.p0i8.p0i8.i32(i8*%u,i8*%B,i32%i,i1 false)
%C=getelementptr inbounds i8*,i8**%A,i64 1
%D=load i8*,i8**%C,align 8
%E=sext i32%i to i64
%F=getelementptr inbounds i8,i8*%u,i64%E
call void@llvm.memcpy.p0i8.p0i8.i32(i8*%F,i8*%D,i32%p,i1 false)
ret i8*%u
G:
%H=load i8*,i8**@_SMLZ4Size,align 8
store i8*%H,i8**%b,align 8
%I=call i8*@sml_alloc(i32 inreg 20)#0
%J=getelementptr inbounds i8,i8*%I,i64 -4
%K=bitcast i8*%J to i32*
store i32 1342177296,i32*%K,align 4
store i8*%I,i8**%c,align 8
%L=load i8*,i8**%b,align 8
store i8*null,i8**%b,align 8
%M=bitcast i8*%I to i8**
store i8*%L,i8**%M,align 8
%N=getelementptr inbounds i8,i8*%I,i64 8
%O=bitcast i8*%N to i8**
store i8*getelementptr inbounds(<{[4x i8],i32,[38x i8]}>,<{[4x i8],i32,[38x i8]}>*@e,i64 0,i32 2,i64 0),i8**%O,align 8
%P=getelementptr inbounds i8,i8*%I,i64 16
%Q=bitcast i8*%P to i32*
store i32 3,i32*%Q,align 4
%R=call i8*@sml_alloc(i32 inreg 60)#0
%S=getelementptr inbounds i8,i8*%R,i64 -4
%T=bitcast i8*%S to i32*
store i32 1342177336,i32*%T,align 4
%U=getelementptr inbounds i8,i8*%R,i64 56
%V=bitcast i8*%U to i32*
store i32 1,i32*%V,align 4
%W=load i8*,i8**%c,align 8
%X=bitcast i8*%R to i8**
store i8*%W,i8**%X,align 8
call void@sml_raise(i8*inreg%R)#1
unreachable
}
define internal fastcc i32@_SMLL11totalLength_120(i8*inreg%a,i8*inreg%b)#2 gc"smlsharp"{
h:
%c=alloca i8*,align 8
%d=alloca i8*,align 8
call void@llvm.gcroot(i8**%c,i8*null)#0
call void@llvm.gcroot(i8**%d,i8*null)#0
store i8*%a,i8**%d,align 8
%e=bitcast i8**%d to i32**
br label%f
f:
%g=phi i8*[%ba,%a8],[%b,%h]
store i8*%g,i8**%c,align 8
%i=load atomic i32,i32*@sml_check_flag unordered,align 4
%j=icmp eq i32%i,0
br i1%j,label%m,label%k
k:
call void@sml_check(i32 inreg%i)
%l=load i8*,i8**%c,align 8
br label%m
m:
%n=phi i8*[%l,%k],[%g,%f]
%o=bitcast i8*%n to i8**
%p=load i8*,i8**%o,align 8
%q=icmp eq i8*%p,null
br i1%q,label%r,label%v
r:
%s=getelementptr inbounds i8,i8*%n,i64 8
%t=bitcast i8*%s to i32*
%u=load i32,i32*%t,align 4
ret i32%u
v:
%w=getelementptr inbounds i8,i8*%p,i64 8
%x=bitcast i8*%w to i8**
%y=load i8*,i8**%x,align 8
store i8*%y,i8**%c,align 8
%z=icmp eq i8*%y,null
br i1%z,label%A,label%ag
A:
store i8*null,i8**%d,align 8
%B=getelementptr inbounds i8,i8*%n,i64 8
%C=bitcast i8*%B to i32*
%D=load i32,i32*%C,align 4
%E=bitcast i8*%p to i32**
%F=load i32*,i32**%E,align 8
%G=getelementptr inbounds i32,i32*%F,i64 -1
%H=load i32,i32*%G,align 4
%I=and i32%H,268435455
%J=add nsw i32%I,-1
%K=call{i32,i1}@llvm.sadd.with.overflow.i32(i32%D,i32%J)#0
%L=extractvalue{i32,i1}%K,1
br i1%L,label%M,label%ae
M:
%N=load i8*,i8**@_SMLZ8Overflow,align 8
store i8*%N,i8**%c,align 8
%O=call i8*@sml_alloc(i32 inreg 20)#0
%P=getelementptr inbounds i8,i8*%O,i64 -4
%Q=bitcast i8*%P to i32*
store i32 1342177296,i32*%Q,align 4
store i8*%O,i8**%d,align 8
%R=load i8*,i8**%c,align 8
store i8*null,i8**%c,align 8
%S=bitcast i8*%O to i8**
store i8*%R,i8**%S,align 8
%T=getelementptr inbounds i8,i8*%O,i64 8
%U=bitcast i8*%T to i8**
store i8*getelementptr inbounds(<{[4x i8],i32,[38x i8]}>,<{[4x i8],i32,[38x i8]}>*@i,i64 0,i32 2,i64 0),i8**%U,align 8
%V=getelementptr inbounds i8,i8*%O,i64 16
%W=bitcast i8*%V to i32*
store i32 3,i32*%W,align 4
%X=call i8*@sml_alloc(i32 inreg 60)#0
%Y=getelementptr inbounds i8,i8*%X,i64 -4
%Z=bitcast i8*%Y to i32*
store i32 1342177336,i32*%Z,align 4
%aa=getelementptr inbounds i8,i8*%X,i64 56
%ab=bitcast i8*%aa to i32*
store i32 1,i32*%ab,align 4
%ac=load i8*,i8**%d,align 8
%ad=bitcast i8*%X to i8**
store i8*%ac,i8**%ad,align 8
call void@sml_raise(i8*inreg%X)#1
unreachable
ae:
%af=add nsw i32%J,%D
ret i32%af
ag:
%ah=getelementptr inbounds i8,i8*%n,i64 8
%ai=bitcast i8*%ah to i32*
%aj=load i32,i32*%ai,align 4
%ak=bitcast i8*%p to i32**
%al=load i32*,i32**%ak,align 8
%am=getelementptr inbounds i32,i32*%al,i64 -1
%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%aj,i32%ap)#0
%ar=extractvalue{i32,i1}%aq,1
br i1%ar,label%as,label%aK
as:
store i8*null,i8**%d,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
store i8*%au,i8**%d,align 8
%ax=load i8*,i8**%c,align 8
store i8*null,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]}>*@g,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
%aD=call i8*@sml_alloc(i32 inreg 60)#0
%aE=getelementptr inbounds i8,i8*%aD,i64 -4
%aF=bitcast i8*%aE to i32*
store i32 1342177336,i32*%aF,align 4
%aG=getelementptr inbounds i8,i8*%aD,i64 56
%aH=bitcast i8*%aG to i32*
store i32 1,i32*%aH,align 4
%aI=load i8*,i8**%d,align 8
%aJ=bitcast i8*%aD to i8**
store i8*%aI,i8**%aJ,align 8
call void@sml_raise(i8*inreg%aD)#1
unreachable
aK:
%aL=add nsw i32%ap,%aj
%aM=load i32*,i32**%e,align 8
%aN=load i32,i32*%aM,align 4
%aO=call{i32,i1}@llvm.sadd.with.overflow.i32(i32%aL,i32%aN)#0
%aP=extractvalue{i32,i1}%aO,1
br i1%aP,label%aQ,label%a8
aQ:
store i8*null,i8**%d,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
store i8*%aS,i8**%d,align 8
%aV=load i8*,i8**%c,align 8
store i8*null,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]}>*@h,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
%a1=call i8*@sml_alloc(i32 inreg 60)#0
%a2=getelementptr inbounds i8,i8*%a1,i64 -4
%a3=bitcast i8*%a2 to i32*
store i32 1342177336,i32*%a3,align 4
%a4=getelementptr inbounds i8,i8*%a1,i64 56
%a5=bitcast i8*%a4 to i32*
store i32 1,i32*%a5,align 4
%a6=load i8*,i8**%d,align 8
%a7=bitcast i8*%a1 to i8**
store i8*%a6,i8**%a7,align 8
call void@sml_raise(i8*inreg%a1)#1
unreachable
a8:
%a9=add nsw i32%aN,%aL
%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=getelementptr inbounds i8,i8*%ba,i64 12
%be=bitcast i8*%bd to i32*
store i32 0,i32*%be,align 1
%bf=load i8*,i8**%c,align 8
store i8*null,i8**%c,align 8
%bg=bitcast i8*%ba to i8**
store i8*%bf,i8**%bg,align 8
%bh=getelementptr inbounds i8,i8*%ba,i64 8
%bi=bitcast i8*%bh to i32*
store i32%a9,i32*%bi,align 4
%bj=getelementptr inbounds i8,i8*%ba,i64 16
%bk=bitcast i8*%bj to i32*
store i32 1,i32*%bk,align 4
br label%f
}
define internal fastcc void@_SMLL4loop_126(i8*inreg%a,i8*inreg%b)#2 gc"smlsharp"{
h:
%c=alloca i8*,align 8
%d=alloca i8*,align 8
call void@llvm.gcroot(i8**%c,i8*null)#0
call void@llvm.gcroot(i8**%d,i8*null)#0
store i8*%a,i8**%d,align 8
%e=bitcast i8**%d to i8***
br label%f
f:
%g=phi i8*[%ae,%M],[%b,%h]
store i8*%g,i8**%c,align 8
%i=load atomic i32,i32*@sml_check_flag unordered,align 4
%j=icmp eq i32%i,0
br i1%j,label%m,label%k
k:
call void@sml_check(i32 inreg%i)
%l=load i8*,i8**%c,align 8
br label%m
m:
%n=phi i8*[%l,%k],[%g,%f]
%o=bitcast i8*%n to i32*
%p=load i32,i32*%o,align 4
%q=getelementptr inbounds i8,i8*%n,i64 8
%r=bitcast i8*%q to i8**
%s=load i8*,i8**%r,align 8
%t=icmp eq i8*%s,null
br i1%t,label%u,label%v
u:
ret void
v:
%w=getelementptr inbounds i8,i8*%s,i64 8
%x=bitcast i8*%w to i8**
%y=load i8*,i8**%x,align 8
store i8*%y,i8**%c,align 8
%z=bitcast i8*%s to i8**
%A=load i8*,i8**%z,align 8
%B=getelementptr inbounds i8,i8*%A,i64 -4
%C=bitcast i8*%B to i32*
%D=load i32,i32*%C,align 4
%E=and i32%D,268435455
%F=add nsw i32%E,-1
%G=load i8**,i8***%e,align 8
%H=load i8*,i8**%G,align 8
%I=sext i32%p to i64
%J=getelementptr inbounds i8,i8*%H,i64%I
call void@llvm.memmove.p0i8.p0i8.i32(i8*%J,i8*%A,i32%F,i1 false)
%K=load i8*,i8**%c,align 8
%L=icmp eq i8*%K,null
br i1%L,label%u,label%M
M:
%N=add nsw i32%F,%p
%O=load i8*,i8**%d,align 8
%P=getelementptr inbounds i8,i8*%O,i64 8
%Q=bitcast i8*%P to i8**
%R=load i8*,i8**%Q,align 8
%S=bitcast i8*%O to i8**
%T=load i8*,i8**%S,align 8
%U=getelementptr inbounds i8,i8*%O,i64 16
%V=bitcast i8*%U to i32*
%W=load i32,i32*%V,align 4
%X=sext i32%N to i64
%Y=getelementptr inbounds i8,i8*%T,i64%X
call void@llvm.memmove.p0i8.p0i8.i32(i8*%Y,i8*%R,i32%W,i1 false)
%Z=load i8*,i8**%d,align 8
%aa=getelementptr inbounds i8,i8*%Z,i64 16
%ab=bitcast i8*%aa to i32*
%ac=load i32,i32*%ab,align 4
%ad=add nsw i32%ac,%N
%ae=call i8*@sml_alloc(i32 inreg 20)#0
%af=bitcast i8*%ae to i32*
%ag=getelementptr inbounds i8,i8*%ae,i64 -4
%ah=bitcast i8*%ag to i32*
store i32 1342177296,i32*%ah,align 4
%ai=getelementptr inbounds i8,i8*%ae,i64 4
%aj=bitcast i8*%ai to i32*
store i32 0,i32*%aj,align 1
store i32%ad,i32*%af,align 4
%ak=load i8*,i8**%c,align 8
store i8*null,i8**%c,align 8
%al=getelementptr inbounds i8,i8*%ae,i64 8
%am=bitcast i8*%al to i8**
store i8*%ak,i8**%am,align 8
%an=getelementptr inbounds i8,i8*%ae,i64 16
%ao=bitcast i8*%an to i32*
store i32 2,i32*%ao,align 4
br label%f
}
define internal fastcc i8*@_SMLLN6String10concatWithE_128(i8*inreg%a,i8*inreg%b)#2 gc"smlsharp"personality i32(...)*@sml_personality{
m:
%c=alloca i8*,align 8
%d=alloca i8*,align 8
%e=alloca i8*,align 8
%f=alloca i8*,align 8
call void@llvm.gcroot(i8**%c,i8*null)#0
call void@llvm.gcroot(i8**%d,i8*null)#0
call void@llvm.gcroot(i8**%e,i8*null)#0
call void@llvm.gcroot(i8**%f,i8*null)#0
store i8*%a,i8**%e,align 8
store i8*%b,i8**%c,align 8
%g=load atomic i32,i32*@sml_check_flag unordered,align 4
%h=icmp eq i32%g,0
br i1%h,label%k,label%i
i:
call void@sml_check(i32 inreg%g)
%j=load i8*,i8**%c,align 8
br label%k
k:
%l=phi i8*[%j,%i],[%b,%m]
store i8*null,i8**%c,align 8
store i8*%l,i8**%d,align 8
%n=icmp eq i8*%l,null
br i1%n,label%o,label%p
o:
ret i8*getelementptr inbounds(<{[4x i8],i32,[1x i8]}>,<{[4x i8],i32,[1x i8]}>*@q,i64 0,i32 2,i64 0)
p:
%q=getelementptr inbounds i8,i8*%l,i64 8
%r=bitcast i8*%q to i8**
%s=load i8*,i8**%r,align 8
%t=icmp eq i8*%s,null
br i1%t,label%u,label%x
u:
%v=bitcast i8*%l to i8**
%w=load i8*,i8**%v,align 8
ret i8*%w
x:
%y=bitcast i8**%e to i32***
%z=load i32**,i32***%y,align 8
%A=load i32*,i32**%z,align 8
%B=getelementptr inbounds i32,i32*%A,i64 -1
%C=load i32,i32*%B,align 4
%D=and i32%C,268435455
%E=add nsw i32%D,-1
%F=call i8*@sml_alloc(i32 inreg 12)#0
%G=bitcast i8*%F to i32*
%H=getelementptr inbounds i8,i8*%F,i64 -4
%I=bitcast i8*%H to i32*
store i32 1342177288,i32*%I,align 4
store i8*%F,i8**%c,align 8
store i32%E,i32*%G,align 4
%J=getelementptr inbounds i8,i8*%F,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(i32(i8*,i8*)*@_SMLL11totalLength_120 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*)*@_SMLL11totalLength_201 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
%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
%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**%d,align 8
%ac=bitcast i8*%W to i8**
store i8*%ab,i8**%ac,align 8
%ad=getelementptr inbounds i8,i8*%W,i64 8
%ae=bitcast i8*%ad to i32*
store i32 0,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=load i8*,i8**%c,align 8
store i8*null,i8**%c,align 8
%ai=invoke fastcc i32@_SMLL11totalLength_120(i8*inreg%ah,i8*inreg%W)
to label%aS unwind label%aj
aj:
%ak=landingpad{i8*,i8*}
catch i8*null
%al=extractvalue{i8*,i8*}%ak,1
%am=bitcast i8*%al to i8**
%an=load i8*,i8**%am,align 8
store i8*null,i8**%d,align 8
store i8*null,i8**%e,align 8
store i8*%an,i8**%c,align 8
%ao=bitcast i8*%an to i8**
%ap=load i8*,i8**%ao,align 8
%aq=load i8*,i8**@_SMLZ8Overflow,align 8
%ar=icmp eq i8*%ap,%aq
br i1%ar,label%as,label%aK
as:
%at=load i8*,i8**@_SMLZ4Size,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
store i8*%au,i8**%d,align 8
%ax=load i8*,i8**%c,align 8
store i8*null,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]}>*@j,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
%aD=call i8*@sml_alloc(i32 inreg 60)#0
%aE=getelementptr inbounds i8,i8*%aD,i64 -4
%aF=bitcast i8*%aE to i32*
store i32 1342177336,i32*%aF,align 4
%aG=getelementptr inbounds i8,i8*%aD,i64 56
%aH=bitcast i8*%aG to i32*
store i32 1,i32*%aH,align 4
%aI=load i8*,i8**%d,align 8
%aJ=bitcast i8*%aD to i8**
store i8*%aI,i8**%aJ,align 8
call void@sml_raise(i8*inreg%aD)#1
unreachable
aK:
%aL=call i8*@sml_alloc(i32 inreg 60)#0
%aM=getelementptr inbounds i8,i8*%aL,i64 -4
%aN=bitcast i8*%aM to i32*
store i32 1342177336,i32*%aN,align 4
%aO=getelementptr inbounds i8,i8*%aL,i64 56
%aP=bitcast i8*%aO to i32*
store i32 1,i32*%aP,align 4
%aQ=load i8*,i8**%c,align 8
%aR=bitcast i8*%aL to i8**
store i8*%aQ,i8**%aR,align 8
call void@sml_raise(i8*inreg%aL)#1
unreachable
aS:
%aT=icmp ugt i32%ai,268435454
br i1%aT,label%bC,label%aU
aU:
%aV=add nsw i32%ai,1
%aW=call i8*@sml_alloc(i32 inreg%aV)#0
%aX=getelementptr inbounds i8,i8*%aW,i64 -4
%aY=bitcast i8*%aX to i32*
store i32%aV,i32*%aY,align 4
%aZ=sext i32%ai to i64
%a0=getelementptr inbounds i8,i8*%aW,i64%aZ
store i8 0,i8*%a0,align 1
store i8*%aW,i8**%c,align 8
%a1=bitcast i8**%e to i8***
%a2=load i8**,i8***%a1,align 8
%a3=load i8*,i8**%a2,align 8
store i8*%a3,i8**%e,align 8
%a4=call i8*@sml_alloc(i32 inreg 28)#0
%a5=getelementptr inbounds i8,i8*%a4,i64 -4
%a6=bitcast i8*%a5 to i32*
store i32 1342177304,i32*%a6,align 4
store i8*%a4,i8**%f,align 8
%a7=load i8*,i8**%c,align 8
%a8=bitcast i8*%a4 to i8**
store i8*%a7,i8**%a8,align 8
%a9=load i8*,i8**%e,align 8
store i8*null,i8**%e,align 8
%ba=getelementptr inbounds i8,i8*%a4,i64 8
%bb=bitcast i8*%ba to i8**
store i8*%a9,i8**%bb,align 8
%bc=getelementptr inbounds i8,i8*%a4,i64 16
%bd=bitcast i8*%bc to i32*
store i32%E,i32*%bd,align 4
%be=getelementptr inbounds i8,i8*%a4,i64 24
%bf=bitcast i8*%be to i32*
store i32 3,i32*%bf,align 4
%bg=call i8*@sml_alloc(i32 inreg 28)#0
%bh=getelementptr inbounds i8,i8*%bg,i64 -4
%bi=bitcast i8*%bh to i32*
store i32 1342177304,i32*%bi,align 4
%bj=load i8*,i8**%f,align 8
%bk=bitcast i8*%bg to i8**
store i8*%bj,i8**%bk,align 8
%bl=getelementptr inbounds i8,i8*%bg,i64 8
%bm=bitcast i8*%bl to void(...)**
store void(...)*bitcast(void(i8*,i8*)*@_SMLL4loop_126 to void(...)*),void(...)**%bm,align 8
%bn=getelementptr inbounds i8,i8*%bg,i64 16
%bo=bitcast i8*%bn to void(...)**
store void(...)*bitcast(i8*(i8*,i8*)*@_SMLL4loop_202 to void(...)*),void(...)**%bo,align 8
%bp=getelementptr inbounds i8,i8*%bg,i64 24
%bq=bitcast i8*%bp to i32*
store i32 -2147483647,i32*%bq,align 4
%br=call i8*@sml_alloc(i32 inreg 20)#0
%bs=getelementptr inbounds i8,i8*%br,i64 -4
%bt=bitcast i8*%bs to i32*
store i32 1342177296,i32*%bt,align 4
%bu=bitcast i8*%br to i64*
store i64 0,i64*%bu,align 4
%bv=load i8*,i8**%d,align 8
store i8*null,i8**%d,align 8
%bw=getelementptr inbounds i8,i8*%br,i64 8
%bx=bitcast i8*%bw to i8**
store i8*%bv,i8**%bx,align 8
%by=getelementptr inbounds i8,i8*%br,i64 16
%bz=bitcast i8*%by to i32*
store i32 2,i32*%bz,align 4
%bA=load i8*,i8**%f,align 8
store i8*null,i8**%f,align 8
call fastcc void@_SMLL4loop_126(i8*inreg%bA,i8*inreg%br)
%bB=load i8*,i8**%c,align 8
ret i8*%bB
bC:
store i8*null,i8**%d,align 8
store i8*null,i8**%e,align 8
%bD=load i8*,i8**@_SMLZ4Size,align 8
store i8*%bD,i8**%c,align 8
%bE=call i8*@sml_alloc(i32 inreg 20)#0
%bF=getelementptr inbounds i8,i8*%bE,i64 -4
%bG=bitcast i8*%bF to i32*
store i32 1342177296,i32*%bG,align 4
store i8*%bE,i8**%d,align 8
%bH=load i8*,i8**%c,align 8
store i8*null,i8**%c,align 8
%bI=bitcast i8*%bE to i8**
store i8*%bH,i8**%bI,align 8
%bJ=getelementptr inbounds i8,i8*%bE,i64 8
%bK=bitcast i8*%bJ to i8**
store i8*getelementptr inbounds(<{[4x i8],i32,[38x i8]}>,<{[4x i8],i32,[38x i8]}>*@k,i64 0,i32 2,i64 0),i8**%bK,align 8
%bL=getelementptr inbounds i8,i8*%bE,i64 16
%bM=bitcast i8*%bL to i32*
store i32 3,i32*%bM,align 4
%bN=call i8*@sml_alloc(i32 inreg 60)#0
%bO=getelementptr inbounds i8,i8*%bN,i64 -4
%bP=bitcast i8*%bO to i32*
store i32 1342177336,i32*%bP,align 4
%bQ=getelementptr inbounds i8,i8*%bN,i64 56
%bR=bitcast i8*%bQ to i32*
store i32 1,i32*%bR,align 4
%bS=load i8*,i8**%d,align 8
%bT=bitcast i8*%bN to i8**
store i8*%bS,i8**%bT,align 8
call void@sml_raise(i8*inreg%bN)#1
unreachable
}
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*)*@_SMLLN6String10concatWithE_128 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*)*@_SMLLN6String10concatWithE_128 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*@_SMLLN6String3revE_131(i8*inreg%a)unnamed_addr#2 gc"smlsharp"{
h:
%b=alloca i8*,align 8
%c=alloca i8*,align 8
%d=alloca i8*,align 8
%e=alloca i8*,align 8
call void@llvm.gcroot(i8**%b,i8*null)#0
call void@llvm.gcroot(i8**%c,i8*null)#0
call void@llvm.gcroot(i8**%d,i8*null)#0
call void@llvm.gcroot(i8**%e,i8*null)#0
br label%f
f:
%g=phi i8*[%O,%v],[%a,%h]
store i8*%g,i8**%b,align 8
%i=load atomic i32,i32*@sml_check_flag unordered,align 4
%j=icmp eq i32%i,0
br i1%j,label%m,label%k
k:
call void@sml_check(i32 inreg%i)
%l=load i8*,i8**%b,align 8
br label%m
m:
%n=phi i8*[%l,%k],[%g,%f]
%o=bitcast i8*%n to i8**
%p=load i8*,i8**%o,align 8
%q=icmp eq i8*%p,null
br i1%q,label%r,label%v
r:
%s=getelementptr inbounds i8,i8*%n,i64 8
%t=bitcast i8*%s to i8**
%u=load i8*,i8**%t,align 8
ret i8*%u
v:
%w=bitcast i8*%p to i8**
%x=load i8*,i8**%w,align 8
store i8*%x,i8**%b,align 8
%y=getelementptr inbounds i8,i8*%p,i64 8
%z=bitcast i8*%y to i8**
%A=load i8*,i8**%z,align 8
store i8*%A,i8**%c,align 8
%B=getelementptr inbounds i8,i8*%n,i64 8
%C=bitcast i8*%B to i8**
%D=load i8*,i8**%C,align 8
store i8*%D,i8**%d,align 8
%E=call i8*@sml_alloc(i32 inreg 20)#0
%F=getelementptr inbounds i8,i8*%E,i64 -4
%G=bitcast i8*%F to i32*
store i32 1342177296,i32*%G,align 4
store i8*%E,i8**%e,align 8
%H=load i8*,i8**%b,align 8
store i8*null,i8**%b,align 8
%I=bitcast i8*%E to i8**
store i8*%H,i8**%I,align 8
%J=load i8*,i8**%d,align 8
store i8*null,i8**%d,align 8
%K=getelementptr inbounds i8,i8*%E,i64 8
%L=bitcast i8*%K to i8**
store i8*%J,i8**%L,align 8
%M=getelementptr inbounds i8,i8*%E,i64 16
%N=bitcast i8*%M to i32*
store i32 3,i32*%N,align 4
%O=call i8*@sml_alloc(i32 inreg 20)#0
%P=getelementptr inbounds i8,i8*%O,i64 -4
%Q=bitcast i8*%P to i32*
store i32 1342177296,i32*%Q,align 4
%R=load i8*,i8**%c,align 8
store i8*null,i8**%c,align 8
%S=bitcast i8*%O to i8**
store i8*%R,i8**%S,align 8
%T=load i8*,i8**%e,align 8
store i8*null,i8**%e,align 8
%U=getelementptr inbounds i8,i8*%O,i64 8
%V=bitcast i8*%U to i8**
store i8*%T,i8**%V,align 8
%W=getelementptr inbounds i8,i8*%O,i64 16
%X=bitcast i8*%W to i32*
store i32 3,i32*%X,align 4
br label%f
}
define internal fastcc i8*@_SMLL3add_133(i8*inreg%a,i8*inreg%b)#2 gc"smlsharp"{
k:
%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%i,label%g
g:
call void@sml_check(i32 inreg%e)
%h=load i8*,i8**%d,align 8
br label%i
i:
%j=phi i8*[%h,%g],[%b,%k]
%l=bitcast i8*%j to i32*
%m=load i32,i32*%l,align 4
%n=getelementptr inbounds i8,i8*%j,i64 4
%o=bitcast i8*%n to i32*
%p=load i32,i32*%o,align 4
%q=getelementptr inbounds i8,i8*%j,i64 8
%r=bitcast i8*%q to i8**
%s=load i8*,i8**%r,align 8
store i8*%s,i8**%d,align 8
%t=icmp eq i32%p,%m
br i1%t,label%u,label%v
u:
ret i8*%s
v:
%w=sub nsw i32%p,%m
%x=bitcast i8**%c to i8***
%y=load i8**,i8***%x,align 8
%z=load i8*,i8**%y,align 8
store i8*%z,i8**%c,align 8
%A=call i8*@sml_alloc(i32 inreg 20)#0
%B=getelementptr inbounds i8,i8*%A,i64 -4
%C=bitcast i8*%B to i32*
store i32 1342177296,i32*%C,align 4
%D=load i8*,i8**%c,align 8
store i8*null,i8**%c,align 8
%E=bitcast i8*%A to i8**
store i8*%D,i8**%E,align 8
%F=getelementptr inbounds i8,i8*%A,i64 8
%G=bitcast i8*%F to i32*
store i32%m,i32*%G,align 4
%H=getelementptr inbounds i8,i8*%A,i64 12
%I=bitcast i8*%H to i32*
store i32%w,i32*%I,align 4
%J=getelementptr inbounds i8,i8*%A,i64 16
%K=bitcast i8*%J to i32*
store i32 1,i32*%K,align 4
%L=call fastcc i8*@_SMLLN6String16substring__unsafeE_107(i8*inreg%A)
store i8*%L,i8**%c,align 8
%M=call i8*@sml_alloc(i32 inreg 20)#0
%N=getelementptr inbounds i8,i8*%M,i64 -4
%O=bitcast i8*%N to i32*
store i32 1342177296,i32*%O,align 4
%P=load i8*,i8**%c,align 8
%Q=bitcast i8*%M to i8**
store i8*%P,i8**%Q,align 8
%R=load i8*,i8**%d,align 8
%S=getelementptr inbounds i8,i8*%M,i64 8
%T=bitcast i8*%S to i8**
store i8*%R,i8**%T,align 8
%U=getelementptr inbounds i8,i8*%M,i64 16
%V=bitcast i8*%U to i32*
store i32 3,i32*%V,align 4
ret i8*%M
}
define internal fastcc i8*@_SMLL4loop_134(i8*inreg%a,i8*inreg%b)#2 gc"smlsharp"{
h:
%c=alloca i8*,align 8
%d=alloca i8*,align 8
%e=alloca i8*,align 8
call void@llvm.gcroot(i8**%c,i8*null)#0
call void@llvm.gcroot(i8**%d,i8*null)#0
call void@llvm.gcroot(i8**%e,i8*null)#0
store i8*%a,i8**%d,align 8
br label%f
f:
%g=phi i8*[%a8,%a7],[%b,%h]
store i8*%g,i8**%c,align 8
%i=load atomic i32,i32*@sml_check_flag unordered,align 4
%j=icmp eq i32%i,0
br i1%j,label%m,label%k
k:
call void@sml_check(i32 inreg%i)
%l=load i8*,i8**%c,align 8
br label%m
m:
%n=phi i8*[%l,%k],[%g,%f]
%o=bitcast i8*%n to i32*
%p=load i32,i32*%o,align 4
%q=getelementptr inbounds i8,i8*%n,i64 4
%r=bitcast i8*%q to i32*
%s=load i32,i32*%r,align 4
%t=getelementptr inbounds i8,i8*%n,i64 8
%u=bitcast i8*%t to i8**
%v=load i8*,i8**%u,align 8
store i8*%v,i8**%c,align 8
%w=load i8*,i8**%d,align 8
%x=getelementptr inbounds i8,i8*%w,i64 24
%y=bitcast i8*%x to i32*
%z=load i32,i32*%y,align 4
%A=icmp sgt i32%z,%s
br i1%A,label%am,label%B
B:
%C=getelementptr inbounds i8,i8*%w,i64 16
%D=bitcast i8*%C to i8**
%E=load i8*,i8**%D,align 8
store i8*%E,i8**%d,align 8
%F=call i8*@sml_alloc(i32 inreg 20)#0
%G=bitcast i8*%F to i32*
%H=getelementptr inbounds i8,i8*%F,i64 -4
%I=bitcast i8*%H to i32*
store i32 1342177296,i32*%I,align 4
store i32%p,i32*%G,align 4
%J=getelementptr inbounds i8,i8*%F,i64 4
%K=bitcast i8*%J to i32*
store i32%s,i32*%K,align 4
%L=load i8*,i8**%c,align 8
store i8*null,i8**%c,align 8
%M=getelementptr inbounds i8,i8*%F,i64 8
%N=bitcast i8*%M to i8**
store i8*%L,i8**%N,align 8
%O=getelementptr inbounds i8,i8*%F,i64 16
%P=bitcast i8*%O to i32*
store i32 2,i32*%P,align 4
%Q=load i8*,i8**%d,align 8
store i8*null,i8**%d,align 8
%R=call fastcc i8*@_SMLL3add_133(i8*inreg%Q,i8*inreg%F)
store i8*%R,i8**%c,align 8
%S=call i8*@sml_alloc(i32 inreg 20)#0
%T=getelementptr inbounds i8,i8*%S,i64 -4
%U=bitcast i8*%T to i32*
store i32 1342177296,i32*%U,align 4
%V=load i8*,i8**%c,align 8
%W=bitcast i8*%S to i8**
store i8*%V,i8**%W,align 8
%X=getelementptr inbounds i8,i8*%S,i64 8
%Y=bitcast i8*%X to i8**
store i8*null,i8**%Y,align 8
%Z=getelementptr inbounds i8,i8*%S,i64 16
%aa=bitcast i8*%Z to i32*
store i32 3,i32*%aa,align 4
store i8*null,i8**%d,align 8
%ab=call i8*@sml_alloc(i32 inreg 20)#0
%ac=getelementptr inbounds i8,i8*%ab,i64 -4
%ad=bitcast i8*%ac to i32*
store i32 1342177296,i32*%ad,align 4
%ae=load i8*,i8**%c,align 8
%af=bitcast i8*%ab to i8**
store i8*%ae,i8**%af,align 8
%ag=load i8*,i8**%d,align 8
%ah=getelementptr inbounds i8,i8*%ab,i64 8
%ai=bitcast i8*%ah to i8**
store i8*%ag,i8**%ai,align 8
%aj=getelementptr inbounds i8,i8*%ab,i64 16
%ak=bitcast i8*%aj to i32*
store i32 3,i32*%ak,align 4
%al=tail call fastcc i8*@_SMLLN6String3revE_131(i8*inreg%ab)
ret i8*%al
am:
%an=bitcast i8*%w to i8**
%ao=load i8*,i8**%an,align 8
%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
store i8*%at,i8**%e,align 8
%au=getelementptr inbounds i8,i8*%w,i64 8
%av=bitcast i8*%au to i8**
%aw=load i8*,i8**%av,align 8
%ax=sext i32%s to i64
%ay=getelementptr inbounds i8,i8*%aw,i64%ax
%az=load i8,i8*%ay,align 1
%aA=call i8*@sml_alloc(i32 inreg 1)#0
%aB=getelementptr inbounds i8,i8*%aA,i64 -4
%aC=bitcast i8*%aB to i32*
store i32 1,i32*%aC,align 4
store i8%az,i8*%aA,align 1
%aD=load i8*,i8**%e,align 8
store i8*null,i8**%e,align 8
%aE=call fastcc i8*%ar(i8*inreg%aD,i8*inreg%aA)
%aF=bitcast i8*%aE to i32*
%aG=load i32,i32*%aF,align 4
%aH=icmp eq i32%aG,0
%aI=add nsw i32%s,1
br i1%aH,label%be,label%aJ
aJ:
%aK=load i8*,i8**%d,align 8
%aL=getelementptr inbounds i8,i8*%aK,i64 16
%aM=bitcast i8*%aL to i8**
%aN=load i8*,i8**%aM,align 8
store i8*%aN,i8**%e,align 8
%aO=call i8*@sml_alloc(i32 inreg 20)#0
%aP=bitcast i8*%aO to i32*
%aQ=getelementptr inbounds i8,i8*%aO,i64 -4
%aR=bitcast i8*%aQ to i32*
store i32 1342177296,i32*%aR,align 4
store i32%p,i32*%aP,align 4
%aS=getelementptr inbounds i8,i8*%aO,i64 4
%aT=bitcast i8*%aS to i32*
store i32%s,i32*%aT,align 4
%aU=load i8*,i8**%c,align 8
store i8*null,i8**%c,align 8
%aV=getelementptr inbounds i8,i8*%aO,i64 8
%aW=bitcast i8*%aV to i8**
store i8*%aU,i8**%aW,align 8
%aX=getelementptr inbounds i8,i8*%aO,i64 16
%aY=bitcast i8*%aX to i32*
store i32 2,i32*%aY,align 4
%aZ=load i8*,i8**%e,align 8
store i8*null,i8**%e,align 8
%a0=call fastcc i8*@_SMLL3add_133(i8*inreg%aZ,i8*inreg%aO)
store i8*%a0,i8**%c,align 8
%a1=call i8*@sml_alloc(i32 inreg 20)#0
%a2=bitcast i8*%a1 to i32*
%a3=getelementptr inbounds i8,i8*%a1,i64 -4
%a4=bitcast i8*%a3 to i32*
store i32 1342177296,i32*%a4,align 4
store i32%aI,i32*%a2,align 4
%a5=getelementptr inbounds i8,i8*%a1,i64 4
%a6=bitcast i8*%a5 to i32*
store i32%aI,i32*%a6,align 4
br label%a7
a7:
%a8=phi i8*[%a1,%aJ],[%bf,%be]
%a9=load i8*,i8**%c,align 8
store i8*null,i8**%c,align 8
%ba=getelementptr inbounds i8,i8*%a8,i64 8
%bb=bitcast i8*%ba to i8**
store i8*%a9,i8**%bb,align 8
%bc=getelementptr inbounds i8,i8*%a8,i64 16
%bd=bitcast i8*%bc to i32*
store i32 2,i32*%bd,align 4
br label%f
be:
%bf=call i8*@sml_alloc(i32 inreg 20)#0
%bg=bitcast i8*%bf to i32*
%bh=getelementptr inbounds i8,i8*%bf,i64 -4
%bi=bitcast i8*%bh to i32*
store i32 1342177296,i32*%bi,align 4
store i32%p,i32*%bg,align 4
%bj=getelementptr inbounds i8,i8*%bf,i64 4
%bk=bitcast i8*%bj to i32*
store i32%aI,i32*%bk,align 4
br label%a7
}
define internal fastcc i8*@_SMLLN6String6tokensE_136(i8*inreg%a,i8*inreg%b)#2 gc"smlsharp"{
%c=alloca i8*,align 8
%d=alloca i8*,align 8
%e=alloca i8*,align 8
%f=alloca i8*,align 8
call void@llvm.gcroot(i8**%c,i8*null)#0
call void@llvm.gcroot(i8**%d,i8*null)#0
call void@llvm.gcroot(i8**%e,i8*null)#0
call void@llvm.gcroot(i8**%f,i8*null)#0
store i8*%a,i8**%d,align 8
store i8*%b,i8**%c,align 8
%g=load atomic i32,i32*@sml_check_flag unordered,align 4
%h=icmp eq i32%g,0
br i1%h,label%i,label%k
i:
%j=bitcast i8*%b to i32*
br label%n
k:
call void@sml_check(i32 inreg%g)
%l=bitcast i8**%c to i32**
%m=load i32*,i32**%l,align 8
br label%n
n:
%o=phi i32*[%m,%k],[%j,%i]
%p=getelementptr inbounds i32,i32*%o,i64 -1
%q=load i32,i32*%p,align 4
%r=and i32%q,268435455
%s=add nsw i32%r,-1
%t=call i8*@sml_alloc(i32 inreg 12)#0
%u=getelementptr inbounds i8,i8*%t,i64 -4
%v=bitcast i8*%u to i32*
store i32 1342177288,i32*%v,align 4
store i8*%t,i8**%e,align 8
%w=load i8*,i8**%c,align 8
%x=bitcast i8*%t to i8**
store i8*%w,i8**%x,align 8
%y=getelementptr inbounds i8,i8*%t,i64 8
%z=bitcast i8*%y to i32*
store i32 1,i32*%z,align 4
%A=call i8*@sml_alloc(i32 inreg 28)#0
%B=getelementptr inbounds i8,i8*%A,i64 -4
%C=bitcast i8*%B to i32*
store i32 1342177304,i32*%C,align 4
%D=load i8*,i8**%e,align 8
%E=bitcast i8*%A to i8**
store i8*%D,i8**%E,align 8
%F=getelementptr inbounds i8,i8*%A,i64 8
%G=bitcast i8*%F to void(...)**
store void(...)*bitcast(i8*(i8*,i8*)*@_SMLL3add_133 to void(...)*),void(...)**%G,align 8
%H=getelementptr inbounds i8,i8*%A,i64 16
%I=bitcast i8*%H to void(...)**
store void(...)*bitcast(i8*(i8*,i8*)*@_SMLL3add_133 to void(...)*),void(...)**%I,align 8
%J=getelementptr inbounds i8,i8*%A,i64 24
%K=bitcast i8*%J to i32*
store i32 -2147483647,i32*%K,align 4
%L=bitcast i8**%d to i8***
%M=load i8**,i8***%L,align 8
%N=load i8*,i8**%M,align 8
store i8*%N,i8**%d,align 8
%O=call i8*@sml_alloc(i32 inreg 36)#0
%P=getelementptr inbounds i8,i8*%O,i64 -4
%Q=bitcast i8*%P to i32*
store i32 1342177312,i32*%Q,align 4
store i8*%O,i8**%f,align 8
%R=load i8*,i8**%d,align 8
store i8*null,i8**%d,align 8
%S=bitcast i8*%O to i8**
store i8*%R,i8**%S,align 8
%T=load i8*,i8**%c,align 8
store i8*null,i8**%c,align 8
%U=getelementptr inbounds i8,i8*%O,i64 8
%V=bitcast i8*%U to i8**
store i8*%T,i8**%V,align 8
%W=load i8*,i8**%e,align 8
store i8*null,i8**%e,align 8
%X=getelementptr inbounds i8,i8*%O,i64 16
%Y=bitcast i8*%X to i8**
store i8*%W,i8**%Y,align 8
%Z=getelementptr inbounds i8,i8*%O,i64 24
%aa=bitcast i8*%Z to i32*
store i32%s,i32*%aa,align 4
%ab=getelementptr inbounds i8,i8*%O,i64 32
%ac=bitcast i8*%ab to i32*
store i32 7,i32*%ac,align 4
%ad=call i8*@sml_alloc(i32 inreg 28)#0
%ae=getelementptr inbounds i8,i8*%ad,i64 -4
%af=bitcast i8*%ae to i32*
store i32 1342177304,i32*%af,align 4
%ag=load i8*,i8**%f,align 8
%ah=bitcast i8*%ad to i8**
store i8*%ag,i8**%ah,align 8
%ai=getelementptr inbounds i8,i8*%ad,i64 8
%aj=bitcast i8*%ai to void(...)**
store void(...)*bitcast(i8*(i8*,i8*)*@_SMLL4loop_134 to void(...)*),void(...)**%aj,align 8
%ak=getelementptr inbounds i8,i8*%ad,i64 16
%al=bitcast i8*%ak to void(...)**
store void(...)*bitcast(i8*(i8*,i8*)*@_SMLL4loop_134 to void(...)*),void(...)**%al,align 8
%am=getelementptr inbounds i8,i8*%ad,i64 24
%an=bitcast i8*%am to i32*
store i32 -2147483647,i32*%an,align 4
%ao=tail call fastcc i8*@_SMLL4loop_134(i8*inreg%ag,i8*inreg bitcast(i32*getelementptr inbounds(<{[4x i8],i32,i32,i32,i8*,i32}>,<{[4x i8],i32,i32,i32,i8*,i32}>*@n,i64 0,i32 2)to i8*))
ret i8*%ao
}
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*)*@_SMLLN6String6tokensE_136 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*)*@_SMLLN6String6tokensE_136 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*@_SMLL3add_139(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**%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%g,label%i
g:
%h=bitcast i8*%a to i8**
br label%m
i:
call void@sml_check(i32 inreg%e)
%j=load i8*,i8**%d,align 8
%k=bitcast i8**%c to i8***
%l=load i8**,i8***%k,align 8
br label%m
m:
%n=phi i8**[%l,%i],[%h,%g]
%o=phi i8*[%j,%i],[%b,%g]
%p=bitcast i8*%o to i32*
%q=load i32,i32*%p,align 4
%r=getelementptr inbounds i8,i8*%o,i64 4
%s=bitcast i8*%r to i32*
%t=load i32,i32*%s,align 4
%u=getelementptr inbounds i8,i8*%o,i64 8
%v=bitcast i8*%u to i8**
%w=load i8*,i8**%v,align 8
store i8*%w,i8**%d,align 8
%x=sub nsw i32%t,%q
%y=load i8*,i8**%n,align 8
store i8*%y,i8**%c,align 8
%z=call i8*@sml_alloc(i32 inreg 20)#0
%A=getelementptr inbounds i8,i8*%z,i64 -4
%B=bitcast i8*%A to i32*
store i32 1342177296,i32*%B,align 4
%C=load i8*,i8**%c,align 8
store i8*null,i8**%c,align 8
%D=bitcast i8*%z to i8**
store i8*%C,i8**%D,align 8
%E=getelementptr inbounds i8,i8*%z,i64 8
%F=bitcast i8*%E to i32*
store i32%q,i32*%F,align 4
%G=getelementptr inbounds i8,i8*%z,i64 12
%H=bitcast i8*%G to i32*
store i32%x,i32*%H,align 4
%I=getelementptr inbounds i8,i8*%z,i64 16
%J=bitcast i8*%I to i32*
store i32 1,i32*%J,align 4
%K=call fastcc i8*@_SMLLN6String16substring__unsafeE_107(i8*inreg%z)
store i8*%K,i8**%c,align 8
%L=call i8*@sml_alloc(i32 inreg 20)#0
%M=getelementptr inbounds i8,i8*%L,i64 -4
%N=bitcast i8*%M to i32*
store i32 1342177296,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=load i8*,i8**%d,align 8
%R=getelementptr inbounds i8,i8*%L,i64 8
%S=bitcast i8*%R to i8**
store i8*%Q,i8**%S,align 8
%T=getelementptr inbounds i8,i8*%L,i64 16
%U=bitcast i8*%T to i32*
store i32 3,i32*%U,align 4
ret i8*%L
}
define internal fastcc i8*@_SMLL4loop_140(i8*inreg%a,i8*inreg%b)#2 gc"smlsharp"{
h:
%c=alloca i8*,align 8
%d=alloca i8*,align 8
%e=alloca i8*,align 8
call void@llvm.gcroot(i8**%c,i8*null)#0
call void@llvm.gcroot(i8**%d,i8*null)#0
call void@llvm.gcroot(i8**%e,i8*null)#0
store i8*%a,i8**%d,align 8
br label%f
f:
%g=phi i8*[%a8,%a7],[%b,%h]
store i8*%g,i8**%c,align 8
%i=load atomic i32,i32*@sml_check_flag unordered,align 4
%j=icmp eq i32%i,0
br i1%j,label%m,label%k
k:
call void@sml_check(i32 inreg%i)
%l=load i8*,i8**%c,align 8
br label%m
m:
%n=phi i8*[%l,%k],[%g,%f]
%o=bitcast i8*%n to i32*
%p=load i32,i32*%o,align 4
%q=getelementptr inbounds i8,i8*%n,i64 4
%r=bitcast i8*%q to i32*
%s=load i32,i32*%r,align 4
%t=getelementptr inbounds i8,i8*%n,i64 8
%u=bitcast i8*%t to i8**
%v=load i8*,i8**%u,align 8
store i8*%v,i8**%c,align 8
%w=load i8*,i8**%d,align 8
%x=getelementptr inbounds i8,i8*%w,i64 24
%y=bitcast i8*%x to i32*
%z=load i32,i32*%y,align 4
%A=icmp sgt i32%z,%s
br i1%A,label%am,label%B
B:
%C=getelementptr inbounds i8,i8*%w,i64 16
%D=bitcast i8*%C to i8**
%E=load i8*,i8**%D,align 8
store i8*%E,i8**%d,align 8
%F=call i8*@sml_alloc(i32 inreg 20)#0
%G=bitcast i8*%F to i32*
%H=getelementptr inbounds i8,i8*%F,i64 -4
%I=bitcast i8*%H to i32*
store i32 1342177296,i32*%I,align 4
store i32%p,i32*%G,align 4
%J=getelementptr inbounds i8,i8*%F,i64 4
%K=bitcast i8*%J to i32*
store i32%s,i32*%K,align 4
%L=load i8*,i8**%c,align 8
store i8*null,i8**%c,align 8
%M=getelementptr inbounds i8,i8*%F,i64 8
%N=bitcast i8*%M to i8**
store i8*%L,i8**%N,align 8
%O=getelementptr inbounds i8,i8*%F,i64 16
%P=bitcast i8*%O to i32*
store i32 2,i32*%P,align 4
%Q=load i8*,i8**%d,align 8
store i8*null,i8**%d,align 8
%R=call fastcc i8*@_SMLL3add_139(i8*inreg%Q,i8*inreg%F)
store i8*%R,i8**%c,align 8
%S=call i8*@sml_alloc(i32 inreg 20)#0
%T=getelementptr inbounds i8,i8*%S,i64 -4
%U=bitcast i8*%T to i32*
store i32 1342177296,i32*%U,align 4
%V=load i8*,i8**%c,align 8
%W=bitcast i8*%S to i8**
store i8*%V,i8**%W,align 8
%X=getelementptr inbounds i8,i8*%S,i64 8
%Y=bitcast i8*%X to i8**
store i8*null,i8**%Y,align 8
%Z=getelementptr inbounds i8,i8*%S,i64 16
%aa=bitcast i8*%Z to i32*
store i32 3,i32*%aa,align 4
store i8*null,i8**%d,align 8
%ab=call i8*@sml_alloc(i32 inreg 20)#0
%ac=getelementptr inbounds i8,i8*%ab,i64 -4
%ad=bitcast i8*%ac to i32*
store i32 1342177296,i32*%ad,align 4
%ae=load i8*,i8**%c,align 8
%af=bitcast i8*%ab to i8**
store i8*%ae,i8**%af,align 8
%ag=load i8*,i8**%d,align 8
%ah=getelementptr inbounds i8,i8*%ab,i64 8
%ai=bitcast i8*%ah to i8**
store i8*%ag,i8**%ai,align 8
%aj=getelementptr inbounds i8,i8*%ab,i64 16
%ak=bitcast i8*%aj to i32*
store i32 3,i32*%ak,align 4
%al=tail call fastcc i8*@_SMLLN6String3revE_131(i8*inreg%ab)
ret i8*%al
am:
%an=bitcast i8*%w to i8**
%ao=load i8*,i8**%an,align 8
%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
store i8*%at,i8**%e,align 8
%au=getelementptr inbounds i8,i8*%w,i64 8
%av=bitcast i8*%au to i8**
%aw=load i8*,i8**%av,align 8
%ax=sext i32%s to i64
%ay=getelementptr inbounds i8,i8*%aw,i64%ax
%az=load i8,i8*%ay,align 1
%aA=call i8*@sml_alloc(i32 inreg 1)#0
%aB=getelementptr inbounds i8,i8*%aA,i64 -4
%aC=bitcast i8*%aB to i32*
store i32 1,i32*%aC,align 4
store i8%az,i8*%aA,align 1
%aD=load i8*,i8**%e,align 8
store i8*null,i8**%e,align 8
%aE=call fastcc i8*%ar(i8*inreg%aD,i8*inreg%aA)
%aF=bitcast i8*%aE to i32*
%aG=load i32,i32*%aF,align 4
%aH=icmp eq i32%aG,0
%aI=add nsw i32%s,1
br i1%aH,label%be,label%aJ
aJ:
%aK=load i8*,i8**%d,align 8
%aL=getelementptr inbounds i8,i8*%aK,i64 16
%aM=bitcast i8*%aL to i8**
%aN=load i8*,i8**%aM,align 8
store i8*%aN,i8**%e,align 8
%aO=call i8*@sml_alloc(i32 inreg 20)#0
%aP=bitcast i8*%aO to i32*
%aQ=getelementptr inbounds i8,i8*%aO,i64 -4
%aR=bitcast i8*%aQ to i32*
store i32 1342177296,i32*%aR,align 4
store i32%p,i32*%aP,align 4
%aS=getelementptr inbounds i8,i8*%aO,i64 4
%aT=bitcast i8*%aS to i32*
store i32%s,i32*%aT,align 4
%aU=load i8*,i8**%c,align 8
store i8*null,i8**%c,align 8
%aV=getelementptr inbounds i8,i8*%aO,i64 8
%aW=bitcast i8*%aV to i8**
store i8*%aU,i8**%aW,align 8
%aX=getelementptr inbounds i8,i8*%aO,i64 16
%aY=bitcast i8*%aX to i32*
store i32 2,i32*%aY,align 4
%aZ=load i8*,i8**%e,align 8
store i8*null,i8**%e,align 8
%a0=call fastcc i8*@_SMLL3add_139(i8*inreg%aZ,i8*inreg%aO)
store i8*%a0,i8**%c,align 8
%a1=call i8*@sml_alloc(i32 inreg 20)#0
%a2=bitcast i8*%a1 to i32*
%a3=getelementptr inbounds i8,i8*%a1,i64 -4
%a4=bitcast i8*%a3 to i32*
store i32 1342177296,i32*%a4,align 4
store i32%aI,i32*%a2,align 4
%a5=getelementptr inbounds i8,i8*%a1,i64 4
%a6=bitcast i8*%a5 to i32*
store i32%aI,i32*%a6,align 4
br label%a7
a7:
%a8=phi i8*[%a1,%aJ],[%bf,%be]
%a9=load i8*,i8**%c,align 8
store i8*null,i8**%c,align 8
%ba=getelementptr inbounds i8,i8*%a8,i64 8
%bb=bitcast i8*%ba to i8**
store i8*%a9,i8**%bb,align 8
%bc=getelementptr inbounds i8,i8*%a8,i64 16
%bd=bitcast i8*%bc to i32*
store i32 2,i32*%bd,align 4
br label%f
be:
%bf=call i8*@sml_alloc(i32 inreg 20)#0
%bg=bitcast i8*%bf to i32*
%bh=getelementptr inbounds i8,i8*%bf,i64 -4
%bi=bitcast i8*%bh to i32*
store i32 1342177296,i32*%bi,align 4
store i32%p,i32*%bg,align 4
%bj=getelementptr inbounds i8,i8*%bf,i64 4
%bk=bitcast i8*%bj to i32*
store i32%aI,i32*%bk,align 4
br label%a7
}
define internal fastcc i8*@_SMLLN6String6fieldsE_142(i8*inreg%a,i8*inreg%b)#2 gc"smlsharp"{
%c=alloca i8*,align 8
%d=alloca i8*,align 8
%e=alloca i8*,align 8
%f=alloca i8*,align 8
call void@llvm.gcroot(i8**%c,i8*null)#0
call void@llvm.gcroot(i8**%d,i8*null)#0
call void@llvm.gcroot(i8**%e,i8*null)#0
call void@llvm.gcroot(i8**%f,i8*null)#0
store i8*%a,i8**%d,align 8
store i8*%b,i8**%c,align 8
%g=load atomic i32,i32*@sml_check_flag unordered,align 4
%h=icmp eq i32%g,0
br i1%h,label%i,label%k
i:
%j=bitcast i8*%b to i32*
br label%n
k:
call void@sml_check(i32 inreg%g)
%l=bitcast i8**%c to i32**
%m=load i32*,i32**%l,align 8
br label%n
n:
%o=phi i32*[%m,%k],[%j,%i]
%p=getelementptr inbounds i32,i32*%o,i64 -1
%q=load i32,i32*%p,align 4
%r=and i32%q,268435455
%s=add nsw i32%r,-1
%t=call i8*@sml_alloc(i32 inreg 12)#0
%u=getelementptr inbounds i8,i8*%t,i64 -4
%v=bitcast i8*%u to i32*
store i32 1342177288,i32*%v,align 4
store i8*%t,i8**%e,align 8
%w=load i8*,i8**%c,align 8
%x=bitcast i8*%t to i8**
store i8*%w,i8**%x,align 8
%y=getelementptr inbounds i8,i8*%t,i64 8
%z=bitcast i8*%y to i32*
store i32 1,i32*%z,align 4
%A=call i8*@sml_alloc(i32 inreg 28)#0
%B=getelementptr inbounds i8,i8*%A,i64 -4
%C=bitcast i8*%B to i32*
store i32 1342177304,i32*%C,align 4
%D=load i8*,i8**%e,align 8
%E=bitcast i8*%A to i8**
store i8*%D,i8**%E,align 8
%F=getelementptr inbounds i8,i8*%A,i64 8
%G=bitcast i8*%F to void(...)**
store void(...)*bitcast(i8*(i8*,i8*)*@_SMLL3add_139 to void(...)*),void(...)**%G,align 8
%H=getelementptr inbounds i8,i8*%A,i64 16
%I=bitcast i8*%H to void(...)**
store void(...)*bitcast(i8*(i8*,i8*)*@_SMLL3add_139 to void(...)*),void(...)**%I,align 8
%J=getelementptr inbounds i8,i8*%A,i64 24
%K=bitcast i8*%J to i32*
store i32 -2147483647,i32*%K,align 4
%L=bitcast i8**%d to i8***
%M=load i8**,i8***%L,align 8
%N=load i8*,i8**%M,align 8
store i8*%N,i8**%d,align 8
%O=call i8*@sml_alloc(i32 inreg 36)#0
%P=getelementptr inbounds i8,i8*%O,i64 -4
%Q=bitcast i8*%P to i32*
store i32 1342177312,i32*%Q,align 4
store i8*%O,i8**%f,align 8
%R=load i8*,i8**%d,align 8
store i8*null,i8**%d,align 8
%S=bitcast i8*%O to i8**
store i8*%R,i8**%S,align 8
%T=load i8*,i8**%c,align 8
store i8*null,i8**%c,align 8
%U=getelementptr inbounds i8,i8*%O,i64 8
%V=bitcast i8*%U to i8**
store i8*%T,i8**%V,align 8
%W=load i8*,i8**%e,align 8
store i8*null,i8**%e,align 8
%X=getelementptr inbounds i8,i8*%O,i64 16
%Y=bitcast i8*%X to i8**
store i8*%W,i8**%Y,align 8
%Z=getelementptr inbounds i8,i8*%O,i64 24
%aa=bitcast i8*%Z to i32*
store i32%s,i32*%aa,align 4
%ab=getelementptr inbounds i8,i8*%O,i64 32
%ac=bitcast i8*%ab to i32*
store i32 7,i32*%ac,align 4
%ad=call i8*@sml_alloc(i32 inreg 28)#0
%ae=getelementptr inbounds i8,i8*%ad,i64 -4
%af=bitcast i8*%ae to i32*
store i32 1342177304,i32*%af,align 4
%ag=load i8*,i8**%f,align 8
%ah=bitcast i8*%ad to i8**
store i8*%ag,i8**%ah,align 8
%ai=getelementptr inbounds i8,i8*%ad,i64 8
%aj=bitcast i8*%ai to void(...)**
store void(...)*bitcast(i8*(i8*,i8*)*@_SMLL4loop_140 to void(...)*),void(...)**%aj,align 8
%ak=getelementptr inbounds i8,i8*%ad,i64 16
%al=bitcast i8*%ak to void(...)**
store void(...)*bitcast(i8*(i8*,i8*)*@_SMLL4loop_140 to void(...)*),void(...)**%al,align 8
%am=getelementptr inbounds i8,i8*%ad,i64 24
%an=bitcast i8*%am to i32*
store i32 -2147483647,i32*%an,align 4
%ao=tail call fastcc i8*@_SMLL4loop_140(i8*inreg%ag,i8*inreg bitcast(i32*getelementptr inbounds(<{[4x i8],i32,i32,i32,i8*,i32}>,<{[4x i8],i32,i32,i32,i8*,i32}>*@n,i64 0,i32 2)to i8*))
ret i8*%ao
}
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*)*@_SMLLN6String6fieldsE_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*)*@_SMLLN6String6fieldsE_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*@_SMLLN6String4scanE_147(i8*inreg%a,i8*inreg%b)#2 gc"smlsharp"{
n:
%c=alloca i8*,align 8
%d=alloca i8*,align 8
%e=alloca i8*,align 8
%f=alloca i8*,align 8
call void@llvm.gcroot(i8**%c,i8*null)#0
call void@llvm.gcroot(i8**%d,i8*null)#0
call void@llvm.gcroot(i8**%e,i8*null)#0
call void@llvm.gcroot(i8**%f,i8*null)#0
store i8*%a,i8**%e,align 8
store i8*%b,i8**%c,align 8
%g=load atomic i32,i32*@sml_check_flag unordered,align 4
%h=icmp eq i32%g,0
br i1%h,label%l,label%i
i:
call void@sml_check(i32 inreg%g)
%j=load i8*,i8**%e,align 8
%k=load i8*,i8**%c,align 8
br label%l
l:
%m=phi i8*[%k,%i],[%b,%n]
%o=phi i8*[%j,%i],[%a,%n]
%p=getelementptr inbounds i8,i8*%o,i64 12
%q=bitcast i8*%p to i32*
%r=load i32,i32*%q,align 4
%s=add i32%r,3
%t=sub i32 0,%r
%u=and i32%s,%t
%v=add i32%r,7
%w=add i32%v,%u
%x=and i32%w,-8
%y=lshr i32%u,3
%z=getelementptr inbounds i8,i8*%o,i64 8
%A=bitcast i8*%z to i32*
%B=load i32,i32*%A,align 4
%C=shl i32%B,%y
%D=or i32%x,4
%E=and i32%v,%t
%F=add i32%v,%E
%G=and i32%F,-8
%H=lshr i32%E,3
%I=shl i32%B,%H
%J=or i32%I,1
%K=or i32%G,4
%L=bitcast i8*%o to i8**
%M=load i8*,i8**%L,align 8
%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=call fastcc i8*%P(i8*inreg%R,i8*inreg%m)
%T=icmp eq i8*%S,null
%U=load i8*,i8**%e,align 8
br i1%T,label%V,label%az
V:
%W=getelementptr inbounds i8,i8*%U,i64 12
%X=bitcast i8*%W to i32*
%Y=load i32,i32*%X,align 4
store i8*null,i8**%e,align 8
%Z=getelementptr inbounds i8,i8*%U,i64 8
%aa=bitcast i8*%Z to i32*
%ab=load i32,i32*%aa,align 4
%ac=call i8*@sml_alloc(i32 inreg%K)#0
%ad=or i32%G,1342177280
%ae=getelementptr inbounds i8,i8*%ac,i64 -4
%af=bitcast i8*%ae to i32*
store i32%ad,i32*%af,align 4
store i8*%ac,i8**%d,align 8
call void@llvm.memset.p0i8.i32(i8*%ac,i8 0,i32%K,i1 false)
%ag=bitcast i8*%ac to i8**
store i8*getelementptr inbounds(<{[4x i8],i32,[1x i8]}>,<{[4x i8],i32,[1x i8]}>*@q,i64 0,i32 2,i64 0),i8**%ag,align 8
%ah=icmp eq i32%ab,0
%ai=load i8*,i8**%c,align 8
store i8*null,i8**%c,align 8
%aj=sext i32%E to i64
%ak=getelementptr inbounds i8,i8*%ac,i64%aj
br i1%ah,label%an,label%al
al:
%am=bitcast i8*%ak to i8**
store i8*%ai,i8**%am,align 8
br label%ao
an:
call void@llvm.memcpy.p0i8.p0i8.i32(i8*%ak,i8*%ai,i32%Y,i1 false)
br label%ao
ao:
%ap=sext i32%G to i64
%aq=getelementptr inbounds i8,i8*%ac,i64%ap
%ar=bitcast i8*%aq to i32*
store i32%J,i32*%ar,align 4
%as=call i8*@sml_alloc(i32 inreg 12)#0
%at=getelementptr inbounds i8,i8*%as,i64 -4
%au=bitcast i8*%at to i32*
store i32 1342177288,i32*%au,align 4
%av=load i8*,i8**%d,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 i32*
store i32 1,i32*%ay,align 4
ret i8*%as
az:
%aA=getelementptr inbounds i8,i8*%U,i64 8
%aB=bitcast i8*%aA to i32*
%aC=load i32,i32*%aB,align 4
%aD=getelementptr inbounds i8,i8*%U,i64 12
%aE=bitcast i8*%aD to i32*
%aF=load i32,i32*%aE,align 4
%aG=call fastcc i8*@_SMLFN17SMLSharp__ScanChar16scanEscapeSpacesE(i32 inreg%aC,i32 inreg%aF)
%aH=getelementptr inbounds i8,i8*%aG,i64 16
%aI=bitcast i8*%aH to i8*(i8*,i8*)**
%aJ=load i8*(i8*,i8*)*,i8*(i8*,i8*)**%aI,align 8
%aK=bitcast i8*%aG to i8**
%aL=load i8*,i8**%aK,align 8
%aM=bitcast i8**%e to i8***
%aN=load i8**,i8***%aM,align 8
%aO=load i8*,i8**%aN,align 8
%aP=call fastcc i8*%aJ(i8*inreg%aL,i8*inreg%aO)
%aQ=getelementptr inbounds i8,i8*%aP,i64 16
%aR=bitcast i8*%aQ to i8*(i8*,i8*)**
%aS=load i8*(i8*,i8*)*,i8*(i8*,i8*)**%aR,align 8
%aT=bitcast i8*%aP to i8**
%aU=load i8*,i8**%aT,align 8
%aV=load i8*,i8**%c,align 8
%aW=call fastcc i8*%aS(i8*inreg%aU,i8*inreg%aV)
%aX=icmp eq i8*%aW,null
br i1%aX,label%aY,label%bi
aY:
%aZ=load i8*,i8**%e,align 8
%a0=getelementptr inbounds i8,i8*%aZ,i64 12
%a1=bitcast i8*%a0 to i32*
%a2=load i32,i32*%a1,align 4
%a3=getelementptr inbounds i8,i8*%aZ,i64 8
%a4=bitcast i8*%a3 to i32*
%a5=load i32,i32*%a4,align 4
%a6=call i8*@sml_alloc(i32 inreg%D)#0
%a7=or i32%x,1342177280
%a8=bitcast i8*%a6 to i32*
%a9=getelementptr inbounds i8,i8*%a6,i64 -4
%ba=bitcast i8*%a9 to i32*
store i32%a7,i32*%ba,align 4
call void@llvm.memset.p0i8.i32(i8*%a6,i8 0,i32%D,i1 false)
store i32 0,i32*%a8,align 4
%bb=icmp eq i32%a5,0
%bc=load i8*,i8**%c,align 8
%bd=sext i32%u to i64
%be=getelementptr inbounds i8,i8*%a6,i64%bd
br i1%bb,label%bh,label%bf
bf:
%bg=bitcast i8*%be to i8**
store i8*%bc,i8**%bg,align 8
br label%b2
bh:
call void@llvm.memcpy.p0i8.p0i8.i32(i8*%be,i8*%bc,i32%a2,i1 false)
br label%b2
bi:
%bj=bitcast i8*%aW to i8**
%bk=load i8*,i8**%bj,align 8
store i8*%bk,i8**%c,align 8
%bl=load i8*,i8**%e,align 8
%bm=getelementptr inbounds i8,i8*%bl,i64 8
%bn=bitcast i8*%bm to i32*
%bo=load i32,i32*%bn,align 4
%bp=icmp eq i32%bo,0
br i1%bp,label%bv,label%bq
bq:
store i8*null,i8**%c,align 8
%br=sext i32%u to i64
%bs=getelementptr inbounds i8,i8*%bk,i64%br
%bt=bitcast i8*%bs to i8**
%bu=load i8*,i8**%bt,align 8
br label%bJ
bv:
%bw=getelementptr inbounds i8,i8*%bl,i64 12
%bx=bitcast i8*%bw to i32*
%by=load i32,i32*%bx,align 4
%bz=call i8*@sml_alloc(i32 inreg%by)#0
%bA=getelementptr inbounds i8,i8*%bz,i64 -4
%bB=bitcast i8*%bA to i32*
store i32%by,i32*%bB,align 4
%bC=load i8*,i8**%c,align 8
store i8*null,i8**%c,align 8
%bD=sext i32%u to i64
%bE=getelementptr inbounds i8,i8*%bC,i64%bD
call void@llvm.memcpy.p0i8.p0i8.i32(i8*%bz,i8*%bE,i32%by,i1 false)
%bF=load i8*,i8**%e,align 8
%bG=getelementptr inbounds i8,i8*%bF,i64 8
%bH=bitcast i8*%bG to i32*
%bI=load i32,i32*%bH,align 4
br label%bJ
bJ:
%bK=phi i64[%bD,%bv],[%br,%bq]
%bL=phi i32[%bI,%bv],[%bo,%bq]
%bM=phi i8*[%bF,%bv],[%bl,%bq]
%bN=phi i8*[%bz,%bv],[%bu,%bq]
store i8*%bN,i8**%c,align 8
%bO=getelementptr inbounds i8,i8*%bM,i64 12
%bP=bitcast i8*%bO to i32*
%bQ=load i32,i32*%bP,align 4
%bR=call i8*@sml_alloc(i32 inreg%D)#0
%bS=or i32%x,1342177280
%bT=bitcast i8*%bR to i32*
%bU=getelementptr inbounds i8,i8*%bR,i64 -4
%bV=bitcast i8*%bU to i32*
store i32%bS,i32*%bV,align 4
call void@llvm.memset.p0i8.i32(i8*%bR,i8 0,i32%D,i1 false)
store i32 1,i32*%bT,align 4
%bW=icmp eq i32%bL,0
%bX=load i8*,i8**%c,align 8
%bY=getelementptr inbounds i8,i8*%bR,i64%bK
br i1%bW,label%b1,label%bZ
bZ:
%b0=bitcast i8*%bY to i8**
store i8*%bX,i8**%b0,align 8
br label%b2
b1:
call void@llvm.memcpy.p0i8.p0i8.i32(i8*%bY,i8*%bX,i32%bQ,i1 false)
br label%b2
b2:
%b3=phi i8*[%a6,%bh],[%a6,%bf],[%bR,%b1],[%bR,%bZ]
%b4=sext i32%x to i64
%b5=getelementptr inbounds i8,i8*%b3,i64%b4
%b6=bitcast i8*%b5 to i32*
store i32%C,i32*%b6,align 4
store i8*%b3,i8**%d,align 8
%b7=load i8*,i8**%e,align 8
%b8=getelementptr inbounds i8,i8*%b7,i64 8
%b9=bitcast i8*%b8 to i32*
%ca=load i32,i32*%b9,align 4
%cb=icmp eq i32%ca,0
br i1%cb,label%ch,label%cc
cc:
%cd=sext i32%u to i64
%ce=getelementptr inbounds i8,i8*%b3,i64%cd
%cf=bitcast i8*%ce to i8**
%cg=load i8*,i8**%cf,align 8
br label%cv
ch:
%ci=getelementptr inbounds i8,i8*%b7,i64 12
%cj=bitcast i8*%ci to i32*
%ck=load i32,i32*%cj,align 4
%cl=call i8*@sml_alloc(i32 inreg%ck)#0
%cm=getelementptr inbounds i8,i8*%cl,i64 -4
%cn=bitcast i8*%cm to i32*
store i32%ck,i32*%cn,align 4
%co=load i8*,i8**%d,align 8
%cp=sext i32%u to i64
%cq=getelementptr inbounds i8,i8*%co,i64%cp
call void@llvm.memcpy.p0i8.p0i8.i32(i8*%cl,i8*%cq,i32%ck,i1 false)
%cr=load i8*,i8**%e,align 8
%cs=getelementptr inbounds i8,i8*%cr,i64 8
%ct=bitcast i8*%cs to i32*
%cu=load i32,i32*%ct,align 4
br label%cv
cv:
%cw=phi i32[%cu,%ch],[%ca,%cc]
%cx=phi i8*[%cr,%ch],[%b7,%cc]
%cy=phi i8*[%cl,%ch],[%cg,%cc]
store i8*%cy,i8**%c,align 8
%cz=getelementptr inbounds i8,i8*%cx,i64 12
%cA=bitcast i8*%cz to i32*
%cB=load i32,i32*%cA,align 4
%cC=call fastcc i8*@_SMLFN17SMLSharp__ScanChar11scanRepeat1E(i32 inreg%cw,i32 inreg%cB,i32 inreg 0,i32 inreg 1)
%cD=getelementptr inbounds i8,i8*%cC,i64 16
%cE=bitcast i8*%cD to i8*(i8*,i8*)**
%cF=load i8*(i8*,i8*)*,i8*(i8*,i8*)**%cE,align 8
%cG=bitcast i8*%cC to i8**
%cH=load i8*,i8**%cG,align 8
store i8*%cH,i8**%f,align 8
%cI=load i8*,i8**%e,align 8
%cJ=getelementptr inbounds i8,i8*%cI,i64 8
%cK=bitcast i8*%cJ to i32*
%cL=load i32,i32*%cK,align 4
%cM=getelementptr inbounds i8,i8*%cI,i64 12
%cN=bitcast i8*%cM to i32*
%cO=load i32,i32*%cN,align 4
%cP=call fastcc i8*@_SMLFN17SMLSharp__ScanChar8scanCharE(i32 inreg%cL,i32 inreg%cO)
%cQ=load i8*,i8**%f,align 8
store i8*null,i8**%f,align 8
%cR=call fastcc i8*%cF(i8*inreg%cQ,i8*inreg%cP)
%cS=getelementptr inbounds i8,i8*%cR,i64 16
%cT=bitcast i8*%cS to i8*(i8*,i8*)**
%cU=load i8*(i8*,i8*)*,i8*(i8*,i8*)**%cT,align 8
%cV=bitcast i8*%cR to i8**
%cW=load i8*,i8**%cV,align 8
%cX=load i8**,i8***%aM,align 8
%cY=load i8*,i8**%cX,align 8
%cZ=call fastcc i8*%cU(i8*inreg%cW,i8*inreg%cY)
%c0=getelementptr inbounds i8,i8*%cZ,i64 16
%c1=bitcast i8*%c0 to i8*(i8*,i8*)**
%c2=load i8*(i8*,i8*)*,i8*(i8*,i8*)**%c1,align 8
%c3=bitcast i8*%cZ to i8**
%c4=load i8*,i8**%c3,align 8
%c5=load i8*,i8**%c,align 8
%c6=call fastcc i8*%c2(i8*inreg%c4,i8*inreg%c5)
%c7=icmp eq i8*%c6,null
br i1%c7,label%c8,label%dJ
c8:
%c9=bitcast i8**%d to i32**
%da=load i32*,i32**%c9,align 8
store i8*null,i8**%d,align 8
%db=load i32,i32*%da,align 4
%dc=icmp eq i32%db,0
br i1%dc,label%dI,label%dd
dd:
%de=load i8*,i8**%e,align 8
%df=getelementptr inbounds i8,i8*%de,i64 12
%dg=bitcast i8*%df to i32*
%dh=load i32,i32*%dg,align 4
store i8*null,i8**%e,align 8
%di=getelementptr inbounds i8,i8*%de,i64 8
%dj=bitcast i8*%di to i32*
%dk=load i32,i32*%dj,align 4
%dl=call i8*@sml_alloc(i32 inreg%K)#0
%dm=or i32%G,1342177280
%dn=getelementptr inbounds i8,i8*%dl,i64 -4
%do=bitcast i8*%dn to i32*
store i32%dm,i32*%do,align 4
store i8*%dl,i8**%d,align 8
call void@llvm.memset.p0i8.i32(i8*%dl,i8 0,i32%K,i1 false)
%dp=bitcast i8*%dl to i8**
store i8*getelementptr inbounds(<{[4x i8],i32,[1x i8]}>,<{[4x i8],i32,[1x i8]}>*@q,i64 0,i32 2,i64 0),i8**%dp,align 8
%dq=icmp eq i32%dk,0
%dr=load i8*,i8**%c,align 8
store i8*null,i8**%c,align 8
%ds=sext i32%E to i64
%dt=getelementptr inbounds i8,i8*%dl,i64%ds
br i1%dq,label%dw,label%du
du:
%dv=bitcast i8*%dt to i8**
store i8*%dr,i8**%dv,align 8
br label%dx
dw:
call void@llvm.memcpy.p0i8.p0i8.i32(i8*%dt,i8*%dr,i32%dh,i1 false)
br label%dx
dx:
%dy=sext i32%G to i64
%dz=getelementptr inbounds i8,i8*%dl,i64%dy
%dA=bitcast i8*%dz to i32*
store i32%J,i32*%dA,align 4
%dB=call i8*@sml_alloc(i32 inreg 12)#0
%dC=getelementptr inbounds i8,i8*%dB,i64 -4
%dD=bitcast i8*%dC to i32*
store i32 1342177288,i32*%dD,align 4
%dE=load i8*,i8**%d,align 8
%dF=bitcast i8*%dB to i8**
store i8*%dE,i8**%dF,align 8
%dG=getelementptr inbounds i8,i8*%dB,i64 8
%dH=bitcast i8*%dG to i32*
store i32 1,i32*%dH,align 4
ret i8*%dB
dI:
ret i8*null
dJ:
%dK=bitcast i8*%c6 to i8**
%dL=load i8*,i8**%dK,align 8
store i8*%dL,i8**%c,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:
%dS=sext i32%E to i64
%dT=getelementptr inbounds i8,i8*%dL,i64%dS
%dU=bitcast i8*%dT to i8**
%dV=load i8*,i8**%dU,align 8
br label%d6
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
%d4=sext i32%E 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)
br label%d6
d6:
%d7=phi i64[%d4,%dW],[%dS,%dR]
%d8=phi i8*[%d3,%dW],[%dL,%dR]
%d9=phi i8*[%d0,%dW],[%dV,%dR]
%ea=bitcast i8*%d8 to i8**
store i8*%d9,i8**%d,align 8
store i8*null,i8**%c,align 8
%eb=load i8*,i8**%ea,align 8
%ec=call fastcc i8*@_SMLFN10CharVector8fromListE(i8*inreg%eb)
store i8*%ec,i8**%c,align 8
%ed=load i8*,i8**%e,align 8
%ee=getelementptr inbounds i8,i8*%ed,i64 12
%ef=bitcast i8*%ee to i32*
%eg=load i32,i32*%ef,align 4
store i8*null,i8**%e,align 8
%eh=getelementptr inbounds i8,i8*%ed,i64 8
%ei=bitcast i8*%eh to i32*
%ej=load i32,i32*%ei,align 4
%ek=call i8*@sml_alloc(i32 inreg%K)#0
%el=or i32%G,1342177280
%em=getelementptr inbounds i8,i8*%ek,i64 -4
%en=bitcast i8*%em to i32*
store i32%el,i32*%en,align 4
store i8*%ek,i8**%e,align 8
call void@llvm.memset.p0i8.i32(i8*%ek,i8 0,i32%K,i1 false)
%eo=load i8*,i8**%c,align 8
%ep=bitcast i8*%ek to i8**
store i8*null,i8**%c,align 8
store i8*%eo,i8**%ep,align 8
%eq=icmp eq i32%ej,0
%er=load i8*,i8**%d,align 8
store i8*null,i8**%d,align 8
%es=getelementptr inbounds i8,i8*%ek,i64%d7
br i1%eq,label%ev,label%et
et:
%eu=bitcast i8*%es to i8**
store i8*%er,i8**%eu,align 8
br label%ew
ev:
call void@llvm.memcpy.p0i8.p0i8.i32(i8*%es,i8*%er,i32%eg,i1 false)
br label%ew
ew:
%ex=sext i32%G to i64
%ey=getelementptr inbounds i8,i8*%ek,i64%ex
%ez=bitcast i8*%ey to i32*
store i32%J,i32*%ez,align 4
%eA=call i8*@sml_alloc(i32 inreg 12)#0
%eB=getelementptr inbounds i8,i8*%eA,i64 -4
%eC=bitcast i8*%eB to i32*
store i32 1342177288,i32*%eC,align 4
%eD=load i8*,i8**%e,align 8
%eE=bitcast i8*%eA to i8**
store i8*%eD,i8**%eE,align 8
%eF=getelementptr inbounds i8,i8*%eA,i64 8
%eG=bitcast i8*%eF to i32*
store i32 1,i32*%eG,align 4
ret i8*%eA
}
define internal fastcc i8*@_SMLLN6String4scanE_148(i8*inreg%a,i8*inreg%b)#4 gc"smlsharp"{
%c=alloca i8*,align 8
%d=alloca i8*,align 8
call void@llvm.gcroot(i8**%c,i8*null)#0
call void@llvm.gcroot(i8**%d,i8*null)#0
store i8*%b,i8**%c,align 8
%e=bitcast i8*%a to i32*
%f=load i32,i32*%e,align 4
%g=getelementptr inbounds i8,i8*%a,i64 4
%h=bitcast i8*%g to i32*
%i=load i32,i32*%h,align 4
%j=call i8*@sml_alloc(i32 inreg 20)#0
%k=getelementptr inbounds i8,i8*%j,i64 -4
%l=bitcast i8*%k to i32*
store i32 1342177296,i32*%l,align 4
store i8*%j,i8**%d,align 8
%m=load i8*,i8**%c,align 8
store i8*null,i8**%c,align 8
%n=bitcast i8*%j to i8**
store i8*%m,i8**%n,align 8
%o=getelementptr inbounds i8,i8*%j,i64 8
%p=bitcast i8*%o to i32*
store i32%f,i32*%p,align 4
%q=getelementptr inbounds i8,i8*%j,i64 12
%r=bitcast i8*%q to i32*
store i32%i,i32*%r,align 4
%s=getelementptr inbounds i8,i8*%j,i64 16
%t=bitcast i8*%s to i32*
store i32 1,i32*%t,align 4
%u=call i8*@sml_alloc(i32 inreg 28)#0
%v=getelementptr inbounds i8,i8*%u,i64 -4
%w=bitcast i8*%v to i32*
store i32 1342177304,i32*%w,align 4
%x=load i8*,i8**%d,align 8
%y=bitcast i8*%u to i8**
store i8*%x,i8**%y,align 8
%z=getelementptr inbounds i8,i8*%u,i64 8
%A=bitcast i8*%z to void(...)**
store void(...)*bitcast(i8*(i8*,i8*)*@_SMLLN6String4scanE_147 to void(...)*),void(...)**%A,align 8
%B=getelementptr inbounds i8,i8*%u,i64 16
%C=bitcast i8*%B to void(...)**
store void(...)*bitcast(i8*(i8*,i8*)*@_SMLLN6String4scanE_147 to void(...)*),void(...)**%C,align 8
%D=getelementptr inbounds i8,i8*%u,i64 24
%E=bitcast i8*%D to i32*
store i32 1,i32*%E,align 4
ret i8*%u
}
define internal fastcc i8*@_SMLLN6String4scanE_149(i32 inreg%a,i32 inreg%b)unnamed_addr#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*)*@_SMLLN6String4scanE_148 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*)*@_SMLLN6String4scanE_148 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*@_SMLL4scan_151(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=getelementptr inbounds i8,i8*%P,i64 8
%R=bitcast i8*%Q to i32*
%S=load i32,i32*%R,align 4
%T=bitcast i8*%P to i8**
%U=load i8*,i8**%T,align 8
%V=call fastcc i8*@_SMLFN10CharVector8fromListE(i8*inreg%U)
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%S,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*@_SMLL4scan_152(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)*@_SMLL4scan_151 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*)*@_SMLL4scan_208 to void(...)*),void(...)**%s,align 8
%t=getelementptr inbounds i8,i8*%k,i64 24
%u=bitcast i8*%t to i32*
store i32 -2147483647,i32*%u,align 4
ret i8*%k
}
define fastcc i8*@_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}>*@r,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}>*@p,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 internal fastcc i32@_SMLLN6String6strcmpE_158(i8*inreg%a)unnamed_addr#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
br i1%B,label%D,label%C
C:
ret i32%A
D:
%E=sub nsw i32%s,%x
ret i32%E
}
define fastcc i32@_SMLFN6String7compareE(i8*inreg%a)#2 gc"smlsharp"{
j:
%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%h,label%f
f:
call void@sml_check(i32 inreg%d)
%g=load i8*,i8**%b,align 8
br label%h
h:
%i=phi i8*[%g,%f],[%a,%j]
%k=bitcast i8*%i to i8**
%l=load i8*,i8**%k,align 8
store i8*%l,i8**%b,align 8
%m=getelementptr inbounds i8,i8*%i,i64 8
%n=bitcast i8*%m to i8**
%o=load i8*,i8**%n,align 8
store i8*%o,i8**%c,align 8
%p=call i8*@sml_alloc(i32 inreg 20)#0
%q=getelementptr inbounds i8,i8*%p,i64 -4
%r=bitcast i8*%q to i32*
store i32 1342177296,i32*%r,align 4
%s=load i8*,i8**%b,align 8
store i8*null,i8**%b,align 8
%t=bitcast i8*%p to i8**
store i8*%s,i8**%t,align 8
%u=load i8*,i8**%c,align 8
store i8*null,i8**%c,align 8
%v=getelementptr inbounds i8,i8*%p,i64 8
%w=bitcast i8*%v to i8**
store i8*%u,i8**%w,align 8
%x=getelementptr inbounds i8,i8*%p,i64 16
%y=bitcast i8*%x to i32*
store i32 3,i32*%y,align 4
%z=call fastcc i32@_SMLLN6String6strcmpE_158(i8*inreg%p)
%A=icmp eq i32%z,0
%B=icmp sgt i32%z,-1
%C=select i1%B,i32 1,i32 2
%D=select i1%A,i32 0,i32%C
ret i32%D
}
define fastcc i32@_SMLFN6String1_RE(i8*inreg%a)#2 gc"smlsharp"{
j:
%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%h,label%f
f:
call void@sml_check(i32 inreg%d)
%g=load i8*,i8**%b,align 8
br label%h
h:
%i=phi i8*[%g,%f],[%a,%j]
%k=bitcast i8*%i to i8**
%l=load i8*,i8**%k,align 8
store i8*%l,i8**%b,align 8
%m=getelementptr inbounds i8,i8*%i,i64 8
%n=bitcast i8*%m to i8**
%o=load i8*,i8**%n,align 8
store i8*%o,i8**%c,align 8
%p=call i8*@sml_alloc(i32 inreg 20)#0
%q=getelementptr inbounds i8,i8*%p,i64 -4
%r=bitcast i8*%q to i32*
store i32 1342177296,i32*%r,align 4
%s=load i8*,i8**%b,align 8
store i8*null,i8**%b,align 8
%t=bitcast i8*%p to i8**
store i8*%s,i8**%t,align 8
%u=load i8*,i8**%c,align 8
store i8*null,i8**%c,align 8
%v=getelementptr inbounds i8,i8*%p,i64 8
%w=bitcast i8*%v to i8**
store i8*%u,i8**%w,align 8
%x=getelementptr inbounds i8,i8*%p,i64 16
%y=bitcast i8*%x to i32*
store i32 3,i32*%y,align 4
%z=call fastcc i32@_SMLLN6String6strcmpE_158(i8*inreg%p)
%A=lshr i32%z,31
ret i32%A
}
define fastcc i32@_SMLFN6String2_R_SE(i8*inreg%a)#2 gc"smlsharp"{
j:
%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%h,label%f
f:
call void@sml_check(i32 inreg%d)
%g=load i8*,i8**%b,align 8
br label%h
h:
%i=phi i8*[%g,%f],[%a,%j]
%k=bitcast i8*%i to i8**
%l=load i8*,i8**%k,align 8
store i8*%l,i8**%b,align 8
%m=getelementptr inbounds i8,i8*%i,i64 8
%n=bitcast i8*%m to i8**
%o=load i8*,i8**%n,align 8
store i8*%o,i8**%c,align 8
%p=call i8*@sml_alloc(i32 inreg 20)#0
%q=getelementptr inbounds i8,i8*%p,i64 -4
%r=bitcast i8*%q to i32*
store i32 1342177296,i32*%r,align 4
%s=load i8*,i8**%b,align 8
store i8*null,i8**%b,align 8
%t=bitcast i8*%p to i8**
store i8*%s,i8**%t,align 8
%u=load i8*,i8**%c,align 8
store i8*null,i8**%c,align 8
%v=getelementptr inbounds i8,i8*%p,i64 8
%w=bitcast i8*%v to i8**
store i8*%u,i8**%w,align 8
%x=getelementptr inbounds i8,i8*%p,i64 16
%y=bitcast i8*%x to i32*
store i32 3,i32*%y,align 4
%z=call fastcc i32@_SMLLN6String6strcmpE_158(i8*inreg%p)
%A=icmp slt i32%z,1
%B=zext i1%A to i32
ret i32%B
}
define fastcc i32@_SMLFN6String1_TE(i8*inreg%a)#2 gc"smlsharp"{
j:
%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%h,label%f
f:
call void@sml_check(i32 inreg%d)
%g=load i8*,i8**%b,align 8
br label%h
h:
%i=phi i8*[%g,%f],[%a,%j]
%k=bitcast i8*%i to i8**
%l=load i8*,i8**%k,align 8
store i8*%l,i8**%b,align 8
%m=getelementptr inbounds i8,i8*%i,i64 8
%n=bitcast i8*%m to i8**
%o=load i8*,i8**%n,align 8
store i8*%o,i8**%c,align 8
%p=call i8*@sml_alloc(i32 inreg 20)#0
%q=getelementptr inbounds i8,i8*%p,i64 -4
%r=bitcast i8*%q to i32*
store i32 1342177296,i32*%r,align 4
%s=load i8*,i8**%b,align 8
store i8*null,i8**%b,align 8
%t=bitcast i8*%p to i8**
store i8*%s,i8**%t,align 8
%u=load i8*,i8**%c,align 8
store i8*null,i8**%c,align 8
%v=getelementptr inbounds i8,i8*%p,i64 8
%w=bitcast i8*%v to i8**
store i8*%u,i8**%w,align 8
%x=getelementptr inbounds i8,i8*%p,i64 16
%y=bitcast i8*%x to i32*
store i32 3,i32*%y,align 4
%z=call fastcc i32@_SMLLN6String6strcmpE_158(i8*inreg%p)
%A=icmp sgt i32%z,0
%B=zext i1%A to i32
ret i32%B
}
define fastcc i32@_SMLFN6String2_T_SE(i8*inreg%a)#2 gc"smlsharp"{
j:
%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%h,label%f
f:
call void@sml_check(i32 inreg%d)
%g=load i8*,i8**%b,align 8
br label%h
h:
%i=phi i8*[%g,%f],[%a,%j]
%k=bitcast i8*%i to i8**
%l=load i8*,i8**%k,align 8
store i8*%l,i8**%b,align 8
%m=getelementptr inbounds i8,i8*%i,i64 8
%n=bitcast i8*%m to i8**
%o=load i8*,i8**%n,align 8
store i8*%o,i8**%c,align 8
%p=call i8*@sml_alloc(i32 inreg 20)#0
%q=getelementptr inbounds i8,i8*%p,i64 -4
%r=bitcast i8*%q to i32*
store i32 1342177296,i32*%r,align 4
%s=load i8*,i8**%b,align 8
store i8*null,i8**%b,align 8
%t=bitcast i8*%p to i8**
store i8*%s,i8**%t,align 8
%u=load i8*,i8**%c,align 8
store i8*null,i8**%c,align 8
%v=getelementptr inbounds i8,i8*%p,i64 8
%w=bitcast i8*%v to i8**
store i8*%u,i8**%w,align 8
%x=getelementptr inbounds i8,i8*%p,i64 16
%y=bitcast i8*%x to i32*
store i32 3,i32*%y,align 4
%z=call fastcc i32@_SMLLN6String6strcmpE_158(i8*inreg%p)
%A=lshr i32%z,31
%B=xor i32%A,1
ret i32%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@_SMLLN6String8isPrefixE_172(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*)*@_SMLLN6String8isPrefixE_172 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*)*@_SMLLN6String8isPrefixE_218 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@_SMLLN6String8isSuffixE_175(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*)*@_SMLLN6String8isSuffixE_175 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*)*@_SMLLN6String8isSuffixE_220 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@_SMLLN6String11isSubstringE_178(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*)*@_SMLLN6String11isSubstringE_178 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*)*@_SMLLN6String11isSubstringE_222 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*@_SMLLN6String9translateE_181(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*)*@_SMLLN6String9translateE_181 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*)*@_SMLLN6String9translateE_181 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*@_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 internal fastcc i8*@_SMLLN6String4scanE_190(i8*inreg%a,i8*inreg%b)#2 gc"smlsharp"{
k:
%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%i,label%g
g:
call void@sml_check(i32 inreg%e)
%h=load i8*,i8**%d,align 8
br label%i
i:
%j=phi i8*[%h,%g],[%a,%k]
%l=bitcast i8*%j to i32*
%m=load i32,i32*%l,align 4
store i8*null,i8**%d,align 8
%n=getelementptr inbounds i8,i8*%j,i64 4
%o=bitcast i8*%n to i32*
%p=load i32,i32*%o,align 4
%q=call fastcc i8*@_SMLLN6String4scanE_149(i32 inreg%m,i32 inreg%p)
%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=load i8*,i8**%c,align 8
store i8*null,i8**%c,align 8
%x=call fastcc i8*%t(i8*inreg%v,i8*inreg%w)
ret i8*%x
}
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*)*@_SMLLN6String4scanE_190 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*)*@_SMLLN6String4scanE_190 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 fastcc i8*@_SMLFN6String10fromStringE(i8*inreg%a)#2 gc"smlsharp"{
%b=alloca i8*,align 8
%c=alloca i8*,align 8
call void@llvm.gcroot(i8**%b,i8*null)#0
call void@llvm.gcroot(i8**%c,i8*null)#0
store i8*%a,i8**%b,align 8
%d=load atomic i32,i32*@sml_check_flag unordered,align 4
%e=icmp eq i32%d,0
br i1%e,label%g,label%f
f:
call void@sml_check(i32 inreg%d)
br label%g
g:
%h=call fastcc i8*@_SMLFN9StringCvt10scanStringE(i32 inreg 1,i32 inreg 8)
%i=getelementptr inbounds i8,i8*%h,i64 16
%j=bitcast i8*%i to i8*(i8*,i8*)**
%k=load i8*(i8*,i8*)*,i8*(i8*,i8*)**%j,align 8
%l=bitcast i8*%h to i8**
%m=load i8*,i8**%l,align 8
store i8*%m,i8**%c,align 8
%n=call fastcc i8*@_SMLLN6String4scanE_149(i32 inreg 0,i32 inreg 4)
%o=load i8*,i8**%c,align 8
store i8*null,i8**%c,align 8
%p=call fastcc i8*%k(i8*inreg%o,i8*inreg%n)
%q=getelementptr inbounds i8,i8*%p,i64 16
%r=bitcast i8*%q to i8*(i8*,i8*)**
%s=load i8*(i8*,i8*)*,i8*(i8*,i8*)**%r,align 8
%t=bitcast i8*%p to i8**
%u=load i8*,i8**%t,align 8
%v=load i8*,i8**%b,align 8
%w=tail call fastcc i8*%s(i8*inreg%u,i8*inreg%v)
ret i8*%w
}
define 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*@_SMLLN6String9substringE_198(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*@_SMLLN6String7extractE_199(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*@_SMLLN6String1_ZE_200(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*@_SMLL11totalLength_201(i8*inreg%a,i8*inreg%b)#2 gc"smlsharp"{
%c=tail call fastcc i32@_SMLL11totalLength_120(i8*inreg%a,i8*inreg%b)
%d=tail call i8*@sml_alloc(i32 inreg 4)#0
%e=bitcast i8*%d to i32*
%f=getelementptr inbounds i8,i8*%d,i64 -4
%g=bitcast i8*%f to i32*
store i32 4,i32*%g,align 4
store i32%c,i32*%e,align 4
ret i8*%d
}
define internal fastcc i8*@_SMLL4loop_202(i8*inreg%a,i8*inreg%b)#2 gc"smlsharp"{
tail call fastcc void@_SMLL4loop_126(i8*inreg%a,i8*inreg%b)
%c=tail call i8*@sml_alloc(i32 inreg 4)#0
%d=bitcast i8*%c to i32*
%e=getelementptr inbounds i8,i8*%c,i64 -4
%f=bitcast i8*%e to i32*
store i32 4,i32*%f,align 4
store i32 0,i32*%d,align 4
ret i8*%c
}
define internal fastcc i8*@_SMLLN6String10concatWithE_203(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*@_SMLLN6String6tokensE_205(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*@_SMLLN6String6fieldsE_206(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*@_SMLL4scan_208(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*@_SMLL4scan_151(i8*inreg%a,i32 inreg%d)
ret i8*%e
}
define internal fastcc i8*@_SMLL4scan_209(i8*inreg%a,i8*inreg%b)#4 gc"smlsharp"{
%c=tail call fastcc i8*@_SMLL4scan_152(i8*inreg%b)
ret i8*%c
}
define internal fastcc i8*@_SMLLN6String11fromCStringE_210(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*@_SMLLN6String7compareE_212(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*@_SMLLN6String1_RE_213(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*@_SMLLN6String2_R_SE_214(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*@_SMLLN6String1_TE_215(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*@_SMLLN6String2_T_SE_216(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*@_SMLLN6String7explodeE_217(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*@_SMLLN6String8isPrefixE_218(i8*inreg%a,i8*inreg%b)#2 gc"smlsharp"{
%c=tail call fastcc i32@_SMLLN6String8isPrefixE_172(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*@_SMLLN6String8isPrefixE_219(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*@_SMLLN6String8isSuffixE_220(i8*inreg%a,i8*inreg%b)#2 gc"smlsharp"{
%c=tail call fastcc i32@_SMLLN6String8isSuffixE_175(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*@_SMLLN6String8isSuffixE_221(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*@_SMLLN6String11isSubstringE_222(i8*inreg%a,i8*inreg%b)#2 gc"smlsharp"{
%c=tail call fastcc i32@_SMLLN6String11isSubstringE_178(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*@_SMLLN6String11isSubstringE_223(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*@_SMLLN6String9translateE_224(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*@_SMLLN6String3strE_225(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*@_SMLLN6String8toStringE_226(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*@_SMLLN6String11toRawStringE_227(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*@_SMLLN6String4scanE_228(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
}
define internal fastcc i8*@_SMLLN6String10fromStringE_229(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*@_SMLLN6String9toCStringE_230(i8*inreg%a,i8*inreg%b)#2 gc"smlsharp"{
%c=tail call fastcc i8*@_SMLFN6String9toCStringE(i8*inreg%b)
ret i8*%c
}
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}
