@sml_check_flag=external local_unnamed_addr global i32
@_SMLZ6Domain=external unnamed_addr constant i8*
@_SMLZ3Chr=external unnamed_addr constant i8*
@a=private unnamed_addr constant<{[4x i8],i32,[16x i8]}><{[4x i8]zeroinitializer,i32 -2147483632,[16x i8]c"UTF8.Incomplete\00"}>,align 8
@b=private unnamed_addr constant<{[4x i8],i32,i8*,i32,[4x i8],i32}><{[4x i8]zeroinitializer,i32 -805306352,i8*getelementptr inbounds(i8,i8*getelementptr inbounds(<{[4x i8],i32,[16x i8]}>,<{[4x i8],i32,[16x i8]}>*@a,i32 0,i32 0,i32 0),i32 8),i32 0,[4x i8]zeroinitializer,i32 1}>,align 8
@_SMLDL91=private constant<{[4x i8],i32,i8*}><{[4x i8]zeroinitializer,i32 -1879048184,i8*getelementptr inbounds(i8,i8*getelementptr inbounds(<{[4x i8],i32,i8*,i32,[4x i8],i32}>,<{[4x i8],i32,i8*,i32,[4x i8],i32}>*@b,i32 0,i32 0,i32 0),i32 8)}>,align 8
@c=private unnamed_addr constant<{[4x i8],i32,[40x i8]}><{[4x i8]zeroinitializer,i32 -2147483608,[40x i8]c"src/smlnj-lib/Util/utf8.sml:77.16(2352)\00"}>,align 8
@d=private unnamed_addr constant<{[4x i8],i32,i8*,i8*,i32}><{[4x i8]zeroinitializer,i32 -805306352,i8*getelementptr inbounds(i8,i8*getelementptr inbounds(<{[4x i8],i32,i8*}>,<{[4x i8],i32,i8*}>*@_SMLDL91,i32 0,i32 0,i32 0),i32 8),i8*getelementptr inbounds(i8,i8*getelementptr inbounds(<{[4x i8],i32,[40x i8]}>,<{[4x i8],i32,[40x i8]}>*@c,i32 0,i32 0,i32 0),i32 8),i32 3}>,align 8
@e=private unnamed_addr constant<{[4x i8],i32,i8*,void(...)*,void(...)*,i32}><{[4x i8]zeroinitializer,i32 -805306344,i8*null,void(...)*bitcast(i8*(i32,i32)*@_SMLFN4UTF84getuE to void(...)*),void(...)*bitcast(i8*(i8*,i8*,i8*)*@_SMLLLN4UTF84getuE_212 to void(...)*),i32 -2147483647}>,align 8
@f=private unnamed_addr constant<{[4x i8],i32,i8*,void(...)*,void(...)*,i32}><{[4x i8]zeroinitializer,i32 -805306344,i8*null,void(...)*bitcast(i32(i32)*@_SMLFN4UTF87isAsciiE to void(...)*),void(...)*bitcast(i8*(i8*,i8*)*@_SMLLLN4UTF87isAsciiE_213 to void(...)*),i32 -2147483647}>,align 8
@g=private unnamed_addr constant<{[4x i8],i32,i8*,void(...)*,void(...)*,i32}><{[4x i8]zeroinitializer,i32 -805306344,i8*null,void(...)*bitcast(i8(i32)*@_SMLFN4UTF87toAsciiE to void(...)*),void(...)*bitcast(i8*(i8*,i8*)*@_SMLLLN4UTF87toAsciiE_214 to void(...)*),i32 -2147483647}>,align 8
@h=private unnamed_addr constant<{[4x i8],i32,i8*,void(...)*,void(...)*,i32}><{[4x i8]zeroinitializer,i32 -805306344,i8*null,void(...)*bitcast(i32(i8)*@_SMLFN4UTF89fromAsciiE to void(...)*),void(...)*bitcast(i8*(i8*,i8*)*@_SMLLLN4UTF89fromAsciiE_215 to void(...)*),i32 -2147483647}>,align 8
@i=private unnamed_addr constant<{[4x i8],i32,[3x i8]}><{[4x i8]zeroinitializer,i32 -2147483645,[3x i8]c"\5Cu\00"}>,align 8
@j=private unnamed_addr constant<{[4x i8],i32,i8*,void(...)*,void(...)*,i32}><{[4x i8]zeroinitializer,i32 -805306344,i8*null,void(...)*bitcast(i8*(i32)*@_SMLFN4UTF88toStringE to void(...)*),void(...)*bitcast(i8*(i8*,i8*)*@_SMLLLN4UTF88toStringE_216 to void(...)*),i32 -2147483647}>,align 8
@k=private unnamed_addr constant<{[4x i8],i32,[41x i8]}><{[4x i8]zeroinitializer,i32 -2147483607,[41x i8]c"src/smlnj-lib/Util/utf8.sml:114.16(3680)\00"}>,align 8
@l=private unnamed_addr constant<{[4x i8],i32,[39x i8]}><{[4x i8]zeroinitializer,i32 -2147483609,[39x i8]c"src/smlnj-lib/Util/utf8.sml:30.16(778)\00"}>,align 8
@m=private unnamed_addr constant<{[4x i8],i32,i8*,void(...)*,void(...)*,i32}><{[4x i8]zeroinitializer,i32 -805306344,i8*null,void(...)*bitcast(i8*(i8*)*@_SMLLLN4UTF87encode_GE_157 to void(...)*),void(...)*bitcast(i8*(i8*,i8*)*@_SMLLLN4UTF87encode_GE_217 to void(...)*),i32 -2147483647}>,align 8
@n=private unnamed_addr constant<{[4x i8],i32,i8*,void(...)*,void(...)*,i32}><{[4x i8]zeroinitializer,i32 -805306344,i8*null,void(...)*bitcast(i8*(i32)*@_SMLFN4UTF86encodeE to void(...)*),void(...)*bitcast(i8*(i8*,i8*)*@_SMLLLN4UTF86encodeE_218 to void(...)*),i32 -2147483647}>,align 8
@o=private unnamed_addr constant<{[4x i8],i32,[41x i8]}><{[4x i8]zeroinitializer,i32 -2147483607,[41x i8]c"src/smlnj-lib/Util/utf8.sml:130.18(4199)\00"}>,align 8
@p=private unnamed_addr constant<{[4x i8],i32,i8*,i8*,i32}><{[4x i8]zeroinitializer,i32 -805306352,i8*getelementptr inbounds(i8,i8*getelementptr inbounds(<{[4x i8],i32,i8*}>,<{[4x i8],i32,i8*}>*@_SMLDL91,i32 0,i32 0,i32 0),i32 8),i8*getelementptr inbounds(i8,i8*getelementptr inbounds(<{[4x i8],i32,[41x i8]}>,<{[4x i8],i32,[41x i8]}>*@o,i32 0,i32 0,i32 0),i32 8),i32 3}>,align 8
@q=private unnamed_addr constant<{[4x i8],i32,[40x i8]}><{[4x i8]zeroinitializer,i32 -2147483608,[40x i8]c"src/smlnj-lib/Util/utf8.sml:58.17(1734)\00"}>,align 8
@r=private unnamed_addr constant<{[4x i8],i32,i8*,i8*,i32}><{[4x i8]zeroinitializer,i32 -805306352,i8*getelementptr inbounds(i8,i8*getelementptr inbounds(<{[4x i8],i32,i8*}>,<{[4x i8],i32,i8*}>*@_SMLDL91,i32 0,i32 0,i32 0),i32 8),i8*getelementptr inbounds(i8,i8*getelementptr inbounds(<{[4x i8],i32,[40x i8]}>,<{[4x i8],i32,[40x i8]}>*@q,i32 0,i32 0,i32 0),i32 8),i32 3}>,align 8
@s=private unnamed_addr constant<{[4x i8],i32,[40x i8]}><{[4x i8]zeroinitializer,i32 -2147483608,[40x i8]c"src/smlnj-lib/Util/utf8.sml:52.21(1551)\00"}>,align 8
@t=private unnamed_addr constant<{[4x i8],i32,i8*,i8*,i32}><{[4x i8]zeroinitializer,i32 -805306352,i8*getelementptr inbounds(i8,i8*getelementptr inbounds(<{[4x i8],i32,i8*}>,<{[4x i8],i32,i8*}>*@_SMLDL91,i32 0,i32 0,i32 0),i32 8),i8*getelementptr inbounds(i8,i8*getelementptr inbounds(<{[4x i8],i32,[40x i8]}>,<{[4x i8],i32,[40x i8]}>*@s,i32 0,i32 0,i32 0),i32 8),i32 3}>,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*)*@_SMLFN4UTF84sizeE to void(...)*),void(...)*bitcast(i8*(i8*,i8*)*@_SMLLLN4UTF84sizeE_220 to void(...)*),i32 -2147483647}>,align 8
@v=private unnamed_addr constant<{[4x i8],i32,i8*,void(...)*,void(...)*,i32}><{[4x i8]zeroinitializer,i32 -805306344,i8*null,void(...)*bitcast(i8*(i32,i32)*@_SMLFN4UTF84foldE to void(...)*),void(...)*bitcast(i8*(i8*,i8*,i8*)*@_SMLLLN4UTF84foldE_221 to void(...)*),i32 -2147483647}>,align 8
@w=private unnamed_addr constant<{[4x i8],i32,i8*,void(...)*,void(...)*,i32}><{[4x i8]zeroinitializer,i32 -805306344,i8*null,void(...)*bitcast(i8*(i8*)*@_SMLFN4UTF83allE to void(...)*),void(...)*bitcast(i8*(i8*,i8*)*@_SMLLLN4UTF83allE_223 to void(...)*),i32 -2147483647}>,align 8
@x=private unnamed_addr constant<{[4x i8],i32,i8*,void(...)*,void(...)*,i32}><{[4x i8]zeroinitializer,i32 -805306344,i8*null,void(...)*bitcast(i8*(i8*)*@_SMLFN4UTF86existsE to void(...)*),void(...)*bitcast(i8*(i8*,i8*)*@_SMLLLN4UTF86existsE_225 to void(...)*),i32 -2147483647}>,align 8
@y=private unnamed_addr constant<{[4x i8],i32,i8*,void(...)*,void(...)*,i32}><{[4x i8]zeroinitializer,i32 -805306344,i8*null,void(...)*bitcast(i8*(i8*)*@_SMLFN4UTF87explodeE to void(...)*),void(...)*bitcast(i8*(i8*,i8*)*@_SMLLLN4UTF87explodeE_226 to void(...)*),i32 -2147483647}>,align 8
@z=private unnamed_addr constant<{[4x i8],i32,i8*,void(...)*,void(...)*,i32}><{[4x i8]zeroinitializer,i32 -805306344,i8*null,void(...)*bitcast(i8*(i8*)*@_SMLFN4UTF87implodeE to void(...)*),void(...)*bitcast(i8*(i8*,i8*)*@_SMLLLN4UTF87implodeE_227 to void(...)*),i32 -2147483647}>,align 8
@A=private unnamed_addr constant<{[4x i8],i32,i8*,void(...)*,void(...)*,i32}><{[4x i8]zeroinitializer,i32 -805306344,i8*null,void(...)*bitcast(i8*(i8*)*@_SMLFN4UTF83appE to void(...)*),void(...)*bitcast(i8*(i8*,i8*)*@_SMLLLN4UTF83appE_229 to void(...)*),i32 -2147483647}>,align 8
@_SMLZN4UTF812maxCodePointE=local_unnamed_addr constant i32 1114111
@_SMLZN4UTF810IncompleteE=local_unnamed_addr constant i8*bitcast(i8**getelementptr inbounds(<{[4x i8],i32,i8*}>,<{[4x i8],i32,i8*}>*@_SMLDL91,i64 0,i32 2)to i8*)
@_SMLZN4UTF84getuE=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*)
@_SMLZN4UTF86encodeE=local_unnamed_addr constant i8*bitcast(i8**getelementptr inbounds(<{[4x i8],i32,i8*,void(...)*,void(...)*,i32}>,<{[4x i8],i32,i8*,void(...)*,void(...)*,i32}>*@n,i64 0,i32 2)to i8*)
@_SMLZN4UTF87isAsciiE=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*)
@_SMLZN4UTF87toAsciiE=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*)
@_SMLZN4UTF89fromAsciiE=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*)
@_SMLZN4UTF88toStringE=local_unnamed_addr constant i8*bitcast(i8**getelementptr inbounds(<{[4x i8],i32,i8*,void(...)*,void(...)*,i32}>,<{[4x i8],i32,i8*,void(...)*,void(...)*,i32}>*@j,i64 0,i32 2)to i8*)
@_SMLZN4UTF84sizeE=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*)
@_SMLZN4UTF87explodeE=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*)
@_SMLZN4UTF87implodeE=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*)
@_SMLZN4UTF83appE=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*)
@_SMLZN4UTF84foldE=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*)
@_SMLZN4UTF83allE=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*)
@_SMLZN4UTF86existsE=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*)
@_SML_gvardc75c24a45712161_utf8=private global<{[4x i8],i32,[1x i8*]}><{[4x i8]zeroinitializer,i32 -1342177272,[1x i8*]zeroinitializer}>,align 8
@B=private unnamed_addr global[2x i64][i64 1,i64 sub(i64 ptrtoint(i8**getelementptr inbounds(<{[4x i8],i32,[1x i8*]}>,<{[4x i8],i32,[1x i8*]}>*@_SML_gvardc75c24a45712161_utf8,i32 0,i32 2,i32 0)to i64),i64 ptrtoint([2x i64]*@B to i64))]
@_SML_ftabdc75c24a45712161_utf8=external global i8
@C=private unnamed_addr global i8 0
@_SMLZN4UTF83mapE=alias i8*,getelementptr inbounds(<{[4x i8],i32,[1x i8*]}>,<{[4x i8],i32,[1x i8*]}>*@_SML_gvardc75c24a45712161_utf8,i32 0,i32 2,i32 0)
declare void@llvm.gcroot(i8**,i8*)#0
declare i8*@sml_alloc(i32 inreg)local_unnamed_addr#0
declare void@sml_check(i32 inreg)local_unnamed_addr
declare void@sml_end()local_unnamed_addr#0
declare void@sml_gcroot(i8*,void()*,i8*,i8*)local_unnamed_addr#0
declare i32@sml_personality(...)#0
declare void@sml_raise(i8*inreg)local_unnamed_addr#1
declare void@sml_save_exn(i8*inreg)local_unnamed_addr#0
declare void@sml_start(i8*inreg)local_unnamed_addr#0
declare void@sml_write(i8*inreg,i8**inreg,i8*inreg)local_unnamed_addr#0
declare i8*@_SMLFN10CharVector8fromListE(i8*inreg)local_unnamed_addr#2 gc"smlsharp"
declare i8*@_SMLFN4Char9toCStringE(i8 inreg)local_unnamed_addr#2 gc"smlsharp"
declare i8*@_SMLFN4List3revE(i32 inreg,i32 inreg)local_unnamed_addr#2 gc"smlsharp"
declare i8*@_SMLFN4List5foldrE(i32 inreg,i32 inreg,i32 inreg,i32 inreg)local_unnamed_addr#2 gc"smlsharp"
declare i8*@_SMLFN4List9revAppendE(i32 inreg,i32 inreg)local_unnamed_addr#2 gc"smlsharp"
declare i8*@_SMLFN6String1_ZE(i8*inreg)local_unnamed_addr#2 gc"smlsharp"
declare i8*@_SMLFN6Word328toStringE(i32 inreg)local_unnamed_addr#2 gc"smlsharp"
declare i8*@_SMLFN9StringCvt7padLeftE(i8 inreg)local_unnamed_addr#2 gc"smlsharp"
declare i8*@_SMLFN9Substring4fullE(i8*inreg)local_unnamed_addr#2 gc"smlsharp"
declare i8*@_SMLFN9Substring4getcE(i8*inreg)local_unnamed_addr#2 gc"smlsharp"
declare void@_SML_main5c37eb24573fc5f9_StringCvt()local_unnamed_addr#2 gc"smlsharp"
declare void@_SML_main145db56e6796da5b_Substring()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_main03d87556ec7f64b2_List()local_unnamed_addr#2 gc"smlsharp"
declare void@_SML_main1ef93e13728790b1_String()local_unnamed_addr#2 gc"smlsharp"
declare void@_SML_mainf19563e8df97169c_Word32()local_unnamed_addr#2 gc"smlsharp"
declare void@_SML_load5c37eb24573fc5f9_StringCvt(i8*)local_unnamed_addr
declare void@_SML_load145db56e6796da5b_Substring(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_load03d87556ec7f64b2_List(i8*)local_unnamed_addr
declare void@_SML_load1ef93e13728790b1_String(i8*)local_unnamed_addr
declare void@_SML_loadf19563e8df97169c_Word32(i8*)local_unnamed_addr
define private void@_SML_tabbdc75c24a45712161_utf8()#3{
unreachable
}
define void@_SML_loaddc75c24a45712161_utf8(i8*%a)local_unnamed_addr#0{
%b=load i8,i8*@C,align 1
%c=icmp eq i8%b,0
br i1%c,label%e,label%d
d:
ret void
e:
store i8 1,i8*@C,align 1
tail call void@_SML_load5c37eb24573fc5f9_StringCvt(i8*%a)#0
tail call void@_SML_load145db56e6796da5b_Substring(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_load03d87556ec7f64b2_List(i8*%a)#0
tail call void@_SML_load1ef93e13728790b1_String(i8*%a)#0
tail call void@_SML_loadf19563e8df97169c_Word32(i8*%a)#0
tail call void@sml_gcroot(i8*%a,void()*@_SML_tabbdc75c24a45712161_utf8,i8*@_SML_ftabdc75c24a45712161_utf8,i8*bitcast([2x i64]*@B to i8*))#0
ret void
}
define void@_SML_maindc75c24a45712161_utf8()local_unnamed_addr#2 gc"smlsharp"personality i32(...)*@sml_personality{
%a=alloca[3x i8*],align 8
%b=alloca i8*,align 8
%c=alloca i8*,align 8
%d=load i8,i8*@C,align 1
%e=and i8%d,2
%f=icmp eq i8%e,0
br i1%f,label%h,label%g
g:
ret void
h:
store i8 3,i8*@C,align 1
tail call void@_SML_main5c37eb24573fc5f9_StringCvt()#2
tail call void@_SML_main145db56e6796da5b_Substring()#2
tail call void@_SML_maince7036f3433e1102_Char()#2
tail call void@_SML_mainadbb5309e852b68c_CharVector()#2
tail call void@_SML_main03d87556ec7f64b2_List()#2
tail call void@_SML_main1ef93e13728790b1_String()#2
tail call void@_SML_mainf19563e8df97169c_Word32()#2
call void@llvm.gcroot(i8**%b,i8*null)#0
call void@llvm.gcroot(i8**%c,i8*null)#0
%i=bitcast[3x i8*]*%a to i8*
call void@sml_start(i8*inreg%i)#0
%j=load atomic i32,i32*@sml_check_flag unordered,align 4
%k=icmp eq i32%j,0
br i1%k,label%m,label%l
l:
invoke void@sml_check(i32 inreg%j)
to label%m unwind label%H
m:
%n=invoke fastcc i8*@_SMLFN4List3revE(i32 inreg 0,i32 inreg 1)
to label%o unwind label%H
o:
store i8*%n,i8**%b,align 8
%p=call i8*@sml_alloc(i32 inreg 12)#0
%q=getelementptr inbounds i8,i8*%p,i64 -4
%r=bitcast i8*%q to i32*
store i32 1342177288,i32*%r,align 4
store i8*%p,i8**%c,align 8
%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=getelementptr inbounds i8,i8*%p,i64 8
%v=bitcast i8*%u to i32*
store i32 1,i32*%v,align 4
%w=call i8*@sml_alloc(i32 inreg 28)#0
%x=getelementptr inbounds i8,i8*%w,i64 -4
%y=bitcast i8*%x to i32*
store i32 1342177304,i32*%y,align 4
%z=load i8*,i8**%c,align 8
%A=bitcast i8*%w to i8**
store i8*%z,i8**%A,align 8
%B=getelementptr inbounds i8,i8*%w,i64 8
%C=bitcast i8*%B to void(...)**
store void(...)*bitcast(i8*(i8*,i8*)*@_SMLLLN4UTF83mapE_210 to void(...)*),void(...)**%C,align 8
%D=getelementptr inbounds i8,i8*%w,i64 16
%E=bitcast i8*%D to void(...)**
store void(...)*bitcast(i8*(i8*,i8*)*@_SMLLLN4UTF83mapE_210 to void(...)*),void(...)**%E,align 8
%F=getelementptr inbounds i8,i8*%w,i64 24
%G=bitcast i8*%F to i32*
store i32 -2147483647,i32*%G,align 4
call void@sml_write(i8*inreg bitcast(i8**getelementptr inbounds(<{[4x i8],i32,[1x i8*]}>,<{[4x i8],i32,[1x i8*]}>*@_SML_gvardc75c24a45712161_utf8,i64 0,i32 2,i64 0)to i8*),i8**inreg getelementptr inbounds(<{[4x i8],i32,[1x i8*]}>,<{[4x i8],i32,[1x i8*]}>*@_SML_gvardc75c24a45712161_utf8,i64 0,i32 2,i64 0),i8*inreg%w)#0
call void@sml_end()#0
ret void
H:
%I=landingpad{i8*,i8*}
cleanup
%J=extractvalue{i8*,i8*}%I,1
call void@sml_save_exn(i8*inreg%J)#0
call void@sml_end()#0
resume{i8*,i8*}%I
}
define internal fastcc i8*@_SMLLL3get_118(i8*inreg%a,i8*inreg%b)#2 gc"smlsharp"{
m:
%c=alloca i8*,align 8
%d=alloca i8*,align 8
%e=alloca i8*,align 8
call void@llvm.gcroot(i8**%c,i8*null)#0
call void@llvm.gcroot(i8**%d,i8*null)#0
call void@llvm.gcroot(i8**%e,i8*null)#0
store i8*%a,i8**%d,align 8
store i8*%b,i8**%c,align 8
%f=load atomic i32,i32*@sml_check_flag unordered,align 4
%g=icmp eq i32%f,0
br i1%g,label%k,label%h
h:
call void@sml_check(i32 inreg%f)
%i=load i8*,i8**%d,align 8
%j=load i8*,i8**%c,align 8
br label%k
k:
%l=phi i8*[%j,%h],[%b,%m]
%n=phi i8*[%i,%h],[%a,%m]
%o=getelementptr inbounds i8,i8*%n,i64 12
%p=bitcast i8*%o to i32*
%q=load i32,i32*%p,align 4
%r=sub i32 0,%q
%s=and i32%q,%r
%t=add i32%q,3
%u=and i32%t,%r
%v=add i32%q,7
%w=add i32%v,%u
%x=and i32%w,-8
%y=lshr i32%u,3
%z=getelementptr inbounds i8,i8*%n,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=bitcast i8*%n to i8**
%F=load i8*,i8**%E,align 8
%G=getelementptr inbounds i8,i8*%F,i64 16
%H=bitcast i8*%G to i8*(i8*,i8*)**
%I=load i8*(i8*,i8*)*,i8*(i8*,i8*)**%H,align 8
%J=bitcast i8*%F to i8**
%K=load i8*,i8**%J,align 8
store i8*null,i8**%c,align 8
%L=call fastcc i8*%I(i8*inreg%K,i8*inreg%l)
%M=icmp eq i8*%L,null
br i1%M,label%N,label%O
N:
ret i8*null
O:
%P=bitcast i8*%L to i8**
%Q=load i8*,i8**%P,align 8
store i8*%Q,i8**%c,align 8
%R=load i8,i8*%Q,align 1
%S=load i8*,i8**%d,align 8
%T=getelementptr inbounds i8,i8*%S,i64 8
%U=bitcast i8*%T to i32*
%V=load i32,i32*%U,align 4
%W=icmp eq i32%V,0
br i1%W,label%ac,label%X
X:
store i8*null,i8**%c,align 8
%Y=sext i32%s to i64
%Z=getelementptr inbounds i8,i8*%Q,i64%Y
%aa=bitcast i8*%Z to i8**
%ab=load i8*,i8**%aa,align 8
br label%am
ac:
%ad=getelementptr inbounds i8,i8*%S,i64 12
%ae=bitcast i8*%ad to i32*
%af=load i32,i32*%ae,align 4
%ag=call i8*@sml_alloc(i32 inreg%af)#0
%ah=getelementptr inbounds i8,i8*%ag,i64 -4
%ai=bitcast i8*%ah to i32*
store i32%af,i32*%ai,align 4
%aj=load i8*,i8**%c,align 8
store i8*null,i8**%c,align 8
%ak=sext i32%s to i64
%al=getelementptr inbounds i8,i8*%aj,i64%ak
call void@llvm.memcpy.p0i8.p0i8.i32(i8*%ag,i8*%al,i32%af,i1 false)
br label%am
am:
%an=phi i8*[%ag,%ac],[%ab,%X]
store i8*%an,i8**%c,align 8
%ao=zext i8%R to i32
%ap=icmp slt i8%R,0
br i1%ap,label%aN,label%aq
aq:
%ar=load i8*,i8**%d,align 8
%as=getelementptr inbounds i8,i8*%ar,i64 12
%at=bitcast i8*%as to i32*
%au=load i32,i32*%at,align 4
%av=getelementptr inbounds i8,i8*%ar,i64 8
%aw=bitcast i8*%av to i32*
%ax=load i32,i32*%aw,align 4
%ay=call i8*@sml_alloc(i32 inreg%D)#0
%az=or i32%x,1342177280
%aA=bitcast i8*%ay to i32*
%aB=getelementptr inbounds i8,i8*%ay,i64 -4
%aC=bitcast i8*%aB to i32*
store i32%az,i32*%aC,align 4
call void@llvm.memset.p0i8.i32(i8*%ay,i8 0,i32%D,i1 false)
store i32%ao,i32*%aA,align 4
%aD=icmp eq i32%ax,0
%aE=load i8*,i8**%c,align 8
store i8*null,i8**%c,align 8
%aF=sext i32%u to i64
%aG=getelementptr inbounds i8,i8*%ay,i64%aF
br i1%aD,label%aH,label%aI
aH:
call void@llvm.memcpy.p0i8.p0i8.i32(i8*%aG,i8*%aE,i32%au,i1 false)
br label%aK
aI:
%aJ=bitcast i8*%aG to i8**
store i8*%aE,i8**%aJ,align 8
br label%aK
aK:
%aL=sext i32%x to i64
%aM=getelementptr inbounds i8,i8*%ay,i64%aL
br label%jF
aN:
%aO=icmp ugt i8%R,-33
br i1%aO,label%b8,label%aP
aP:
%aQ=bitcast i8**%d to i8***
%aR=load i8**,i8***%aQ,align 8
%aS=load i8*,i8**%aR,align 8
%aT=getelementptr inbounds i8,i8*%aS,i64 16
%aU=bitcast i8*%aT to i8*(i8*,i8*)**
%aV=load i8*(i8*,i8*)*,i8*(i8*,i8*)**%aU,align 8
%aW=bitcast i8*%aS to i8**
%aX=load i8*,i8**%aW,align 8
store i8*null,i8**%c,align 8
%aY=call fastcc i8*%aV(i8*inreg%aX,i8*inreg%an)
%aZ=icmp eq i8*%aY,null
br i1%aZ,label%a0,label%a7
a0:
store i8*null,i8**%d,align 8
%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=bitcast i8*%a1 to i8**
store i8*bitcast(i8**getelementptr inbounds(<{[4x i8],i32,i8*,i8*,i32}>,<{[4x i8],i32,i8*,i8*,i32}>*@t,i64 0,i32 2)to i8*),i8**%a6,align 8
call void@sml_raise(i8*inreg%a1)#1
unreachable
a7:
%a8=bitcast i8*%aY to i8**
%a9=load i8*,i8**%a8,align 8
store i8*%a9,i8**%c,align 8
%ba=load i8,i8*%a9,align 1
%bb=load i8*,i8**%d,align 8
%bc=getelementptr inbounds i8,i8*%bb,i64 8
%bd=bitcast i8*%bc to i32*
%be=load i32,i32*%bd,align 4
%bf=icmp eq i32%be,0
br i1%bf,label%bl,label%bg
bg:
store i8*null,i8**%c,align 8
%bh=sext i32%s to i64
%bi=getelementptr inbounds i8,i8*%a9,i64%bh
%bj=bitcast i8*%bi to i8**
%bk=load i8*,i8**%bj,align 8
br label%bv
bl:
%bm=getelementptr inbounds i8,i8*%bb,i64 12
%bn=bitcast i8*%bm to i32*
%bo=load i32,i32*%bn,align 4
%bp=call i8*@sml_alloc(i32 inreg%bo)#0
%bq=getelementptr inbounds i8,i8*%bp,i64 -4
%br=bitcast i8*%bq to i32*
store i32%bo,i32*%br,align 4
%bs=load i8*,i8**%c,align 8
store i8*null,i8**%c,align 8
%bt=sext i32%s to i64
%bu=getelementptr inbounds i8,i8*%bs,i64%bt
call void@llvm.memcpy.p0i8.p0i8.i32(i8*%bp,i8*%bu,i32%bo,i1 false)
br label%bv
bv:
%bw=phi i8*[%bp,%bl],[%bk,%bg]
store i8*%bw,i8**%c,align 8
%bx=zext i8%ba to i32
%by=and i32%bx,192
%bz=icmp eq i32%by,128
br i1%bz,label%bA,label%b1
bA:
%bB=shl nuw nsw i32%ao,6
%bC=and i32%bB,1984
%bD=and i32%bx,63
%bE=or i32%bD,%bC
%bF=load i8*,i8**%d,align 8
%bG=getelementptr inbounds i8,i8*%bF,i64 12
%bH=bitcast i8*%bG to i32*
%bI=load i32,i32*%bH,align 4
%bJ=getelementptr inbounds i8,i8*%bF,i64 8
%bK=bitcast i8*%bJ to i32*
%bL=load i32,i32*%bK,align 4
%bM=call i8*@sml_alloc(i32 inreg%D)#0
%bN=or i32%x,1342177280
%bO=bitcast i8*%bM to i32*
%bP=getelementptr inbounds i8,i8*%bM,i64 -4
%bQ=bitcast i8*%bP to i32*
store i32%bN,i32*%bQ,align 4
call void@llvm.memset.p0i8.i32(i8*%bM,i8 0,i32%D,i1 false)
store i32%bE,i32*%bO,align 4
%bR=icmp eq i32%bL,0
%bS=load i8*,i8**%c,align 8
store i8*null,i8**%c,align 8
%bT=sext i32%u to i64
%bU=getelementptr inbounds i8,i8*%bM,i64%bT
br i1%bR,label%bV,label%bW
bV:
call void@llvm.memcpy.p0i8.p0i8.i32(i8*%bU,i8*%bS,i32%bI,i1 false)
br label%bY
bW:
%bX=bitcast i8*%bU to i8**
store i8*%bS,i8**%bX,align 8
br label%bY
bY:
%bZ=sext i32%x to i64
%b0=getelementptr inbounds i8,i8*%bM,i64%bZ
br label%jF
b1:
store i8*null,i8**%c,align 8
store i8*null,i8**%d,align 8
%b2=call i8*@sml_alloc(i32 inreg 60)#0
%b3=getelementptr inbounds i8,i8*%b2,i64 -4
%b4=bitcast i8*%b3 to i32*
store i32 1342177336,i32*%b4,align 4
%b5=getelementptr inbounds i8,i8*%b2,i64 56
%b6=bitcast i8*%b5 to i32*
store i32 1,i32*%b6,align 4
%b7=bitcast i8*%b2 to i8**
store i8*bitcast(i8**getelementptr inbounds(<{[4x i8],i32,i8*,i8*,i32}>,<{[4x i8],i32,i8*,i8*,i32}>*@r,i64 0,i32 2)to i8*),i8**%b7,align 8
call void@sml_raise(i8*inreg%b2)#1
unreachable
b8:
%b9=icmp ugt i8%R,-17
br i1%b9,label%e3,label%ca
ca:
%cb=bitcast i8**%d to i8***
%cc=load i8**,i8***%cb,align 8
%cd=load i8*,i8**%cc,align 8
%ce=getelementptr inbounds i8,i8*%cd,i64 16
%cf=bitcast i8*%ce to i8*(i8*,i8*)**
%cg=load i8*(i8*,i8*)*,i8*(i8*,i8*)**%cf,align 8
%ch=bitcast i8*%cd to i8**
%ci=load i8*,i8**%ch,align 8
store i8*null,i8**%c,align 8
%cj=call fastcc i8*%cg(i8*inreg%ci,i8*inreg%an)
%ck=icmp eq i8*%cj,null
br i1%ck,label%cl,label%cs
cl:
store i8*null,i8**%d,align 8
%cm=call i8*@sml_alloc(i32 inreg 60)#0
%cn=getelementptr inbounds i8,i8*%cm,i64 -4
%co=bitcast i8*%cn to i32*
store i32 1342177336,i32*%co,align 4
%cp=getelementptr inbounds i8,i8*%cm,i64 56
%cq=bitcast i8*%cp to i32*
store i32 1,i32*%cq,align 4
%cr=bitcast i8*%cm to i8**
store i8*bitcast(i8**getelementptr inbounds(<{[4x i8],i32,i8*,i8*,i32}>,<{[4x i8],i32,i8*,i8*,i32}>*@t,i64 0,i32 2)to i8*),i8**%cr,align 8
call void@sml_raise(i8*inreg%cm)#1
unreachable
cs:
%ct=bitcast i8*%cj to i8**
%cu=load i8*,i8**%ct,align 8
store i8*%cu,i8**%c,align 8
%cv=load i8,i8*%cu,align 1
%cw=load i8*,i8**%d,align 8
%cx=getelementptr inbounds i8,i8*%cw,i64 8
%cy=bitcast i8*%cx to i32*
%cz=load i32,i32*%cy,align 4
%cA=icmp eq i32%cz,0
br i1%cA,label%cG,label%cB
cB:
store i8*null,i8**%c,align 8
%cC=sext i32%s to i64
%cD=getelementptr inbounds i8,i8*%cu,i64%cC
%cE=bitcast i8*%cD to i8**
%cF=load i8*,i8**%cE,align 8
br label%cQ
cG:
%cH=getelementptr inbounds i8,i8*%cw,i64 12
%cI=bitcast i8*%cH to i32*
%cJ=load i32,i32*%cI,align 4
%cK=call i8*@sml_alloc(i32 inreg%cJ)#0
%cL=getelementptr inbounds i8,i8*%cK,i64 -4
%cM=bitcast i8*%cL to i32*
store i32%cJ,i32*%cM,align 4
%cN=load i8*,i8**%c,align 8
store i8*null,i8**%c,align 8
%cO=sext i32%s to i64
%cP=getelementptr inbounds i8,i8*%cN,i64%cO
call void@llvm.memcpy.p0i8.p0i8.i32(i8*%cK,i8*%cP,i32%cJ,i1 false)
br label%cQ
cQ:
%cR=phi i8*[%cK,%cG],[%cF,%cB]
store i8*%cR,i8**%c,align 8
%cS=zext i8%cv to i32
%cT=and i32%cS,192
%cU=icmp eq i32%cT,128
br i1%cU,label%cV,label%dz
cV:
%cW=shl nuw nsw i32%ao,6
%cX=and i32%cW,960
%cY=and i32%cS,63
%cZ=or i32%cY,%cX
%c0=load i8*,i8**%d,align 8
%c1=getelementptr inbounds i8,i8*%c0,i64 12
%c2=bitcast i8*%c1 to i32*
%c3=load i32,i32*%c2,align 4
%c4=getelementptr inbounds i8,i8*%c0,i64 8
%c5=bitcast i8*%c4 to i32*
%c6=load i32,i32*%c5,align 4
%c7=call i8*@sml_alloc(i32 inreg%D)#0
%c8=or i32%x,1342177280
%c9=bitcast i8*%c7 to i32*
%da=getelementptr inbounds i8,i8*%c7,i64 -4
%db=bitcast i8*%da to i32*
store i32%c8,i32*%db,align 4
call void@llvm.memset.p0i8.i32(i8*%c7,i8 0,i32%D,i1 false)
store i32%cZ,i32*%c9,align 4
%dc=icmp eq i32%c6,0
%dd=load i8*,i8**%c,align 8
store i8*null,i8**%c,align 8
%de=sext i32%u to i64
%df=getelementptr inbounds i8,i8*%c7,i64%de
br i1%dc,label%dg,label%dh
dg:
call void@llvm.memcpy.p0i8.p0i8.i32(i8*%df,i8*%dd,i32%c3,i1 false)
br label%dj
dh:
%di=bitcast i8*%df to i8**
store i8*%dd,i8**%di,align 8
br label%dj
dj:
%dk=sext i32%x to i64
%dl=getelementptr inbounds i8,i8*%c7,i64%dk
%dm=bitcast i8*%dl to i32*
store i32%C,i32*%dm,align 4
store i8*%c7,i8**%c,align 8
%dn=load i32,i32*%c9,align 4
%do=load i8**,i8***%cb,align 8
%dp=load i8*,i8**%do,align 8
%dq=getelementptr inbounds i8,i8*%dp,i64 16
%dr=bitcast i8*%dq to i8*(i8*,i8*)**
%ds=load i8*(i8*,i8*)*,i8*(i8*,i8*)**%dr,align 8
%dt=bitcast i8*%dp to i8**
%du=load i8*,i8**%dt,align 8
store i8*%du,i8**%e,align 8
%dv=getelementptr inbounds i8*,i8**%do,i64 1
%dw=bitcast i8**%dv to i32*
%dx=load i32,i32*%dw,align 4
%dy=icmp eq i32%dx,0
br i1%dy,label%dJ,label%dG
dz:
store i8*null,i8**%c,align 8
store i8*null,i8**%d,align 8
%dA=call i8*@sml_alloc(i32 inreg 60)#0
%dB=getelementptr inbounds i8,i8*%dA,i64 -4
%dC=bitcast i8*%dB to i32*
store i32 1342177336,i32*%dC,align 4
%dD=getelementptr inbounds i8,i8*%dA,i64 56
%dE=bitcast i8*%dD to i32*
store i32 1,i32*%dE,align 4
%dF=bitcast i8*%dA to i8**
store i8*bitcast(i8**getelementptr inbounds(<{[4x i8],i32,i8*,i8*,i32}>,<{[4x i8],i32,i8*,i8*,i32}>*@r,i64 0,i32 2)to i8*),i8**%dF,align 8
call void@sml_raise(i8*inreg%dA)#1
unreachable
dG:
store i8*null,i8**%c,align 8
%dH=bitcast i8*%df to i8**
%dI=load i8*,i8**%dH,align 8
br label%dU
dJ:
%dK=bitcast i8**%do to i8*
%dL=getelementptr inbounds i8,i8*%dK,i64 12
%dM=bitcast i8*%dL to i32*
%dN=load i32,i32*%dM,align 4
%dO=call i8*@sml_alloc(i32 inreg%dN)#0
%dP=getelementptr inbounds i8,i8*%dO,i64 -4
%dQ=bitcast i8*%dP to i32*
store i32%dN,i32*%dQ,align 4
%dR=load i8*,i8**%c,align 8
store i8*null,i8**%c,align 8
%dS=getelementptr inbounds i8,i8*%dR,i64%de
call void@llvm.memcpy.p0i8.p0i8.i32(i8*%dO,i8*%dS,i32%dN,i1 false)
%dT=load i8*,i8**%e,align 8
br label%dU
dU:
%dV=phi i8*[%du,%dG],[%dT,%dJ]
%dW=phi i8*[%dI,%dG],[%dO,%dJ]
store i8*null,i8**%e,align 8
%dX=call fastcc i8*%ds(i8*inreg%dV,i8*inreg%dW)
%dY=icmp eq i8*%dX,null
br i1%dY,label%dZ,label%d6
dZ:
store i8*null,i8**%d,align 8
%d0=call i8*@sml_alloc(i32 inreg 60)#0
%d1=getelementptr inbounds i8,i8*%d0,i64 -4
%d2=bitcast i8*%d1 to i32*
store i32 1342177336,i32*%d2,align 4
%d3=getelementptr inbounds i8,i8*%d0,i64 56
%d4=bitcast i8*%d3 to i32*
store i32 1,i32*%d4,align 4
%d5=bitcast i8*%d0 to i8**
store i8*bitcast(i8**getelementptr inbounds(<{[4x i8],i32,i8*,i8*,i32}>,<{[4x i8],i32,i8*,i8*,i32}>*@t,i64 0,i32 2)to i8*),i8**%d5,align 8
call void@sml_raise(i8*inreg%d0)#1
unreachable
d6:
%d7=bitcast i8*%dX to i8**
%d8=load i8*,i8**%d7,align 8
store i8*%d8,i8**%c,align 8
%d9=load i8,i8*%d8,align 1
%ea=load i8*,i8**%d,align 8
%eb=getelementptr inbounds i8,i8*%ea,i64 8
%ec=bitcast i8*%eb to i32*
%ed=load i32,i32*%ec,align 4
%ee=icmp eq i32%ed,0
br i1%ee,label%ek,label%ef
ef:
store i8*null,i8**%c,align 8
%eg=sext i32%s to i64
%eh=getelementptr inbounds i8,i8*%d8,i64%eg
%ei=bitcast i8*%eh to i8**
%ej=load i8*,i8**%ei,align 8
br label%eu
ek:
%el=getelementptr inbounds i8,i8*%ea,i64 12
%em=bitcast i8*%el to i32*
%en=load i32,i32*%em,align 4
%eo=call i8*@sml_alloc(i32 inreg%en)#0
%ep=getelementptr inbounds i8,i8*%eo,i64 -4
%eq=bitcast i8*%ep to i32*
store i32%en,i32*%eq,align 4
%er=load i8*,i8**%c,align 8
store i8*null,i8**%c,align 8
%es=sext i32%s to i64
%et=getelementptr inbounds i8,i8*%er,i64%es
call void@llvm.memcpy.p0i8.p0i8.i32(i8*%eo,i8*%et,i32%en,i1 false)
br label%eu
eu:
%ev=phi i8*[%eo,%ek],[%ej,%ef]
store i8*%ev,i8**%c,align 8
%ew=zext i8%d9 to i32
%ex=and i32%ew,192
%ey=icmp eq i32%ex,128
br i1%ey,label%ez,label%eW
ez:
%eA=shl i32%dn,6
%eB=and i32%ew,63
%eC=or i32%eB,%eA
%eD=load i8*,i8**%d,align 8
%eE=getelementptr inbounds i8,i8*%eD,i64 12
%eF=bitcast i8*%eE to i32*
%eG=load i32,i32*%eF,align 4
%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%D)#0
%eL=bitcast i8*%eK to i32*
%eM=getelementptr inbounds i8,i8*%eK,i64 -4
%eN=bitcast i8*%eM to i32*
store i32%c8,i32*%eN,align 4
call void@llvm.memset.p0i8.i32(i8*%eK,i8 0,i32%D,i1 false)
store i32%eC,i32*%eL,align 4
%eO=icmp eq i32%eJ,0
%eP=load i8*,i8**%c,align 8
store i8*null,i8**%c,align 8
%eQ=getelementptr inbounds i8,i8*%eK,i64%de
br i1%eO,label%eR,label%eS
eR:
call void@llvm.memcpy.p0i8.p0i8.i32(i8*%eQ,i8*%eP,i32%eG,i1 false)
br label%eU
eS:
%eT=bitcast i8*%eQ to i8**
store i8*%eP,i8**%eT,align 8
br label%eU
eU:
%eV=getelementptr inbounds i8,i8*%eK,i64%dk
br label%jF
eW:
store i8*null,i8**%c,align 8
store i8*null,i8**%d,align 8
%eX=call i8*@sml_alloc(i32 inreg 60)#0
%eY=getelementptr inbounds i8,i8*%eX,i64 -4
%eZ=bitcast i8*%eY to i32*
store i32 1342177336,i32*%eZ,align 4
%e0=getelementptr inbounds i8,i8*%eX,i64 56
%e1=bitcast i8*%e0 to i32*
store i32 1,i32*%e1,align 4
%e2=bitcast i8*%eX to i8**
store i8*bitcast(i8**getelementptr inbounds(<{[4x i8],i32,i8*,i8*,i32}>,<{[4x i8],i32,i8*,i8*,i32}>*@r,i64 0,i32 2)to i8*),i8**%e2,align 8
call void@sml_raise(i8*inreg%eX)#1
unreachable
e3:
%e4=icmp ugt i8%R,-9
br i1%e4,label%jy,label%e5
e5:
%e6=bitcast i8**%d to i8***
%e7=load i8**,i8***%e6,align 8
%e8=load i8*,i8**%e7,align 8
%e9=getelementptr inbounds i8,i8*%e8,i64 16
%fa=bitcast i8*%e9 to i8*(i8*,i8*)**
%fb=load i8*(i8*,i8*)*,i8*(i8*,i8*)**%fa,align 8
%fc=bitcast i8*%e8 to i8**
%fd=load i8*,i8**%fc,align 8
store i8*null,i8**%c,align 8
%fe=call fastcc i8*%fb(i8*inreg%fd,i8*inreg%an)
%ff=icmp eq i8*%fe,null
br i1%ff,label%fg,label%fn
fg:
store i8*null,i8**%d,align 8
%fh=call i8*@sml_alloc(i32 inreg 60)#0
%fi=getelementptr inbounds i8,i8*%fh,i64 -4
%fj=bitcast i8*%fi to i32*
store i32 1342177336,i32*%fj,align 4
%fk=getelementptr inbounds i8,i8*%fh,i64 56
%fl=bitcast i8*%fk to i32*
store i32 1,i32*%fl,align 4
%fm=bitcast i8*%fh to i8**
store i8*bitcast(i8**getelementptr inbounds(<{[4x i8],i32,i8*,i8*,i32}>,<{[4x i8],i32,i8*,i8*,i32}>*@t,i64 0,i32 2)to i8*),i8**%fm,align 8
call void@sml_raise(i8*inreg%fh)#1
unreachable
fn:
%fo=bitcast i8*%fe to i8**
%fp=load i8*,i8**%fo,align 8
store i8*%fp,i8**%c,align 8
%fq=load i8,i8*%fp,align 1
%fr=load i8*,i8**%d,align 8
%fs=getelementptr inbounds i8,i8*%fr,i64 8
%ft=bitcast i8*%fs to i32*
%fu=load i32,i32*%ft,align 4
%fv=icmp eq i32%fu,0
br i1%fv,label%fB,label%fw
fw:
store i8*null,i8**%c,align 8
%fx=sext i32%s to i64
%fy=getelementptr inbounds i8,i8*%fp,i64%fx
%fz=bitcast i8*%fy to i8**
%fA=load i8*,i8**%fz,align 8
br label%fL
fB:
%fC=getelementptr inbounds i8,i8*%fr,i64 12
%fD=bitcast i8*%fC to i32*
%fE=load i32,i32*%fD,align 4
%fF=call i8*@sml_alloc(i32 inreg%fE)#0
%fG=getelementptr inbounds i8,i8*%fF,i64 -4
%fH=bitcast i8*%fG to i32*
store i32%fE,i32*%fH,align 4
%fI=load i8*,i8**%c,align 8
store i8*null,i8**%c,align 8
%fJ=sext i32%s to i64
%fK=getelementptr inbounds i8,i8*%fI,i64%fJ
call void@llvm.memcpy.p0i8.p0i8.i32(i8*%fF,i8*%fK,i32%fE,i1 false)
br label%fL
fL:
%fM=phi i8*[%fF,%fB],[%fA,%fw]
store i8*%fM,i8**%c,align 8
%fN=zext i8%fq to i32
%fO=and i32%fN,192
%fP=icmp eq i32%fO,128
br i1%fP,label%fQ,label%gu
fQ:
%fR=shl nuw nsw i32%ao,6
%fS=and i32%fR,448
%fT=and i32%fN,63
%fU=or i32%fT,%fS
%fV=load i8*,i8**%d,align 8
%fW=getelementptr inbounds i8,i8*%fV,i64 12
%fX=bitcast i8*%fW to i32*
%fY=load i32,i32*%fX,align 4
%fZ=getelementptr inbounds i8,i8*%fV,i64 8
%f0=bitcast i8*%fZ to i32*
%f1=load i32,i32*%f0,align 4
%f2=call i8*@sml_alloc(i32 inreg%D)#0
%f3=or i32%x,1342177280
%f4=bitcast i8*%f2 to i32*
%f5=getelementptr inbounds i8,i8*%f2,i64 -4
%f6=bitcast i8*%f5 to i32*
store i32%f3,i32*%f6,align 4
call void@llvm.memset.p0i8.i32(i8*%f2,i8 0,i32%D,i1 false)
store i32%fU,i32*%f4,align 4
%f7=icmp eq i32%f1,0
%f8=load i8*,i8**%c,align 8
store i8*null,i8**%c,align 8
%f9=sext i32%u to i64
%ga=getelementptr inbounds i8,i8*%f2,i64%f9
br i1%f7,label%gb,label%gc
gb:
call void@llvm.memcpy.p0i8.p0i8.i32(i8*%ga,i8*%f8,i32%fY,i1 false)
br label%ge
gc:
%gd=bitcast i8*%ga to i8**
store i8*%f8,i8**%gd,align 8
br label%ge
ge:
%gf=sext i32%x to i64
%gg=getelementptr inbounds i8,i8*%f2,i64%gf
%gh=bitcast i8*%gg to i32*
store i32%C,i32*%gh,align 4
store i8*%f2,i8**%c,align 8
%gi=load i32,i32*%f4,align 4
%gj=load i8**,i8***%e6,align 8
%gk=load i8*,i8**%gj,align 8
%gl=getelementptr inbounds i8,i8*%gk,i64 16
%gm=bitcast i8*%gl to i8*(i8*,i8*)**
%gn=load i8*(i8*,i8*)*,i8*(i8*,i8*)**%gm,align 8
%go=bitcast i8*%gk to i8**
%gp=load i8*,i8**%go,align 8
store i8*%gp,i8**%e,align 8
%gq=getelementptr inbounds i8*,i8**%gj,i64 1
%gr=bitcast i8**%gq to i32*
%gs=load i32,i32*%gr,align 4
%gt=icmp eq i32%gs,0
br i1%gt,label%gE,label%gB
gu:
store i8*null,i8**%c,align 8
store i8*null,i8**%d,align 8
%gv=call i8*@sml_alloc(i32 inreg 60)#0
%gw=getelementptr inbounds i8,i8*%gv,i64 -4
%gx=bitcast i8*%gw to i32*
store i32 1342177336,i32*%gx,align 4
%gy=getelementptr inbounds i8,i8*%gv,i64 56
%gz=bitcast i8*%gy to i32*
store i32 1,i32*%gz,align 4
%gA=bitcast i8*%gv to i8**
store i8*bitcast(i8**getelementptr inbounds(<{[4x i8],i32,i8*,i8*,i32}>,<{[4x i8],i32,i8*,i8*,i32}>*@r,i64 0,i32 2)to i8*),i8**%gA,align 8
call void@sml_raise(i8*inreg%gv)#1
unreachable
gB:
store i8*null,i8**%c,align 8
%gC=bitcast i8*%ga to i8**
%gD=load i8*,i8**%gC,align 8
br label%gP
gE:
%gF=bitcast i8**%gj to i8*
%gG=getelementptr inbounds i8,i8*%gF,i64 12
%gH=bitcast i8*%gG to i32*
%gI=load i32,i32*%gH,align 4
%gJ=call i8*@sml_alloc(i32 inreg%gI)#0
%gK=getelementptr inbounds i8,i8*%gJ,i64 -4
%gL=bitcast i8*%gK to i32*
store i32%gI,i32*%gL,align 4
%gM=load i8*,i8**%c,align 8
store i8*null,i8**%c,align 8
%gN=getelementptr inbounds i8,i8*%gM,i64%f9
call void@llvm.memcpy.p0i8.p0i8.i32(i8*%gJ,i8*%gN,i32%gI,i1 false)
%gO=load i8*,i8**%e,align 8
br label%gP
gP:
%gQ=phi i8*[%gp,%gB],[%gO,%gE]
%gR=phi i8*[%gD,%gB],[%gJ,%gE]
store i8*null,i8**%e,align 8
%gS=call fastcc i8*%gn(i8*inreg%gQ,i8*inreg%gR)
%gT=icmp eq i8*%gS,null
br i1%gT,label%gU,label%g1
gU:
store i8*null,i8**%d,align 8
%gV=call i8*@sml_alloc(i32 inreg 60)#0
%gW=getelementptr inbounds i8,i8*%gV,i64 -4
%gX=bitcast i8*%gW to i32*
store i32 1342177336,i32*%gX,align 4
%gY=getelementptr inbounds i8,i8*%gV,i64 56
%gZ=bitcast i8*%gY to i32*
store i32 1,i32*%gZ,align 4
%g0=bitcast i8*%gV to i8**
store i8*bitcast(i8**getelementptr inbounds(<{[4x i8],i32,i8*,i8*,i32}>,<{[4x i8],i32,i8*,i8*,i32}>*@t,i64 0,i32 2)to i8*),i8**%g0,align 8
call void@sml_raise(i8*inreg%gV)#1
unreachable
g1:
%g2=bitcast i8*%gS to i8**
%g3=load i8*,i8**%g2,align 8
store i8*%g3,i8**%c,align 8
%g4=load i8,i8*%g3,align 1
%g5=load i8*,i8**%d,align 8
%g6=getelementptr inbounds i8,i8*%g5,i64 8
%g7=bitcast i8*%g6 to i32*
%g8=load i32,i32*%g7,align 4
%g9=icmp eq i32%g8,0
br i1%g9,label%hf,label%ha
ha:
store i8*null,i8**%c,align 8
%hb=sext i32%s to i64
%hc=getelementptr inbounds i8,i8*%g3,i64%hb
%hd=bitcast i8*%hc to i8**
%he=load i8*,i8**%hd,align 8
br label%hp
hf:
%hg=getelementptr inbounds i8,i8*%g5,i64 12
%hh=bitcast i8*%hg to i32*
%hi=load i32,i32*%hh,align 4
%hj=call i8*@sml_alloc(i32 inreg%hi)#0
%hk=getelementptr inbounds i8,i8*%hj,i64 -4
%hl=bitcast i8*%hk to i32*
store i32%hi,i32*%hl,align 4
%hm=load i8*,i8**%c,align 8
store i8*null,i8**%c,align 8
%hn=sext i32%s to i64
%ho=getelementptr inbounds i8,i8*%hm,i64%hn
call void@llvm.memcpy.p0i8.p0i8.i32(i8*%hj,i8*%ho,i32%hi,i1 false)
br label%hp
hp:
%hq=phi i8*[%hj,%hf],[%he,%ha]
store i8*%hq,i8**%c,align 8
%hr=zext i8%g4 to i32
%hs=and i32%hr,192
%ht=icmp eq i32%hs,128
br i1%ht,label%hu,label%h4
hu:
%hv=shl i32%gi,6
%hw=and i32%hr,63
%hx=or i32%hw,%hv
%hy=load i8*,i8**%d,align 8
%hz=getelementptr inbounds i8,i8*%hy,i64 12
%hA=bitcast i8*%hz to i32*
%hB=load i32,i32*%hA,align 4
%hC=getelementptr inbounds i8,i8*%hy,i64 8
%hD=bitcast i8*%hC to i32*
%hE=load i32,i32*%hD,align 4
%hF=call i8*@sml_alloc(i32 inreg%D)#0
%hG=bitcast i8*%hF to i32*
%hH=getelementptr inbounds i8,i8*%hF,i64 -4
%hI=bitcast i8*%hH to i32*
store i32%f3,i32*%hI,align 4
call void@llvm.memset.p0i8.i32(i8*%hF,i8 0,i32%D,i1 false)
store i32%hx,i32*%hG,align 4
%hJ=icmp eq i32%hE,0
%hK=load i8*,i8**%c,align 8
store i8*null,i8**%c,align 8
%hL=getelementptr inbounds i8,i8*%hF,i64%f9
br i1%hJ,label%hM,label%hN
hM:
call void@llvm.memcpy.p0i8.p0i8.i32(i8*%hL,i8*%hK,i32%hB,i1 false)
br label%hP
hN:
%hO=bitcast i8*%hL to i8**
store i8*%hK,i8**%hO,align 8
br label%hP
hP:
%hQ=getelementptr inbounds i8,i8*%hF,i64%gf
%hR=bitcast i8*%hQ to i32*
store i32%C,i32*%hR,align 4
store i8*%hF,i8**%c,align 8
%hS=load i32,i32*%hG,align 4
%hT=load i8**,i8***%e6,align 8
%hU=load i8*,i8**%hT,align 8
%hV=getelementptr inbounds i8,i8*%hU,i64 16
%hW=bitcast i8*%hV to i8*(i8*,i8*)**
%hX=load i8*(i8*,i8*)*,i8*(i8*,i8*)**%hW,align 8
%hY=bitcast i8*%hU to i8**
%hZ=load i8*,i8**%hY,align 8
store i8*%hZ,i8**%e,align 8
%h0=getelementptr inbounds i8*,i8**%hT,i64 1
%h1=bitcast i8**%h0 to i32*
%h2=load i32,i32*%h1,align 4
%h3=icmp eq i32%h2,0
br i1%h3,label%ie,label%ib
h4:
store i8*null,i8**%c,align 8
store i8*null,i8**%d,align 8
%h5=call i8*@sml_alloc(i32 inreg 60)#0
%h6=getelementptr inbounds i8,i8*%h5,i64 -4
%h7=bitcast i8*%h6 to i32*
store i32 1342177336,i32*%h7,align 4
%h8=getelementptr inbounds i8,i8*%h5,i64 56
%h9=bitcast i8*%h8 to i32*
store i32 1,i32*%h9,align 4
%ia=bitcast i8*%h5 to i8**
store i8*bitcast(i8**getelementptr inbounds(<{[4x i8],i32,i8*,i8*,i32}>,<{[4x i8],i32,i8*,i8*,i32}>*@r,i64 0,i32 2)to i8*),i8**%ia,align 8
call void@sml_raise(i8*inreg%h5)#1
unreachable
ib:
store i8*null,i8**%c,align 8
%ic=bitcast i8*%hL to i8**
%id=load i8*,i8**%ic,align 8
br label%ip
ie:
%if=bitcast i8**%hT to i8*
%ig=getelementptr inbounds i8,i8*%if,i64 12
%ih=bitcast i8*%ig to i32*
%ii=load i32,i32*%ih,align 4
%ij=call i8*@sml_alloc(i32 inreg%ii)#0
%ik=getelementptr inbounds i8,i8*%ij,i64 -4
%il=bitcast i8*%ik to i32*
store i32%ii,i32*%il,align 4
%im=load i8*,i8**%c,align 8
store i8*null,i8**%c,align 8
%in=getelementptr inbounds i8,i8*%im,i64%f9
call void@llvm.memcpy.p0i8.p0i8.i32(i8*%ij,i8*%in,i32%ii,i1 false)
%io=load i8*,i8**%e,align 8
br label%ip
ip:
%iq=phi i8*[%hZ,%ib],[%io,%ie]
%ir=phi i8*[%id,%ib],[%ij,%ie]
store i8*null,i8**%e,align 8
%is=call fastcc i8*%hX(i8*inreg%iq,i8*inreg%ir)
%it=icmp eq i8*%is,null
br i1%it,label%iu,label%iB
iu:
store i8*null,i8**%d,align 8
%iv=call i8*@sml_alloc(i32 inreg 60)#0
%iw=getelementptr inbounds i8,i8*%iv,i64 -4
%ix=bitcast i8*%iw to i32*
store i32 1342177336,i32*%ix,align 4
%iy=getelementptr inbounds i8,i8*%iv,i64 56
%iz=bitcast i8*%iy to i32*
store i32 1,i32*%iz,align 4
%iA=bitcast i8*%iv to i8**
store i8*bitcast(i8**getelementptr inbounds(<{[4x i8],i32,i8*,i8*,i32}>,<{[4x i8],i32,i8*,i8*,i32}>*@t,i64 0,i32 2)to i8*),i8**%iA,align 8
call void@sml_raise(i8*inreg%iv)#1
unreachable
iB:
%iC=bitcast i8*%is to i8**
%iD=load i8*,i8**%iC,align 8
store i8*%iD,i8**%c,align 8
%iE=load i8,i8*%iD,align 1
%iF=load i8*,i8**%d,align 8
%iG=getelementptr inbounds i8,i8*%iF,i64 8
%iH=bitcast i8*%iG to i32*
%iI=load i32,i32*%iH,align 4
%iJ=icmp eq i32%iI,0
br i1%iJ,label%iP,label%iK
iK:
store i8*null,i8**%c,align 8
%iL=sext i32%s to i64
%iM=getelementptr inbounds i8,i8*%iD,i64%iL
%iN=bitcast i8*%iM to i8**
%iO=load i8*,i8**%iN,align 8
br label%iZ
iP:
%iQ=getelementptr inbounds i8,i8*%iF,i64 12
%iR=bitcast i8*%iQ to i32*
%iS=load i32,i32*%iR,align 4
%iT=call i8*@sml_alloc(i32 inreg%iS)#0
%iU=getelementptr inbounds i8,i8*%iT,i64 -4
%iV=bitcast i8*%iU to i32*
store i32%iS,i32*%iV,align 4
%iW=load i8*,i8**%c,align 8
store i8*null,i8**%c,align 8
%iX=sext i32%s to i64
%iY=getelementptr inbounds i8,i8*%iW,i64%iX
call void@llvm.memcpy.p0i8.p0i8.i32(i8*%iT,i8*%iY,i32%iS,i1 false)
br label%iZ
iZ:
%i0=phi i8*[%iT,%iP],[%iO,%iK]
store i8*%i0,i8**%c,align 8
%i1=zext i8%iE to i32
%i2=and i32%i1,192
%i3=icmp eq i32%i2,128
br i1%i3,label%i4,label%jr
i4:
%i5=shl i32%hS,6
%i6=and i32%i1,63
%i7=or i32%i6,%i5
%i8=load i8*,i8**%d,align 8
%i9=getelementptr inbounds i8,i8*%i8,i64 12
%ja=bitcast i8*%i9 to i32*
%jb=load i32,i32*%ja,align 4
%jc=getelementptr inbounds i8,i8*%i8,i64 8
%jd=bitcast i8*%jc to i32*
%je=load i32,i32*%jd,align 4
%jf=call i8*@sml_alloc(i32 inreg%D)#0
%jg=bitcast i8*%jf to i32*
%jh=getelementptr inbounds i8,i8*%jf,i64 -4
%ji=bitcast i8*%jh to i32*
store i32%f3,i32*%ji,align 4
call void@llvm.memset.p0i8.i32(i8*%jf,i8 0,i32%D,i1 false)
store i32%i7,i32*%jg,align 4
%jj=icmp eq i32%je,0
%jk=load i8*,i8**%c,align 8
store i8*null,i8**%c,align 8
%jl=getelementptr inbounds i8,i8*%jf,i64%f9
br i1%jj,label%jm,label%jn
jm:
call void@llvm.memcpy.p0i8.p0i8.i32(i8*%jl,i8*%jk,i32%jb,i1 false)
br label%jp
jn:
%jo=bitcast i8*%jl to i8**
store i8*%jk,i8**%jo,align 8
br label%jp
jp:
%jq=getelementptr inbounds i8,i8*%jf,i64%gf
br label%jF
jr:
store i8*null,i8**%c,align 8
store i8*null,i8**%d,align 8
%js=call i8*@sml_alloc(i32 inreg 60)#0
%jt=getelementptr inbounds i8,i8*%js,i64 -4
%ju=bitcast i8*%jt to i32*
store i32 1342177336,i32*%ju,align 4
%jv=getelementptr inbounds i8,i8*%js,i64 56
%jw=bitcast i8*%jv to i32*
store i32 1,i32*%jw,align 4
%jx=bitcast i8*%js to i8**
store i8*bitcast(i8**getelementptr inbounds(<{[4x i8],i32,i8*,i8*,i32}>,<{[4x i8],i32,i8*,i8*,i32}>*@r,i64 0,i32 2)to i8*),i8**%jx,align 8
call void@sml_raise(i8*inreg%js)#1
unreachable
jy:
store i8*null,i8**%c,align 8
store i8*null,i8**%d,align 8
%jz=call i8*@sml_alloc(i32 inreg 60)#0
%jA=getelementptr inbounds i8,i8*%jz,i64 -4
%jB=bitcast i8*%jA to i32*
store i32 1342177336,i32*%jB,align 4
%jC=getelementptr inbounds i8,i8*%jz,i64 56
%jD=bitcast i8*%jC to i32*
store i32 1,i32*%jD,align 4
%jE=bitcast i8*%jz to i8**
store i8*bitcast(i8**getelementptr inbounds(<{[4x i8],i32,i8*,i8*,i32}>,<{[4x i8],i32,i8*,i8*,i32}>*@d,i64 0,i32 2)to i8*),i8**%jE,align 8
call void@sml_raise(i8*inreg%jz)#1
unreachable
jF:
%jG=phi i8*[%b0,%bY],[%jq,%jp],[%eV,%eU],[%aM,%aK]
%jH=phi i32*[%bO,%bY],[%jg,%jp],[%eL,%eU],[%aA,%aK]
%jI=phi i8*[%bM,%bY],[%jf,%jp],[%eK,%eU],[%ay,%aK]
%jJ=bitcast i8*%jG to i32*
store i32%C,i32*%jJ,align 4
store i8*%jI,i8**%c,align 8
%jK=load i32,i32*%jH,align 4
%jL=load i8*,i8**%d,align 8
%jM=getelementptr inbounds i8,i8*%jL,i64 8
%jN=bitcast i8*%jM to i32*
%jO=load i32,i32*%jN,align 4
%jP=icmp eq i32%jO,0
br i1%jP,label%jV,label%jQ
jQ:
store i8*null,i8**%c,align 8
%jR=sext i32%u to i64
%jS=getelementptr inbounds i8,i8*%jI,i64%jR
%jT=bitcast i8*%jS to i8**
%jU=load i8*,i8**%jT,align 8
br label%j9
jV:
%jW=getelementptr inbounds i8,i8*%jL,i64 12
%jX=bitcast i8*%jW to i32*
%jY=load i32,i32*%jX,align 4
%jZ=call i8*@sml_alloc(i32 inreg%jY)#0
%j0=getelementptr inbounds i8,i8*%jZ,i64 -4
%j1=bitcast i8*%j0 to i32*
store i32%jY,i32*%j1,align 4
%j2=load i8*,i8**%c,align 8
store i8*null,i8**%c,align 8
%j3=sext i32%u to i64
%j4=getelementptr inbounds i8,i8*%j2,i64%j3
call void@llvm.memcpy.p0i8.p0i8.i32(i8*%jZ,i8*%j4,i32%jY,i1 false)
%j5=load i8*,i8**%d,align 8
%j6=getelementptr inbounds i8,i8*%j5,i64 8
%j7=bitcast i8*%j6 to i32*
%j8=load i32,i32*%j7,align 4
br label%j9
j9:
%ka=phi i64[%j3,%jV],[%jR,%jQ]
%kb=phi i32[%j8,%jV],[%jO,%jQ]
%kc=phi i8*[%j5,%jV],[%jL,%jQ]
%kd=phi i8*[%jZ,%jV],[%jU,%jQ]
store i8*%kd,i8**%c,align 8
%ke=getelementptr inbounds i8,i8*%kc,i64 12
%kf=bitcast i8*%ke to i32*
%kg=load i32,i32*%kf,align 4
store i8*null,i8**%d,align 8
%kh=call i8*@sml_alloc(i32 inreg%D)#0
%ki=or i32%x,1342177280
%kj=getelementptr inbounds i8,i8*%kh,i64 -4
%kk=bitcast i8*%kj to i32*
store i32%ki,i32*%kk,align 4
store i8*%kh,i8**%d,align 8
call void@llvm.memset.p0i8.i32(i8*%kh,i8 0,i32%D,i1 false)
%kl=bitcast i8*%kh to i32*
store i32%jK,i32*%kl,align 4
%km=icmp eq i32%kb,0
%kn=load i8*,i8**%c,align 8
store i8*null,i8**%c,align 8
%ko=getelementptr inbounds i8,i8*%kh,i64%ka
br i1%km,label%kp,label%kq
kp:
call void@llvm.memcpy.p0i8.p0i8.i32(i8*%ko,i8*%kn,i32%kg,i1 false)
br label%ks
kq:
%kr=bitcast i8*%ko to i8**
store i8*%kn,i8**%kr,align 8
br label%ks
ks:
%kt=sext i32%x to i64
%ku=getelementptr inbounds i8,i8*%kh,i64%kt
%kv=bitcast i8*%ku to i32*
store i32%C,i32*%kv,align 4
%kw=call i8*@sml_alloc(i32 inreg 12)#0
%kx=getelementptr inbounds i8,i8*%kw,i64 -4
%ky=bitcast i8*%kx to i32*
store i32 1342177288,i32*%ky,align 4
%kz=load i8*,i8**%d,align 8
%kA=bitcast i8*%kw to i8**
store i8*%kz,i8**%kA,align 8
%kB=getelementptr inbounds i8,i8*%kw,i64 8
%kC=bitcast i8*%kB to i32*
store i32 1,i32*%kC,align 4
ret i8*%kw
}
define internal fastcc i8*@_SMLLLN4UTF84getuE_119(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*)*@_SMLLL3get_118 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*)*@_SMLLL3get_118 to void(...)*),void(...)**%C,align 8
%D=getelementptr inbounds i8,i8*%u,i64 24
%E=bitcast i8*%D to i32*
store i32 1,i32*%E,align 4
ret i8*%u
}
define fastcc i8*@_SMLFN4UTF84getuE(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*)*@_SMLLLN4UTF84getuE_119 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*)*@_SMLLLN4UTF84getuE_119 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 i32@_SMLFN4UTF87isAsciiE(i32 inreg%a)#4 gc"smlsharp"{
%b=icmp ult i32%a,128
%c=zext i1%b to i32
ret i32%c
}
define fastcc i8@_SMLFN4UTF87toAsciiE(i32 inreg%a)#4 gc"smlsharp"{
%b=alloca i8*,align 8
%c=alloca i8*,align 8
call void@llvm.gcroot(i8**%b,i8*null)#0
call void@llvm.gcroot(i8**%c,i8*null)#0
%d=trunc i32%a to i8
%e=and i8%d,127
ret i8%e
}
define fastcc i32@_SMLFN4UTF89fromAsciiE(i8 inreg%a)#4 gc"smlsharp"{
%b=and i8%a,127
%c=zext i8%b to i32
ret i32%c
}
define fastcc i8*@_SMLFN4UTF88toStringE(i32 inreg%a)#2 gc"smlsharp"{
%b=alloca i8*,align 8
%c=alloca i8*,align 8
call void@llvm.gcroot(i8**%b,i8*null)#0
call void@llvm.gcroot(i8**%c,i8*null)#0
%d=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=icmp ugt i32%a,127
br i1%h,label%m,label%i
i:
%j=trunc i32%a to i8
%k=and i8%j,127
%l=tail call fastcc i8*@_SMLFN4Char9toCStringE(i8 inreg%k)
ret i8*%l
m:
%n=icmp ugt i32%a,223
%o=call fastcc i8*@_SMLFN9StringCvt7padLeftE(i8 inreg 48)
%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**%b,align 8
%u=call i8*@sml_alloc(i32 inreg 4)#0
%v=bitcast i8*%u to i32*
%w=getelementptr inbounds i8,i8*%u,i64 -4
%x=bitcast i8*%w to i32*
store i32 4,i32*%x,align 4
br i1%n,label%T,label%y
y:
store i32 4,i32*%v,align 4
%z=load i8*,i8**%b,align 8
store i8*null,i8**%b,align 8
%A=call fastcc i8*%r(i8*inreg%z,i8*inreg%u)
%B=getelementptr inbounds i8,i8*%A,i64 16
%C=bitcast i8*%B to i8*(i8*,i8*)**
%D=load i8*(i8*,i8*)*,i8*(i8*,i8*)**%C,align 8
%E=bitcast i8*%A to i8**
%F=load i8*,i8**%E,align 8
store i8*%F,i8**%b,align 8
%G=call fastcc i8*@_SMLFN6Word328toStringE(i32 inreg%a)
%H=load i8*,i8**%b,align 8
store i8*null,i8**%b,align 8
%I=call fastcc i8*%D(i8*inreg%H,i8*inreg%G)
store i8*%I,i8**%b,align 8
%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
%M=bitcast i8*%J to i8**
store i8*getelementptr inbounds(<{[4x i8],i32,[3x i8]}>,<{[4x i8],i32,[3x i8]}>*@i,i64 0,i32 2,i64 0),i8**%M,align 8
%N=load i8*,i8**%b,align 8
%O=getelementptr inbounds i8,i8*%J,i64 8
%P=bitcast i8*%O to i8**
store i8*%N,i8**%P,align 8
%Q=getelementptr inbounds i8,i8*%J,i64 16
%R=bitcast i8*%Q to i32*
store i32 3,i32*%R,align 4
%S=tail call fastcc i8*@_SMLFN6String1_ZE(i8*inreg%J)
ret i8*%S
T:
store i32 8,i32*%v,align 4
%U=load i8*,i8**%b,align 8
store i8*null,i8**%b,align 8
%V=call fastcc i8*%r(i8*inreg%U,i8*inreg%u)
%W=getelementptr inbounds i8,i8*%V,i64 16
%X=bitcast i8*%W to i8*(i8*,i8*)**
%Y=load i8*(i8*,i8*)*,i8*(i8*,i8*)**%X,align 8
%Z=bitcast i8*%V to i8**
%aa=load i8*,i8**%Z,align 8
store i8*%aa,i8**%b,align 8
%ab=call fastcc i8*@_SMLFN6Word328toStringE(i32 inreg%a)
%ac=load i8*,i8**%b,align 8
store i8*null,i8**%b,align 8
%ad=call fastcc i8*%Y(i8*inreg%ac,i8*inreg%ab)
store i8*%ad,i8**%b,align 8
%ae=call i8*@sml_alloc(i32 inreg 20)#0
%af=getelementptr inbounds i8,i8*%ae,i64 -4
%ag=bitcast i8*%af to i32*
store i32 1342177296,i32*%ag,align 4
%ah=bitcast i8*%ae to i8**
store i8*getelementptr inbounds(<{[4x i8],i32,[3x i8]}>,<{[4x i8],i32,[3x i8]}>*@i,i64 0,i32 2,i64 0),i8**%ah,align 8
%ai=load i8*,i8**%b,align 8
%aj=getelementptr inbounds i8,i8*%ae,i64 8
%ak=bitcast i8*%aj to i8**
store i8*%ai,i8**%ak,align 8
%al=getelementptr inbounds i8,i8*%ae,i64 16
%am=bitcast i8*%al to i32*
store i32 3,i32*%am,align 4
%an=tail call fastcc i8*@_SMLFN6String1_ZE(i8*inreg%ae)
ret i8*%an
}
define internal fastcc i8*@_SMLLLN4UTF87encode_GE_157(i8*inreg%a)#2 gc"smlsharp"{
%b=alloca i8*,align 8
%c=alloca i8*,align 8
call void@llvm.gcroot(i8**%b,i8*null)#0
call void@llvm.gcroot(i8**%c,i8*null)#0
%d=bitcast i8*%a to i32*
%e=load i32,i32*%d,align 4
%f=getelementptr inbounds i8,i8*%a,i64 8
%g=bitcast i8*%f to i8**
%h=load i8*,i8**%g,align 8
store i8*%h,i8**%b,align 8
%i=icmp ugt i32%e,127
br i1%i,label%u,label%j
j:
%k=trunc i32%e to i8
%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=getelementptr inbounds i8,i8*%l,i64 1
call void@llvm.memset.p0i8.i32(i8*%o,i8 0,i32 7,i1 false)
store i8%k,i8*%l,align 1
%p=load i8*,i8**%b,align 8
%q=getelementptr inbounds i8,i8*%l,i64 8
%r=bitcast i8*%q to i8**
store i8*%p,i8**%r,align 8
%s=getelementptr inbounds i8,i8*%l,i64 16
%t=bitcast i8*%s to i32*
store i32 2,i32*%t,align 4
ret i8*%l
u:
%v=icmp ugt i32%e,2047
br i1%v,label%ap,label%w
w:
%x=lshr i32%e,6
%y=or i32%x,192
%z=icmp ugt i32%y,255
br i1%z,label%X,label%A
A:
%B=trunc i32%y to i8
%C=trunc i32%e to i8
%D=and i8%C,63
%E=or i8%D,-128
%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=getelementptr inbounds i8,i8*%F,i64 1
call void@llvm.memset.p0i8.i32(i8*%I,i8 0,i32 7,i1 false)
store i8%E,i8*%F,align 1
%J=load i8*,i8**%b,align 8
store i8*null,i8**%b,align 8
%K=getelementptr inbounds i8,i8*%F,i64 8
%L=bitcast i8*%K to i8**
store i8*%J,i8**%L,align 8
%M=getelementptr inbounds i8,i8*%F,i64 16
%N=bitcast i8*%M to i32*
store i32 2,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=getelementptr inbounds i8,i8*%O,i64 1
call void@llvm.memset.p0i8.i32(i8*%R,i8 0,i32 7,i1 false)
store i8%B,i8*%O,align 1
%S=load i8*,i8**%c,align 8
%T=getelementptr inbounds i8,i8*%O,i64 8
%U=bitcast i8*%T to i8**
store i8*%S,i8**%U,align 8
%V=getelementptr inbounds i8,i8*%O,i64 16
%W=bitcast i8*%V to i32*
store i32 2,i32*%W,align 4
ret i8*%O
X:
%Y=load i8*,i8**@_SMLZ3Chr,align 8
store i8*%Y,i8**%b,align 8
%Z=call i8*@sml_alloc(i32 inreg 20)#0
%aa=getelementptr inbounds i8,i8*%Z,i64 -4
%ab=bitcast i8*%aa to i32*
store i32 1342177296,i32*%ab,align 4
store i8*%Z,i8**%c,align 8
%ac=load i8*,i8**%b,align 8
store i8*null,i8**%b,align 8
%ad=bitcast i8*%Z to i8**
store i8*%ac,i8**%ad,align 8
%ae=getelementptr inbounds i8,i8*%Z,i64 8
%af=bitcast i8*%ae to i8**
store i8*getelementptr inbounds(<{[4x i8],i32,[39x i8]}>,<{[4x i8],i32,[39x i8]}>*@l,i64 0,i32 2,i64 0),i8**%af,align 8
%ag=getelementptr inbounds i8,i8*%Z,i64 16
%ah=bitcast i8*%ag to i32*
store i32 3,i32*%ah,align 4
%ai=call i8*@sml_alloc(i32 inreg 60)#0
%aj=getelementptr inbounds i8,i8*%ai,i64 -4
%ak=bitcast i8*%aj to i32*
store i32 1342177336,i32*%ak,align 4
%al=getelementptr inbounds i8,i8*%ai,i64 56
%am=bitcast i8*%al to i32*
store i32 1,i32*%am,align 4
%an=load i8*,i8**%c,align 8
%ao=bitcast i8*%ai to i8**
store i8*%an,i8**%ao,align 8
call void@sml_raise(i8*inreg%ai)#1
unreachable
ap:
%aq=icmp ugt i32%e,65535
br i1%aq,label%bn,label%ar
ar:
%as=lshr i32%e,12
%at=or i32%as,224
%au=icmp ugt i32%at,255
br i1%au,label%a5,label%av
av:
%aw=trunc i32%at to i8
%ax=lshr i32%e,6
%ay=trunc i32%ax to i8
%az=and i8%ay,63
%aA=or i8%az,-128
%aB=trunc i32%e to i8
%aC=and i8%aB,63
%aD=or i8%aC,-128
%aE=call i8*@sml_alloc(i32 inreg 20)#0
%aF=getelementptr inbounds i8,i8*%aE,i64 -4
%aG=bitcast i8*%aF to i32*
store i32 1342177296,i32*%aG,align 4
store i8*%aE,i8**%c,align 8
%aH=getelementptr inbounds i8,i8*%aE,i64 1
call void@llvm.memset.p0i8.i32(i8*%aH,i8 0,i32 7,i1 false)
store i8%aD,i8*%aE,align 1
%aI=load i8*,i8**%b,align 8
store i8*null,i8**%b,align 8
%aJ=getelementptr inbounds i8,i8*%aE,i64 8
%aK=bitcast i8*%aJ to i8**
store i8*%aI,i8**%aK,align 8
%aL=getelementptr inbounds i8,i8*%aE,i64 16
%aM=bitcast i8*%aL to i32*
store i32 2,i32*%aM,align 4
%aN=call i8*@sml_alloc(i32 inreg 20)#0
%aO=getelementptr inbounds i8,i8*%aN,i64 -4
%aP=bitcast i8*%aO to i32*
store i32 1342177296,i32*%aP,align 4
store i8*%aN,i8**%b,align 8
%aQ=getelementptr inbounds i8,i8*%aN,i64 1
call void@llvm.memset.p0i8.i32(i8*%aQ,i8 0,i32 7,i1 false)
store i8%aA,i8*%aN,align 1
%aR=load i8*,i8**%c,align 8
store i8*null,i8**%c,align 8
%aS=getelementptr inbounds i8,i8*%aN,i64 8
%aT=bitcast i8*%aS to i8**
store i8*%aR,i8**%aT,align 8
%aU=getelementptr inbounds i8,i8*%aN,i64 16
%aV=bitcast i8*%aU to i32*
store i32 2,i32*%aV,align 4
%aW=call i8*@sml_alloc(i32 inreg 20)#0
%aX=getelementptr inbounds i8,i8*%aW,i64 -4
%aY=bitcast i8*%aX to i32*
store i32 1342177296,i32*%aY,align 4
%aZ=getelementptr inbounds i8,i8*%aW,i64 1
call void@llvm.memset.p0i8.i32(i8*%aZ,i8 0,i32 7,i1 false)
store i8%aw,i8*%aW,align 1
%a0=load i8*,i8**%b,align 8
%a1=getelementptr inbounds i8,i8*%aW,i64 8
%a2=bitcast i8*%a1 to i8**
store i8*%a0,i8**%a2,align 8
%a3=getelementptr inbounds i8,i8*%aW,i64 16
%a4=bitcast i8*%a3 to i32*
store i32 2,i32*%a4,align 4
ret i8*%aW
a5:
%a6=load i8*,i8**@_SMLZ3Chr,align 8
store i8*%a6,i8**%b,align 8
%a7=call i8*@sml_alloc(i32 inreg 20)#0
%a8=getelementptr inbounds i8,i8*%a7,i64 -4
%a9=bitcast i8*%a8 to i32*
store i32 1342177296,i32*%a9,align 4
store i8*%a7,i8**%c,align 8
%ba=load i8*,i8**%b,align 8
store i8*null,i8**%b,align 8
%bb=bitcast i8*%a7 to i8**
store i8*%ba,i8**%bb,align 8
%bc=getelementptr inbounds i8,i8*%a7,i64 8
%bd=bitcast i8*%bc to i8**
store i8*getelementptr inbounds(<{[4x i8],i32,[39x i8]}>,<{[4x i8],i32,[39x i8]}>*@l,i64 0,i32 2,i64 0),i8**%bd,align 8
%be=getelementptr inbounds i8,i8*%a7,i64 16
%bf=bitcast i8*%be to i32*
store i32 3,i32*%bf,align 4
%bg=call i8*@sml_alloc(i32 inreg 60)#0
%bh=getelementptr inbounds i8,i8*%bg,i64 -4
%bi=bitcast i8*%bh to i32*
store i32 1342177336,i32*%bi,align 4
%bj=getelementptr inbounds i8,i8*%bg,i64 56
%bk=bitcast i8*%bj to i32*
store i32 1,i32*%bk,align 4
%bl=load i8*,i8**%c,align 8
%bm=bitcast i8*%bg to i8**
store i8*%bl,i8**%bm,align 8
call void@sml_raise(i8*inreg%bg)#1
unreachable
bn:
%bo=icmp ugt i32%e,1114111
br i1%bo,label%cy,label%bp
bp:
%bq=lshr i32%e,18
%br=or i32%bq,240
%bs=icmp ugt i32%br,255
br i1%bs,label%cg,label%bt
bt:
%bu=trunc i32%br to i8
%bv=lshr i32%e,12
%bw=trunc i32%bv to i8
%bx=and i8%bw,63
%by=or i8%bx,-128
%bz=lshr i32%e,6
%bA=trunc i32%bz to i8
%bB=and i8%bA,63
%bC=or i8%bB,-128
%bD=trunc i32%e to i8
%bE=and i8%bD,63
%bF=or i8%bE,-128
%bG=call i8*@sml_alloc(i32 inreg 20)#0
%bH=getelementptr inbounds i8,i8*%bG,i64 -4
%bI=bitcast i8*%bH to i32*
store i32 1342177296,i32*%bI,align 4
store i8*%bG,i8**%c,align 8
%bJ=getelementptr inbounds i8,i8*%bG,i64 1
call void@llvm.memset.p0i8.i32(i8*%bJ,i8 0,i32 7,i1 false)
store i8%bF,i8*%bG,align 1
%bK=load i8*,i8**%b,align 8
store i8*null,i8**%b,align 8
%bL=getelementptr inbounds i8,i8*%bG,i64 8
%bM=bitcast i8*%bL to i8**
store i8*%bK,i8**%bM,align 8
%bN=getelementptr inbounds i8,i8*%bG,i64 16
%bO=bitcast i8*%bN to i32*
store i32 2,i32*%bO,align 4
%bP=call i8*@sml_alloc(i32 inreg 20)#0
%bQ=getelementptr inbounds i8,i8*%bP,i64 -4
%bR=bitcast i8*%bQ to i32*
store i32 1342177296,i32*%bR,align 4
store i8*%bP,i8**%b,align 8
%bS=getelementptr inbounds i8,i8*%bP,i64 1
call void@llvm.memset.p0i8.i32(i8*%bS,i8 0,i32 7,i1 false)
store i8%bC,i8*%bP,align 1
%bT=load i8*,i8**%c,align 8
store i8*null,i8**%c,align 8
%bU=getelementptr inbounds i8,i8*%bP,i64 8
%bV=bitcast i8*%bU to i8**
store i8*%bT,i8**%bV,align 8
%bW=getelementptr inbounds i8,i8*%bP,i64 16
%bX=bitcast i8*%bW to i32*
store i32 2,i32*%bX,align 4
%bY=call i8*@sml_alloc(i32 inreg 20)#0
%bZ=getelementptr inbounds i8,i8*%bY,i64 -4
%b0=bitcast i8*%bZ to i32*
store i32 1342177296,i32*%b0,align 4
store i8*%bY,i8**%c,align 8
%b1=getelementptr inbounds i8,i8*%bY,i64 1
call void@llvm.memset.p0i8.i32(i8*%b1,i8 0,i32 7,i1 false)
store i8%by,i8*%bY,align 1
%b2=load i8*,i8**%b,align 8
store i8*null,i8**%b,align 8
%b3=getelementptr inbounds i8,i8*%bY,i64 8
%b4=bitcast i8*%b3 to i8**
store i8*%b2,i8**%b4,align 8
%b5=getelementptr inbounds i8,i8*%bY,i64 16
%b6=bitcast i8*%b5 to i32*
store i32 2,i32*%b6,align 4
%b7=call i8*@sml_alloc(i32 inreg 20)#0
%b8=getelementptr inbounds i8,i8*%b7,i64 -4
%b9=bitcast i8*%b8 to i32*
store i32 1342177296,i32*%b9,align 4
%ca=getelementptr inbounds i8,i8*%b7,i64 1
call void@llvm.memset.p0i8.i32(i8*%ca,i8 0,i32 7,i1 false)
store i8%bu,i8*%b7,align 1
%cb=load i8*,i8**%c,align 8
%cc=getelementptr inbounds i8,i8*%b7,i64 8
%cd=bitcast i8*%cc to i8**
store i8*%cb,i8**%cd,align 8
%ce=getelementptr inbounds i8,i8*%b7,i64 16
%cf=bitcast i8*%ce to i32*
store i32 2,i32*%cf,align 4
ret i8*%b7
cg:
%ch=load i8*,i8**@_SMLZ3Chr,align 8
store i8*%ch,i8**%b,align 8
%ci=call i8*@sml_alloc(i32 inreg 20)#0
%cj=getelementptr inbounds i8,i8*%ci,i64 -4
%ck=bitcast i8*%cj to i32*
store i32 1342177296,i32*%ck,align 4
store i8*%ci,i8**%c,align 8
%cl=load i8*,i8**%b,align 8
store i8*null,i8**%b,align 8
%cm=bitcast i8*%ci to i8**
store i8*%cl,i8**%cm,align 8
%cn=getelementptr inbounds i8,i8*%ci,i64 8
%co=bitcast i8*%cn to i8**
store i8*getelementptr inbounds(<{[4x i8],i32,[39x i8]}>,<{[4x i8],i32,[39x i8]}>*@l,i64 0,i32 2,i64 0),i8**%co,align 8
%cp=getelementptr inbounds i8,i8*%ci,i64 16
%cq=bitcast i8*%cp to i32*
store i32 3,i32*%cq,align 4
%cr=call i8*@sml_alloc(i32 inreg 60)#0
%cs=getelementptr inbounds i8,i8*%cr,i64 -4
%ct=bitcast i8*%cs to i32*
store i32 1342177336,i32*%ct,align 4
%cu=getelementptr inbounds i8,i8*%cr,i64 56
%cv=bitcast i8*%cu to i32*
store i32 1,i32*%cv,align 4
%cw=load i8*,i8**%c,align 8
%cx=bitcast i8*%cr to i8**
store i8*%cw,i8**%cx,align 8
call void@sml_raise(i8*inreg%cr)#1
unreachable
cy:
%cz=load i8*,i8**@_SMLZ6Domain,align 8
store i8*%cz,i8**%b,align 8
%cA=call i8*@sml_alloc(i32 inreg 20)#0
%cB=getelementptr inbounds i8,i8*%cA,i64 -4
%cC=bitcast i8*%cB to i32*
store i32 1342177296,i32*%cC,align 4
store i8*%cA,i8**%c,align 8
%cD=load i8*,i8**%b,align 8
store i8*null,i8**%b,align 8
%cE=bitcast i8*%cA to i8**
store i8*%cD,i8**%cE,align 8
%cF=getelementptr inbounds i8,i8*%cA,i64 8
%cG=bitcast i8*%cF to i8**
store i8*getelementptr inbounds(<{[4x i8],i32,[41x i8]}>,<{[4x i8],i32,[41x i8]}>*@k,i64 0,i32 2,i64 0),i8**%cG,align 8
%cH=getelementptr inbounds i8,i8*%cA,i64 16
%cI=bitcast i8*%cH to i32*
store i32 3,i32*%cI,align 4
%cJ=call i8*@sml_alloc(i32 inreg 60)#0
%cK=getelementptr inbounds i8,i8*%cJ,i64 -4
%cL=bitcast i8*%cK to i32*
store i32 1342177336,i32*%cL,align 4
%cM=getelementptr inbounds i8,i8*%cJ,i64 56
%cN=bitcast i8*%cM to i32*
store i32 1,i32*%cN,align 4
%cO=load i8*,i8**%c,align 8
%cP=bitcast i8*%cJ to i8**
store i8*%cO,i8**%cP,align 8
call void@sml_raise(i8*inreg%cJ)#1
unreachable
}
define fastcc i8*@_SMLFN4UTF86encodeE(i32 inreg%a)#2 gc"smlsharp"{
%b=load atomic i32,i32*@sml_check_flag unordered,align 4
%c=icmp eq i32%b,0
br i1%c,label%e,label%d
d:
tail call void@sml_check(i32 inreg%b)
br label%e
e:
%f=tail 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
%j=getelementptr inbounds i8,i8*%f,i64 4
%k=bitcast i8*%j to i32*
store i32 0,i32*%k,align 1
store i32%a,i32*%g,align 4
%l=getelementptr inbounds i8,i8*%f,i64 8
%m=bitcast i8*%l to i8**
store i8*null,i8**%m,align 8
%n=getelementptr inbounds i8,i8*%f,i64 16
%o=bitcast i8*%n to i32*
store i32 2,i32*%o,align 4
%p=tail call fastcc i8*@_SMLLLN4UTF87encode_GE_157(i8*inreg%f)
%q=tail call fastcc i8*@_SMLFN10CharVector8fromListE(i8*inreg%p)
ret i8*%q
}
define internal fastcc i8*@_SMLLLN4UTF85getWCE_187(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=load i8,i8*%h,align 1
%k=getelementptr inbounds i8,i8*%h,i64 8
%l=bitcast i8*%k to i8**
%m=load i8*,i8**%l,align 8
store i8*%m,i8**%b,align 8
%n=zext i8%j to i32
%o=icmp slt i8%j,0
br i1%o,label%x,label%p
p:
%q=call i8*@sml_alloc(i32 inreg 20)#0
%r=bitcast i8*%q to i32*
%s=getelementptr inbounds i8,i8*%q,i64 -4
%t=bitcast i8*%s to i32*
store i32 1342177296,i32*%t,align 4
%u=getelementptr inbounds i8,i8*%q,i64 4
%v=bitcast i8*%u to i32*
store i32 0,i32*%v,align 1
store i32%n,i32*%r,align 4
%w=load i8*,i8**%b,align 8
br label%dM
x:
%y=icmp ugt i8%j,-33
br i1%y,label%am,label%z
z:
store i8*null,i8**%b,align 8
%A=call fastcc i8*@_SMLFN9Substring4getcE(i8*inreg%m)
%B=icmp eq i8*%A,null
br i1%B,label%C,label%J
C:
%D=call i8*@sml_alloc(i32 inreg 60)#0
%E=getelementptr inbounds i8,i8*%D,i64 -4
%F=bitcast i8*%E to i32*
store i32 1342177336,i32*%F,align 4
%G=getelementptr inbounds i8,i8*%D,i64 56
%H=bitcast i8*%G to i32*
store i32 1,i32*%H,align 4
%I=bitcast i8*%D to i8**
store i8*bitcast(i8**getelementptr inbounds(<{[4x i8],i32,i8*,i8*,i32}>,<{[4x i8],i32,i8*,i8*,i32}>*@t,i64 0,i32 2)to i8*),i8**%I,align 8
call void@sml_raise(i8*inreg%D)#1
unreachable
J:
%K=bitcast i8*%A to i8**
%L=load i8*,i8**%K,align 8
%M=load i8,i8*%L,align 1
%N=getelementptr inbounds i8,i8*%L,i64 8
%O=bitcast i8*%N to i8**
%P=load i8*,i8**%O,align 8
store i8*%P,i8**%b,align 8
%Q=zext i8%M to i32
%R=and i32%Q,192
%S=icmp eq i32%R,128
br i1%S,label%T,label%af
T:
%U=shl nuw nsw i32%n,6
%V=and i32%U,1984
%W=and i32%Q,63
%X=or i32%W,%V
%Y=call i8*@sml_alloc(i32 inreg 20)#0
%Z=bitcast i8*%Y to i32*
%aa=getelementptr inbounds i8,i8*%Y,i64 -4
%ab=bitcast i8*%aa to i32*
store i32 1342177296,i32*%ab,align 4
%ac=getelementptr inbounds i8,i8*%Y,i64 4
%ad=bitcast i8*%ac to i32*
store i32 0,i32*%ad,align 1
store i32%X,i32*%Z,align 4
%ae=load i8*,i8**%b,align 8
br label%dM
af:
store i8*null,i8**%b,align 8
%ag=call i8*@sml_alloc(i32 inreg 60)#0
%ah=getelementptr inbounds i8,i8*%ag,i64 -4
%ai=bitcast i8*%ah to i32*
store i32 1342177336,i32*%ai,align 4
%aj=getelementptr inbounds i8,i8*%ag,i64 56
%ak=bitcast i8*%aj to i32*
store i32 1,i32*%ak,align 4
%al=bitcast i8*%ag to i8**
store i8*bitcast(i8**getelementptr inbounds(<{[4x i8],i32,i8*,i8*,i32}>,<{[4x i8],i32,i8*,i8*,i32}>*@r,i64 0,i32 2)to i8*),i8**%al,align 8
call void@sml_raise(i8*inreg%ag)#1
unreachable
am:
%an=icmp ugt i8%j,-17
br i1%an,label%bG,label%ao
ao:
store i8*null,i8**%b,align 8
%ap=call fastcc i8*@_SMLFN9Substring4getcE(i8*inreg%m)
%aq=icmp eq i8*%ap,null
br i1%aq,label%ar,label%ay
ar:
%as=call i8*@sml_alloc(i32 inreg 60)#0
%at=getelementptr inbounds i8,i8*%as,i64 -4
%au=bitcast i8*%at to i32*
store i32 1342177336,i32*%au,align 4
%av=getelementptr inbounds i8,i8*%as,i64 56
%aw=bitcast i8*%av to i32*
store i32 1,i32*%aw,align 4
%ax=bitcast i8*%as to i8**
store i8*bitcast(i8**getelementptr inbounds(<{[4x i8],i32,i8*,i8*,i32}>,<{[4x i8],i32,i8*,i8*,i32}>*@t,i64 0,i32 2)to i8*),i8**%ax,align 8
call void@sml_raise(i8*inreg%as)#1
unreachable
ay:
%az=bitcast i8*%ap to i8**
%aA=load i8*,i8**%az,align 8
%aB=load i8,i8*%aA,align 1
%aC=getelementptr inbounds i8,i8*%aA,i64 8
%aD=bitcast i8*%aC to i8**
%aE=load i8*,i8**%aD,align 8
store i8*%aE,i8**%b,align 8
%aF=zext i8%aB to i32
%aG=and i32%aF,192
%aH=icmp eq i32%aG,128
br i1%aH,label%aI,label%a0
aI:
%aJ=shl nuw nsw i32%n,6
%aK=and i32%aJ,960
%aL=and i32%aF,63
%aM=or i32%aL,%aK
%aN=call i8*@sml_alloc(i32 inreg 20)#0
%aO=bitcast i8*%aN to i32*
%aP=getelementptr inbounds i8,i8*%aN,i64 -4
%aQ=bitcast i8*%aP to i32*
store i32 1342177296,i32*%aQ,align 4
%aR=getelementptr inbounds i8,i8*%aN,i64 4
%aS=bitcast i8*%aR to i32*
store i32 0,i32*%aS,align 1
store i32%aM,i32*%aO,align 4
%aT=load i8*,i8**%b,align 8
store i8*null,i8**%b,align 8
%aU=getelementptr inbounds i8,i8*%aN,i64 8
%aV=bitcast i8*%aU to i8**
store i8*%aT,i8**%aV,align 8
%aW=getelementptr inbounds i8,i8*%aN,i64 16
%aX=bitcast i8*%aW to i32*
store i32 2,i32*%aX,align 4
%aY=call fastcc i8*@_SMLFN9Substring4getcE(i8*inreg%aT)
%aZ=icmp eq i8*%aY,null
br i1%aZ,label%a7,label%be
a0:
store i8*null,i8**%b,align 8
%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=bitcast i8*%a1 to i8**
store i8*bitcast(i8**getelementptr inbounds(<{[4x i8],i32,i8*,i8*,i32}>,<{[4x i8],i32,i8*,i8*,i32}>*@r,i64 0,i32 2)to i8*),i8**%a6,align 8
call void@sml_raise(i8*inreg%a1)#1
unreachable
a7:
%a8=call i8*@sml_alloc(i32 inreg 60)#0
%a9=getelementptr inbounds i8,i8*%a8,i64 -4
%ba=bitcast i8*%a9 to i32*
store i32 1342177336,i32*%ba,align 4
%bb=getelementptr inbounds i8,i8*%a8,i64 56
%bc=bitcast i8*%bb to i32*
store i32 1,i32*%bc,align 4
%bd=bitcast i8*%a8 to i8**
store i8*bitcast(i8**getelementptr inbounds(<{[4x i8],i32,i8*,i8*,i32}>,<{[4x i8],i32,i8*,i8*,i32}>*@t,i64 0,i32 2)to i8*),i8**%bd,align 8
call void@sml_raise(i8*inreg%a8)#1
unreachable
be:
%bf=bitcast i8*%aY to i8**
%bg=load i8*,i8**%bf,align 8
%bh=load i8,i8*%bg,align 1
%bi=getelementptr inbounds i8,i8*%bg,i64 8
%bj=bitcast i8*%bi to i8**
%bk=load i8*,i8**%bj,align 8
store i8*%bk,i8**%b,align 8
%bl=zext i8%bh to i32
%bm=and i32%bl,192
%bn=icmp eq i32%bm,128
br i1%bn,label%bo,label%bz
bo:
%bp=shl nuw nsw i32%aM,6
%bq=and i32%bl,63
%br=or i32%bq,%bp
%bs=call i8*@sml_alloc(i32 inreg 20)#0
%bt=bitcast i8*%bs to i32*
%bu=getelementptr inbounds i8,i8*%bs,i64 -4
%bv=bitcast i8*%bu to i32*
store i32 1342177296,i32*%bv,align 4
%bw=getelementptr inbounds i8,i8*%bs,i64 4
%bx=bitcast i8*%bw to i32*
store i32 0,i32*%bx,align 1
store i32%br,i32*%bt,align 4
%by=load i8*,i8**%b,align 8
br label%dM
bz:
store i8*null,i8**%b,align 8
%bA=call i8*@sml_alloc(i32 inreg 60)#0
%bB=getelementptr inbounds i8,i8*%bA,i64 -4
%bC=bitcast i8*%bB to i32*
store i32 1342177336,i32*%bC,align 4
%bD=getelementptr inbounds i8,i8*%bA,i64 56
%bE=bitcast i8*%bD to i32*
store i32 1,i32*%bE,align 4
%bF=bitcast i8*%bA to i8**
store i8*bitcast(i8**getelementptr inbounds(<{[4x i8],i32,i8*,i8*,i32}>,<{[4x i8],i32,i8*,i8*,i32}>*@r,i64 0,i32 2)to i8*),i8**%bF,align 8
call void@sml_raise(i8*inreg%bA)#1
unreachable
bG:
%bH=icmp ugt i8%j,-9
store i8*null,i8**%b,align 8
br i1%bH,label%dF,label%bI
bI:
%bJ=call fastcc i8*@_SMLFN9Substring4getcE(i8*inreg%m)
%bK=icmp eq i8*%bJ,null
br i1%bK,label%bL,label%bS
bL:
%bM=call i8*@sml_alloc(i32 inreg 60)#0
%bN=getelementptr inbounds i8,i8*%bM,i64 -4
%bO=bitcast i8*%bN to i32*
store i32 1342177336,i32*%bO,align 4
%bP=getelementptr inbounds i8,i8*%bM,i64 56
%bQ=bitcast i8*%bP to i32*
store i32 1,i32*%bQ,align 4
%bR=bitcast i8*%bM to i8**
store i8*bitcast(i8**getelementptr inbounds(<{[4x i8],i32,i8*,i8*,i32}>,<{[4x i8],i32,i8*,i8*,i32}>*@t,i64 0,i32 2)to i8*),i8**%bR,align 8
call void@sml_raise(i8*inreg%bM)#1
unreachable
bS:
%bT=bitcast i8*%bJ to i8**
%bU=load i8*,i8**%bT,align 8
%bV=load i8,i8*%bU,align 1
%bW=getelementptr inbounds i8,i8*%bU,i64 8
%bX=bitcast i8*%bW to i8**
%bY=load i8*,i8**%bX,align 8
store i8*%bY,i8**%b,align 8
%bZ=zext i8%bV to i32
%b0=and i32%bZ,192
%b1=icmp eq i32%b0,128
br i1%b1,label%b2,label%ck
b2:
%b3=shl nuw nsw i32%n,6
%b4=and i32%b3,448
%b5=and i32%bZ,63
%b6=or i32%b5,%b4
%b7=call i8*@sml_alloc(i32 inreg 20)#0
%b8=bitcast i8*%b7 to i32*
%b9=getelementptr inbounds i8,i8*%b7,i64 -4
%ca=bitcast i8*%b9 to i32*
store i32 1342177296,i32*%ca,align 4
%cb=getelementptr inbounds i8,i8*%b7,i64 4
%cc=bitcast i8*%cb to i32*
store i32 0,i32*%cc,align 1
store i32%b6,i32*%b8,align 4
%cd=load i8*,i8**%b,align 8
store i8*null,i8**%b,align 8
%ce=getelementptr inbounds i8,i8*%b7,i64 8
%cf=bitcast i8*%ce to i8**
store i8*%cd,i8**%cf,align 8
%cg=getelementptr inbounds i8,i8*%b7,i64 16
%ch=bitcast i8*%cg to i32*
store i32 2,i32*%ch,align 4
%ci=call fastcc i8*@_SMLFN9Substring4getcE(i8*inreg%cd)
%cj=icmp eq i8*%ci,null
br i1%cj,label%cr,label%cy
ck:
store i8*null,i8**%b,align 8
%cl=call i8*@sml_alloc(i32 inreg 60)#0
%cm=getelementptr inbounds i8,i8*%cl,i64 -4
%cn=bitcast i8*%cm to i32*
store i32 1342177336,i32*%cn,align 4
%co=getelementptr inbounds i8,i8*%cl,i64 56
%cp=bitcast i8*%co to i32*
store i32 1,i32*%cp,align 4
%cq=bitcast i8*%cl to i8**
store i8*bitcast(i8**getelementptr inbounds(<{[4x i8],i32,i8*,i8*,i32}>,<{[4x i8],i32,i8*,i8*,i32}>*@r,i64 0,i32 2)to i8*),i8**%cq,align 8
call void@sml_raise(i8*inreg%cl)#1
unreachable
cr:
%cs=call i8*@sml_alloc(i32 inreg 60)#0
%ct=getelementptr inbounds i8,i8*%cs,i64 -4
%cu=bitcast i8*%ct to i32*
store i32 1342177336,i32*%cu,align 4
%cv=getelementptr inbounds i8,i8*%cs,i64 56
%cw=bitcast i8*%cv to i32*
store i32 1,i32*%cw,align 4
%cx=bitcast i8*%cs to i8**
store i8*bitcast(i8**getelementptr inbounds(<{[4x i8],i32,i8*,i8*,i32}>,<{[4x i8],i32,i8*,i8*,i32}>*@t,i64 0,i32 2)to i8*),i8**%cx,align 8
call void@sml_raise(i8*inreg%cs)#1
unreachable
cy:
%cz=bitcast i8*%ci to i8**
%cA=load i8*,i8**%cz,align 8
%cB=load i8,i8*%cA,align 1
%cC=getelementptr inbounds i8,i8*%cA,i64 8
%cD=bitcast i8*%cC to i8**
%cE=load i8*,i8**%cD,align 8
store i8*%cE,i8**%b,align 8
%cF=zext i8%cB to i32
%cG=and i32%cF,192
%cH=icmp eq i32%cG,128
br i1%cH,label%cI,label%cZ
cI:
%cJ=shl nuw nsw i32%b6,6
%cK=and i32%cF,63
%cL=or i32%cK,%cJ
%cM=call i8*@sml_alloc(i32 inreg 20)#0
%cN=bitcast i8*%cM to i32*
%cO=getelementptr inbounds i8,i8*%cM,i64 -4
%cP=bitcast i8*%cO to i32*
store i32 1342177296,i32*%cP,align 4
%cQ=getelementptr inbounds i8,i8*%cM,i64 4
%cR=bitcast i8*%cQ to i32*
store i32 0,i32*%cR,align 1
store i32%cL,i32*%cN,align 4
%cS=load i8*,i8**%b,align 8
store i8*null,i8**%b,align 8
%cT=getelementptr inbounds i8,i8*%cM,i64 8
%cU=bitcast i8*%cT to i8**
store i8*%cS,i8**%cU,align 8
%cV=getelementptr inbounds i8,i8*%cM,i64 16
%cW=bitcast i8*%cV to i32*
store i32 2,i32*%cW,align 4
%cX=call fastcc i8*@_SMLFN9Substring4getcE(i8*inreg%cS)
%cY=icmp eq i8*%cX,null
br i1%cY,label%c6,label%dd
cZ:
store i8*null,i8**%b,align 8
%c0=call i8*@sml_alloc(i32 inreg 60)#0
%c1=getelementptr inbounds i8,i8*%c0,i64 -4
%c2=bitcast i8*%c1 to i32*
store i32 1342177336,i32*%c2,align 4
%c3=getelementptr inbounds i8,i8*%c0,i64 56
%c4=bitcast i8*%c3 to i32*
store i32 1,i32*%c4,align 4
%c5=bitcast i8*%c0 to i8**
store i8*bitcast(i8**getelementptr inbounds(<{[4x i8],i32,i8*,i8*,i32}>,<{[4x i8],i32,i8*,i8*,i32}>*@r,i64 0,i32 2)to i8*),i8**%c5,align 8
call void@sml_raise(i8*inreg%c0)#1
unreachable
c6:
%c7=call i8*@sml_alloc(i32 inreg 60)#0
%c8=getelementptr inbounds i8,i8*%c7,i64 -4
%c9=bitcast i8*%c8 to i32*
store i32 1342177336,i32*%c9,align 4
%da=getelementptr inbounds i8,i8*%c7,i64 56
%db=bitcast i8*%da to i32*
store i32 1,i32*%db,align 4
%dc=bitcast i8*%c7 to i8**
store i8*bitcast(i8**getelementptr inbounds(<{[4x i8],i32,i8*,i8*,i32}>,<{[4x i8],i32,i8*,i8*,i32}>*@t,i64 0,i32 2)to i8*),i8**%dc,align 8
call void@sml_raise(i8*inreg%c7)#1
unreachable
dd:
%de=bitcast i8*%cX to i8**
%df=load i8*,i8**%de,align 8
%dg=load i8,i8*%df,align 1
%dh=getelementptr inbounds i8,i8*%df,i64 8
%di=bitcast i8*%dh to i8**
%dj=load i8*,i8**%di,align 8
store i8*%dj,i8**%b,align 8
%dk=zext i8%dg to i32
%dl=and i32%dk,192
%dm=icmp eq i32%dl,128
br i1%dm,label%dn,label%dy
dn:
%do=shl nuw nsw i32%cL,6
%dp=and i32%dk,63
%dq=or i32%dp,%do
%dr=call i8*@sml_alloc(i32 inreg 20)#0
%ds=bitcast i8*%dr to i32*
%dt=getelementptr inbounds i8,i8*%dr,i64 -4
%du=bitcast i8*%dt to i32*
store i32 1342177296,i32*%du,align 4
%dv=getelementptr inbounds i8,i8*%dr,i64 4
%dw=bitcast i8*%dv to i32*
store i32 0,i32*%dw,align 1
store i32%dq,i32*%ds,align 4
%dx=load i8*,i8**%b,align 8
br label%dM
dy:
store i8*null,i8**%b,align 8
%dz=call i8*@sml_alloc(i32 inreg 60)#0
%dA=getelementptr inbounds i8,i8*%dz,i64 -4
%dB=bitcast i8*%dA to i32*
store i32 1342177336,i32*%dB,align 4
%dC=getelementptr inbounds i8,i8*%dz,i64 56
%dD=bitcast i8*%dC to i32*
store i32 1,i32*%dD,align 4
%dE=bitcast i8*%dz to i8**
store i8*bitcast(i8**getelementptr inbounds(<{[4x i8],i32,i8*,i8*,i32}>,<{[4x i8],i32,i8*,i8*,i32}>*@r,i64 0,i32 2)to i8*),i8**%dE,align 8
call void@sml_raise(i8*inreg%dz)#1
unreachable
dF:
%dG=call i8*@sml_alloc(i32 inreg 60)#0
%dH=getelementptr inbounds i8,i8*%dG,i64 -4
%dI=bitcast i8*%dH to i32*
store i32 1342177336,i32*%dI,align 4
%dJ=getelementptr inbounds i8,i8*%dG,i64 56
%dK=bitcast i8*%dJ to i32*
store i32 1,i32*%dK,align 4
%dL=bitcast i8*%dG to i8**
store i8*bitcast(i8**getelementptr inbounds(<{[4x i8],i32,i8*,i8*,i32}>,<{[4x i8],i32,i8*,i8*,i32}>*@p,i64 0,i32 2)to i8*),i8**%dL,align 8
call void@sml_raise(i8*inreg%dG)#1
unreachable
dM:
%dN=phi i8*[%Y,%T],[%dr,%dn],[%bs,%bo],[%q,%p]
%dO=phi i8*[%ae,%T],[%dx,%dn],[%by,%bo],[%w,%p]
%dP=phi i32[%X,%T],[%dq,%dn],[%br,%bo],[%n,%p]
%dQ=getelementptr inbounds i8,i8*%dN,i64 8
%dR=bitcast i8*%dQ to i8**
store i8*%dO,i8**%dR,align 8
%dS=getelementptr inbounds i8,i8*%dN,i64 16
%dT=bitcast i8*%dS to i32*
store i32 2,i32*%dT,align 4
store i8*%dO,i8**%b,align 8
%dU=call i8*@sml_alloc(i32 inreg 20)#0
%dV=bitcast i8*%dU to i32*
%dW=getelementptr inbounds i8,i8*%dU,i64 -4
%dX=bitcast i8*%dW to i32*
store i32 1342177296,i32*%dX,align 4
%dY=getelementptr inbounds i8,i8*%dU,i64 4
%dZ=bitcast i8*%dY to i32*
store i32 0,i32*%dZ,align 1
store i32%dP,i32*%dV,align 4
%d0=load i8*,i8**%b,align 8
%d1=getelementptr inbounds i8,i8*%dU,i64 8
%d2=bitcast i8*%d1 to i8**
store i8*%d0,i8**%d2,align 8
%d3=getelementptr inbounds i8,i8*%dU,i64 16
%d4=bitcast i8*%d3 to i32*
store i32 2,i32*%d4,align 4
ret i8*%dU
}
define fastcc i32@_SMLFN4UTF84sizeE(i8*inreg%a)#2 gc"smlsharp"{
k:
%b=alloca i8*,align 8
call void@llvm.gcroot(i8**%b,i8*null)#0
%c=call fastcc i8*@_SMLFN9Substring4fullE(i8*inreg%a)
store i8*%c,i8**%b,align 8
%d=call i8*@sml_alloc(i32 inreg 20)#0
%e=getelementptr inbounds i8,i8*%d,i64 -4
%f=bitcast i8*%e to i32*
store i32 1342177296,i32*%f,align 4
%g=getelementptr inbounds i8,i8*%d,i64 12
%h=bitcast i8*%g to i32*
store i32 0,i32*%h,align 1
br label%i
i:
%j=phi i8*[%O,%G],[%d,%k]
%l=phi i32[%N,%G],[0,%k]
%m=load i8*,i8**%b,align 8
store i8*null,i8**%b,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%l,i32*%p,align 4
%q=getelementptr inbounds i8,i8*%j,i64 16
%r=bitcast i8*%q to i32*
store i32 1,i32*%r,align 4
store i8*%j,i8**%b,align 8
%s=load atomic i32,i32*@sml_check_flag unordered,align 4
%t=icmp eq i32%s,0
br i1%t,label%w,label%u
u:
call void@sml_check(i32 inreg%s)
%v=load i8*,i8**%b,align 8
br label%w
w:
%x=phi i8*[%v,%u],[%j,%i]
%y=bitcast i8*%x to i8**
%z=load i8*,i8**%y,align 8
store i8*null,i8**%b,align 8
%A=getelementptr inbounds i8,i8*%x,i64 8
%B=bitcast i8*%A to i32*
%C=load i32,i32*%B,align 4
%D=call fastcc i8*@_SMLFN9Substring4getcE(i8*inreg%z)
%E=icmp eq i8*%D,null
br i1%E,label%F,label%G
F:
ret i32%C
G:
%H=bitcast i8*%D to i8**
%I=load i8*,i8**%H,align 8
%J=call fastcc i8*@_SMLLLN4UTF85getWCE_187(i8*inreg%I)
%K=getelementptr inbounds i8,i8*%J,i64 8
%L=bitcast i8*%K to i8**
%M=load i8*,i8**%L,align 8
store i8*%M,i8**%b,align 8
%N=add nsw i32%C,1
%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=getelementptr inbounds i8,i8*%O,i64 12
%S=bitcast i8*%R to i32*
store i32 0,i32*%S,align 1
br label%i
}
define internal fastcc i8*@_SMLLLN4UTF84foldE_191(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**%c,align 8
%k=load i8*,i8**%e,align 8
br label%l
l:
%m=phi i8*[%k,%i],[%a,%n]
%o=phi i8*[%j,%i],[%b,%n]
store i8*null,i8**%c,align 8
%p=getelementptr inbounds i8,i8*%m,i64 20
%q=bitcast i8*%p to i32*
%r=load i32,i32*%q,align 4
%s=add i32%r,7
%t=sub i32 0,%r
%u=and i32%s,%t
%v=add i32%s,%u
%w=and i32%v,-8
%x=lshr i32%u,3
%y=getelementptr inbounds i8,i8*%m,i64 16
%z=bitcast i8*%y to i32*
%A=load i32,i32*%z,align 4
%B=shl i32%A,%x
%C=or i32%B,1
%D=or i32%w,4
%E=add i32%r,3
%F=and i32%E,%t
%G=add i32%s,%F
%H=and i32%G,-8
%I=lshr i32%F,3
%J=shl i32%A,%I
%K=or i32%H,4
%L=call fastcc i8*@_SMLFN9Substring4fullE(i8*inreg%o)
store i8*%L,i8**%c,align 8
%M=load i8*,i8**%e,align 8
%N=getelementptr inbounds i8,i8*%M,i64 16
%O=bitcast i8*%N to i32*
%P=load i32,i32*%O,align 4
%Q=icmp eq i32%P,0
br i1%Q,label%V,label%R
R:
%S=getelementptr inbounds i8,i8*%M,i64 8
%T=bitcast i8*%S to i8**
%U=load i8*,i8**%T,align 8
br label%ah
V:
%W=getelementptr inbounds i8,i8*%M,i64 20
%X=bitcast i8*%W to i32*
%Y=load i32,i32*%X,align 4
%Z=call i8*@sml_alloc(i32 inreg%Y)#0
%aa=getelementptr inbounds i8,i8*%Z,i64 -4
%ab=bitcast i8*%aa to i32*
store i32%Y,i32*%ab,align 4
%ac=load i8*,i8**%e,align 8
%ad=getelementptr inbounds i8,i8*%ac,i64 8
call void@llvm.memcpy.p0i8.p0i8.i32(i8*%Z,i8*%ad,i32%Y,i1 false)
%ae=getelementptr inbounds i8,i8*%ac,i64 16
%af=bitcast i8*%ae to i32*
%ag=load i32,i32*%af,align 4
br label%ah
ah:
%ai=phi i32[%ag,%V],[%P,%R]
%aj=phi i8*[%ac,%V],[%M,%R]
%ak=phi i8*[%Z,%V],[%U,%R]
store i8*%ak,i8**%d,align 8
%al=getelementptr inbounds i8,i8*%aj,i64 20
%am=bitcast i8*%al to i32*
%an=load i32,i32*%am,align 4
%ao=call i8*@sml_alloc(i32 inreg%D)#0
%ap=or i32%w,1342177280
%aq=getelementptr inbounds i8,i8*%ao,i64 -4
%ar=bitcast i8*%aq to i32*
store i32%ap,i32*%ar,align 4
call void@llvm.memset.p0i8.i32(i8*%ao,i8 0,i32%D,i1 false)
%as=load i8*,i8**%c,align 8
store i8*null,i8**%c,align 8
%at=bitcast i8*%ao to i8**
store i8*%as,i8**%at,align 8
%au=icmp eq i32%ai,0
%av=load i8*,i8**%d,align 8
%aw=sext i32%u to i64
%ax=getelementptr inbounds i8,i8*%ao,i64%aw
br i1%au,label%ay,label%az
ay:
call void@llvm.memcpy.p0i8.p0i8.i32(i8*%ax,i8*%av,i32%an,i1 false)
br label%aB
az:
%aA=bitcast i8*%ax to i8**
store i8*%av,i8**%aA,align 8
br label%aB
aB:
%aC=sext i32%w to i64
%aD=getelementptr inbounds i8,i8*%ao,i64%aC
%aE=bitcast i8*%aD to i32*
store i32%C,i32*%aE,align 4
%aF=bitcast i8**%e to i8***
%aG=or i32%H,1342177280
%aH=sext i32%F to i64
%aI=sext i32%H to i64
br label%aJ
aJ:
%aK=phi i8*[%bW,%b7],[%ao,%aB]
store i8*%aK,i8**%c,align 8
%aL=bitcast i8*%aK to i8**
%aM=load i8*,i8**%aL,align 8
store i8*%aM,i8**%d,align 8
%aN=load i8*,i8**%e,align 8
%aO=getelementptr inbounds i8,i8*%aN,i64 16
%aP=bitcast i8*%aO to i32*
%aQ=load i32,i32*%aP,align 4
%aR=icmp eq i32%aQ,0
br i1%aR,label%aW,label%aS
aS:
store i8*null,i8**%c,align 8
%aT=getelementptr inbounds i8,i8*%aK,i64%aw
%aU=bitcast i8*%aT to i8**
%aV=load i8*,i8**%aU,align 8
br label%a6
aW:
%aX=getelementptr inbounds i8,i8*%aN,i64 20
%aY=bitcast i8*%aX to i32*
%aZ=load i32,i32*%aY,align 4
%a0=call i8*@sml_alloc(i32 inreg%aZ)#0
%a1=getelementptr inbounds i8,i8*%a0,i64 -4
%a2=bitcast i8*%a1 to i32*
store i32%aZ,i32*%a2,align 4
%a3=load i8*,i8**%c,align 8
store i8*null,i8**%c,align 8
%a4=getelementptr inbounds i8,i8*%a3,i64%aw
call void@llvm.memcpy.p0i8.p0i8.i32(i8*%a0,i8*%a4,i32%aZ,i1 false)
%a5=load i8*,i8**%d,align 8
br label%a6
a6:
%a7=phi i8*[%a5,%aW],[%aM,%aS]
%a8=phi i8*[%a0,%aW],[%aV,%aS]
store i8*%a8,i8**%c,align 8
store i8*null,i8**%d,align 8
%a9=call fastcc i8*@_SMLFN9Substring4getcE(i8*inreg%a7)
%ba=icmp eq i8*%a9,null
br i1%ba,label%bb,label%bd
bb:
%bc=load i8*,i8**%c,align 8
ret i8*%bc
bd:
%be=bitcast i8*%a9 to i8**
%bf=load i8*,i8**%be,align 8
%bg=call fastcc i8*@_SMLLLN4UTF85getWCE_187(i8*inreg%bf)
%bh=bitcast i8*%bg to i32*
%bi=load i32,i32*%bh,align 4
%bj=getelementptr inbounds i8,i8*%bg,i64 8
%bk=bitcast i8*%bj to i8**
%bl=load i8*,i8**%bk,align 8
store i8*%bl,i8**%d,align 8
%bm=load i8**,i8***%aF,align 8
%bn=load i8*,i8**%bm,align 8
%bo=getelementptr inbounds i8,i8*%bn,i64 16
%bp=bitcast i8*%bo to i8*(i8*,i8*)**
%bq=load i8*(i8*,i8*)*,i8*(i8*,i8*)**%bp,align 8
%br=bitcast i8*%bn to i8**
%bs=load i8*,i8**%br,align 8
store i8*%bs,i8**%f,align 8
%bt=bitcast i8**%bm to i8*
%bu=getelementptr inbounds i8,i8*%bt,i64 20
%bv=bitcast i8*%bu to i32*
%bw=load i32,i32*%bv,align 4
%bx=getelementptr inbounds i8*,i8**%bm,i64 2
%by=bitcast i8**%bx to i32*
%bz=load i32,i32*%by,align 4
%bA=call i8*@sml_alloc(i32 inreg%K)#0
%bB=bitcast i8*%bA to i32*
%bC=getelementptr inbounds i8,i8*%bA,i64 -4
%bD=bitcast i8*%bC to i32*
store i32%aG,i32*%bD,align 4
call void@llvm.memset.p0i8.i32(i8*%bA,i8 0,i32%K,i1 false)
store i32%bi,i32*%bB,align 4
%bE=icmp eq i32%bz,0
%bF=load i8*,i8**%c,align 8
store i8*null,i8**%c,align 8
%bG=getelementptr inbounds i8,i8*%bA,i64%aH
br i1%bE,label%bH,label%bI
bH:
call void@llvm.memcpy.p0i8.p0i8.i32(i8*%bG,i8*%bF,i32%bw,i1 false)
br label%bK
bI:
%bJ=bitcast i8*%bG to i8**
store i8*%bF,i8**%bJ,align 8
br label%bK
bK:
%bL=getelementptr inbounds i8,i8*%bA,i64%aI
%bM=bitcast i8*%bL to i32*
store i32%J,i32*%bM,align 4
%bN=load i8*,i8**%f,align 8
store i8*null,i8**%f,align 8
%bO=call fastcc i8*%bq(i8*inreg%bN,i8*inreg%bA)
store i8*%bO,i8**%c,align 8
%bP=load i8*,i8**%e,align 8
%bQ=getelementptr inbounds i8,i8*%bP,i64 20
%bR=bitcast i8*%bQ to i32*
%bS=load i32,i32*%bR,align 4
%bT=getelementptr inbounds i8,i8*%bP,i64 16
%bU=bitcast i8*%bT to i32*
%bV=load i32,i32*%bU,align 4
%bW=call i8*@sml_alloc(i32 inreg%D)#0
%bX=getelementptr inbounds i8,i8*%bW,i64 -4
%bY=bitcast i8*%bX to i32*
store i32%ap,i32*%bY,align 4
call void@llvm.memset.p0i8.i32(i8*%bW,i8 0,i32%D,i1 false)
%bZ=load i8*,i8**%d,align 8
%b0=bitcast i8*%bW to i8**
store i8*%bZ,i8**%b0,align 8
%b1=icmp eq i32%bV,0
%b2=load i8*,i8**%c,align 8
store i8*null,i8**%c,align 8
%b3=getelementptr inbounds i8,i8*%bW,i64%aw
br i1%b1,label%b4,label%b5
b4:
call void@llvm.memcpy.p0i8.p0i8.i32(i8*%b3,i8*%b2,i32%bS,i1 false)
br label%b7
b5:
%b6=bitcast i8*%b3 to i8**
store i8*%b2,i8**%b6,align 8
br label%b7
b7:
%b8=getelementptr inbounds i8,i8*%bW,i64%aC
%b9=bitcast i8*%b8 to i32*
store i32%C,i32*%b9,align 4
br label%aJ
}
define internal fastcc i8*@_SMLLLN4UTF84foldE_192(i8*inreg%a,i8*inreg%b)#4 gc"smlsharp"{
%c=alloca i8*,align 8
%d=alloca i8*,align 8
%e=alloca i8*,align 8
call void@llvm.gcroot(i8**%c,i8*null)#0
call void@llvm.gcroot(i8**%d,i8*null)#0
call void@llvm.gcroot(i8**%e,i8*null)#0
store i8*%b,i8**%c,align 8
%f=getelementptr inbounds i8,i8*%a,i64 8
%g=bitcast i8*%f to i32*
%h=load i32,i32*%g,align 4
%i=shl i32%h,1
%j=or i32%i,1
%k=bitcast i8*%a to i8**
%l=load i8*,i8**%k,align 8
store i8*%l,i8**%d,align 8
%m=getelementptr inbounds i8,i8*%a,i64 12
%n=bitcast i8*%m to i32*
%o=load i32,i32*%n,align 4
%p=call i8*@sml_alloc(i32 inreg 28)#0
%q=getelementptr inbounds i8,i8*%p,i64 -4
%r=bitcast i8*%q to i32*
store i32 1342177304,i32*%r,align 4
store i8*%p,i8**%e,align 8
%s=load i8*,i8**%d,align 8
store i8*null,i8**%d,align 8
%t=bitcast i8*%p to i8**
store i8*%s,i8**%t,align 8
%u=icmp eq i32%h,0
%v=load i8*,i8**%c,align 8
store i8*null,i8**%c,align 8
%w=getelementptr inbounds i8,i8*%p,i64 8
br i1%u,label%x,label%y
x:
call void@llvm.memcpy.p0i8.p0i8.i32(i8*%w,i8*%v,i32%o,i1 false)
br label%A
y:
%z=bitcast i8*%w to i8**
store i8*%v,i8**%z,align 8
br label%A
A:
%B=getelementptr inbounds i8,i8*%p,i64 16
%C=bitcast i8*%B to i32*
store i32%h,i32*%C,align 4
%D=getelementptr inbounds i8,i8*%p,i64 20
%E=bitcast i8*%D to i32*
store i32%o,i32*%E,align 4
%F=getelementptr inbounds i8,i8*%p,i64 24
%G=bitcast i8*%F to i32*
store i32%j,i32*%G,align 4
%H=call i8*@sml_alloc(i32 inreg 28)#0
%I=getelementptr inbounds i8,i8*%H,i64 -4
%J=bitcast i8*%I to i32*
store i32 1342177304,i32*%J,align 4
%K=load i8*,i8**%e,align 8
%L=bitcast i8*%H to i8**
store i8*%K,i8**%L,align 8
%M=getelementptr inbounds i8,i8*%H,i64 8
%N=bitcast i8*%M to void(...)**
store void(...)*bitcast(i8*(i8*,i8*)*@_SMLLLN4UTF84foldE_191 to void(...)*),void(...)**%N,align 8
%O=getelementptr inbounds i8,i8*%H,i64 16
%P=bitcast i8*%O to void(...)**
store void(...)*bitcast(i8*(i8*,i8*)*@_SMLLLN4UTF84foldE_191 to void(...)*),void(...)**%P,align 8
%Q=getelementptr inbounds i8,i8*%H,i64 24
%R=bitcast i8*%Q to i32*
store i32 1,i32*%R,align 4
ret i8*%H
}
define internal fastcc i8*@_SMLLLN4UTF84foldE_193(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*)*@_SMLLLN4UTF84foldE_192 to void(...)*),void(...)**%A,align 8
%B=getelementptr inbounds i8,i8*%u,i64 16
%C=bitcast i8*%B to void(...)**
store void(...)*bitcast(i8*(i8*,i8*)*@_SMLLLN4UTF84foldE_192 to void(...)*),void(...)**%C,align 8
%D=getelementptr inbounds i8,i8*%u,i64 24
%E=bitcast i8*%D to i32*
store i32 1,i32*%E,align 4
ret i8*%u
}
define fastcc i8*@_SMLFN4UTF84foldE(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*)*@_SMLLLN4UTF84foldE_193 to void(...)*),void(...)**%r,align 8
%s=getelementptr inbounds i8,i8*%l,i64 16
%t=bitcast i8*%s to void(...)**
store void(...)*bitcast(i8*(i8*,i8*)*@_SMLLLN4UTF84foldE_193 to void(...)*),void(...)**%t,align 8
%u=getelementptr inbounds i8,i8*%l,i64 24
%v=bitcast i8*%u to i32*
store i32 -2147483647,i32*%v,align 4
ret i8*%l
}
define internal fastcc i32@_SMLLLN4UTF83allE_196(i8*inreg%a,i8*inreg%b)#2 gc"smlsharp"{
%c=alloca i8*,align 8
%d=alloca i8*,align 8
%e=alloca i8*,align 8
call void@llvm.gcroot(i8**%c,i8*null)#0
call void@llvm.gcroot(i8**%d,i8*null)#0
call void@llvm.gcroot(i8**%e,i8*null)#0
store i8*%a,i8**%d,align 8
%f=call fastcc i8*@_SMLFN9Substring4fullE(i8*inreg%b)
store i8*%f,i8**%c,align 8
%g=bitcast i8**%d to i8***
br label%h
h:
%i=load atomic i32,i32*@sml_check_flag unordered,align 4
%j=icmp eq i32%i,0
br i1%j,label%l,label%k
k:
call void@sml_check(i32 inreg%i)
br label%l
l:
%m=load i8*,i8**%c,align 8
store i8*null,i8**%c,align 8
%n=call fastcc i8*@_SMLFN9Substring4getcE(i8*inreg%m)
%o=icmp eq i8*%n,null
br i1%o,label%p,label%r
p:
%q=phi i32[1,%l],[0,%r]
ret i32%q
r:
%s=bitcast i8*%n to i8**
%t=load i8*,i8**%s,align 8
%u=call fastcc i8*@_SMLLLN4UTF85getWCE_187(i8*inreg%t)
%v=bitcast i8*%u to i32*
%w=load i32,i32*%v,align 4
%x=getelementptr inbounds i8,i8*%u,i64 8
%y=bitcast i8*%x to i8**
%z=load i8*,i8**%y,align 8
store i8*%z,i8**%c,align 8
%A=load i8**,i8***%g,align 8
%B=load i8*,i8**%A,align 8
%C=getelementptr inbounds i8,i8*%B,i64 16
%D=bitcast i8*%C to i8*(i8*,i8*)**
%E=load i8*(i8*,i8*)*,i8*(i8*,i8*)**%D,align 8
%F=bitcast i8*%B to i8**
%G=load i8*,i8**%F,align 8
store i8*%G,i8**%e,align 8
%H=call i8*@sml_alloc(i32 inreg 4)#0
%I=bitcast i8*%H to i32*
%J=getelementptr inbounds i8,i8*%H,i64 -4
%K=bitcast i8*%J to i32*
store i32 4,i32*%K,align 4
store i32%w,i32*%I,align 4
%L=load i8*,i8**%e,align 8
store i8*null,i8**%e,align 8
%M=call fastcc i8*%E(i8*inreg%L,i8*inreg%H)
%N=bitcast i8*%M to i32*
%O=load i32,i32*%N,align 4
%P=icmp eq i32%O,0
br i1%P,label%p,label%h
}
define fastcc i8*@_SMLFN4UTF83allE(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*)*@_SMLLLN4UTF83allE_196 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*)*@_SMLLLN4UTF83allE_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 i32@_SMLLLN4UTF86existsE_199(i8*inreg%a,i8*inreg%b)#2 gc"smlsharp"{
%c=alloca i8*,align 8
%d=alloca i8*,align 8
%e=alloca i8*,align 8
call void@llvm.gcroot(i8**%c,i8*null)#0
call void@llvm.gcroot(i8**%d,i8*null)#0
call void@llvm.gcroot(i8**%e,i8*null)#0
store i8*%a,i8**%d,align 8
%f=call fastcc i8*@_SMLFN9Substring4fullE(i8*inreg%b)
store i8*%f,i8**%c,align 8
%g=bitcast i8**%d to i8***
br label%h
h:
%i=load atomic i32,i32*@sml_check_flag unordered,align 4
%j=icmp eq i32%i,0
br i1%j,label%l,label%k
k:
call void@sml_check(i32 inreg%i)
br label%l
l:
%m=load i8*,i8**%c,align 8
store i8*null,i8**%c,align 8
%n=call fastcc i8*@_SMLFN9Substring4getcE(i8*inreg%m)
%o=icmp eq i8*%n,null
br i1%o,label%p,label%q
p:
ret i32 1
q:
%r=bitcast i8*%n to i8**
%s=load i8*,i8**%r,align 8
%t=call fastcc i8*@_SMLLLN4UTF85getWCE_187(i8*inreg%s)
%u=bitcast i8*%t to i32*
%v=load i32,i32*%u,align 4
%w=getelementptr inbounds i8,i8*%t,i64 8
%x=bitcast i8*%w to i8**
%y=load i8*,i8**%x,align 8
store i8*%y,i8**%c,align 8
%z=load i8**,i8***%g,align 8
%A=load i8*,i8**%z,align 8
%B=getelementptr inbounds i8,i8*%A,i64 16
%C=bitcast i8*%B to i8*(i8*,i8*)**
%D=load i8*(i8*,i8*)*,i8*(i8*,i8*)**%C,align 8
%E=bitcast i8*%A to i8**
%F=load i8*,i8**%E,align 8
store i8*%F,i8**%e,align 8
%G=call i8*@sml_alloc(i32 inreg 4)#0
%H=bitcast i8*%G to i32*
%I=getelementptr inbounds i8,i8*%G,i64 -4
%J=bitcast i8*%I to i32*
store i32 4,i32*%J,align 4
store i32%v,i32*%H,align 4
%K=load i8*,i8**%e,align 8
store i8*null,i8**%e,align 8
%L=call fastcc i8*%D(i8*inreg%K,i8*inreg%G)
%M=bitcast i8*%L to i32*
%N=load i32,i32*%M,align 4
%O=icmp eq i32%N,0
br i1%O,label%h,label%p
}
define fastcc i8*@_SMLFN4UTF86existsE(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*)*@_SMLLLN4UTF86existsE_199 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*)*@_SMLLLN4UTF86existsE_224 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*@_SMLFN4UTF87explodeE(i8*inreg%a)#2 gc"smlsharp"{
z:
%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
store i8*%a,i8**%b,align 8
%f=call fastcc i8*@_SMLFN4List3revE(i32 inreg 0,i32 inreg 4)
store i8*%f,i8**%c,align 8
%g=load i8*,i8**%b,align 8
store i8*null,i8**%b,align 8
%h=call fastcc i8*@_SMLFN9Substring4fullE(i8*inreg%g)
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
%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*null,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=load i8*,i8**%c,align 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
store i8*null,i8**%c,align 8
%v=bitcast i8*%r to i8**
%w=load i8*,i8**%v,align 8
store i8*%w,i8**%d,align 8
br label%x
x:
%y=phi i8*[%al,%R],[%i,%z]
store i8*%y,i8**%b,align 8
%A=load atomic i32,i32*@sml_check_flag unordered,align 4
%B=icmp eq i32%A,0
br i1%B,label%E,label%C
C:
call void@sml_check(i32 inreg%A)
%D=load i8*,i8**%b,align 8
br label%E
E:
%F=phi i8*[%D,%C],[%y,%x]
%G=bitcast i8*%F to i8**
%H=load i8*,i8**%G,align 8
%I=getelementptr inbounds i8,i8*%F,i64 8
%J=bitcast i8*%I to i8**
%K=load i8*,i8**%J,align 8
store i8*%K,i8**%b,align 8
%L=call fastcc i8*@_SMLFN9Substring4getcE(i8*inreg%H)
%M=icmp eq i8*%L,null
br i1%M,label%N,label%R
N:
%O=load i8*,i8**%b,align 8
%P=load i8*,i8**%d,align 8
%Q=tail call fastcc i8*%u(i8*inreg%P,i8*inreg%O)
ret i8*%Q
R:
%S=bitcast i8*%L to i8**
%T=load i8*,i8**%S,align 8
%U=call fastcc i8*@_SMLLLN4UTF85getWCE_187(i8*inreg%T)
%V=bitcast i8*%U to i32*
%W=load i32,i32*%V,align 4
%X=getelementptr inbounds i8,i8*%U,i64 8
%Y=bitcast i8*%X to i8**
%Z=load i8*,i8**%Y,align 8
store i8*%Z,i8**%c,align 8
%aa=call i8*@sml_alloc(i32 inreg 20)#0
%ab=getelementptr inbounds i8,i8*%aa,i64 -4
%ac=bitcast i8*%ab to i32*
store i32 1342177296,i32*%ac,align 4
store i8*%aa,i8**%e,align 8
%ad=getelementptr inbounds i8,i8*%aa,i64 4
%ae=bitcast i8*%ad to i32*
store i32 0,i32*%ae,align 1
%af=bitcast i8*%aa to i32*
store i32%W,i32*%af,align 4
%ag=load i8*,i8**%b,align 8
store i8*null,i8**%b,align 8
%ah=getelementptr inbounds i8,i8*%aa,i64 8
%ai=bitcast i8*%ah to i8**
store i8*%ag,i8**%ai,align 8
%aj=getelementptr inbounds i8,i8*%aa,i64 16
%ak=bitcast i8*%aj to i32*
store i32 2,i32*%ak,align 4
%al=call i8*@sml_alloc(i32 inreg 20)#0
%am=getelementptr inbounds i8,i8*%al,i64 -4
%an=bitcast i8*%am to i32*
store i32 1342177296,i32*%an,align 4
%ao=load i8*,i8**%c,align 8
store i8*null,i8**%c,align 8
%ap=bitcast i8*%al to i8**
store i8*%ao,i8**%ap,align 8
%aq=load i8*,i8**%e,align 8
store i8*null,i8**%e,align 8
%ar=getelementptr inbounds i8,i8*%al,i64 8
%as=bitcast i8*%ar to i8**
store i8*%aq,i8**%as,align 8
%at=getelementptr inbounds i8,i8*%al,i64 16
%au=bitcast i8*%at to i32*
store i32 3,i32*%au,align 4
br label%x
}
define fastcc i8*@_SMLFN4UTF87implodeE(i8*inreg%a)#2 gc"smlsharp"{
%b=alloca i8*,align 8
call void@llvm.gcroot(i8**%b,i8*null)#0
store i8*%a,i8**%b,align 8
%c=load atomic i32,i32*@sml_check_flag unordered,align 4
%d=icmp eq i32%c,0
br i1%d,label%f,label%e
e:
call void@sml_check(i32 inreg%c)
br label%f
f:
%g=call fastcc i8*@_SMLFN4List5foldrE(i32 inreg 0,i32 inreg 4,i32 inreg 1,i32 inreg 8)
%h=getelementptr inbounds i8,i8*%g,i64 16
%i=bitcast i8*%h to i8*(i8*,i8*)**
%j=load i8*(i8*,i8*)*,i8*(i8*,i8*)**%i,align 8
%k=bitcast i8*%g to i8**
%l=load i8*,i8**%k,align 8
%m=call fastcc i8*%j(i8*inreg%l,i8*inreg bitcast(i8**getelementptr inbounds(<{[4x i8],i32,i8*,void(...)*,void(...)*,i32}>,<{[4x i8],i32,i8*,void(...)*,void(...)*,i32}>*@m,i64 0,i32 2)to i8*))
%n=getelementptr inbounds i8,i8*%m,i64 16
%o=bitcast i8*%n to i8*(i8*,i8*)**
%p=load i8*(i8*,i8*)*,i8*(i8*,i8*)**%o,align 8
%q=bitcast i8*%m to i8**
%r=load i8*,i8**%q,align 8
%s=call fastcc i8*%p(i8*inreg%r,i8*inreg null)
%t=getelementptr inbounds i8,i8*%s,i64 16
%u=bitcast i8*%t to i8*(i8*,i8*)**
%v=load i8*(i8*,i8*)*,i8*(i8*,i8*)**%u,align 8
%w=bitcast i8*%s to i8**
%x=load i8*,i8**%w,align 8
%y=load i8*,i8**%b,align 8
store i8*null,i8**%b,align 8
%z=call fastcc i8*%v(i8*inreg%x,i8*inreg%y)
%A=tail call fastcc i8*@_SMLFN10CharVector8fromListE(i8*inreg%z)
ret i8*%A
}
define internal fastcc void@_SMLLLN4UTF83appE_206(i8*inreg%a,i8*inreg%b)#2 gc"smlsharp"{
%c=alloca i8*,align 8
%d=alloca i8*,align 8
%e=alloca i8*,align 8
call void@llvm.gcroot(i8**%c,i8*null)#0
call void@llvm.gcroot(i8**%d,i8*null)#0
call void@llvm.gcroot(i8**%e,i8*null)#0
store i8*%a,i8**%d,align 8
%f=call fastcc i8*@_SMLFN9Substring4fullE(i8*inreg%b)
store i8*%f,i8**%c,align 8
%g=bitcast i8**%d to i8***
br label%h
h:
%i=load atomic i32,i32*@sml_check_flag unordered,align 4
%j=icmp eq i32%i,0
br i1%j,label%l,label%k
k:
call void@sml_check(i32 inreg%i)
br label%l
l:
%m=load i8*,i8**%c,align 8
store i8*null,i8**%c,align 8
%n=call fastcc i8*@_SMLFN9Substring4getcE(i8*inreg%m)
%o=icmp eq i8*%n,null
br i1%o,label%p,label%q
p:
ret void
q:
%r=bitcast i8*%n to i8**
%s=load i8*,i8**%r,align 8
%t=call fastcc i8*@_SMLLLN4UTF85getWCE_187(i8*inreg%s)
%u=bitcast i8*%t to i32*
%v=load i32,i32*%u,align 4
%w=getelementptr inbounds i8,i8*%t,i64 8
%x=bitcast i8*%w to i8**
%y=load i8*,i8**%x,align 8
store i8*%y,i8**%c,align 8
%z=load i8**,i8***%g,align 8
%A=load i8*,i8**%z,align 8
%B=getelementptr inbounds i8,i8*%A,i64 16
%C=bitcast i8*%B to i8*(i8*,i8*)**
%D=load i8*(i8*,i8*)*,i8*(i8*,i8*)**%C,align 8
%E=bitcast i8*%A to i8**
%F=load i8*,i8**%E,align 8
store i8*%F,i8**%e,align 8
%G=call i8*@sml_alloc(i32 inreg 4)#0
%H=bitcast i8*%G to i32*
%I=getelementptr inbounds i8,i8*%G,i64 -4
%J=bitcast i8*%I to i32*
store i32 4,i32*%J,align 4
store i32%v,i32*%H,align 4
%K=load i8*,i8**%e,align 8
store i8*null,i8**%e,align 8
%L=call fastcc i8*%D(i8*inreg%K,i8*inreg%G)
br label%h
}
define fastcc i8*@_SMLFN4UTF83appE(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(void(i8*,i8*)*@_SMLLLN4UTF83appE_206 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*)*@_SMLLLN4UTF83appE_228 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*@_SMLLLN4UTF83mapE_209(i8*inreg%a,i8*inreg%b)#2 gc"smlsharp"{
p:
%c=alloca i8*,align 8
%d=alloca i8*,align 8
%e=alloca i8*,align 8
%f=alloca i8*,align 8
%g=alloca i8*,align 8
call void@llvm.gcroot(i8**%c,i8*null)#0
call void@llvm.gcroot(i8**%d,i8*null)#0
call void@llvm.gcroot(i8**%e,i8*null)#0
call void@llvm.gcroot(i8**%f,i8*null)#0
call void@llvm.gcroot(i8**%g,i8*null)#0
store i8*%a,i8**%e,align 8
%h=call fastcc i8*@_SMLFN9Substring4fullE(i8*inreg%b)
store i8*%h,i8**%c,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
%l=load i8*,i8**%c,align 8
store i8*null,i8**%c,align 8
%m=bitcast i8*%i to i8**
store i8*%l,i8**%m,align 8
br label%n
n:
%o=phi i8*[%aH,%V],[%i,%p]
%q=phi i8*[%aM,%V],[null,%p]
%r=getelementptr inbounds i8,i8*%o,i64 8
%s=bitcast i8*%r to i8**
store i8*%q,i8**%s,align 8
%t=getelementptr inbounds i8,i8*%o,i64 16
%u=bitcast i8*%t to i32*
store i32 3,i32*%u,align 4
store i8*%o,i8**%c,align 8
%v=load atomic i32,i32*@sml_check_flag unordered,align 4
%w=icmp eq i32%v,0
br i1%w,label%z,label%x
x:
call void@sml_check(i32 inreg%v)
%y=load i8*,i8**%c,align 8
br label%z
z:
%A=phi i8*[%y,%x],[%o,%n]
%B=bitcast i8*%A to i8**
%C=load i8*,i8**%B,align 8
%D=getelementptr inbounds i8,i8*%A,i64 8
%E=bitcast i8*%D to i8**
%F=load i8*,i8**%E,align 8
store i8*%F,i8**%c,align 8
%G=call fastcc i8*@_SMLFN9Substring4getcE(i8*inreg%C)
%H=icmp eq i8*%G,null
br i1%H,label%I,label%V
I:
%J=bitcast i8**%e to i8***
%K=load i8**,i8***%J,align 8
%L=load i8*,i8**%K,align 8
%M=getelementptr inbounds i8,i8*%L,i64 16
%N=bitcast i8*%M to i8*(i8*,i8*)**
%O=load i8*(i8*,i8*)*,i8*(i8*,i8*)**%N,align 8
store i8*null,i8**%e,align 8
%P=bitcast i8**%K to i8***
%Q=load i8**,i8***%P,align 8
%R=load i8*,i8**%Q,align 8
%S=load i8*,i8**%c,align 8
store i8*null,i8**%c,align 8
%T=call fastcc i8*%O(i8*inreg%R,i8*inreg%S)
%U=tail call fastcc i8*@_SMLFN10CharVector8fromListE(i8*inreg%T)
ret i8*%U
V:
%W=bitcast i8*%G to i8**
%X=load i8*,i8**%W,align 8
%Y=call fastcc i8*@_SMLLLN4UTF85getWCE_187(i8*inreg%X)
%Z=bitcast i8*%Y to i32*
%aa=load i32,i32*%Z,align 4
%ab=getelementptr inbounds i8,i8*%Y,i64 8
%ac=bitcast i8*%ab to i8**
%ad=load i8*,i8**%ac,align 8
store i8*%ad,i8**%d,align 8
%ae=call fastcc i8*@_SMLFN4List9revAppendE(i32 inreg 0,i32 inreg 1)
%af=getelementptr inbounds i8,i8*%ae,i64 16
%ag=bitcast i8*%af to i8*(i8*,i8*)**
%ah=load i8*(i8*,i8*)*,i8*(i8*,i8*)**%ag,align 8
%ai=bitcast i8*%ae to i8**
%aj=load i8*,i8**%ai,align 8
store i8*%aj,i8**%g,align 8
%ak=call i8*@sml_alloc(i32 inreg 20)#0
%al=bitcast i8*%ak to i32*
%am=getelementptr inbounds i8,i8*%ak,i64 -4
%an=bitcast i8*%am to i32*
store i32 1342177296,i32*%an,align 4
%ao=getelementptr inbounds i8,i8*%ak,i64 4
%ap=bitcast i8*%ao to i32*
store i32 0,i32*%ap,align 1
store i32%aa,i32*%al,align 4
%aq=getelementptr inbounds i8,i8*%ak,i64 8
%ar=bitcast i8*%aq to i8**
store i8*null,i8**%ar,align 8
%as=getelementptr inbounds i8,i8*%ak,i64 16
%at=bitcast i8*%as to i32*
store i32 2,i32*%at,align 4
%au=call fastcc i8*@_SMLLLN4UTF87encode_GE_157(i8*inreg%ak)
store i8*%au,i8**%f,align 8
%av=call i8*@sml_alloc(i32 inreg 20)#0
%aw=getelementptr inbounds i8,i8*%av,i64 -4
%ax=bitcast i8*%aw to i32*
store i32 1342177296,i32*%ax,align 4
%ay=load i8*,i8**%f,align 8
store i8*null,i8**%f,align 8
%az=bitcast i8*%av to i8**
store i8*%ay,i8**%az,align 8
%aA=load i8*,i8**%c,align 8
store i8*null,i8**%c,align 8
%aB=getelementptr inbounds i8,i8*%av,i64 8
%aC=bitcast i8*%aB to i8**
store i8*%aA,i8**%aC,align 8
%aD=getelementptr inbounds i8,i8*%av,i64 16
%aE=bitcast i8*%aD to i32*
store i32 3,i32*%aE,align 4
%aF=load i8*,i8**%g,align 8
store i8*null,i8**%g,align 8
%aG=call fastcc i8*%ah(i8*inreg%aF,i8*inreg%av)
store i8*%aG,i8**%c,align 8
%aH=call i8*@sml_alloc(i32 inreg 20)#0
%aI=getelementptr inbounds i8,i8*%aH,i64 -4
%aJ=bitcast i8*%aI to i32*
store i32 1342177296,i32*%aJ,align 4
%aK=load i8*,i8**%d,align 8
store i8*null,i8**%d,align 8
%aL=bitcast i8*%aH to i8**
store i8*%aK,i8**%aL,align 8
%aM=load i8*,i8**%c,align 8
store i8*null,i8**%c,align 8
br label%n
}
define internal fastcc i8*@_SMLLLN4UTF83mapE_210(i8*inreg%a,i8*inreg%b)#4 gc"smlsharp"{
%c=alloca i8*,align 8
%d=alloca i8*,align 8
call void@llvm.gcroot(i8**%c,i8*null)#0
call void@llvm.gcroot(i8**%d,i8*null)#0
%e=bitcast i8*%a to i8**
%f=load i8*,i8**%e,align 8
store i8*%f,i8**%c,align 8
%g=call i8*@sml_alloc(i32 inreg 12)#0
%h=getelementptr inbounds i8,i8*%g,i64 -4
%i=bitcast i8*%h to i32*
store i32 1342177288,i32*%i,align 4
store i8*%g,i8**%d,align 8
%j=load i8*,i8**%c,align 8
store i8*null,i8**%c,align 8
%k=bitcast i8*%g to i8**
store i8*%j,i8**%k,align 8
%l=getelementptr inbounds i8,i8*%g,i64 8
%m=bitcast i8*%l to i32*
store i32 1,i32*%m,align 4
%n=call i8*@sml_alloc(i32 inreg 28)#0
%o=getelementptr inbounds i8,i8*%n,i64 -4
%p=bitcast i8*%o to i32*
store i32 1342177304,i32*%p,align 4
%q=load i8*,i8**%d,align 8
%r=bitcast i8*%n to i8**
store i8*%q,i8**%r,align 8
%s=getelementptr inbounds i8,i8*%n,i64 8
%t=bitcast i8*%s to void(...)**
store void(...)*bitcast(i8*(i8*,i8*)*@_SMLLLN4UTF83mapE_209 to void(...)*),void(...)**%t,align 8
%u=getelementptr inbounds i8,i8*%n,i64 16
%v=bitcast i8*%u to void(...)**
store void(...)*bitcast(i8*(i8*,i8*)*@_SMLLLN4UTF83mapE_209 to void(...)*),void(...)**%v,align 8
%w=getelementptr inbounds i8,i8*%n,i64 24
%x=bitcast i8*%w to i32*
store i32 -2147483647,i32*%x,align 4
ret i8*%n
}
define fastcc i8*@_SMLFN4UTF83mapE(i8*inreg%a)local_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=load i8**,i8***bitcast(i8**getelementptr inbounds(<{[4x i8],i32,[1x i8*]}>,<{[4x i8],i32,[1x i8*]}>*@_SML_gvardc75c24a45712161_utf8,i64 0,i32 2,i64 0)to i8***),align 8
%k=load i8*,i8**%j,align 8
%l=tail call fastcc i8*@_SMLLLN4UTF83mapE_210(i8*inreg%k,i8*inreg%h)
ret i8*%l
}
define internal fastcc i8*@_SMLLLN4UTF84getuE_212(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*@_SMLFN4UTF84getuE(i32 inreg%e,i32 inreg%g)
ret i8*%h
}
define internal fastcc i8*@_SMLLLN4UTF87isAsciiE_213(i8*inreg%a,i8*inreg%b)#4 gc"smlsharp"{
%c=bitcast i8*%b to i32*
%d=load i32,i32*%c,align 4
%e=icmp ult i32%d,128
%f=zext i1%e to i32
%g=tail call i8*@sml_alloc(i32 inreg 4)#0
%h=bitcast i8*%g to i32*
%i=getelementptr inbounds i8,i8*%g,i64 -4
%j=bitcast i8*%i to i32*
store i32 4,i32*%j,align 4
store i32%f,i32*%h,align 4
ret i8*%g
}
define internal fastcc i8*@_SMLLLN4UTF87toAsciiE_214(i8*inreg%a,i8*inreg%b)#4 gc"smlsharp"{
%c=alloca i8*,align 8
%d=alloca i8*,align 8
%e=bitcast i8*%b to i32*
%f=load i32,i32*%e,align 4
%g=bitcast i8**%c to i8*
call void@llvm.lifetime.start.p0i8(i64 8,i8*%g)
%h=bitcast i8**%d to i8*
call void@llvm.lifetime.start.p0i8(i64 8,i8*%h)
call void@llvm.gcroot(i8**%c,i8*null)#0
call void@llvm.gcroot(i8**%d,i8*null)#0
%i=trunc i32%f to i8
%j=and i8%i,127
call void@llvm.lifetime.end.p0i8(i64 8,i8*%g)
call void@llvm.lifetime.end.p0i8(i64 8,i8*%h)
%k=call i8*@sml_alloc(i32 inreg 1)#0
%l=getelementptr inbounds i8,i8*%k,i64 -4
%m=bitcast i8*%l to i32*
store i32 1,i32*%m,align 4
store i8%j,i8*%k,align 1
ret i8*%k
}
define internal fastcc i8*@_SMLLLN4UTF89fromAsciiE_215(i8*inreg%a,i8*inreg%b)#4 gc"smlsharp"{
%c=load i8,i8*%b,align 1
%d=and i8%c,127
%e=zext i8%d to i32
%f=tail call i8*@sml_alloc(i32 inreg 4)#0
%g=bitcast i8*%f to i32*
%h=getelementptr inbounds i8,i8*%f,i64 -4
%i=bitcast i8*%h to i32*
store i32 4,i32*%i,align 4
store i32%e,i32*%g,align 4
ret i8*%f
}
define internal fastcc i8*@_SMLLLN4UTF88toStringE_216(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*@_SMLFN4UTF88toStringE(i32 inreg%d)
ret i8*%e
}
define internal fastcc i8*@_SMLLLN4UTF87encode_GE_217(i8*inreg%a,i8*inreg%b)#2 gc"smlsharp"{
%c=tail call fastcc i8*@_SMLLLN4UTF87encode_GE_157(i8*inreg%b)
ret i8*%c
}
define internal fastcc i8*@_SMLLLN4UTF86encodeE_218(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*@_SMLFN4UTF86encodeE(i32 inreg%d)
ret i8*%e
}
define internal fastcc i8*@_SMLLLN4UTF84sizeE_220(i8*inreg%a,i8*inreg%b)#2 gc"smlsharp"{
%c=tail call fastcc i32@_SMLFN4UTF84sizeE(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*@_SMLLLN4UTF84foldE_221(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*@_SMLFN4UTF84foldE(i32 inreg%e,i32 inreg%g)
ret i8*%h
}
define internal fastcc i8*@_SMLLLN4UTF83allE_222(i8*inreg%a,i8*inreg%b)#2 gc"smlsharp"{
%c=tail call fastcc i32@_SMLLLN4UTF83allE_196(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*@_SMLLLN4UTF83allE_223(i8*inreg%a,i8*inreg%b)#4 gc"smlsharp"{
%c=tail call fastcc i8*@_SMLFN4UTF83allE(i8*inreg%b)
ret i8*%c
}
define internal fastcc i8*@_SMLLLN4UTF86existsE_224(i8*inreg%a,i8*inreg%b)#2 gc"smlsharp"{
%c=tail call fastcc i32@_SMLLLN4UTF86existsE_199(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 1,i32*%e,align 4
ret i8*%d
}
define internal fastcc i8*@_SMLLLN4UTF86existsE_225(i8*inreg%a,i8*inreg%b)#4 gc"smlsharp"{
%c=tail call fastcc i8*@_SMLFN4UTF86existsE(i8*inreg%b)
ret i8*%c
}
define internal fastcc i8*@_SMLLLN4UTF87explodeE_226(i8*inreg%a,i8*inreg%b)#2 gc"smlsharp"{
%c=tail call fastcc i8*@_SMLFN4UTF87explodeE(i8*inreg%b)
ret i8*%c
}
define internal fastcc i8*@_SMLLLN4UTF87implodeE_227(i8*inreg%a,i8*inreg%b)#2 gc"smlsharp"{
%c=tail call fastcc i8*@_SMLFN4UTF87implodeE(i8*inreg%b)
ret i8*%c
}
define internal fastcc i8*@_SMLLLN4UTF83appE_228(i8*inreg%a,i8*inreg%b)#2 gc"smlsharp"{
tail call fastcc void@_SMLLLN4UTF83appE_206(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*@_SMLLLN4UTF83appE_229(i8*inreg%a,i8*inreg%b)#4 gc"smlsharp"{
%c=tail call fastcc i8*@_SMLFN4UTF83appE(i8*inreg%b)
ret i8*%c
}
declare void@llvm.memcpy.p0i8.p0i8.i32(i8*,i8*,i32,i1)#0
declare void@llvm.memset.p0i8.i32(i8*,i8,i32,i1)#0
declare void@llvm.lifetime.start.p0i8(i64,i8*)#0
declare void@llvm.lifetime.end.p0i8(i64,i8*)#0
attributes#0={nounwind}
attributes#1={noreturn}
attributes#2={uwtable}
attributes#3={noreturn nounwind}
attributes#4={nounwind uwtable}
