@sml_check_flag=external local_unnamed_addr global i32
@_SMLZN12BuiltinTypes5exnTyE=external local_unnamed_addr global i8*
@_SMLZN12BuiltinTypes6unitTyE=external local_unnamed_addr global i8*
@_SMLZN12BuiltinTypes8exntagTyE=external local_unnamed_addr global i8*
@_SMLZN12BuiltinTypes9codeptrTyE=external local_unnamed_addr global i8*
@_SMLZN3Bug3BugE=external local_unnamed_addr global i8*
@_SMLZN3Loc5nolocE=external local_unnamed_addr global i8*
@_SMLZN5VarID3Map5emptyE=external local_unnamed_addr global i8*
@_SMLZN6TextIO6stdOutE=external local_unnamed_addr global i8*
@_SMLZN7Control9checkTypeE=external local_unnamed_addr global i8*
@_SMLZN8ListPair14UnequalLengthsE=external local_unnamed_addr global i8*
@_SMLZ5Match=external unnamed_addr constant i8*
@a=private unnamed_addr constant<{[4x i8],i32,[6x i8]}><{[4x i8]zeroinitializer,i32 -2147483642,[6x i8]c"\0Aty:\0A\00"}>,align 8
@b=private unnamed_addr constant<{[4x i8],i32,[29x i8]}><{[4x i8]zeroinitializer,i32 -2147483619,[29x i8]c"<<<<<<<<<<<<<<<<<<<\0AFAILED: \00"}>,align 8
@c=private unnamed_addr constant<{[4x i8],i32,[5x i8]}><{[4x i8]zeroinitializer,i32 -2147483643,[5x i8]c" at \00"}>,align 8
@d=private unnamed_addr constant<{[4x i8],i32,[7x i8]}><{[4x i8]zeroinitializer,i32 -2147483641,[7x i8]c"\0Aty1:\0A\00"}>,align 8
@e=private unnamed_addr constant<{[4x i8],i32,[7x i8]}><{[4x i8]zeroinitializer,i32 -2147483641,[7x i8]c"\0Aty2:\0A\00"}>,align 8
@f=private unnamed_addr constant<{[4x i8],i32,[20x i8]}><{[4x i8]zeroinitializer,i32 -2147483628,[20x i8]c"mustBeCONSTRUCTty (\00"}>,align 8
@g=private unnamed_addr constant<{[4x i8],i32,i8*,void(...)*,void(...)*,i32}><{[4x i8]zeroinitializer,i32 -805306344,i8*null,void(...)*bitcast(i32(i8*)*@_SMLLN12TypedCalcCon4eqTyE_276 to void(...)*),void(...)*bitcast(i8*(i8*,i8*)*@_SMLLN12TypedCalcCon4eqTyE_676 to void(...)*),i32 -2147483647}>,align 8
@h=private unnamed_addr constant<{[4x i8],i32,i8*,void(...)*,void(...)*,i32}><{[4x i8]zeroinitializer,i32 -805306344,i8*null,void(...)*bitcast(i8*(i8*)*@_SMLLN12TypedCalcCon4eqTyE_278 to void(...)*),void(...)*bitcast(i8*(i8*,i8*)*@_SMLLN12TypedCalcCon4eqTyE_677 to void(...)*),i32 -2147483647}>,align 8
@i=private unnamed_addr constant<{[4x i8],i32,i32,[4x i8],i8*,i32}><{[4x i8]zeroinitializer,i32 -805306352,i32 1,[4x i8]zeroinitializer,i8*null,i32 2}>,align 8
@j=private unnamed_addr constant<{[4x i8],i32,[7x i8]}><{[4x i8]zeroinitializer,i32 -2147483641,[7x i8]c"eqTy (\00"}>,align 8
@k=private unnamed_addr constant<{[4x i8],i32,[11x i8]}><{[4x i8]zeroinitializer,i32 -2147483637,[11x i8]c" equation \00"}>,align 8
@l=private unnamed_addr constant<{[4x i8],i32,[2x i8]}><{[4x i8]zeroinitializer,i32 -2147483646,[2x i8]c")\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*)*@_SMLFN12TypedCalcCon9TPREIFYTYE to void(...)*),void(...)*bitcast(i8*(i8*,i8*)*@_SMLLN12TypedCalcCon9TPREIFYTYE_681 to void(...)*),i32 -2147483647}>,align 8
@n=private unnamed_addr constant<{[4x i8],i32,[7x i8]}><{[4x i8]zeroinitializer,i32 -2147483641,[7x i8]c"TPCAST\00"}>,align 8
@o=private unnamed_addr constant<{[4x i8],i32,i8*,void(...)*,void(...)*,i32}><{[4x i8]zeroinitializer,i32 -805306344,i8*null,void(...)*bitcast(i8*(i8*)*@_SMLFN12TypedCalcCon6TPCASTE to void(...)*),void(...)*bitcast(i8*(i8*,i8*)*@_SMLLN12TypedCalcCon6TPCASTE_683 to void(...)*),i32 -2147483647}>,align 8
@p=private unnamed_addr constant<{[4x i8],i32,[70x i8]}><{[4x i8]zeroinitializer,i32 -2147483578,[70x i8]c"src/compiler/compilerIRs/typedcalc/main/TypedCalcCon.sml:143.20(4240)\00"}>,align 8
@q=private unnamed_addr constant<{[4x i8],i32,[16x i8]}><{[4x i8]zeroinitializer,i32 -2147483632,[16x i8]c"TPDATACONSTRUCT\00"}>,align 8
@r=private unnamed_addr constant<{[4x i8],i32,i8*,void(...)*,void(...)*,i32}><{[4x i8]zeroinitializer,i32 -805306344,i8*null,void(...)*bitcast(i8*(i8*)*@_SMLFN12TypedCalcCon15TPDATACONSTRUCTE to void(...)*),void(...)*bitcast(i8*(i8*,i8*)*@_SMLLN12TypedCalcCon15TPDATACONSTRUCTE_685 to void(...)*),i32 -2147483647}>,align 8
@s=private unnamed_addr constant<{[4x i8],i32,[70x i8]}><{[4x i8]zeroinitializer,i32 -2147483578,[70x i8]c"src/compiler/compilerIRs/typedcalc/main/TypedCalcCon.sml:170.20(5226)\00"}>,align 8
@t=private unnamed_addr constant<{[4x i8],i32,[13x i8]}><{[4x i8]zeroinitializer,i32 -2147483635,[13x i8]c"EXNCONSTRUCT\00"}>,align 8
@u=private unnamed_addr constant<{[4x i8],i32,[15x i8]}><{[4x i8]zeroinitializer,i32 -2147483633,[15x i8]c"TPEXNCONSTRUCT\00"}>,align 8
@v=private unnamed_addr constant<{[4x i8],i32,i8*,void(...)*,void(...)*,i32}><{[4x i8]zeroinitializer,i32 -805306344,i8*null,void(...)*bitcast(i8*(i8*)*@_SMLFN12TypedCalcCon14TPEXNCONSTRUCTE to void(...)*),void(...)*bitcast(i8*(i8*,i8*)*@_SMLLN12TypedCalcCon14TPEXNCONSTRUCTE_688 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*)*@_SMLL6argTys_320 to void(...)*),void(...)*bitcast(i8*(i8*,i8*)*@_SMLL6argTys_689 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*)*@_SMLL6varTys_322 to void(...)*),void(...)*bitcast(i8*(i8*,i8*)*@_SMLL6varTys_690 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*)*@_SMLL6retTys_324 to void(...)*),void(...)*bitcast(i8*(i8*,i8*)*@_SMLL6retTys_691 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*)*@_SMLLN12TypedCalcCon9ffiStubTyE_326 to void(...)*),void(...)*bitcast(i8*(i8*,i8*)*@_SMLLN12TypedCalcCon9ffiStubTyE_692 to void(...)*),i32 -2147483647}>,align 8
@A=private unnamed_addr constant<{[4x i8],i32,[69x i8]}><{[4x i8]zeroinitializer,i32 -2147483579,[69x i8]c"src/compiler/compilerIRs/typedcalc/main/TypedCalcCon.sml:173.6(5283)\00"}>,align 8
@B=private unnamed_addr constant<{[4x i8],i32,[16x i8]}><{[4x i8]zeroinitializer,i32 -2147483632,[16x i8]c"TPFFIIMPORT_FUN\00"}>,align 8
@C=private unnamed_addr constant<{[4x i8],i32,i8*,void(...)*,void(...)*,i32}><{[4x i8]zeroinitializer,i32 -805306344,i8*null,void(...)*bitcast(i8*(i8*)*@_SMLFN12TypedCalcCon15TPFFIIMPORT__FUNE to void(...)*),void(...)*bitcast(i8*(i8*,i8*)*@_SMLLN12TypedCalcCon15TPFFIIMPORT__FUNE_695 to void(...)*),i32 -2147483647}>,align 8
@D=private unnamed_addr constant<{[4x i8],i32,i8*,void(...)*,void(...)*,i32}><{[4x i8]zeroinitializer,i32 -805306344,i8*null,void(...)*bitcast(i8*(i8*)*@_SMLFN12TypedCalcCon15TPFFIIMPORT__EXTE to void(...)*),void(...)*bitcast(i8*(i8*,i8*)*@_SMLLN12TypedCalcCon15TPFFIIMPORT__EXTE_696 to void(...)*),i32 -2147483647}>,align 8
@E=private unnamed_addr constant<{[4x i8],i32,i8*,void(...)*,void(...)*,i32}><{[4x i8]zeroinitializer,i32 -805306344,i8*null,void(...)*bitcast(i8*(i8*)*@_SMLFN12TypedCalcCon15TPFOREIGNSYMBOLE to void(...)*),void(...)*bitcast(i8*(i8*,i8*)*@_SMLLN12TypedCalcCon15TPFOREIGNSYMBOLE_697 to void(...)*),i32 -2147483647}>,align 8
@F=private unnamed_addr constant<{[4x i8],i32,[23x i8]}><{[4x i8]zeroinitializer,i32 -2147483625,[23x i8]c"not a foreign function\00"}>,align 8
@G=private unnamed_addr constant<{[4x i8],i32,[70x i8]}><{[4x i8]zeroinitializer,i32 -2147483578,[70x i8]c"src/compiler/compilerIRs/typedcalc/main/TypedCalcCon.sml:248.17(7912)\00"}>,align 8
@H=private unnamed_addr constant<{[4x i8],i32,[70x i8]}><{[4x i8]zeroinitializer,i32 -2147483578,[70x i8]c"src/compiler/compilerIRs/typedcalc/main/TypedCalcCon.sml:233.29(7374)\00"}>,align 8
@I=private unnamed_addr constant<{[4x i8],i32,[31x i8]}><{[4x i8]zeroinitializer,i32 -2147483617,[31x i8]c"TPFOREIGNAPPLY: arity mismatch\00"}>,align 8
@J=private unnamed_addr constant<{[4x i8],i32,[15x i8]}><{[4x i8]zeroinitializer,i32 -2147483633,[15x i8]c"TPFOREIGNAPPLY\00"}>,align 8
@K=private unnamed_addr constant<{[4x i8],i32,i8*,void(...)*,void(...)*,i32}><{[4x i8]zeroinitializer,i32 -805306344,i8*null,void(...)*bitcast(i8*(i8*)*@_SMLFN12TypedCalcCon14TPFOREIGNAPPLYE to void(...)*),void(...)*bitcast(i8*(i8*,i8*)*@_SMLLN12TypedCalcCon14TPFOREIGNAPPLYE_698 to void(...)*),i32 -2147483647}>,align 8
@L=private unnamed_addr constant<{[4x i8],i32,i8*,void(...)*,void(...)*,i32}><{[4x i8]zeroinitializer,i32 -805306344,i8*null,void(...)*bitcast(i8*(i8*)*@_SMLLN12TypedCalcCon12TPCALLBACKFNE_345 to void(...)*),void(...)*bitcast(i8*(i8*,i8*)*@_SMLLN12TypedCalcCon12TPCALLBACKFNE_699 to void(...)*),i32 -2147483647}>,align 8
@M=private unnamed_addr constant<{[4x i8],i32,i8*,void(...)*,void(...)*,i32}><{[4x i8]zeroinitializer,i32 -805306344,i8*null,void(...)*bitcast(i8*(i8*)*@_SMLFN12TypedCalcCon12TPCALLBACKFNE to void(...)*),void(...)*bitcast(i8*(i8*,i8*)*@_SMLLN12TypedCalcCon12TPCALLBACKFNE_700 to void(...)*),i32 -2147483647}>,align 8
@N=private unnamed_addr constant<{[4x i8],i32,i8*,void(...)*,void(...)*,i32}><{[4x i8]zeroinitializer,i32 -805306344,i8*null,void(...)*bitcast(i8*(i8*)*@_SMLFN12TypedCalcCon6TPTAPPE to void(...)*),void(...)*bitcast(i8*(i8*,i8*)*@_SMLLN12TypedCalcCon6TPTAPPE_701 to void(...)*),i32 -2147483647}>,align 8
@O=private unnamed_addr constant<{[4x i8],i32,i8*,void(...)*,void(...)*,i32}><{[4x i8]zeroinitializer,i32 -805306344,i8*null,void(...)*bitcast(i8*(i8*)*@_SMLFN12TypedCalcCon6TPPOLYE to void(...)*),void(...)*bitcast(i8*(i8*,i8*)*@_SMLLN12TypedCalcCon6TPPOLYE_702 to void(...)*),i32 -2147483647}>,align 8
@P=private unnamed_addr constant<{[4x i8],i32,i8*,void(...)*,void(...)*,i32}><{[4x i8]zeroinitializer,i32 -805306344,i8*null,void(...)*bitcast(i8*(i8*)*@_SMLFN12TypedCalcCon5TPLETE to void(...)*),void(...)*bitcast(i8*(i8*,i8*)*@_SMLLN12TypedCalcCon5TPLETE_703 to void(...)*),i32 -2147483647}>,align 8
@Q=private unnamed_addr constant<{[4x i8],i32,i8*,void(...)*,void(...)*,i32}><{[4x i8]zeroinitializer,i32 -805306344,i8*null,void(...)*bitcast(i8*(i8*)*@_SMLLN12TypedCalcCon5TPFNME_355 to void(...)*),void(...)*bitcast(i8*(i8*,i8*)*@_SMLLN12TypedCalcCon5TPFNME_704 to void(...)*),i32 -2147483647}>,align 8
@R=private unnamed_addr constant<{[4x i8],i32,i8*,void(...)*,void(...)*,i32}><{[4x i8]zeroinitializer,i32 -805306344,i8*null,void(...)*bitcast(i8*(i8*)*@_SMLFN12TypedCalcCon5TPFNME to void(...)*),void(...)*bitcast(i8*(i8*,i8*)*@_SMLLN12TypedCalcCon5TPFNME_705 to void(...)*),i32 -2147483647}>,align 8
@S=private unnamed_addr constant<{[4x i8],i32,[71x i8]}><{[4x i8]zeroinitializer,i32 -2147483577,[71x i8]c"src/compiler/compilerIRs/typedcalc/main/TypedCalcCon.sml:327.35(10352)\00"}>,align 8
@T=private unnamed_addr constant<{[4x i8],i32,[23x i8]}><{[4x i8]zeroinitializer,i32 -2147483625,[23x i8]c"TPAPPM: arity mismatch\00"}>,align 8
@U=private unnamed_addr constant<{[4x i8],i32,[15x i8]}><{[4x i8]zeroinitializer,i32 -2147483633,[15x i8]c"not a function\00"}>,align 8
@V=private unnamed_addr constant<{[4x i8],i32,[71x i8]}><{[4x i8]zeroinitializer,i32 -2147483577,[71x i8]c"src/compiler/compilerIRs/typedcalc/main/TypedCalcCon.sml:344.18(10898)\00"}>,align 8
@W=private unnamed_addr constant<{[4x i8],i32,[7x i8]}><{[4x i8]zeroinitializer,i32 -2147483641,[7x i8]c"TPAPPM\00"}>,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*)*@_SMLFN12TypedCalcCon6TPAPPME to void(...)*),void(...)*bitcast(i8*(i8*,i8*)*@_SMLLN12TypedCalcCon6TPAPPME_707 to void(...)*),i32 -2147483647}>,align 8
@Y=private unnamed_addr constant<{[4x i8],i32,[6x i8]}><{[4x i8]zeroinitializer,i32 -2147483642,[6x i8]c"ERROR\00"}>,align 8
@Z=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,[6x i8]}>,<{[4x i8],i32,[6x i8]}>*@Y,i32 0,i32 0,i32 0),i32 8),i32 0,[4x i8]zeroinitializer,i32 1}>,align 8
@aa=private unnamed_addr constant<{[4x i8],i32,[6x i8]}><{[4x i8]zeroinitializer,i32 -2147483642,[6x i8]c"match\00"}>,align 8
@ab=private unnamed_addr constant<{[4x i8],i32,i8*,void(...)*,void(...)*,i32}><{[4x i8]zeroinitializer,i32 -805306344,i8*null,void(...)*bitcast(i8*(i8*)*@_SMLLN12TypedCalcCon10checkMatchE_372 to void(...)*),void(...)*bitcast(i8*(i8*,i8*)*@_SMLLN12TypedCalcCon10checkMatchE_708 to void(...)*),i32 -2147483647}>,align 8
@ac=private unnamed_addr constant<{[4x i8],i32,[71x i8]}><{[4x i8]zeroinitializer,i32 -2147483577,[71x i8]c"src/compiler/compilerIRs/typedcalc/main/TypedCalcCon.sml:355.53(11225)\00"}>,align 8
@ad=private unnamed_addr constant<{[4x i8],i32,[40x i8]}><{[4x i8]zeroinitializer,i32 -2147483608,[40x i8]c"<<<<<<<<<<<<<<<<<<<\0Aduplicate PTVAR at \00"}>,align 8
@ae=private unnamed_addr constant<{[4x i8],i32,[2x i8]}><{[4x i8]zeroinitializer,i32 -2147483646,[2x i8]c"\0A\00"}>,align 8
@af=private unnamed_addr constant<{[4x i8],i32,i8*,void(...)*,void(...)*,i32}><{[4x i8]zeroinitializer,i32 -805306344,i8*null,void(...)*bitcast(void(i8*)*@_SMLLN12TypedCalcCon10checkMatchE_379 to void(...)*),void(...)*bitcast(i8*(i8*,i8*)*@_SMLLN12TypedCalcCon10checkMatchE_709 to void(...)*),i32 -2147483647}>,align 8
@ag=private unnamed_addr constant<{[4x i8],i32,[22x i8]}><{[4x i8]zeroinitializer,i32 -2147483626,[22x i8]c"\0A>>>>>>>>>>>>>>>>>>>\0A\00"}>,align 8
@ah=private unnamed_addr constant<{[4x i8],i32,i8*,void(...)*,void(...)*,i32}><{[4x i8]zeroinitializer,i32 -805306344,i8*null,void(...)*bitcast(i8*(i8*)*@_SMLLN12TypedCalcCon7TPCASEME_386 to void(...)*),void(...)*bitcast(i8*(i8*,i8*)*@_SMLLN12TypedCalcCon7TPCASEME_712 to void(...)*),i32 -2147483647}>,align 8
@ai=private unnamed_addr constant<{[4x i8],i32,i8*,void(...)*,void(...)*,i32}><{[4x i8]zeroinitializer,i32 -805306344,i8*null,void(...)*bitcast(i8*(i8*)*@_SMLLN12TypedCalcCon7TPCASEME_388 to void(...)*),void(...)*bitcast(i8*(i8*,i8*)*@_SMLLN12TypedCalcCon7TPCASEME_713 to void(...)*),i32 -2147483647}>,align 8
@aj=private unnamed_addr constant<{[4x i8],i32,[71x i8]}><{[4x i8]zeroinitializer,i32 -2147483577,[71x i8]c"src/compiler/compilerIRs/typedcalc/main/TypedCalcCon.sml:368.12(11695)\00"}>,align 8
@ak=private unnamed_addr constant<{[4x i8],i32,[8x i8]}><{[4x i8]zeroinitializer,i32 -2147483640,[8x i8]c"TPCASEM\00"}>,align 8
@al=private unnamed_addr constant<{[4x i8],i32,i8*,void(...)*,void(...)*,i32}><{[4x i8]zeroinitializer,i32 -805306344,i8*null,void(...)*bitcast(i8*(i8*)*@_SMLFN12TypedCalcCon7TPCASEME to void(...)*),void(...)*bitcast(i8*(i8*,i8*)*@_SMLLN12TypedCalcCon7TPCASEME_714 to void(...)*),i32 -2147483647}>,align 8
@am=private unnamed_addr constant<{[4x i8],i32,[19x i8]}><{[4x i8]zeroinitializer,i32 -2147483629,[19x i8]c"TPSWITCH_CONSTCASE\00"}>,align 8
@an=private unnamed_addr constant<{[4x i8],i32,i8*,void(...)*,void(...)*,i32}><{[4x i8]zeroinitializer,i32 -805306344,i8*null,void(...)*bitcast(i8*(i8*)*@_SMLLN12TypedCalcCon18TPSWITCH__CONSTCASEE_396 to void(...)*),void(...)*bitcast(i8*(i8*,i8*)*@_SMLLN12TypedCalcCon18TPSWITCH__CONSTCASEE_716 to void(...)*),i32 -2147483647}>,align 8
@ao=private unnamed_addr constant<{[4x i8],i32,i8*,void(...)*,void(...)*,i32}><{[4x i8]zeroinitializer,i32 -805306344,i8*null,void(...)*bitcast(i8*(i8*)*@_SMLFN12TypedCalcCon18TPSWITCH__CONSTCASEE to void(...)*),void(...)*bitcast(i8*(i8*,i8*)*@_SMLLN12TypedCalcCon18TPSWITCH__CONSTCASEE_717 to void(...)*),i32 -2147483647}>,align 8
@ap=private unnamed_addr constant<{[4x i8],i32,[71x i8]}><{[4x i8]zeroinitializer,i32 -2147483577,[71x i8]c"src/compiler/compilerIRs/typedcalc/main/TypedCalcCon.sml:426.20(13950)\00"}>,align 8
@aq=private unnamed_addr constant<{[4x i8],i32,[17x i8]}><{[4x i8]zeroinitializer,i32 -2147483631,[17x i8]c"TPSWITCH_CONCASE\00"}>,align 8
@ar=private unnamed_addr constant<{[4x i8],i32,i8*,void(...)*,void(...)*,i32}><{[4x i8]zeroinitializer,i32 -805306344,i8*null,void(...)*bitcast(i8*(i8*)*@_SMLLN12TypedCalcCon16TPSWITCH__CONCASEE_407 to void(...)*),void(...)*bitcast(i8*(i8*,i8*)*@_SMLLN12TypedCalcCon16TPSWITCH__CONCASEE_719 to void(...)*),i32 -2147483647}>,align 8
@as=private unnamed_addr constant<{[4x i8],i32,i8*,void(...)*,void(...)*,i32}><{[4x i8]zeroinitializer,i32 -805306344,i8*null,void(...)*bitcast(i8*(i8*)*@_SMLFN12TypedCalcCon16TPSWITCH__CONCASEE to void(...)*),void(...)*bitcast(i8*(i8*,i8*)*@_SMLLN12TypedCalcCon16TPSWITCH__CONCASEE_720 to void(...)*),i32 -2147483647}>,align 8
@at=private unnamed_addr constant<{[4x i8],i32,[71x i8]}><{[4x i8]zeroinitializer,i32 -2147483577,[71x i8]c"src/compiler/compilerIRs/typedcalc/main/TypedCalcCon.sml:460.20(15361)\00"}>,align 8
@au=private unnamed_addr constant<{[4x i8],i32,[17x i8]}><{[4x i8]zeroinitializer,i32 -2147483631,[17x i8]c"TPSWITCH_EXNCASE\00"}>,align 8
@av=private unnamed_addr constant<{[4x i8],i32,i8*,void(...)*,void(...)*,i32}><{[4x i8]zeroinitializer,i32 -805306344,i8*null,void(...)*bitcast(i8*(i8*)*@_SMLLN12TypedCalcCon16TPSWITCH__EXNCASEE_417 to void(...)*),void(...)*bitcast(i8*(i8*,i8*)*@_SMLLN12TypedCalcCon16TPSWITCH__EXNCASEE_722 to void(...)*),i32 -2147483647}>,align 8
@aw=private unnamed_addr constant<{[4x i8],i32,i8*,void(...)*,void(...)*,i32}><{[4x i8]zeroinitializer,i32 -805306344,i8*null,void(...)*bitcast(i8*(i8*)*@_SMLFN12TypedCalcCon16TPSWITCH__EXNCASEE to void(...)*),void(...)*bitcast(i8*(i8*,i8*)*@_SMLLN12TypedCalcCon16TPSWITCH__EXNCASEE_723 to void(...)*),i32 -2147483647}>,align 8
@ax=private unnamed_addr constant<{[4x i8],i32,i8*,void(...)*,void(...)*,i32}><{[4x i8]zeroinitializer,i32 -805306344,i8*null,void(...)*bitcast(i8*(i8*)*@_SMLLN12TypedCalcCon7TPTHROWE_421 to void(...)*),void(...)*bitcast(i8*(i8*,i8*)*@_SMLLN12TypedCalcCon7TPTHROWE_724 to void(...)*),i32 -2147483647}>,align 8
@ay=private unnamed_addr constant<{[4x i8],i32,i8*,void(...)*,void(...)*,i32}><{[4x i8]zeroinitializer,i32 -805306344,i8*null,void(...)*bitcast(i8*(i8*)*@_SMLFN12TypedCalcCon7TPTHROWE to void(...)*),void(...)*bitcast(i8*(i8*,i8*)*@_SMLLN12TypedCalcCon7TPTHROWE_725 to void(...)*),i32 -2147483647}>,align 8
@az=private unnamed_addr constant<{[4x i8],i32,[8x i8]}><{[4x i8]zeroinitializer,i32 -2147483640,[8x i8]c"TPCATCH\00"}>,align 8
@aA=private unnamed_addr constant<{[4x i8],i32,i8*,void(...)*,void(...)*,i32}><{[4x i8]zeroinitializer,i32 -805306344,i8*null,void(...)*bitcast(i8*(i8*)*@_SMLFN12TypedCalcCon7TPCATCHE to void(...)*),void(...)*bitcast(i8*(i8*,i8*)*@_SMLLN12TypedCalcCon7TPCATCHE_727 to void(...)*),i32 -2147483647}>,align 8
@aB=private unnamed_addr constant<{[4x i8],i32,i8*,void(...)*,void(...)*,i32}><{[4x i8]zeroinitializer,i32 -805306344,i8*null,void(...)*bitcast(i8*(i8*)*@_SMLLN12TypedCalcCon9TPMONOLETE_429 to void(...)*),void(...)*bitcast(i8*(i8*,i8*)*@_SMLLN12TypedCalcCon9TPMONOLETE_728 to void(...)*),i32 -2147483647}>,align 8
@aC=private unnamed_addr constant<{[4x i8],i32,i8*,void(...)*,void(...)*,i32}><{[4x i8]zeroinitializer,i32 -805306344,i8*null,void(...)*bitcast(i8*(i8*)*@_SMLFN12TypedCalcCon9TPMONOLETE to void(...)*),void(...)*bitcast(i8*(i8*,i8*)*@_SMLLN12TypedCalcCon9TPMONOLETE_729 to void(...)*),i32 -2147483647}>,align 8
@aD=private unnamed_addr constant<{[4x i8],i32,[8x i8]}><{[4x i8]zeroinitializer,i32 -2147483640,[8x i8]c"TPRAISE\00"}>,align 8
@aE=private unnamed_addr constant<{[4x i8],i32,i8*,void(...)*,void(...)*,i32}><{[4x i8]zeroinitializer,i32 -805306344,i8*null,void(...)*bitcast(i8*(i8*)*@_SMLFN12TypedCalcCon7TPRAISEE to void(...)*),void(...)*bitcast(i8*(i8*,i8*)*@_SMLLN12TypedCalcCon7TPRAISEE_731 to void(...)*),i32 -2147483647}>,align 8
@aF=private unnamed_addr constant<{[4x i8],i32,[9x i8]}><{[4x i8]zeroinitializer,i32 -2147483639,[9x i8]c"TPHANDLE\00"}>,align 8
@aG=private unnamed_addr constant<{[4x i8],i32,i8*,void(...)*,void(...)*,i32}><{[4x i8]zeroinitializer,i32 -805306344,i8*null,void(...)*bitcast(i8*(i8*)*@_SMLFN12TypedCalcCon8TPHANDLEE to void(...)*),void(...)*bitcast(i8*(i8*,i8*)*@_SMLLN12TypedCalcCon8TPHANDLEE_733 to void(...)*),i32 -2147483647}>,align 8
@aH=private unnamed_addr constant<{[4x i8],i32,i8*,void(...)*,void(...)*,i32}><{[4x i8]zeroinitializer,i32 -805306344,i8*null,void(...)*bitcast(i8*(i8*)*@_SMLL4exps_441 to void(...)*),void(...)*bitcast(i8*(i8*,i8*)*@_SMLL4exps_734 to void(...)*),i32 -2147483647}>,align 8
@aI=private unnamed_addr constant<{[4x i8],i32,i8*,void(...)*,void(...)*,i32}><{[4x i8]zeroinitializer,i32 -805306344,i8*null,void(...)*bitcast(i8*(i8*)*@_SMLL3tys_443 to void(...)*),void(...)*bitcast(i8*(i8*,i8*)*@_SMLL3tys_735 to void(...)*),i32 -2147483647}>,align 8
@aJ=private unnamed_addr constant<{[4x i8],i32,i8*,void(...)*,void(...)*,i32}><{[4x i8]zeroinitializer,i32 -805306344,i8*null,void(...)*bitcast(i8*(i8*)*@_SMLFN12TypedCalcCon8TPRECORDE to void(...)*),void(...)*bitcast(i8*(i8*,i8*)*@_SMLLN12TypedCalcCon8TPRECORDE_736 to void(...)*),i32 -2147483647}>,align 8
@aK=private unnamed_addr constant<{[4x i8],i32,[71x i8]}><{[4x i8]zeroinitializer,i32 -2147483577,[71x i8]c"src/compiler/compilerIRs/typedcalc/main/TypedCalcCon.sml:562.26(18672)\00"}>,align 8
@aL=private unnamed_addr constant<{[4x i8],i32,[71x i8]}><{[4x i8]zeroinitializer,i32 -2147483577,[71x i8]c"src/compiler/compilerIRs/typedcalc/main/TypedCalcCon.sml:559.24(18547)\00"}>,align 8
@aM=private unnamed_addr constant<{[4x i8],i32,[9x i8]}><{[4x i8]zeroinitializer,i32 -2147483639,[9x i8]c"selectTy\00"}>,align 8
@aN=private unnamed_addr constant<{[4x i8],i32,i8*,void(...)*,void(...)*,i32}><{[4x i8]zeroinitializer,i32 -805306344,i8*null,void(...)*bitcast(i8*(i8*)*@_SMLFN12TypedCalcCon8TPSELECTE to void(...)*),void(...)*bitcast(i8*(i8*,i8*)*@_SMLLN12TypedCalcCon8TPSELECTE_738 to void(...)*),i32 -2147483647}>,align 8
@aO=private unnamed_addr constant<{[4x i8],i32,[9x i8]}><{[4x i8]zeroinitializer,i32 -2147483639,[9x i8]c"TPMODIFY\00"}>,align 8
@aP=private unnamed_addr constant<{[4x i8],i32,i8*,void(...)*,void(...)*,i32}><{[4x i8]zeroinitializer,i32 -805306344,i8*null,void(...)*bitcast(i8*(i8*)*@_SMLFN12TypedCalcCon8TPMODIFYE to void(...)*),void(...)*bitcast(i8*(i8*,i8*)*@_SMLLN12TypedCalcCon8TPMODIFYE_740 to void(...)*),i32 -2147483647}>,align 8
@aQ=private unnamed_addr constant<{[4x i8],i32,[71x i8]}><{[4x i8]zeroinitializer,i32 -2147483577,[71x i8]c"src/compiler/compilerIRs/typedcalc/main/TypedCalcCon.sml:606.20(19966)\00"}>,align 8
@aR=private unnamed_addr constant<{[4x i8],i32,[12x i8]}><{[4x i8]zeroinitializer,i32 -2147483636,[12x i8]c"TPPRIMAPPLY\00"}>,align 8
@aS=private unnamed_addr constant<{[4x i8],i32,i8*,void(...)*,void(...)*,i32}><{[4x i8]zeroinitializer,i32 -805306344,i8*null,void(...)*bitcast(i8*(i8*)*@_SMLFN12TypedCalcCon11TPPRIMAPPLYE to void(...)*),void(...)*bitcast(i8*(i8*,i8*)*@_SMLLN12TypedCalcCon11TPPRIMAPPLYE_742 to void(...)*),i32 -2147483647}>,align 8
@aT=private unnamed_addr constant<{[4x i8],i32,[71x i8]}><{[4x i8]zeroinitializer,i32 -2147483577,[71x i8]c"src/compiler/compilerIRs/typedcalc/main/TypedCalcCon.sml:620.20(20438)\00"}>,align 8
@aU=private unnamed_addr constant<{[4x i8],i32,[13x i8]}><{[4x i8]zeroinitializer,i32 -2147483635,[13x i8]c"TPOPRIMAPPLY\00"}>,align 8
@aV=private unnamed_addr constant<{[4x i8],i32,i8*,void(...)*,void(...)*,i32}><{[4x i8]zeroinitializer,i32 -805306344,i8*null,void(...)*bitcast(i8*(i8*)*@_SMLFN12TypedCalcCon12TPOPRIMAPPLYE to void(...)*),void(...)*bitcast(i8*(i8*,i8*)*@_SMLLN12TypedCalcCon12TPOPRIMAPPLYE_744 to void(...)*),i32 -2147483647}>,align 8
@aW=private unnamed_addr constant<{[4x i8],i32,i8*,void(...)*,void(...)*,i32}><{[4x i8]zeroinitializer,i32 -805306344,i8*null,void(...)*bitcast(i8*(i8*)*@_SMLFN12TypedCalcCon6TPJOINE to void(...)*),void(...)*bitcast(i8*(i8*,i8*)*@_SMLLN12TypedCalcCon6TPJOINE_745 to void(...)*),i32 -2147483647}>,align 8
@aX=private unnamed_addr constant<{[4x i8],i32,i8*,void(...)*,void(...)*,i32}><{[4x i8]zeroinitializer,i32 -805306344,i8*null,void(...)*bitcast(i8*(i8*)*@_SMLFN12TypedCalcCon9TPDYNAMICE to void(...)*),void(...)*bitcast(i8*(i8*,i8*)*@_SMLLN12TypedCalcCon9TPDYNAMICE_746 to void(...)*),i32 -2147483647}>,align 8
@aY=private unnamed_addr constant<{[4x i8],i32,i8*,void(...)*,void(...)*,i32}><{[4x i8]zeroinitializer,i32 -805306344,i8*null,void(...)*bitcast(i8*(i8*)*@_SMLFN12TypedCalcCon11TPDYNAMICISE to void(...)*),void(...)*bitcast(i8*(i8*,i8*)*@_SMLLN12TypedCalcCon11TPDYNAMICISE_747 to void(...)*),i32 -2147483647}>,align 8
@aZ=private unnamed_addr constant<{[4x i8],i32,i8*,void(...)*,void(...)*,i32}><{[4x i8]zeroinitializer,i32 -805306344,i8*null,void(...)*bitcast(i8*(i8*)*@_SMLFN12TypedCalcCon13TPDYNAMICNULLE to void(...)*),void(...)*bitcast(i8*(i8*,i8*)*@_SMLLN12TypedCalcCon13TPDYNAMICNULLE_748 to void(...)*),i32 -2147483647}>,align 8
@a0=private unnamed_addr constant<{[4x i8],i32,i8*,void(...)*,void(...)*,i32}><{[4x i8]zeroinitializer,i32 -805306344,i8*null,void(...)*bitcast(i8*(i8*)*@_SMLFN12TypedCalcCon12TPDYNAMICTOPE to void(...)*),void(...)*bitcast(i8*(i8*,i8*)*@_SMLLN12TypedCalcCon12TPDYNAMICTOPE_749 to void(...)*),i32 -2147483647}>,align 8
@a1=private unnamed_addr constant<{[4x i8],i32,i8*,void(...)*,void(...)*,i32}><{[4x i8]zeroinitializer,i32 -805306344,i8*null,void(...)*bitcast(i8*(i8*)*@_SMLFN12TypedCalcCon13TPDYNAMICVIEWE to void(...)*),void(...)*bitcast(i8*(i8*,i8*)*@_SMLLN12TypedCalcCon13TPDYNAMICVIEWE_750 to void(...)*),i32 -2147483647}>,align 8
@a2=private unnamed_addr constant<{[4x i8],i32,i8*,void(...)*,void(...)*,i32}><{[4x i8]zeroinitializer,i32 -805306344,i8*null,void(...)*bitcast(i8*(i8*)*@_SMLFN12TypedCalcCon13TPDYNAMICCASEE to void(...)*),void(...)*bitcast(i8*(i8*,i8*)*@_SMLLN12TypedCalcCon13TPDYNAMICCASEE_751 to void(...)*),i32 -2147483647}>,align 8
@a3=private unnamed_addr constant<{[4x i8],i32,i8*,void(...)*,void(...)*,i32}><{[4x i8]zeroinitializer,i32 -805306344,i8*null,void(...)*bitcast(i8*(i8*)*@_SMLFN12TypedCalcCon18TPDYNAMICEXISTTAPPE to void(...)*),void(...)*bitcast(i8*(i8*,i8*)*@_SMLLN12TypedCalcCon18TPDYNAMICEXISTTAPPE_752 to void(...)*),i32 -2147483647}>,align 8
@a4=private unnamed_addr constant<{[4x i8],i32,i8*,void(...)*,void(...)*,i32}><{[4x i8]zeroinitializer,i32 -805306344,i8*null,void(...)*bitcast(i8*(i8*)*@_SMLFN12TypedCalcCon8TPPATVARE to void(...)*),void(...)*bitcast(i8*(i8*,i8*)*@_SMLLN12TypedCalcCon8TPPATVARE_753 to void(...)*),i32 -2147483647}>,align 8
@a5=private unnamed_addr constant<{[4x i8],i32,[71x i8]}><{[4x i8]zeroinitializer,i32 -2147483577,[71x i8]c"src/compiler/compilerIRs/typedcalc/main/TypedCalcCon.sml:728.25(23784)\00"}>,align 8
@a6=private unnamed_addr constant<{[4x i8],i32,i8*,void(...)*,void(...)*,i32}><{[4x i8]zeroinitializer,i32 -805306344,i8*null,void(...)*bitcast(i8*(i8*)*@_SMLFN12TypedCalcCon18TPPATDATACONSTRUCTE to void(...)*),void(...)*bitcast(i8*(i8*,i8*)*@_SMLLN12TypedCalcCon18TPPATDATACONSTRUCTE_755 to void(...)*),i32 -2147483647}>,align 8
@a7=private unnamed_addr constant<{[4x i8],i32,[71x i8]}><{[4x i8]zeroinitializer,i32 -2147483577,[71x i8]c"src/compiler/compilerIRs/typedcalc/main/TypedCalcCon.sml:767.25(24966)\00"}>,align 8
@a8=private unnamed_addr constant<{[4x i8],i32,[19x i8]}><{[4x i8]zeroinitializer,i32 -2147483629,[19x i8]c"TPPATDATACONSTRUCT\00"}>,align 8
@a9=private unnamed_addr constant<{[4x i8],i32,[69x i8]}><{[4x i8]zeroinitializer,i32 -2147483579,[69x i8]c"src/compiler/compilerIRs/typedcalc/main/TypedCalcCon.sml:145.2(4270)\00"}>,align 8
@ba=private unnamed_addr constant<{[4x i8],i32,[18x i8]}><{[4x i8]zeroinitializer,i32 -2147483630,[18x i8]c"TPPATEXNCONSTRUCT\00"}>,align 8
@bb=private unnamed_addr constant<{[4x i8],i32,i8*,void(...)*,void(...)*,i32}><{[4x i8]zeroinitializer,i32 -805306344,i8*null,void(...)*bitcast(i8*(i8*)*@_SMLFN12TypedCalcCon17TPPATEXNCONSTRUCTE to void(...)*),void(...)*bitcast(i8*(i8*,i8*)*@_SMLLN12TypedCalcCon17TPPATEXNCONSTRUCTE_757 to void(...)*),i32 -2147483647}>,align 8
@bc=private unnamed_addr constant<{[4x i8],i32,[71x i8]}><{[4x i8]zeroinitializer,i32 -2147483577,[71x i8]c"src/compiler/compilerIRs/typedcalc/main/TypedCalcCon.sml:789.25(25566)\00"}>,align 8
@bd=private unnamed_addr constant<{[4x i8],i32,[13x i8]}><{[4x i8]zeroinitializer,i32 -2147483635,[13x i8]c"TPPATLAYERED\00"}>,align 8
@be=private unnamed_addr constant<{[4x i8],i32,i8*,void(...)*,void(...)*,i32}><{[4x i8]zeroinitializer,i32 -805306344,i8*null,void(...)*bitcast(i8*(i8*)*@_SMLLN12TypedCalcCon12TPPATLAYEREDE_514 to void(...)*),void(...)*bitcast(i8*(i8*,i8*)*@_SMLLN12TypedCalcCon12TPPATLAYEREDE_759 to void(...)*),i32 -2147483647}>,align 8
@bf=private unnamed_addr constant<{[4x i8],i32,i8*,void(...)*,void(...)*,i32}><{[4x i8]zeroinitializer,i32 -805306344,i8*null,void(...)*bitcast(i8*(i8*)*@_SMLFN12TypedCalcCon12TPPATLAYEREDE to void(...)*),void(...)*bitcast(i8*(i8*,i8*)*@_SMLLN12TypedCalcCon12TPPATLAYEREDE_760 to void(...)*),i32 -2147483647}>,align 8
@bg=private unnamed_addr constant<{[4x i8],i32,i8*,void(...)*,void(...)*,i32}><{[4x i8]zeroinitializer,i32 -805306344,i8*null,void(...)*bitcast(i8*(i8*)*@_SMLL4pats_518 to void(...)*),void(...)*bitcast(i8*(i8*,i8*)*@_SMLL4pats_761 to void(...)*),i32 -2147483647}>,align 8
@bh=private unnamed_addr constant<{[4x i8],i32,i8*,void(...)*,void(...)*,i32}><{[4x i8]zeroinitializer,i32 -805306344,i8*null,void(...)*bitcast(i8*(i8*)*@_SMLL3tys_520 to void(...)*),void(...)*bitcast(i8*(i8*,i8*)*@_SMLL3tys_762 to void(...)*),i32 -2147483647}>,align 8
@bi=private unnamed_addr constant<{[4x i8],i32,[71x i8]}><{[4x i8]zeroinitializer,i32 -2147483577,[71x i8]c"src/compiler/compilerIRs/typedcalc/main/TypedCalcCon.sml:818.32(26585)\00"}>,align 8
@bj=private unnamed_addr constant<{[4x i8],i32,[12x i8]}><{[4x i8]zeroinitializer,i32 -2147483636,[12x i8]c"TPPATRECORD\00"}>,align 8
@bk=private unnamed_addr constant<{[4x i8],i32,i8*,void(...)*,void(...)*,i32}><{[4x i8]zeroinitializer,i32 -805306344,i8*null,void(...)*bitcast(i8*(i8*)*@_SMLLN12TypedCalcCon11TPPATRECORDE_527 to void(...)*),void(...)*bitcast(i8*(i8*,i8*)*@_SMLLN12TypedCalcCon11TPPATRECORDE_764 to void(...)*),i32 -2147483647}>,align 8
@bl=private unnamed_addr constant<{[4x i8],i32,i8*,void(...)*,void(...)*,i32}><{[4x i8]zeroinitializer,i32 -805306344,i8*null,void(...)*bitcast(i8*(i8*)*@_SMLLN12TypedCalcCon11TPPATRECORDE_529 to void(...)*),void(...)*bitcast(i8*(i8*,i8*)*@_SMLLN12TypedCalcCon11TPPATRECORDE_765 to void(...)*),i32 -2147483647}>,align 8
@bm=private unnamed_addr constant<{[4x i8],i32,i8*,void(...)*,void(...)*,i32}><{[4x i8]zeroinitializer,i32 -805306344,i8*null,void(...)*bitcast(i8*(i8*)*@_SMLFN12TypedCalcCon11TPPATRECORDE to void(...)*),void(...)*bitcast(i8*(i8*,i8*)*@_SMLLN12TypedCalcCon11TPPATRECORDE_766 to void(...)*),i32 -2147483647}>,align 8
@bn=private unnamed_addr constant<{[4x i8],i32,[71x i8]}><{[4x i8]zeroinitializer,i32 -2147483577,[71x i8]c"src/compiler/compilerIRs/typedcalc/main/TypedCalcCon.sml:827.33(26824)\00"}>,align 8
@bo=private unnamed_addr constant<{[4x i8],i32,[8x i8]}><{[4x i8]zeroinitializer,i32 -2147483640,[8x i8]c"patVars\00"}>,align 8
@bp=private unnamed_addr constant<{[4x i8],i32,i8*,void(...)*,void(...)*,i32}><{[4x i8]zeroinitializer,i32 -805306344,i8*null,void(...)*bitcast(i8*(i8*)*@_SMLLN12TypedCalcCon7patVarsE_536 to void(...)*),void(...)*bitcast(i8*(i8*,i8*)*@_SMLLN12TypedCalcCon7patVarsE_767 to void(...)*),i32 -2147483647}>,align 8
@bq=private unnamed_addr constant<{[4x i8],i32,i8*,void(...)*,void(...)*,i32}><{[4x i8]zeroinitializer,i32 -805306344,i8*null,void(...)*bitcast(i8*(i8*)*@_SMLLN12TypedCalcCon7patVarsE_538 to void(...)*),void(...)*bitcast(i8*(i8*,i8*)*@_SMLLN12TypedCalcCon7patVarsE_768 to void(...)*),i32 -2147483647}>,align 8
@br=private unnamed_addr constant<{[4x i8],i32,i8*,void(...)*,void(...)*,i32}><{[4x i8]zeroinitializer,i32 -805306344,i8*null,void(...)*bitcast(i8*(i8*)*@_SMLFN12TypedCalcCon7patVarsE to void(...)*),void(...)*bitcast(i8*(i8*,i8*)*@_SMLLN12TypedCalcCon7patVarsE_769 to void(...)*),i32 -2147483647}>,align 8
@bs=private unnamed_addr constant<{[4x i8],i32,i8*,void(...)*,void(...)*,i32}><{[4x i8]zeroinitializer,i32 -805306344,i8*null,void(...)*bitcast(i8*(i8*)*@_SMLLN12TypedCalcCon9extendEnvE_542 to void(...)*),void(...)*bitcast(i8*(i8*,i8*)*@_SMLLN12TypedCalcCon9extendEnvE_770 to void(...)*),i32 -2147483647}>,align 8
@bt=private unnamed_addr constant<{[4x i8],i32,i8*,void(...)*,void(...)*,i32}><{[4x i8]zeroinitializer,i32 -805306344,i8*null,void(...)*bitcast(i8*(i8*)*@_SMLLN12TypedCalcCon9extendEnvE_544 to void(...)*),void(...)*bitcast(i8*(i8*,i8*)*@_SMLLN12TypedCalcCon9extendEnvE_771 to void(...)*),i32 -2147483647}>,align 8
@bu=private unnamed_addr constant<{[4x i8],i32,i8*,void(...)*,void(...)*,i32}><{[4x i8]zeroinitializer,i32 -805306344,i8*null,void(...)*bitcast(i8*(i8*)*@_SMLLN12TypedCalcCon9extendEnvE_546 to void(...)*),void(...)*bitcast(i8*(i8*,i8*)*@_SMLLN12TypedCalcCon9extendEnvE_772 to void(...)*),i32 -2147483647}>,align 8
@bv=private unnamed_addr constant<{[4x i8],i32,i8*,void(...)*,void(...)*,i32}><{[4x i8]zeroinitializer,i32 -805306344,i8*null,void(...)*bitcast(i8*(i8*)*@_SMLLN12TypedCalcCon9extendEnvE_548 to void(...)*),void(...)*bitcast(i8*(i8*,i8*)*@_SMLLN12TypedCalcCon9extendEnvE_773 to void(...)*),i32 -2147483647}>,align 8
@bw=private unnamed_addr constant<{[4x i8],i32,i8*,void(...)*,void(...)*,i32}><{[4x i8]zeroinitializer,i32 -805306344,i8*null,void(...)*bitcast(i8*(i8*)*@_SMLLN12TypedCalcCon9extendEnvE_550 to void(...)*),void(...)*bitcast(i8*(i8*,i8*)*@_SMLLN12TypedCalcCon9extendEnvE_774 to void(...)*),i32 -2147483647}>,align 8
@bx=private unnamed_addr constant<{[4x i8],i32,i8*,void(...)*,void(...)*,i32}><{[4x i8]zeroinitializer,i32 -805306344,i8*null,void(...)*bitcast(i8*(i8*)*@_SMLFN12TypedCalcCon9extendEnvE to void(...)*),void(...)*bitcast(i8*(i8*,i8*)*@_SMLLN12TypedCalcCon9extendEnvE_775 to void(...)*),i32 -2147483647}>,align 8
@by=private unnamed_addr constant<{[4x i8],i32,i8*,void(...)*,void(...)*,i32}><{[4x i8]zeroinitializer,i32 -805306344,i8*null,void(...)*bitcast(i8*(i8*)*@_SMLL1x_554 to void(...)*),void(...)*bitcast(i8*(i8*,i8*)*@_SMLL1x_776 to void(...)*),i32 -2147483647}>,align 8
@bz=private unnamed_addr constant<{[4x i8],i32,i8*,void(...)*,void(...)*,i32}><{[4x i8]zeroinitializer,i32 -805306344,i8*null,void(...)*bitcast(i8*(i8*)*@_SMLL1x_557 to void(...)*),void(...)*bitcast(i8*(i8*,i8*)*@_SMLL1x_777 to void(...)*),i32 -2147483647}>,align 8
@bA=private unnamed_addr constant<{[4x i8],i32,i8*,void(...)*,void(...)*,i32}><{[4x i8]zeroinitializer,i32 -805306344,i8*null,void(...)*bitcast(i8*(i8*)*@_SMLL1x_560 to void(...)*),void(...)*bitcast(i8*(i8*,i8*)*@_SMLL1x_778 to void(...)*),i32 -2147483647}>,align 8
@bB=private unnamed_addr constant<{[4x i8],i32,i8*,void(...)*,void(...)*,i32}><{[4x i8]zeroinitializer,i32 -805306344,i8*null,void(...)*bitcast(i8*(i8*)*@_SMLL1x_563 to void(...)*),void(...)*bitcast(i8*(i8*,i8*)*@_SMLL1x_779 to void(...)*),i32 -2147483647}>,align 8
@bC=private unnamed_addr constant<{[4x i8],i32,[10x i8]}><{[4x i8]zeroinitializer,i32 -2147483638,[10x i8]c"TPEXNTAGD\00"}>,align 8
@bD=private unnamed_addr constant<{[4x i8],i32,[12x i8]}><{[4x i8]zeroinitializer,i32 -2147483636,[12x i8]c"TPEXPORTVAR\00"}>,align 8
@bE=private unnamed_addr constant<{[4x i8],i32,i8*,void(...)*,void(...)*,i32}><{[4x i8]zeroinitializer,i32 -805306344,i8*null,void(...)*bitcast(i8*(i8*)*@_SMLL9argTyList_579 to void(...)*),void(...)*bitcast(i8*(i8*,i8*)*@_SMLL9argTyList_782 to void(...)*),i32 -2147483647}>,align 8
@bF=private unnamed_addr constant<{[4x i8],i32,i8*,void(...)*,void(...)*,i32}><{[4x i8]zeroinitializer,i32 -805306344,i8*null,void(...)*bitcast(i8*(i8*)*@_SMLLN12TypedCalcCon10funrecbindE_583 to void(...)*),void(...)*bitcast(i8*(i8*,i8*)*@_SMLLN12TypedCalcCon10funrecbindE_784 to void(...)*),i32 -2147483647}>,align 8
@bG=private unnamed_addr constant<{[4x i8],i32,i8*,void(...)*,void(...)*,i32}><{[4x i8]zeroinitializer,i32 -805306344,i8*null,void(...)*bitcast(i8*(i8*)*@_SMLLN12TypedCalcCon10funrecbindE_585 to void(...)*),void(...)*bitcast(i8*(i8*,i8*)*@_SMLLN12TypedCalcCon10funrecbindE_785 to void(...)*),i32 -2147483647}>,align 8
@bH=private unnamed_addr constant<{[4x i8],i32,[71x i8]}><{[4x i8]zeroinitializer,i32 -2147483577,[71x i8]c"src/compiler/compilerIRs/typedcalc/main/TypedCalcCon.sml:925.12(29904)\00"}>,align 8
@bI=private unnamed_addr constant<{[4x i8],i32,[11x i8]}><{[4x i8]zeroinitializer,i32 -2147483637,[11x i8]c"funrecbind\00"}>,align 8
@bJ=private unnamed_addr constant<{[4x i8],i32,i8*,void(...)*,void(...)*,i32}><{[4x i8]zeroinitializer,i32 -805306344,i8*null,void(...)*bitcast(i8*(i8*)*@_SMLLN12TypedCalcCon9TPFUNDECLE_592 to void(...)*),void(...)*bitcast(i8*(i8*,i8*)*@_SMLLN12TypedCalcCon9TPFUNDECLE_787 to void(...)*),i32 -2147483647}>,align 8
@bK=private unnamed_addr constant<{[4x i8],i32,i8*,void(...)*,void(...)*,i32}><{[4x i8]zeroinitializer,i32 -805306344,i8*null,void(...)*bitcast(i8*(i8*)*@_SMLLN12TypedCalcCon13TPPOLYFUNDECLE_595 to void(...)*),void(...)*bitcast(i8*(i8*,i8*)*@_SMLLN12TypedCalcCon13TPPOLYFUNDECLE_788 to void(...)*),i32 -2147483647}>,align 8
@bL=private unnamed_addr constant<{[4x i8],i32,[6x i8]}><{[4x i8]zeroinitializer,i32 -2147483642,[6x i8]c"TPVAL\00"}>,align 8
@bM=private unnamed_addr constant<{[4x i8],i32,i8*,void(...)*,void(...)*,i32}><{[4x i8]zeroinitializer,i32 -805306344,i8*null,void(...)*bitcast(i8*(i8*)*@_SMLL11newRecbinds_601 to void(...)*),void(...)*bitcast(i8*(i8*,i8*)*@_SMLL11newRecbinds_790 to void(...)*),i32 -2147483647}>,align 8
@bN=private unnamed_addr constant<{[4x i8],i32,[9x i8]}><{[4x i8]zeroinitializer,i32 -2147483639,[9x i8]c"TPVALREC\00"}>,align 8
@bO=private unnamed_addr constant<{[4x i8],i32,i8*,void(...)*,void(...)*,i32}><{[4x i8]zeroinitializer,i32 -805306344,i8*null,void(...)*bitcast(i8*(i8*)*@_SMLL1f_604 to void(...)*),void(...)*bitcast(i8*(i8*,i8*)*@_SMLL1f_791 to void(...)*),i32 -2147483647}>,align 8
@bP=private unnamed_addr constant<{[4x i8],i32,i8*,void(...)*,void(...)*,i32}><{[4x i8]zeroinitializer,i32 -805306344,i8*null,void(...)*bitcast(i8*(i8*)*@_SMLLN12TypedCalcCon8TPVALRECE_607 to void(...)*),void(...)*bitcast(i8*(i8*,i8*)*@_SMLLN12TypedCalcCon8TPVALRECE_793 to void(...)*),i32 -2147483647}>,align 8
@bQ=private unnamed_addr constant<{[4x i8],i32,i8*,void(...)*,void(...)*,i32}><{[4x i8]zeroinitializer,i32 -805306344,i8*null,void(...)*bitcast(i8*(i8*)*@_SMLL11newRecbinds_610 to void(...)*),void(...)*bitcast(i8*(i8*,i8*)*@_SMLL11newRecbinds_794 to void(...)*),i32 -2147483647}>,align 8
@bR=private unnamed_addr constant<{[4x i8],i32,[13x i8]}><{[4x i8]zeroinitializer,i32 -2147483635,[13x i8]c"TPVALPOLYREC\00"}>,align 8
@bS=private unnamed_addr constant<{[4x i8],i32,i8*,void(...)*,void(...)*,i32}><{[4x i8]zeroinitializer,i32 -805306344,i8*null,void(...)*bitcast(i8*(i8*)*@_SMLL1f_613 to void(...)*),void(...)*bitcast(i8*(i8*,i8*)*@_SMLL1f_795 to void(...)*),i32 -2147483647}>,align 8
@bT=private unnamed_addr constant<{[4x i8],i32,i8*,void(...)*,void(...)*,i32}><{[4x i8]zeroinitializer,i32 -805306344,i8*null,void(...)*bitcast(i8*(i8*)*@_SMLLN12TypedCalcCon12TPVALPOLYRECE_616 to void(...)*),void(...)*bitcast(i8*(i8*,i8*)*@_SMLLN12TypedCalcCon12TPVALPOLYRECE_797 to void(...)*),i32 -2147483647}>,align 8
@bU=private unnamed_addr constant<{[4x i8],i32,i8*,i8*,i32}><{[4x i8]zeroinitializer,i32 -805306352,i8*null,i8*null,i32 3}>,align 8
@_SMLZN12TypedCalcCon7TPERRORE=local_unnamed_addr constant i8*bitcast(i8**getelementptr inbounds(<{[4x i8],i32,i8*,i8*,i32}>,<{[4x i8],i32,i8*,i8*,i32}>*@bU,i64 0,i32 2)to i8*)
@bV=private unnamed_addr constant<{[4x i8],i32,i8*,void(...)*,void(...)*,i32}><{[4x i8]zeroinitializer,i32 -805306344,i8*null,void(...)*bitcast(i8*(i8*)*@_SMLFN12TypedCalcCon10TPCONSTANTE to void(...)*),void(...)*bitcast(i8*(i8*,i8*)*@_SMLLN12TypedCalcCon10TPCONSTANTE_798 to void(...)*),i32 -2147483647}>,align 8
@_SMLZN12TypedCalcCon10TPCONSTANTE=local_unnamed_addr constant i8*bitcast(i8**getelementptr inbounds(<{[4x i8],i32,i8*,void(...)*,void(...)*,i32}>,<{[4x i8],i32,i8*,void(...)*,void(...)*,i32}>*@bV,i64 0,i32 2)to i8*)
@bW=private unnamed_addr constant<{[4x i8],i32,i8*,void(...)*,void(...)*,i32}><{[4x i8]zeroinitializer,i32 -805306344,i8*null,void(...)*bitcast(i8*(i8*)*@_SMLFN12TypedCalcCon8TPSIZEOFE to void(...)*),void(...)*bitcast(i8*(i8*,i8*)*@_SMLLN12TypedCalcCon8TPSIZEOFE_799 to void(...)*),i32 -2147483647}>,align 8
@_SMLZN12TypedCalcCon8TPSIZEOFE=local_unnamed_addr constant i8*bitcast(i8**getelementptr inbounds(<{[4x i8],i32,i8*,void(...)*,void(...)*,i32}>,<{[4x i8],i32,i8*,void(...)*,void(...)*,i32}>*@bW,i64 0,i32 2)to i8*)
@_SMLZN12TypedCalcCon9TPREIFYTYE=local_unnamed_addr constant i8*bitcast(i8**getelementptr inbounds(<{[4x i8],i32,i8*,void(...)*,void(...)*,i32}>,<{[4x i8],i32,i8*,void(...)*,void(...)*,i32}>*@m,i64 0,i32 2)to i8*)
@bX=private unnamed_addr constant<{[4x i8],i32,i8*,void(...)*,void(...)*,i32}><{[4x i8]zeroinitializer,i32 -805306344,i8*null,void(...)*bitcast(i8*(i8*)*@_SMLFN12TypedCalcCon8TPEXNTAGE to void(...)*),void(...)*bitcast(i8*(i8*,i8*)*@_SMLLN12TypedCalcCon8TPEXNTAGE_800 to void(...)*),i32 -2147483647}>,align 8
@_SMLZN12TypedCalcCon8TPEXNTAGE=local_unnamed_addr constant i8*bitcast(i8**getelementptr inbounds(<{[4x i8],i32,i8*,void(...)*,void(...)*,i32}>,<{[4x i8],i32,i8*,void(...)*,void(...)*,i32}>*@bX,i64 0,i32 2)to i8*)
@bY=private unnamed_addr constant<{[4x i8],i32,i8*,void(...)*,void(...)*,i32}><{[4x i8]zeroinitializer,i32 -805306344,i8*null,void(...)*bitcast(i8*(i8*)*@_SMLFN12TypedCalcCon10TPEXEXNTAGE to void(...)*),void(...)*bitcast(i8*(i8*,i8*)*@_SMLLN12TypedCalcCon10TPEXEXNTAGE_801 to void(...)*),i32 -2147483647}>,align 8
@_SMLZN12TypedCalcCon10TPEXEXNTAGE=local_unnamed_addr constant i8*bitcast(i8**getelementptr inbounds(<{[4x i8],i32,i8*,void(...)*,void(...)*,i32}>,<{[4x i8],i32,i8*,void(...)*,void(...)*,i32}>*@bY,i64 0,i32 2)to i8*)
@bZ=private unnamed_addr constant<{[4x i8],i32,i8*,void(...)*,void(...)*,i32}><{[4x i8]zeroinitializer,i32 -805306344,i8*null,void(...)*bitcast(i8*(i8*)*@_SMLFN12TypedCalcCon7TPEXVARE to void(...)*),void(...)*bitcast(i8*(i8*,i8*)*@_SMLLN12TypedCalcCon7TPEXVARE_802 to void(...)*),i32 -2147483647}>,align 8
@_SMLZN12TypedCalcCon7TPEXVARE=local_unnamed_addr constant i8*bitcast(i8**getelementptr inbounds(<{[4x i8],i32,i8*,void(...)*,void(...)*,i32}>,<{[4x i8],i32,i8*,void(...)*,void(...)*,i32}>*@bZ,i64 0,i32 2)to i8*)
@b0=private unnamed_addr constant<{[4x i8],i32,i8*,void(...)*,void(...)*,i32}><{[4x i8]zeroinitializer,i32 -805306344,i8*null,void(...)*bitcast(i8*(i8*)*@_SMLFN12TypedCalcCon5TPVARE to void(...)*),void(...)*bitcast(i8*(i8*,i8*)*@_SMLLN12TypedCalcCon5TPVARE_803 to void(...)*),i32 -2147483647}>,align 8
@_SMLZN12TypedCalcCon5TPVARE=local_unnamed_addr constant i8*bitcast(i8**getelementptr inbounds(<{[4x i8],i32,i8*,void(...)*,void(...)*,i32}>,<{[4x i8],i32,i8*,void(...)*,void(...)*,i32}>*@b0,i64 0,i32 2)to i8*)
@b1=private unnamed_addr constant<{[4x i8],i32,i8*,void(...)*,void(...)*,i32}><{[4x i8]zeroinitializer,i32 -805306344,i8*null,void(...)*bitcast(i8*(i8*)*@_SMLFN12TypedCalcCon11TPRECFUNVARE to void(...)*),void(...)*bitcast(i8*(i8*,i8*)*@_SMLLN12TypedCalcCon11TPRECFUNVARE_804 to void(...)*),i32 -2147483647}>,align 8
@_SMLZN12TypedCalcCon11TPRECFUNVARE=local_unnamed_addr constant i8*bitcast(i8**getelementptr inbounds(<{[4x i8],i32,i8*,void(...)*,void(...)*,i32}>,<{[4x i8],i32,i8*,void(...)*,void(...)*,i32}>*@b1,i64 0,i32 2)to i8*)
@_SMLZN12TypedCalcCon6TPCASTE=local_unnamed_addr constant i8*bitcast(i8**getelementptr inbounds(<{[4x i8],i32,i8*,void(...)*,void(...)*,i32}>,<{[4x i8],i32,i8*,void(...)*,void(...)*,i32}>*@o,i64 0,i32 2)to i8*)
@_SMLZN12TypedCalcCon15TPDATACONSTRUCTE=local_unnamed_addr constant i8*bitcast(i8**getelementptr inbounds(<{[4x i8],i32,i8*,void(...)*,void(...)*,i32}>,<{[4x i8],i32,i8*,void(...)*,void(...)*,i32}>*@r,i64 0,i32 2)to i8*)
@_SMLZN12TypedCalcCon14TPEXNCONSTRUCTE=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*)
@_SMLZN12TypedCalcCon15TPFFIIMPORT__FUNE=local_unnamed_addr constant i8*bitcast(i8**getelementptr inbounds(<{[4x i8],i32,i8*,void(...)*,void(...)*,i32}>,<{[4x i8],i32,i8*,void(...)*,void(...)*,i32}>*@C,i64 0,i32 2)to i8*)
@_SMLZN12TypedCalcCon15TPFFIIMPORT__EXTE=local_unnamed_addr constant i8*bitcast(i8**getelementptr inbounds(<{[4x i8],i32,i8*,void(...)*,void(...)*,i32}>,<{[4x i8],i32,i8*,void(...)*,void(...)*,i32}>*@D,i64 0,i32 2)to i8*)
@_SMLZN12TypedCalcCon15TPFOREIGNSYMBOLE=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*)
@_SMLZN12TypedCalcCon14TPFOREIGNAPPLYE=local_unnamed_addr constant i8*bitcast(i8**getelementptr inbounds(<{[4x i8],i32,i8*,void(...)*,void(...)*,i32}>,<{[4x i8],i32,i8*,void(...)*,void(...)*,i32}>*@K,i64 0,i32 2)to i8*)
@_SMLZN12TypedCalcCon12TPCALLBACKFNE=local_unnamed_addr constant i8*bitcast(i8**getelementptr inbounds(<{[4x i8],i32,i8*,void(...)*,void(...)*,i32}>,<{[4x i8],i32,i8*,void(...)*,void(...)*,i32}>*@M,i64 0,i32 2)to i8*)
@_SMLZN12TypedCalcCon6TPTAPPE=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*)
@_SMLZN12TypedCalcCon6TPPOLYE=local_unnamed_addr constant i8*bitcast(i8**getelementptr inbounds(<{[4x i8],i32,i8*,void(...)*,void(...)*,i32}>,<{[4x i8],i32,i8*,void(...)*,void(...)*,i32}>*@O,i64 0,i32 2)to i8*)
@_SMLZN12TypedCalcCon5TPFNME=local_unnamed_addr constant i8*bitcast(i8**getelementptr inbounds(<{[4x i8],i32,i8*,void(...)*,void(...)*,i32}>,<{[4x i8],i32,i8*,void(...)*,void(...)*,i32}>*@R,i64 0,i32 2)to i8*)
@_SMLZN12TypedCalcCon6TPAPPME=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*)
@_SMLZN12TypedCalcCon7TPCASEME=local_unnamed_addr constant i8*bitcast(i8**getelementptr inbounds(<{[4x i8],i32,i8*,void(...)*,void(...)*,i32}>,<{[4x i8],i32,i8*,void(...)*,void(...)*,i32}>*@al,i64 0,i32 2)to i8*)
@_SMLZN12TypedCalcCon18TPSWITCH__CONSTCASEE=local_unnamed_addr constant i8*bitcast(i8**getelementptr inbounds(<{[4x i8],i32,i8*,void(...)*,void(...)*,i32}>,<{[4x i8],i32,i8*,void(...)*,void(...)*,i32}>*@ao,i64 0,i32 2)to i8*)
@_SMLZN12TypedCalcCon16TPSWITCH__CONCASEE=local_unnamed_addr constant i8*bitcast(i8**getelementptr inbounds(<{[4x i8],i32,i8*,void(...)*,void(...)*,i32}>,<{[4x i8],i32,i8*,void(...)*,void(...)*,i32}>*@as,i64 0,i32 2)to i8*)
@_SMLZN12TypedCalcCon16TPSWITCH__EXNCASEE=local_unnamed_addr constant i8*bitcast(i8**getelementptr inbounds(<{[4x i8],i32,i8*,void(...)*,void(...)*,i32}>,<{[4x i8],i32,i8*,void(...)*,void(...)*,i32}>*@aw,i64 0,i32 2)to i8*)
@_SMLZN12TypedCalcCon7TPTHROWE=local_unnamed_addr constant i8*bitcast(i8**getelementptr inbounds(<{[4x i8],i32,i8*,void(...)*,void(...)*,i32}>,<{[4x i8],i32,i8*,void(...)*,void(...)*,i32}>*@ay,i64 0,i32 2)to i8*)
@_SMLZN12TypedCalcCon7TPCATCHE=local_unnamed_addr constant i8*bitcast(i8**getelementptr inbounds(<{[4x i8],i32,i8*,void(...)*,void(...)*,i32}>,<{[4x i8],i32,i8*,void(...)*,void(...)*,i32}>*@aA,i64 0,i32 2)to i8*)
@_SMLZN12TypedCalcCon5TPLETE=local_unnamed_addr constant i8*bitcast(i8**getelementptr inbounds(<{[4x i8],i32,i8*,void(...)*,void(...)*,i32}>,<{[4x i8],i32,i8*,void(...)*,void(...)*,i32}>*@P,i64 0,i32 2)to i8*)
@_SMLZN12TypedCalcCon9TPMONOLETE=local_unnamed_addr constant i8*bitcast(i8**getelementptr inbounds(<{[4x i8],i32,i8*,void(...)*,void(...)*,i32}>,<{[4x i8],i32,i8*,void(...)*,void(...)*,i32}>*@aC,i64 0,i32 2)to i8*)
@_SMLZN12TypedCalcCon7TPRAISEE=local_unnamed_addr constant i8*bitcast(i8**getelementptr inbounds(<{[4x i8],i32,i8*,void(...)*,void(...)*,i32}>,<{[4x i8],i32,i8*,void(...)*,void(...)*,i32}>*@aE,i64 0,i32 2)to i8*)
@_SMLZN12TypedCalcCon8TPHANDLEE=local_unnamed_addr constant i8*bitcast(i8**getelementptr inbounds(<{[4x i8],i32,i8*,void(...)*,void(...)*,i32}>,<{[4x i8],i32,i8*,void(...)*,void(...)*,i32}>*@aG,i64 0,i32 2)to i8*)
@_SMLZN12TypedCalcCon8TPRECORDE=local_unnamed_addr constant i8*bitcast(i8**getelementptr inbounds(<{[4x i8],i32,i8*,void(...)*,void(...)*,i32}>,<{[4x i8],i32,i8*,void(...)*,void(...)*,i32}>*@aJ,i64 0,i32 2)to i8*)
@_SMLZN12TypedCalcCon8TPSELECTE=local_unnamed_addr constant i8*bitcast(i8**getelementptr inbounds(<{[4x i8],i32,i8*,void(...)*,void(...)*,i32}>,<{[4x i8],i32,i8*,void(...)*,void(...)*,i32}>*@aN,i64 0,i32 2)to i8*)
@_SMLZN12TypedCalcCon8TPMODIFYE=local_unnamed_addr constant i8*bitcast(i8**getelementptr inbounds(<{[4x i8],i32,i8*,void(...)*,void(...)*,i32}>,<{[4x i8],i32,i8*,void(...)*,void(...)*,i32}>*@aP,i64 0,i32 2)to i8*)
@_SMLZN12TypedCalcCon11TPPRIMAPPLYE=local_unnamed_addr constant i8*bitcast(i8**getelementptr inbounds(<{[4x i8],i32,i8*,void(...)*,void(...)*,i32}>,<{[4x i8],i32,i8*,void(...)*,void(...)*,i32}>*@aS,i64 0,i32 2)to i8*)
@_SMLZN12TypedCalcCon12TPOPRIMAPPLYE=local_unnamed_addr constant i8*bitcast(i8**getelementptr inbounds(<{[4x i8],i32,i8*,void(...)*,void(...)*,i32}>,<{[4x i8],i32,i8*,void(...)*,void(...)*,i32}>*@aV,i64 0,i32 2)to i8*)
@_SMLZN12TypedCalcCon6TPJOINE=local_unnamed_addr constant i8*bitcast(i8**getelementptr inbounds(<{[4x i8],i32,i8*,void(...)*,void(...)*,i32}>,<{[4x i8],i32,i8*,void(...)*,void(...)*,i32}>*@aW,i64 0,i32 2)to i8*)
@_SMLZN12TypedCalcCon9TPDYNAMICE=local_unnamed_addr constant i8*bitcast(i8**getelementptr inbounds(<{[4x i8],i32,i8*,void(...)*,void(...)*,i32}>,<{[4x i8],i32,i8*,void(...)*,void(...)*,i32}>*@aX,i64 0,i32 2)to i8*)
@_SMLZN12TypedCalcCon11TPDYNAMICISE=local_unnamed_addr constant i8*bitcast(i8**getelementptr inbounds(<{[4x i8],i32,i8*,void(...)*,void(...)*,i32}>,<{[4x i8],i32,i8*,void(...)*,void(...)*,i32}>*@aY,i64 0,i32 2)to i8*)
@_SMLZN12TypedCalcCon13TPDYNAMICVIEWE=local_unnamed_addr constant i8*bitcast(i8**getelementptr inbounds(<{[4x i8],i32,i8*,void(...)*,void(...)*,i32}>,<{[4x i8],i32,i8*,void(...)*,void(...)*,i32}>*@a1,i64 0,i32 2)to i8*)
@_SMLZN12TypedCalcCon13TPDYNAMICNULLE=local_unnamed_addr constant i8*bitcast(i8**getelementptr inbounds(<{[4x i8],i32,i8*,void(...)*,void(...)*,i32}>,<{[4x i8],i32,i8*,void(...)*,void(...)*,i32}>*@aZ,i64 0,i32 2)to i8*)
@_SMLZN12TypedCalcCon12TPDYNAMICTOPE=local_unnamed_addr constant i8*bitcast(i8**getelementptr inbounds(<{[4x i8],i32,i8*,void(...)*,void(...)*,i32}>,<{[4x i8],i32,i8*,void(...)*,void(...)*,i32}>*@a0,i64 0,i32 2)to i8*)
@_SMLZN12TypedCalcCon13TPDYNAMICCASEE=local_unnamed_addr constant i8*bitcast(i8**getelementptr inbounds(<{[4x i8],i32,i8*,void(...)*,void(...)*,i32}>,<{[4x i8],i32,i8*,void(...)*,void(...)*,i32}>*@a2,i64 0,i32 2)to i8*)
@_SMLZN12TypedCalcCon18TPDYNAMICEXISTTAPPE=local_unnamed_addr constant i8*bitcast(i8**getelementptr inbounds(<{[4x i8],i32,i8*,void(...)*,void(...)*,i32}>,<{[4x i8],i32,i8*,void(...)*,void(...)*,i32}>*@a3,i64 0,i32 2)to i8*)
@b2=private unnamed_addr constant<{[4x i8],i32,i8*,void(...)*,void(...)*,i32}><{[4x i8]zeroinitializer,i32 -805306344,i8*null,void(...)*bitcast(i8*(i8*)*@_SMLFN12TypedCalcCon13TPPATCONSTANTE to void(...)*),void(...)*bitcast(i8*(i8*,i8*)*@_SMLLN12TypedCalcCon13TPPATCONSTANTE_805 to void(...)*),i32 -2147483647}>,align 8
@_SMLZN12TypedCalcCon13TPPATCONSTANTE=local_unnamed_addr constant i8*bitcast(i8**getelementptr inbounds(<{[4x i8],i32,i8*,void(...)*,void(...)*,i32}>,<{[4x i8],i32,i8*,void(...)*,void(...)*,i32}>*@b2,i64 0,i32 2)to i8*)
@_SMLZN12TypedCalcCon8TPPATVARE=local_unnamed_addr constant i8*bitcast(i8**getelementptr inbounds(<{[4x i8],i32,i8*,void(...)*,void(...)*,i32}>,<{[4x i8],i32,i8*,void(...)*,void(...)*,i32}>*@a4,i64 0,i32 2)to i8*)
@b3=private unnamed_addr constant<{[4x i8],i32,i8*,void(...)*,void(...)*,i32}><{[4x i8]zeroinitializer,i32 -805306344,i8*null,void(...)*bitcast(i8*(i8*)*@_SMLFN12TypedCalcCon9TPPATWILDE to void(...)*),void(...)*bitcast(i8*(i8*,i8*)*@_SMLLN12TypedCalcCon9TPPATWILDE_806 to void(...)*),i32 -2147483647}>,align 8
@_SMLZN12TypedCalcCon9TPPATWILDE=local_unnamed_addr constant i8*bitcast(i8**getelementptr inbounds(<{[4x i8],i32,i8*,void(...)*,void(...)*,i32}>,<{[4x i8],i32,i8*,void(...)*,void(...)*,i32}>*@b3,i64 0,i32 2)to i8*)
@_SMLZN12TypedCalcCon18TPPATDATACONSTRUCTE=local_unnamed_addr constant i8*bitcast(i8**getelementptr inbounds(<{[4x i8],i32,i8*,void(...)*,void(...)*,i32}>,<{[4x i8],i32,i8*,void(...)*,void(...)*,i32}>*@a6,i64 0,i32 2)to i8*)
@_SMLZN12TypedCalcCon17TPPATEXNCONSTRUCTE=local_unnamed_addr constant i8*bitcast(i8**getelementptr inbounds(<{[4x i8],i32,i8*,void(...)*,void(...)*,i32}>,<{[4x i8],i32,i8*,void(...)*,void(...)*,i32}>*@bb,i64 0,i32 2)to i8*)
@_SMLZN12TypedCalcCon12TPPATLAYEREDE=local_unnamed_addr constant i8*bitcast(i8**getelementptr inbounds(<{[4x i8],i32,i8*,void(...)*,void(...)*,i32}>,<{[4x i8],i32,i8*,void(...)*,void(...)*,i32}>*@bf,i64 0,i32 2)to i8*)
@_SMLZN12TypedCalcCon11TPPATRECORDE=local_unnamed_addr constant i8*bitcast(i8**getelementptr inbounds(<{[4x i8],i32,i8*,void(...)*,void(...)*,i32}>,<{[4x i8],i32,i8*,void(...)*,void(...)*,i32}>*@bm,i64 0,i32 2)to i8*)
@_SMLZN12TypedCalcCon7patVarsE=local_unnamed_addr constant i8*bitcast(i8**getelementptr inbounds(<{[4x i8],i32,i8*,void(...)*,void(...)*,i32}>,<{[4x i8],i32,i8*,void(...)*,void(...)*,i32}>*@br,i64 0,i32 2)to i8*)
@_SMLZN12TypedCalcCon9extendEnvE=local_unnamed_addr constant i8*bitcast(i8**getelementptr inbounds(<{[4x i8],i32,i8*,void(...)*,void(...)*,i32}>,<{[4x i8],i32,i8*,void(...)*,void(...)*,i32}>*@bx,i64 0,i32 2)to i8*)
@_SML_gvar1d09938e346dcc6f_TypedCalcCon=private global<{[4x i8],i32,[24x i8*]}><{[4x i8]zeroinitializer,i32 -1342177088,[24x i8*]zeroinitializer}>,align 8
@b4=private unnamed_addr global[2x i64][i64 1,i64 sub(i64 ptrtoint(i8**getelementptr inbounds(<{[4x i8],i32,[24x i8*]}>,<{[4x i8],i32,[24x i8*]}>*@_SML_gvar1d09938e346dcc6f_TypedCalcCon,i32 0,i32 2,i32 0)to i64),i64 ptrtoint([2x i64]*@b4 to i64))]
@_SML_ftab1d09938e346dcc6f_TypedCalcCon=external global i8
@b5=private unnamed_addr global i8 0
@_SMLZN12TypedCalcCon10TPPATERRORE=alias i8*,getelementptr inbounds(<{[4x i8],i32,[24x i8*]}>,<{[4x i8],i32,[24x i8*]}>*@_SML_gvar1d09938e346dcc6f_TypedCalcCon,i32 0,i32 2,i32 0)
@_SMLZN12TypedCalcCon8emptyEnvE=alias i8*,getelementptr inbounds(<{[4x i8],i32,[24x i8*]}>,<{[4x i8],i32,[24x i8*]}>*@_SML_gvar1d09938e346dcc6f_TypedCalcCon,i32 0,i32 2,i32 1)
@_SMLZN12TypedCalcCon6exnEnvE=alias i8*,getelementptr inbounds(<{[4x i8],i32,[24x i8*]}>,<{[4x i8],i32,[24x i8*]}>*@_SML_gvar1d09938e346dcc6f_TypedCalcCon,i32 0,i32 2,i32 2)
@_SMLZN12TypedCalcCon8exExnEnvE=alias i8*,getelementptr inbounds(<{[4x i8],i32,[24x i8*]}>,<{[4x i8],i32,[24x i8*]}>*@_SML_gvar1d09938e346dcc6f_TypedCalcCon,i32 0,i32 2,i32 3)
@_SMLZN12TypedCalcCon6varEnvE=alias i8*,getelementptr inbounds(<{[4x i8],i32,[24x i8*]}>,<{[4x i8],i32,[24x i8*]}>*@_SML_gvar1d09938e346dcc6f_TypedCalcCon,i32 0,i32 2,i32 4)
@_SMLZN12TypedCalcCon8exVarEnvE=alias i8*,getelementptr inbounds(<{[4x i8],i32,[24x i8*]}>,<{[4x i8],i32,[24x i8*]}>*@_SML_gvar1d09938e346dcc6f_TypedCalcCon,i32 0,i32 2,i32 5)
@_SMLZN12TypedCalcCon6btvEnvE=alias i8*,getelementptr inbounds(<{[4x i8],i32,[24x i8*]}>,<{[4x i8],i32,[24x i8*]}>*@_SML_gvar1d09938e346dcc6f_TypedCalcCon,i32 0,i32 2,i32 6)
@_SMLZN12TypedCalcCon10makeExnEnvE=alias i8*,getelementptr inbounds(<{[4x i8],i32,[24x i8*]}>,<{[4x i8],i32,[24x i8*]}>*@_SML_gvar1d09938e346dcc6f_TypedCalcCon,i32 0,i32 2,i32 7)
@_SMLZN12TypedCalcCon12makeExExnEnvE=alias i8*,getelementptr inbounds(<{[4x i8],i32,[24x i8*]}>,<{[4x i8],i32,[24x i8*]}>*@_SML_gvar1d09938e346dcc6f_TypedCalcCon,i32 0,i32 2,i32 8)
@_SMLZN12TypedCalcCon10makeVarEnvE=alias i8*,getelementptr inbounds(<{[4x i8],i32,[24x i8*]}>,<{[4x i8],i32,[24x i8*]}>*@_SML_gvar1d09938e346dcc6f_TypedCalcCon,i32 0,i32 2,i32 9)
@_SMLZN12TypedCalcCon12makeExVarEnvE=alias i8*,getelementptr inbounds(<{[4x i8],i32,[24x i8*]}>,<{[4x i8],i32,[24x i8*]}>*@_SML_gvar1d09938e346dcc6f_TypedCalcCon,i32 0,i32 2,i32 10)
@_SMLZN12TypedCalcCon9clsVarEnvE=alias i8*,getelementptr inbounds(<{[4x i8],i32,[24x i8*]}>,<{[4x i8],i32,[24x i8*]}>*@_SML_gvar1d09938e346dcc6f_TypedCalcCon,i32 0,i32 2,i32 11)
@_SMLZN12TypedCalcCon5TPEXDE=alias i8*,getelementptr inbounds(<{[4x i8],i32,[24x i8*]}>,<{[4x i8],i32,[24x i8*]}>*@_SML_gvar1d09938e346dcc6f_TypedCalcCon,i32 0,i32 2,i32 12)
@_SMLZN12TypedCalcCon9TPEXNTAGDE=alias i8*,getelementptr inbounds(<{[4x i8],i32,[24x i8*]}>,<{[4x i8],i32,[24x i8*]}>*@_SML_gvar1d09938e346dcc6f_TypedCalcCon,i32 0,i32 2,i32 13)
@_SMLZN12TypedCalcCon11TPEXPORTEXNE=alias i8*,getelementptr inbounds(<{[4x i8],i32,[24x i8*]}>,<{[4x i8],i32,[24x i8*]}>*@_SML_gvar1d09938e346dcc6f_TypedCalcCon,i32 0,i32 2,i32 14)
@_SMLZN12TypedCalcCon11TPEXPORTVARE=alias i8*,getelementptr inbounds(<{[4x i8],i32,[24x i8*]}>,<{[4x i8],i32,[24x i8*]}>*@_SML_gvar1d09938e346dcc6f_TypedCalcCon,i32 0,i32 2,i32 15)
@_SMLZN12TypedCalcCon11TPEXTERNEXNE=alias i8*,getelementptr inbounds(<{[4x i8],i32,[24x i8*]}>,<{[4x i8],i32,[24x i8*]}>*@_SML_gvar1d09938e346dcc6f_TypedCalcCon,i32 0,i32 2,i32 16)
@_SMLZN12TypedCalcCon12TPBUILTINEXNE=alias i8*,getelementptr inbounds(<{[4x i8],i32,[24x i8*]}>,<{[4x i8],i32,[24x i8*]}>*@_SML_gvar1d09938e346dcc6f_TypedCalcCon,i32 0,i32 2,i32 17)
@_SMLZN12TypedCalcCon11TPEXTERNVARE=alias i8*,getelementptr inbounds(<{[4x i8],i32,[24x i8*]}>,<{[4x i8],i32,[24x i8*]}>*@_SML_gvar1d09938e346dcc6f_TypedCalcCon,i32 0,i32 2,i32 18)
@_SMLZN12TypedCalcCon9TPFUNDECLE=alias i8*,getelementptr inbounds(<{[4x i8],i32,[24x i8*]}>,<{[4x i8],i32,[24x i8*]}>*@_SML_gvar1d09938e346dcc6f_TypedCalcCon,i32 0,i32 2,i32 19)
@_SMLZN12TypedCalcCon13TPPOLYFUNDECLE=alias i8*,getelementptr inbounds(<{[4x i8],i32,[24x i8*]}>,<{[4x i8],i32,[24x i8*]}>*@_SML_gvar1d09938e346dcc6f_TypedCalcCon,i32 0,i32 2,i32 20)
@_SMLZN12TypedCalcCon5TPVALE=alias i8*,getelementptr inbounds(<{[4x i8],i32,[24x i8*]}>,<{[4x i8],i32,[24x i8*]}>*@_SML_gvar1d09938e346dcc6f_TypedCalcCon,i32 0,i32 2,i32 21)
@_SMLZN12TypedCalcCon8TPVALRECE=alias i8*,getelementptr inbounds(<{[4x i8],i32,[24x i8*]}>,<{[4x i8],i32,[24x i8*]}>*@_SML_gvar1d09938e346dcc6f_TypedCalcCon,i32 0,i32 2,i32 22)
@_SMLZN12TypedCalcCon12TPVALPOLYRECE=alias i8*,getelementptr inbounds(<{[4x i8],i32,[24x i8*]}>,<{[4x i8],i32,[24x i8*]}>*@_SML_gvar1d09938e346dcc6f_TypedCalcCon,i32 0,i32 2,i32 23)
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 void@sml_matchcomp_bug()local_unnamed_addr
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*@_SMLFN11RecordLabel3Map3mapE(i32 inreg,i32 inreg,i32 inreg,i32 inreg)local_unnamed_addr#2 gc"smlsharp"
declare i8*@_SMLFN11RecordLabel3Map4findE(i32 inreg,i32 inreg)local_unnamed_addr#2 gc"smlsharp"
declare i8*@_SMLFN11RecordLabel3Map4mapiE(i32 inreg,i32 inreg,i32 inreg,i32 inreg)local_unnamed_addr#2 gc"smlsharp"
declare i8*@_SMLFN11RecordLabel3Map5emptyE(i32 inreg,i32 inreg)local_unnamed_addr#2 gc"smlsharp"
declare i8*@_SMLFN11RecordLabel3Map5foldlE(i32 inreg,i32 inreg,i32 inreg,i32 inreg)local_unnamed_addr#2 gc"smlsharp"
declare i8*@_SMLFN11RecordLabel3Map6insertE(i32 inreg,i32 inreg)local_unnamed_addr#2 gc"smlsharp"
declare i8*@_SMLFN11RecordLabel3Map9listItemsE(i32 inreg,i32 inreg)local_unnamed_addr#2 gc"smlsharp"
declare i8*@_SMLFN11RecordLabel8tupleMapE(i32 inreg,i32 inreg)local_unnamed_addr#2 gc"smlsharp"
declare i8*@_SMLFN11TypesBasics7derefTyE(i8*inreg)local_unnamed_addr#2 gc"smlsharp"
declare i8*@_SMLFN11TypesBasics7tpappTyE(i8*inreg)local_unnamed_addr#2 gc"smlsharp"
declare i8*@_SMLFN13LongsymbolEnv5emptyE(i32 inreg,i32 inreg)local_unnamed_addr#2 gc"smlsharp"
declare i8*@_SMLFN13LongsymbolEnv6insertE(i32 inreg,i32 inreg)local_unnamed_addr#2 gc"smlsharp"
declare i8*@_SMLFN13LongsymbolEnv9unionWithE(i32 inreg,i32 inreg)local_unnamed_addr#2 gc"smlsharp"
declare i8*@_SMLFN13ReifiedTyData7TyRepTyE(i8*inreg)local_unnamed_addr#2 gc"smlsharp"
declare i8*@_SMLFN14BoundTypeVarID3Map4findE(i32 inreg,i32 inreg)local_unnamed_addr#2 gc"smlsharp"
declare i8*@_SMLFN14BoundTypeVarID3Map5emptyE(i32 inreg,i32 inreg)local_unnamed_addr#2 gc"smlsharp"
declare i8*@_SMLFN14BoundTypeVarID3Map7isEmptyE(i32 inreg,i32 inreg)local_unnamed_addr#2 gc"smlsharp"
declare i8*@_SMLFN14BoundTypeVarID3Map9unionWithE(i32 inreg,i32 inreg)local_unnamed_addr#2 gc"smlsharp"
declare i8*@_SMLFN3Bug11prettyPrintE(i8*inreg)local_unnamed_addr#2 gc"smlsharp"
declare i8*@_SMLFN3Loc10format__locE(i8*inreg)local_unnamed_addr#2 gc"smlsharp"
declare i32@_SMLFN4Bool3notE(i32 inreg)local_unnamed_addr#2 gc"smlsharp"
declare i8*@_SMLFN4List1_VE(i32 inreg,i32 inreg)local_unnamed_addr#2 gc"smlsharp"
declare i8*@_SMLFN4List3appE(i32 inreg,i32 inreg)local_unnamed_addr#2 gc"smlsharp"
declare i8*@_SMLFN4List3mapE(i32 inreg,i32 inreg,i32 inreg,i32 inreg)local_unnamed_addr#2 gc"smlsharp"
declare i8*@_SMLFN4List3revE(i32 inreg,i32 inreg)local_unnamed_addr#2 gc"smlsharp"
declare i8*@_SMLFN4List5foldlE(i32 inreg,i32 inreg,i32 inreg,i32 inreg)local_unnamed_addr#2 gc"smlsharp"
declare i8*@_SMLFN4List6filterE(i32 inreg,i32 inreg)local_unnamed_addr#2 gc"smlsharp"
declare i8*@_SMLFN5ExnID3Map5emptyE(i32 inreg,i32 inreg)local_unnamed_addr#2 gc"smlsharp"
declare i8*@_SMLFN5ExnID3Map6insertE(i32 inreg,i32 inreg)local_unnamed_addr#2 gc"smlsharp"
declare i8*@_SMLFN5ExnID3Map9unionWithE(i32 inreg,i32 inreg)local_unnamed_addr#2 gc"smlsharp"
declare i8*@_SMLFN5Int328toStringE(i32 inreg)local_unnamed_addr#2 gc"smlsharp"
declare i8*@_SMLFN5Types9format__tyE(i8*inreg)local_unnamed_addr#2 gc"smlsharp"
declare i8*@_SMLFN5Unify4eqTyE(i8*inreg)local_unnamed_addr#2 gc"smlsharp"
declare i8*@_SMLFN5VarID3Map5emptyE(i32 inreg,i32 inreg)local_unnamed_addr#2 gc"smlsharp"
declare i8*@_SMLFN5VarID3Map6insertE(i32 inreg,i32 inreg)local_unnamed_addr#2 gc"smlsharp"
declare i8*@_SMLFN5VarID3Map9singletonE(i32 inreg,i32 inreg)local_unnamed_addr#2 gc"smlsharp"
declare i8*@_SMLFN5VarID3Map9unionWithE(i32 inreg,i32 inreg)local_unnamed_addr#2 gc"smlsharp"
declare i8*@_SMLFN6String1_ZE(i8*inreg)local_unnamed_addr#2 gc"smlsharp"
declare void@_SMLFN6TextIO6outputE(i8*inreg)local_unnamed_addr#2 gc"smlsharp"
declare i8*@_SMLFN8ListPair5mapEqE(i32 inreg,i32 inreg,i32 inreg,i32 inreg,i32 inreg,i32 inreg)local_unnamed_addr#2 gc"smlsharp"
declare i8*@_SMLFN8ListPair5unzipE(i32 inreg,i32 inreg,i32 inreg,i32 inreg)local_unnamed_addr#2 gc"smlsharp"
declare i8*@_SMLFN8ListPair5zipEqE(i32 inreg,i32 inreg,i32 inreg,i32 inreg)local_unnamed_addr#2 gc"smlsharp"
declare i8*@_SMLFN9TypedCalc12format__tppatE(i8*inreg)local_unnamed_addr#2 gc"smlsharp"
declare void@_SML_main5148a836b3728be9_Int32()local_unnamed_addr#2 gc"smlsharp"
declare void@_SML_maindaa180c1799f3810_Bool()local_unnamed_addr#2 gc"smlsharp"
declare void@_SML_main03d87556ec7f64b2_List()local_unnamed_addr#2 gc"smlsharp"
declare void@_SML_main7aa263535439ee1c_ListPair()local_unnamed_addr#2 gc"smlsharp"
declare void@_SML_main1ef93e13728790b1_String()local_unnamed_addr#2 gc"smlsharp"
declare void@_SML_main3446b7b079949ccf_text_io()local_unnamed_addr#2 gc"smlsharp"
declare void@_SML_main7374574ddb619c6a_LocalID()local_unnamed_addr#2 gc"smlsharp"
declare void@_SML_main67a5b28ff146c353_Loc()local_unnamed_addr#2 gc"smlsharp"
declare void@_SML_main44ca35c4c731682b_Symbol()local_unnamed_addr#2 gc"smlsharp"
declare void@_SML_main60e750412e2bb4fe_RecordLabel()local_unnamed_addr#2 gc"smlsharp"
declare void@_SML_maineaa0aca8fbe4101a_Bug()local_unnamed_addr#2 gc"smlsharp"
declare void@_SML_maina8c984cf5ab1458f_Control()local_unnamed_addr#2 gc"smlsharp"
declare void@_SML_main606b245a3d2b48d6_Types_ppg()local_unnamed_addr#2 gc"smlsharp"
declare void@_SML_main0426d5e63d1bd065_TypedCalc_ppg()local_unnamed_addr#2 gc"smlsharp"
declare void@_SML_main8d80f531f2346bfa_Unify()local_unnamed_addr#2 gc"smlsharp"
declare void@_SML_main2aaf2b808f82ee2e_TypesBasics()local_unnamed_addr#2 gc"smlsharp"
declare void@_SML_maincf60e58028aea790_BuiltinTypes()local_unnamed_addr#2 gc"smlsharp"
declare void@_SML_main0db119a0681ca7e6_ReifiedTyData()local_unnamed_addr#2 gc"smlsharp"
declare void@_SML_load5148a836b3728be9_Int32(i8*)local_unnamed_addr
declare void@_SML_loaddaa180c1799f3810_Bool(i8*)local_unnamed_addr
declare void@_SML_load03d87556ec7f64b2_List(i8*)local_unnamed_addr
declare void@_SML_load7aa263535439ee1c_ListPair(i8*)local_unnamed_addr
declare void@_SML_load1ef93e13728790b1_String(i8*)local_unnamed_addr
declare void@_SML_load3446b7b079949ccf_text_io(i8*)local_unnamed_addr
declare void@_SML_load7374574ddb619c6a_LocalID(i8*)local_unnamed_addr
declare void@_SML_load67a5b28ff146c353_Loc(i8*)local_unnamed_addr
declare void@_SML_load44ca35c4c731682b_Symbol(i8*)local_unnamed_addr
declare void@_SML_load60e750412e2bb4fe_RecordLabel(i8*)local_unnamed_addr
declare void@_SML_loadeaa0aca8fbe4101a_Bug(i8*)local_unnamed_addr
declare void@_SML_loada8c984cf5ab1458f_Control(i8*)local_unnamed_addr
declare void@_SML_load606b245a3d2b48d6_Types_ppg(i8*)local_unnamed_addr
declare void@_SML_load0426d5e63d1bd065_TypedCalc_ppg(i8*)local_unnamed_addr
declare void@_SML_load8d80f531f2346bfa_Unify(i8*)local_unnamed_addr
declare void@_SML_load2aaf2b808f82ee2e_TypesBasics(i8*)local_unnamed_addr
declare void@_SML_loadcf60e58028aea790_BuiltinTypes(i8*)local_unnamed_addr
declare void@_SML_load0db119a0681ca7e6_ReifiedTyData(i8*)local_unnamed_addr
define private void@_SML_tabb1d09938e346dcc6f_TypedCalcCon()#3{
unreachable
}
define void@_SML_load1d09938e346dcc6f_TypedCalcCon(i8*%a)local_unnamed_addr#0{
%b=load i8,i8*@b5,align 1
%c=icmp eq i8%b,0
br i1%c,label%e,label%d
d:
ret void
e:
store i8 1,i8*@b5,align 1
tail call void@_SML_load5148a836b3728be9_Int32(i8*%a)#0
tail call void@_SML_loaddaa180c1799f3810_Bool(i8*%a)#0
tail call void@_SML_load03d87556ec7f64b2_List(i8*%a)#0
tail call void@_SML_load7aa263535439ee1c_ListPair(i8*%a)#0
tail call void@_SML_load1ef93e13728790b1_String(i8*%a)#0
tail call void@_SML_load3446b7b079949ccf_text_io(i8*%a)#0
tail call void@_SML_load7374574ddb619c6a_LocalID(i8*%a)#0
tail call void@_SML_load67a5b28ff146c353_Loc(i8*%a)#0
tail call void@_SML_load44ca35c4c731682b_Symbol(i8*%a)#0
tail call void@_SML_load60e750412e2bb4fe_RecordLabel(i8*%a)#0
tail call void@_SML_loadeaa0aca8fbe4101a_Bug(i8*%a)#0
tail call void@_SML_loada8c984cf5ab1458f_Control(i8*%a)#0
tail call void@_SML_load606b245a3d2b48d6_Types_ppg(i8*%a)#0
tail call void@_SML_load0426d5e63d1bd065_TypedCalc_ppg(i8*%a)#0
tail call void@_SML_load8d80f531f2346bfa_Unify(i8*%a)#0
tail call void@_SML_load2aaf2b808f82ee2e_TypesBasics(i8*%a)#0
tail call void@_SML_loadcf60e58028aea790_BuiltinTypes(i8*%a)#0
tail call void@_SML_load0db119a0681ca7e6_ReifiedTyData(i8*%a)#0
tail call void@sml_gcroot(i8*%a,void()*@_SML_tabb1d09938e346dcc6f_TypedCalcCon,i8*@_SML_ftab1d09938e346dcc6f_TypedCalcCon,i8*bitcast([2x i64]*@b4 to i8*))#0
ret void
}
define void@_SML_main1d09938e346dcc6f_TypedCalcCon()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=alloca i8*,align 8
%e=alloca i8*,align 8
%f=alloca i8*,align 8
%g=alloca i8*,align 8
%h=alloca i8*,align 8
%i=alloca i8*,align 8
%j=alloca i8*,align 8
%k=alloca i8*,align 8
%l=alloca i8*,align 8
%m=alloca i8*,align 8
%n=alloca i8*,align 8
%o=alloca i8*,align 8
%p=alloca i8*,align 8
%q=alloca i8*,align 8
%r=alloca i8*,align 8
%s=alloca i8*,align 8
%t=alloca i8*,align 8
%u=alloca i8*,align 8
%v=alloca i8*,align 8
%w=load i8,i8*@b5,align 1
%x=and i8%w,2
%y=icmp eq i8%x,0
br i1%y,label%A,label%z
z:
ret void
A:
store i8 3,i8*@b5,align 1
tail call void@_SML_main5148a836b3728be9_Int32()#2
tail call void@_SML_maindaa180c1799f3810_Bool()#2
tail call void@_SML_main03d87556ec7f64b2_List()#2
tail call void@_SML_main7aa263535439ee1c_ListPair()#2
tail call void@_SML_main1ef93e13728790b1_String()#2
tail call void@_SML_main3446b7b079949ccf_text_io()#2
tail call void@_SML_main7374574ddb619c6a_LocalID()#2
tail call void@_SML_main67a5b28ff146c353_Loc()#2
tail call void@_SML_main44ca35c4c731682b_Symbol()#2
tail call void@_SML_main60e750412e2bb4fe_RecordLabel()#2
tail call void@_SML_maineaa0aca8fbe4101a_Bug()#2
tail call void@_SML_maina8c984cf5ab1458f_Control()#2
tail call void@_SML_main606b245a3d2b48d6_Types_ppg()#2
tail call void@_SML_main0426d5e63d1bd065_TypedCalc_ppg()#2
tail call void@_SML_main8d80f531f2346bfa_Unify()#2
tail call void@_SML_main2aaf2b808f82ee2e_TypesBasics()#2
tail call void@_SML_maincf60e58028aea790_BuiltinTypes()#2
tail call void@_SML_main0db119a0681ca7e6_ReifiedTyData()#2
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
call void@llvm.gcroot(i8**%f,i8*null)#0
call void@llvm.gcroot(i8**%g,i8*null)#0
call void@llvm.gcroot(i8**%h,i8*null)#0
call void@llvm.gcroot(i8**%i,i8*null)#0
call void@llvm.gcroot(i8**%j,i8*null)#0
call void@llvm.gcroot(i8**%k,i8*null)#0
call void@llvm.gcroot(i8**%l,i8*null)#0
call void@llvm.gcroot(i8**%m,i8*null)#0
call void@llvm.gcroot(i8**%n,i8*null)#0
call void@llvm.gcroot(i8**%o,i8*null)#0
call void@llvm.gcroot(i8**%p,i8*null)#0
call void@llvm.gcroot(i8**%q,i8*null)#0
call void@llvm.gcroot(i8**%r,i8*null)#0
call void@llvm.gcroot(i8**%s,i8*null)#0
call void@llvm.gcroot(i8**%t,i8*null)#0
call void@llvm.gcroot(i8**%u,i8*null)#0
call void@llvm.gcroot(i8**%v,i8*null)#0
%B=bitcast[3x i8*]*%a to i8*
call void@sml_start(i8*inreg%B)#0
%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:
invoke void@sml_check(i32 inreg%C)
to label%F unwind label%hx
F:
%G=invoke fastcc i8*@_SMLFN14BoundTypeVarID3Map5emptyE(i32 inreg 1,i32 inreg 8)
to label%H unwind label%hx
H:
store i8*%G,i8**%c,align 8
%I=invoke fastcc i8*@_SMLFN13LongsymbolEnv5emptyE(i32 inreg 1,i32 inreg 8)
to label%J unwind label%hx
J:
store i8*%I,i8**%d,align 8
%K=invoke fastcc i8*@_SMLFN13LongsymbolEnv5emptyE(i32 inreg 1,i32 inreg 8)
to label%L unwind label%hx
L:
store i8*%K,i8**%e,align 8
%M=invoke fastcc i8*@_SMLFN5ExnID3Map5emptyE(i32 inreg 1,i32 inreg 8)
to label%N unwind label%hx
N:
store i8*%M,i8**%f,align 8
%O=invoke fastcc i8*@_SMLFN5VarID3Map5emptyE(i32 inreg 1,i32 inreg 8)
to label%P unwind label%hx
P:
store i8*%O,i8**%g,align 8
%Q=call i8*@sml_alloc(i32 inreg 44)#0
%R=getelementptr inbounds i8,i8*%Q,i64 -4
%S=bitcast i8*%R to i32*
store i32 1342177320,i32*%S,align 4
store i8*%Q,i8**%b,align 8
%T=load i8*,i8**%c,align 8
store i8*null,i8**%c,align 8
%U=bitcast i8*%Q to i8**
store i8*%T,i8**%U,align 8
%V=load i8*,i8**%d,align 8
store i8*null,i8**%d,align 8
%W=getelementptr inbounds i8,i8*%Q,i64 8
%X=bitcast i8*%W to i8**
store i8*%V,i8**%X,align 8
%Y=load i8*,i8**%e,align 8
store i8*null,i8**%e,align 8
%Z=getelementptr inbounds i8,i8*%Q,i64 16
%aa=bitcast i8*%Z to i8**
store i8*%Y,i8**%aa,align 8
%ab=load i8*,i8**%f,align 8
store i8*null,i8**%f,align 8
%ac=getelementptr inbounds i8,i8*%Q,i64 24
%ad=bitcast i8*%ac to i8**
store i8*%ab,i8**%ad,align 8
%ae=load i8*,i8**%g,align 8
store i8*null,i8**%g,align 8
%af=getelementptr inbounds i8,i8*%Q,i64 32
%ag=bitcast i8*%af to i8**
store i8*%ae,i8**%ag,align 8
%ah=getelementptr inbounds i8,i8*%Q,i64 40
%ai=bitcast i8*%ah to i32*
store i32 31,i32*%ai,align 4
%aj=call i8*@sml_alloc(i32 inreg 12)#0
%ak=getelementptr inbounds i8,i8*%aj,i64 -4
%al=bitcast i8*%ak to i32*
store i32 1342177288,i32*%al,align 4
store i8*%aj,i8**%c,align 8
%am=load i8*,i8**%b,align 8
%an=bitcast i8*%aj to i8**
store i8*%am,i8**%an,align 8
%ao=getelementptr inbounds i8,i8*%aj,i64 8
%ap=bitcast i8*%ao to i32*
store i32 1,i32*%ap,align 4
%aq=call i8*@sml_alloc(i32 inreg 28)#0
%ar=getelementptr inbounds i8,i8*%aq,i64 -4
%as=bitcast i8*%ar to i32*
store i32 1342177304,i32*%as,align 4
store i8*%aq,i8**%e,align 8
%at=load i8*,i8**%c,align 8
%au=bitcast i8*%aq to i8**
store i8*%at,i8**%au,align 8
%av=getelementptr inbounds i8,i8*%aq,i64 8
%aw=bitcast i8*%av to void(...)**
store void(...)*bitcast(i8*(i8*,i8*)*@_SMLLN12TypedCalcCon10makeExnEnvE_556 to void(...)*),void(...)**%aw,align 8
%ax=getelementptr inbounds i8,i8*%aq,i64 16
%ay=bitcast i8*%ax to void(...)**
store void(...)*bitcast(i8*(i8*,i8*)*@_SMLLN12TypedCalcCon10makeExnEnvE_556 to void(...)*),void(...)**%ay,align 8
%az=getelementptr inbounds i8,i8*%aq,i64 24
%aA=bitcast i8*%az to i32*
store i32 -2147483647,i32*%aA,align 4
%aB=call i8*@sml_alloc(i32 inreg 12)#0
%aC=getelementptr inbounds i8,i8*%aB,i64 -4
%aD=bitcast i8*%aC to i32*
store i32 1342177288,i32*%aD,align 4
store i8*%aB,i8**%f,align 8
%aE=load i8*,i8**%b,align 8
%aF=bitcast i8*%aB to i8**
store i8*%aE,i8**%aF,align 8
%aG=getelementptr inbounds i8,i8*%aB,i64 8
%aH=bitcast i8*%aG to i32*
store i32 1,i32*%aH,align 4
%aI=call i8*@sml_alloc(i32 inreg 28)#0
%aJ=getelementptr inbounds i8,i8*%aI,i64 -4
%aK=bitcast i8*%aJ to i32*
store i32 1342177304,i32*%aK,align 4
store i8*%aI,i8**%g,align 8
%aL=load i8*,i8**%f,align 8
%aM=bitcast i8*%aI to i8**
store i8*%aL,i8**%aM,align 8
%aN=getelementptr inbounds i8,i8*%aI,i64 8
%aO=bitcast i8*%aN to void(...)**
store void(...)*bitcast(i8*(i8*,i8*)*@_SMLLN12TypedCalcCon12makeExExnEnvE_559 to void(...)*),void(...)**%aO,align 8
%aP=getelementptr inbounds i8,i8*%aI,i64 16
%aQ=bitcast i8*%aP to void(...)**
store void(...)*bitcast(i8*(i8*,i8*)*@_SMLLN12TypedCalcCon12makeExExnEnvE_559 to void(...)*),void(...)**%aQ,align 8
%aR=getelementptr inbounds i8,i8*%aI,i64 24
%aS=bitcast i8*%aR to i32*
store i32 -2147483647,i32*%aS,align 4
%aT=call i8*@sml_alloc(i32 inreg 12)#0
%aU=getelementptr inbounds i8,i8*%aT,i64 -4
%aV=bitcast i8*%aU to i32*
store i32 1342177288,i32*%aV,align 4
store i8*%aT,i8**%d,align 8
%aW=load i8*,i8**%b,align 8
%aX=bitcast i8*%aT to i8**
store i8*%aW,i8**%aX,align 8
%aY=getelementptr inbounds i8,i8*%aT,i64 8
%aZ=bitcast i8*%aY to i32*
store i32 1,i32*%aZ,align 4
%a0=call i8*@sml_alloc(i32 inreg 28)#0
%a1=getelementptr inbounds i8,i8*%a0,i64 -4
%a2=bitcast i8*%a1 to i32*
store i32 1342177304,i32*%a2,align 4
store i8*%a0,i8**%h,align 8
%a3=load i8*,i8**%d,align 8
%a4=bitcast i8*%a0 to i8**
store i8*%a3,i8**%a4,align 8
%a5=getelementptr inbounds i8,i8*%a0,i64 8
%a6=bitcast i8*%a5 to void(...)**
store void(...)*bitcast(i8*(i8*,i8*)*@_SMLLN12TypedCalcCon10makeVarEnvE_562 to void(...)*),void(...)**%a6,align 8
%a7=getelementptr inbounds i8,i8*%a0,i64 16
%a8=bitcast i8*%a7 to void(...)**
store void(...)*bitcast(i8*(i8*,i8*)*@_SMLLN12TypedCalcCon10makeVarEnvE_562 to void(...)*),void(...)**%a8,align 8
%a9=getelementptr inbounds i8,i8*%a0,i64 24
%ba=bitcast i8*%a9 to i32*
store i32 -2147483647,i32*%ba,align 4
%bb=call i8*@sml_alloc(i32 inreg 12)#0
%bc=getelementptr inbounds i8,i8*%bb,i64 -4
%bd=bitcast i8*%bc to i32*
store i32 1342177288,i32*%bd,align 4
store i8*%bb,i8**%i,align 8
%be=load i8*,i8**%b,align 8
%bf=bitcast i8*%bb to i8**
store i8*%be,i8**%bf,align 8
%bg=getelementptr inbounds i8,i8*%bb,i64 8
%bh=bitcast i8*%bg to i32*
store i32 1,i32*%bh,align 4
%bi=call i8*@sml_alloc(i32 inreg 28)#0
%bj=getelementptr inbounds i8,i8*%bi,i64 -4
%bk=bitcast i8*%bj to i32*
store i32 1342177304,i32*%bk,align 4
store i8*%bi,i8**%j,align 8
%bl=load i8*,i8**%i,align 8
%bm=bitcast i8*%bi to i8**
store i8*%bl,i8**%bm,align 8
%bn=getelementptr inbounds i8,i8*%bi,i64 8
%bo=bitcast i8*%bn to void(...)**
store void(...)*bitcast(i8*(i8*,i8*)*@_SMLLN12TypedCalcCon12makeExVarEnvE_565 to void(...)*),void(...)**%bo,align 8
%bp=getelementptr inbounds i8,i8*%bi,i64 16
%bq=bitcast i8*%bp to void(...)**
store void(...)*bitcast(i8*(i8*,i8*)*@_SMLLN12TypedCalcCon12makeExVarEnvE_565 to void(...)*),void(...)**%bq,align 8
%br=getelementptr inbounds i8,i8*%bi,i64 24
%bs=bitcast i8*%br to i32*
store i32 -2147483647,i32*%bs,align 4
%bt=call i8*@sml_alloc(i32 inreg 12)#0
%bu=getelementptr inbounds i8,i8*%bt,i64 -4
%bv=bitcast i8*%bu to i32*
store i32 1342177288,i32*%bv,align 4
store i8*%bt,i8**%k,align 8
%bw=load i8*,i8**%d,align 8
%bx=bitcast i8*%bt to i8**
store i8*%bw,i8**%bx,align 8
%by=getelementptr inbounds i8,i8*%bt,i64 8
%bz=bitcast i8*%by to i32*
store i32 1,i32*%bz,align 4
%bA=call i8*@sml_alloc(i32 inreg 28)#0
%bB=getelementptr inbounds i8,i8*%bA,i64 -4
%bC=bitcast i8*%bB to i32*
store i32 1342177304,i32*%bC,align 4
store i8*%bA,i8**%l,align 8
%bD=load i8*,i8**%k,align 8
%bE=bitcast i8*%bA to i8**
store i8*%bD,i8**%bE,align 8
%bF=getelementptr inbounds i8,i8*%bA,i64 8
%bG=bitcast i8*%bF to void(...)**
store void(...)*bitcast(i8*(i8*,i8*)*@_SMLLN12TypedCalcCon9clsVarEnvE_568 to void(...)*),void(...)**%bG,align 8
%bH=getelementptr inbounds i8,i8*%bA,i64 16
%bI=bitcast i8*%bH to void(...)**
store void(...)*bitcast(i8*(i8*,i8*)*@_SMLLN12TypedCalcCon9clsVarEnvE_568 to void(...)*),void(...)**%bI,align 8
%bJ=getelementptr inbounds i8,i8*%bA,i64 24
%bK=bitcast i8*%bJ to i32*
store i32 -2147483647,i32*%bK,align 4
%bL=call i8*@sml_alloc(i32 inreg 12)#0
%bM=getelementptr inbounds i8,i8*%bL,i64 -4
%bN=bitcast i8*%bM to i32*
store i32 1342177288,i32*%bN,align 4
store i8*%bL,i8**%m,align 8
%bO=load i8*,i8**%c,align 8
%bP=bitcast i8*%bL to i8**
store i8*%bO,i8**%bP,align 8
%bQ=getelementptr inbounds i8,i8*%bL,i64 8
%bR=bitcast i8*%bQ to i32*
store i32 1,i32*%bR,align 4
%bS=call i8*@sml_alloc(i32 inreg 28)#0
%bT=getelementptr inbounds i8,i8*%bS,i64 -4
%bU=bitcast i8*%bT to i32*
store i32 1342177304,i32*%bU,align 4
store i8*%bS,i8**%n,align 8
%bV=load i8*,i8**%m,align 8
store i8*null,i8**%m,align 8
%bW=bitcast i8*%bS to i8**
store i8*%bV,i8**%bW,align 8
%bX=getelementptr inbounds i8,i8*%bS,i64 8
%bY=bitcast i8*%bX to void(...)**
store void(...)*bitcast(i8*(i8*,i8*)*@_SMLLN12TypedCalcCon5TPEXDE_569 to void(...)*),void(...)**%bY,align 8
%bZ=getelementptr inbounds i8,i8*%bS,i64 16
%b0=bitcast i8*%bZ to void(...)**
store void(...)*bitcast(i8*(i8*,i8*)*@_SMLLN12TypedCalcCon5TPEXDE_569 to void(...)*),void(...)**%b0,align 8
%b1=getelementptr inbounds i8,i8*%bS,i64 24
%b2=bitcast i8*%b1 to i32*
store i32 -2147483647,i32*%b2,align 4
%b3=call i8*@sml_alloc(i32 inreg 12)#0
%b4=getelementptr inbounds i8,i8*%b3,i64 -4
%b5=bitcast i8*%b4 to i32*
store i32 1342177288,i32*%b5,align 4
store i8*%b3,i8**%m,align 8
%b6=load i8*,i8**%c,align 8
store i8*null,i8**%c,align 8
%b7=bitcast i8*%b3 to i8**
store i8*%b6,i8**%b7,align 8
%b8=getelementptr inbounds i8,i8*%b3,i64 8
%b9=bitcast i8*%b8 to i32*
store i32 1,i32*%b9,align 4
%ca=call i8*@sml_alloc(i32 inreg 28)#0
%cb=getelementptr inbounds i8,i8*%ca,i64 -4
%cc=bitcast i8*%cb to i32*
store i32 1342177304,i32*%cc,align 4
store i8*%ca,i8**%o,align 8
%cd=load i8*,i8**%m,align 8
store i8*null,i8**%m,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 void(...)**
store void(...)*bitcast(i8*(i8*,i8*)*@_SMLLN12TypedCalcCon9TPEXNTAGDE_572 to void(...)*),void(...)**%cg,align 8
%ch=getelementptr inbounds i8,i8*%ca,i64 16
%ci=bitcast i8*%ch to void(...)**
store void(...)*bitcast(i8*(i8*,i8*)*@_SMLLN12TypedCalcCon9TPEXNTAGDE_572 to void(...)*),void(...)**%ci,align 8
%cj=getelementptr inbounds i8,i8*%ca,i64 24
%ck=bitcast i8*%cj to i32*
store i32 -2147483647,i32*%ck,align 4
%cl=call i8*@sml_alloc(i32 inreg 12)#0
%cm=getelementptr inbounds i8,i8*%cl,i64 -4
%cn=bitcast i8*%cm to i32*
store i32 1342177288,i32*%cn,align 4
store i8*%cl,i8**%c,align 8
%co=load i8*,i8**%f,align 8
%cp=bitcast i8*%cl to i8**
store i8*%co,i8**%cp,align 8
%cq=getelementptr inbounds i8,i8*%cl,i64 8
%cr=bitcast i8*%cq to i32*
store i32 1,i32*%cr,align 4
%cs=call i8*@sml_alloc(i32 inreg 28)#0
%ct=getelementptr inbounds i8,i8*%cs,i64 -4
%cu=bitcast i8*%ct to i32*
store i32 1342177304,i32*%cu,align 4
store i8*%cs,i8**%m,align 8
%cv=load i8*,i8**%c,align 8
store i8*null,i8**%c,align 8
%cw=bitcast i8*%cs to i8**
store i8*%cv,i8**%cw,align 8
%cx=getelementptr inbounds i8,i8*%cs,i64 8
%cy=bitcast i8*%cx to void(...)**
store void(...)*bitcast(i8*(i8*,i8*)*@_SMLLN12TypedCalcCon11TPEXPORTEXNE_573 to void(...)*),void(...)**%cy,align 8
%cz=getelementptr inbounds i8,i8*%cs,i64 16
%cA=bitcast i8*%cz to void(...)**
store void(...)*bitcast(i8*(i8*,i8*)*@_SMLLN12TypedCalcCon11TPEXPORTEXNE_573 to void(...)*),void(...)**%cA,align 8
%cB=getelementptr inbounds i8,i8*%cs,i64 24
%cC=bitcast i8*%cB to i32*
store i32 -2147483647,i32*%cC,align 4
%cD=call i8*@sml_alloc(i32 inreg 12)#0
%cE=getelementptr inbounds i8,i8*%cD,i64 -4
%cF=bitcast i8*%cE to i32*
store i32 1342177288,i32*%cF,align 4
store i8*%cD,i8**%c,align 8
%cG=load i8*,i8**%i,align 8
%cH=bitcast i8*%cD to i8**
store i8*%cG,i8**%cH,align 8
%cI=getelementptr inbounds i8,i8*%cD,i64 8
%cJ=bitcast i8*%cI to i32*
store i32 1,i32*%cJ,align 4
%cK=call i8*@sml_alloc(i32 inreg 28)#0
%cL=getelementptr inbounds i8,i8*%cK,i64 -4
%cM=bitcast i8*%cL to i32*
store i32 1342177304,i32*%cM,align 4
store i8*%cK,i8**%p,align 8
%cN=load i8*,i8**%c,align 8
store i8*null,i8**%c,align 8
%cO=bitcast i8*%cK to i8**
store i8*%cN,i8**%cO,align 8
%cP=getelementptr inbounds i8,i8*%cK,i64 8
%cQ=bitcast i8*%cP to void(...)**
store void(...)*bitcast(i8*(i8*,i8*)*@_SMLLN12TypedCalcCon11TPEXPORTVARE_576 to void(...)*),void(...)**%cQ,align 8
%cR=getelementptr inbounds i8,i8*%cK,i64 16
%cS=bitcast i8*%cR to void(...)**
store void(...)*bitcast(i8*(i8*,i8*)*@_SMLLN12TypedCalcCon11TPEXPORTVARE_576 to void(...)*),void(...)**%cS,align 8
%cT=getelementptr inbounds i8,i8*%cK,i64 24
%cU=bitcast i8*%cT to i32*
store i32 -2147483647,i32*%cU,align 4
%cV=call i8*@sml_alloc(i32 inreg 12)#0
%cW=getelementptr inbounds i8,i8*%cV,i64 -4
%cX=bitcast i8*%cW to i32*
store i32 1342177288,i32*%cX,align 4
store i8*%cV,i8**%c,align 8
%cY=load i8*,i8**%f,align 8
%cZ=bitcast i8*%cV to i8**
store i8*%cY,i8**%cZ,align 8
%c0=getelementptr inbounds i8,i8*%cV,i64 8
%c1=bitcast i8*%c0 to i32*
store i32 1,i32*%c1,align 4
%c2=call i8*@sml_alloc(i32 inreg 28)#0
%c3=getelementptr inbounds i8,i8*%c2,i64 -4
%c4=bitcast i8*%c3 to i32*
store i32 1342177304,i32*%c4,align 4
store i8*%c2,i8**%q,align 8
%c5=load i8*,i8**%c,align 8
store i8*null,i8**%c,align 8
%c6=bitcast i8*%c2 to i8**
store i8*%c5,i8**%c6,align 8
%c7=getelementptr inbounds i8,i8*%c2,i64 8
%c8=bitcast i8*%c7 to void(...)**
store void(...)*bitcast(i8*(i8*,i8*)*@_SMLLN12TypedCalcCon11TPEXTERNEXNE_577 to void(...)*),void(...)**%c8,align 8
%c9=getelementptr inbounds i8,i8*%c2,i64 16
%da=bitcast i8*%c9 to void(...)**
store void(...)*bitcast(i8*(i8*,i8*)*@_SMLLN12TypedCalcCon11TPEXTERNEXNE_577 to void(...)*),void(...)**%da,align 8
%db=getelementptr inbounds i8,i8*%c2,i64 24
%dc=bitcast i8*%db to i32*
store i32 -2147483647,i32*%dc,align 4
%dd=call i8*@sml_alloc(i32 inreg 12)#0
%de=getelementptr inbounds i8,i8*%dd,i64 -4
%df=bitcast i8*%de to i32*
store i32 1342177288,i32*%df,align 4
store i8*%dd,i8**%c,align 8
%dg=load i8*,i8**%i,align 8
store i8*null,i8**%i,align 8
%dh=bitcast i8*%dd to i8**
store i8*%dg,i8**%dh,align 8
%di=getelementptr inbounds i8,i8*%dd,i64 8
%dj=bitcast i8*%di to i32*
store i32 1,i32*%dj,align 4
%dk=call i8*@sml_alloc(i32 inreg 28)#0
%dl=getelementptr inbounds i8,i8*%dk,i64 -4
%dm=bitcast i8*%dl to i32*
store i32 1342177304,i32*%dm,align 4
store i8*%dk,i8**%i,align 8
%dn=load i8*,i8**%c,align 8
store i8*null,i8**%c,align 8
%do=bitcast i8*%dk to i8**
store i8*%dn,i8**%do,align 8
%dp=getelementptr inbounds i8,i8*%dk,i64 8
%dq=bitcast i8*%dp to void(...)**
store void(...)*bitcast(i8*(i8*,i8*)*@_SMLLN12TypedCalcCon11TPEXTERNVARE_578 to void(...)*),void(...)**%dq,align 8
%dr=getelementptr inbounds i8,i8*%dk,i64 16
%ds=bitcast i8*%dr to void(...)**
store void(...)*bitcast(i8*(i8*,i8*)*@_SMLLN12TypedCalcCon11TPEXTERNVARE_578 to void(...)*),void(...)**%ds,align 8
%dt=getelementptr inbounds i8,i8*%dk,i64 24
%du=bitcast i8*%dt to i32*
store i32 -2147483647,i32*%du,align 4
%dv=call i8*@sml_alloc(i32 inreg 12)#0
%dw=getelementptr inbounds i8,i8*%dv,i64 -4
%dx=bitcast i8*%dw to i32*
store i32 1342177288,i32*%dx,align 4
store i8*%dv,i8**%c,align 8
%dy=load i8*,i8**%d,align 8
%dz=bitcast i8*%dv to i8**
store i8*%dy,i8**%dz,align 8
%dA=getelementptr inbounds i8,i8*%dv,i64 8
%dB=bitcast i8*%dA to i32*
store i32 1,i32*%dB,align 4
%dC=call i8*@sml_alloc(i32 inreg 28)#0
%dD=getelementptr inbounds i8,i8*%dC,i64 -4
%dE=bitcast i8*%dD to i32*
store i32 1342177304,i32*%dE,align 4
store i8*%dC,i8**%r,align 8
%dF=load i8*,i8**%c,align 8
store i8*null,i8**%c,align 8
%dG=bitcast i8*%dC to i8**
store i8*%dF,i8**%dG,align 8
%dH=getelementptr inbounds i8,i8*%dC,i64 8
%dI=bitcast i8*%dH to void(...)**
store void(...)*bitcast(i8*(i8*,i8*)*@_SMLLN12TypedCalcCon9TPFUNDECLE_594 to void(...)*),void(...)**%dI,align 8
%dJ=getelementptr inbounds i8,i8*%dC,i64 16
%dK=bitcast i8*%dJ to void(...)**
store void(...)*bitcast(i8*(i8*,i8*)*@_SMLLN12TypedCalcCon9TPFUNDECLE_594 to void(...)*),void(...)**%dK,align 8
%dL=getelementptr inbounds i8,i8*%dC,i64 24
%dM=bitcast i8*%dL to i32*
store i32 -2147483647,i32*%dM,align 4
%dN=call i8*@sml_alloc(i32 inreg 12)#0
%dO=getelementptr inbounds i8,i8*%dN,i64 -4
%dP=bitcast i8*%dO to i32*
store i32 1342177288,i32*%dP,align 4
store i8*%dN,i8**%c,align 8
%dQ=load i8*,i8**%k,align 8
%dR=bitcast i8*%dN to i8**
store i8*%dQ,i8**%dR,align 8
%dS=getelementptr inbounds i8,i8*%dN,i64 8
%dT=bitcast i8*%dS to i32*
store i32 1,i32*%dT,align 4
%dU=call i8*@sml_alloc(i32 inreg 28)#0
%dV=getelementptr inbounds i8,i8*%dU,i64 -4
%dW=bitcast i8*%dV to i32*
store i32 1342177304,i32*%dW,align 4
store i8*%dU,i8**%s,align 8
%dX=load i8*,i8**%c,align 8
store i8*null,i8**%c,align 8
%dY=bitcast i8*%dU to i8**
store i8*%dX,i8**%dY,align 8
%dZ=getelementptr inbounds i8,i8*%dU,i64 8
%d0=bitcast i8*%dZ to void(...)**
store void(...)*bitcast(i8*(i8*,i8*)*@_SMLLN12TypedCalcCon13TPPOLYFUNDECLE_597 to void(...)*),void(...)**%d0,align 8
%d1=getelementptr inbounds i8,i8*%dU,i64 16
%d2=bitcast i8*%d1 to void(...)**
store void(...)*bitcast(i8*(i8*,i8*)*@_SMLLN12TypedCalcCon13TPPOLYFUNDECLE_597 to void(...)*),void(...)**%d2,align 8
%d3=getelementptr inbounds i8,i8*%dU,i64 24
%d4=bitcast i8*%d3 to i32*
store i32 -2147483647,i32*%d4,align 4
%d5=call i8*@sml_alloc(i32 inreg 12)#0
%d6=getelementptr inbounds i8,i8*%d5,i64 -4
%d7=bitcast i8*%d6 to i32*
store i32 1342177288,i32*%d7,align 4
store i8*%d5,i8**%c,align 8
%d8=load i8*,i8**%d,align 8
%d9=bitcast i8*%d5 to i8**
store i8*%d8,i8**%d9,align 8
%ea=getelementptr inbounds i8,i8*%d5,i64 8
%eb=bitcast i8*%ea to i32*
store i32 1,i32*%eb,align 4
%ec=call i8*@sml_alloc(i32 inreg 28)#0
%ed=getelementptr inbounds i8,i8*%ec,i64 -4
%ee=bitcast i8*%ed to i32*
store i32 1342177304,i32*%ee,align 4
store i8*%ec,i8**%t,align 8
%ef=load i8*,i8**%c,align 8
store i8*null,i8**%c,align 8
%eg=bitcast i8*%ec to i8**
store i8*%ef,i8**%eg,align 8
%eh=getelementptr inbounds i8,i8*%ec,i64 8
%ei=bitcast i8*%eh to void(...)**
store void(...)*bitcast(i8*(i8*,i8*)*@_SMLLN12TypedCalcCon5TPVALE_600 to void(...)*),void(...)**%ei,align 8
%ej=getelementptr inbounds i8,i8*%ec,i64 16
%ek=bitcast i8*%ej to void(...)**
store void(...)*bitcast(i8*(i8*,i8*)*@_SMLLN12TypedCalcCon5TPVALE_600 to void(...)*),void(...)**%ek,align 8
%el=getelementptr inbounds i8,i8*%ec,i64 24
%em=bitcast i8*%el to i32*
store i32 -2147483647,i32*%em,align 4
%en=call i8*@sml_alloc(i32 inreg 12)#0
%eo=getelementptr inbounds i8,i8*%en,i64 -4
%ep=bitcast i8*%eo to i32*
store i32 1342177288,i32*%ep,align 4
store i8*%en,i8**%c,align 8
%eq=load i8*,i8**%d,align 8
store i8*null,i8**%d,align 8
%er=bitcast i8*%en to i8**
store i8*%eq,i8**%er,align 8
%es=getelementptr inbounds i8,i8*%en,i64 8
%et=bitcast i8*%es to i32*
store i32 1,i32*%et,align 4
%eu=call i8*@sml_alloc(i32 inreg 28)#0
%ev=getelementptr inbounds i8,i8*%eu,i64 -4
%ew=bitcast i8*%ev to i32*
store i32 1342177304,i32*%ew,align 4
store i8*%eu,i8**%u,align 8
%ex=load i8*,i8**%c,align 8
store i8*null,i8**%c,align 8
%ey=bitcast i8*%eu to i8**
store i8*%ex,i8**%ey,align 8
%ez=getelementptr inbounds i8,i8*%eu,i64 8
%eA=bitcast i8*%ez to void(...)**
store void(...)*bitcast(i8*(i8*,i8*)*@_SMLLN12TypedCalcCon8TPVALRECE_609 to void(...)*),void(...)**%eA,align 8
%eB=getelementptr inbounds i8,i8*%eu,i64 16
%eC=bitcast i8*%eB to void(...)**
store void(...)*bitcast(i8*(i8*,i8*)*@_SMLLN12TypedCalcCon8TPVALRECE_609 to void(...)*),void(...)**%eC,align 8
%eD=getelementptr inbounds i8,i8*%eu,i64 24
%eE=bitcast i8*%eD to i32*
store i32 -2147483647,i32*%eE,align 4
%eF=call i8*@sml_alloc(i32 inreg 12)#0
%eG=getelementptr inbounds i8,i8*%eF,i64 -4
%eH=bitcast i8*%eG to i32*
store i32 1342177288,i32*%eH,align 4
store i8*%eF,i8**%c,align 8
%eI=load i8*,i8**%k,align 8
store i8*null,i8**%k,align 8
%eJ=bitcast i8*%eF to i8**
store i8*%eI,i8**%eJ,align 8
%eK=getelementptr inbounds i8,i8*%eF,i64 8
%eL=bitcast i8*%eK to i32*
store i32 1,i32*%eL,align 4
%eM=call i8*@sml_alloc(i32 inreg 28)#0
%eN=getelementptr inbounds i8,i8*%eM,i64 -4
%eO=bitcast i8*%eN to i32*
store i32 1342177304,i32*%eO,align 4
store i8*%eM,i8**%k,align 8
%eP=load i8*,i8**%c,align 8
%eQ=bitcast i8*%eM to i8**
store i8*%eP,i8**%eQ,align 8
%eR=getelementptr inbounds i8,i8*%eM,i64 8
%eS=bitcast i8*%eR to void(...)**
store void(...)*bitcast(i8*(i8*,i8*)*@_SMLLN12TypedCalcCon12TPVALPOLYRECE_618 to void(...)*),void(...)**%eS,align 8
%eT=getelementptr inbounds i8,i8*%eM,i64 16
%eU=bitcast i8*%eT to void(...)**
store void(...)*bitcast(i8*(i8*,i8*)*@_SMLLN12TypedCalcCon12TPVALPOLYRECE_618 to void(...)*),void(...)**%eU,align 8
%eV=getelementptr inbounds i8,i8*%eM,i64 24
%eW=bitcast i8*%eV to i32*
store i32 -2147483647,i32*%eW,align 4
%eX=load i8*,i8**@_SMLZN3Loc5nolocE,align 8
store i8*%eX,i8**%c,align 8
%eY=call i8*@sml_alloc(i32 inreg 20)#0
%eZ=getelementptr inbounds i8,i8*%eY,i64 -4
%e0=bitcast i8*%eZ to i32*
store i32 1342177296,i32*%e0,align 4
store i8*%eY,i8**%d,align 8
%e1=bitcast i8*%eY to i8**
store i8*null,i8**%e1,align 8
%e2=load i8*,i8**%c,align 8
store i8*null,i8**%c,align 8
%e3=getelementptr inbounds i8,i8*%eY,i64 8
%e4=bitcast i8*%e3 to i8**
store i8*%e2,i8**%e4,align 8
%e5=getelementptr inbounds i8,i8*%eY,i64 16
%e6=bitcast i8*%e5 to i32*
store i32 3,i32*%e6,align 4
%e7=call i8*@sml_alloc(i32 inreg 20)#0
%e8=getelementptr inbounds i8,i8*%e7,i64 -4
%e9=bitcast i8*%e8 to i32*
store i32 1342177296,i32*%e9,align 4
store i8*%e7,i8**%v,align 8
%fa=getelementptr inbounds i8,i8*%e7,i64 4
%fb=bitcast i8*%fa to i32*
store i32 0,i32*%fb,align 1
%fc=bitcast i8*%e7 to i32*
store i32 2,i32*%fc,align 4
%fd=load i8*,i8**%d,align 8
store i8*null,i8**%d,align 8
%fe=getelementptr inbounds i8,i8*%e7,i64 8
%ff=bitcast i8*%fe to i8**
store i8*%fd,i8**%ff,align 8
%fg=getelementptr inbounds i8,i8*%e7,i64 16
%fh=bitcast i8*%fg to i32*
store i32 2,i32*%fh,align 4
%fi=invoke fastcc i8*@_SMLFN5VarID3Map5emptyE(i32 inreg 1,i32 inreg 8)
to label%fj unwind label%hx
fj:
store i8*%fi,i8**%c,align 8
%fk=call i8*@sml_alloc(i32 inreg 28)#0
%fl=getelementptr inbounds i8,i8*%fk,i64 -4
%fm=bitcast i8*%fl to i32*
store i32 1342177304,i32*%fm,align 4
%fn=load i8*,i8**%v,align 8
store i8*null,i8**%v,align 8
%fo=bitcast i8*%fk to i8**
store i8*%fn,i8**%fo,align 8
%fp=getelementptr inbounds i8,i8*%fk,i64 8
%fq=bitcast i8*%fp to i8**
store i8*null,i8**%fq,align 8
%fr=load i8*,i8**%c,align 8
store i8*null,i8**%c,align 8
%fs=getelementptr inbounds i8,i8*%fk,i64 16
%ft=bitcast i8*%fs to i8**
store i8*%fr,i8**%ft,align 8
%fu=getelementptr inbounds i8,i8*%fk,i64 24
%fv=bitcast i8*%fu to i32*
store i32 7,i32*%fv,align 4
call void@sml_write(i8*inreg bitcast(i8**getelementptr inbounds(<{[4x i8],i32,[24x i8*]}>,<{[4x i8],i32,[24x i8*]}>*@_SML_gvar1d09938e346dcc6f_TypedCalcCon,i64 0,i32 2,i64 0)to i8*),i8**inreg getelementptr inbounds(<{[4x i8],i32,[24x i8*]}>,<{[4x i8],i32,[24x i8*]}>*@_SML_gvar1d09938e346dcc6f_TypedCalcCon,i64 0,i32 2,i64 0),i8*inreg%fk)#0
%fw=load i8*,i8**%b,align 8
call void@sml_write(i8*inreg bitcast(i8**getelementptr inbounds(<{[4x i8],i32,[24x i8*]}>,<{[4x i8],i32,[24x i8*]}>*@_SML_gvar1d09938e346dcc6f_TypedCalcCon,i64 0,i32 2,i64 0)to i8*),i8**inreg getelementptr inbounds(<{[4x i8],i32,[24x i8*]}>,<{[4x i8],i32,[24x i8*]}>*@_SML_gvar1d09938e346dcc6f_TypedCalcCon,i64 0,i32 2,i64 1),i8*inreg%fw)#0
%fx=call i8*@sml_alloc(i32 inreg 12)#0
%fy=getelementptr inbounds i8,i8*%fx,i64 -4
%fz=bitcast i8*%fy to i32*
store i32 1342177288,i32*%fz,align 4
store i8*%fx,i8**%c,align 8
%fA=load i8*,i8**%b,align 8
%fB=bitcast i8*%fx to i8**
store i8*%fA,i8**%fB,align 8
%fC=getelementptr inbounds i8,i8*%fx,i64 8
%fD=bitcast i8*%fC to i32*
store i32 1,i32*%fD,align 4
%fE=call i8*@sml_alloc(i32 inreg 28)#0
%fF=getelementptr inbounds i8,i8*%fE,i64 -4
%fG=bitcast i8*%fF to i32*
store i32 1342177304,i32*%fG,align 4
%fH=load i8*,i8**%c,align 8
store i8*null,i8**%c,align 8
%fI=bitcast i8*%fE to i8**
store i8*%fH,i8**%fI,align 8
%fJ=getelementptr inbounds i8,i8*%fE,i64 8
%fK=bitcast i8*%fJ to void(...)**
store void(...)*bitcast(i8*(i8*,i8*)*@_SMLLN12TypedCalcCon6exnEnvE_638 to void(...)*),void(...)**%fK,align 8
%fL=getelementptr inbounds i8,i8*%fE,i64 16
%fM=bitcast i8*%fL to void(...)**
store void(...)*bitcast(i8*(i8*,i8*)*@_SMLLN12TypedCalcCon6exnEnvE_638 to void(...)*),void(...)**%fM,align 8
%fN=getelementptr inbounds i8,i8*%fE,i64 24
%fO=bitcast i8*%fN to i32*
store i32 -2147483647,i32*%fO,align 4
call void@sml_write(i8*inreg bitcast(i8**getelementptr inbounds(<{[4x i8],i32,[24x i8*]}>,<{[4x i8],i32,[24x i8*]}>*@_SML_gvar1d09938e346dcc6f_TypedCalcCon,i64 0,i32 2,i64 0)to i8*),i8**inreg getelementptr inbounds(<{[4x i8],i32,[24x i8*]}>,<{[4x i8],i32,[24x i8*]}>*@_SML_gvar1d09938e346dcc6f_TypedCalcCon,i64 0,i32 2,i64 2),i8*inreg%fE)#0
%fP=call i8*@sml_alloc(i32 inreg 12)#0
%fQ=getelementptr inbounds i8,i8*%fP,i64 -4
%fR=bitcast i8*%fQ to i32*
store i32 1342177288,i32*%fR,align 4
store i8*%fP,i8**%c,align 8
%fS=load i8*,i8**%b,align 8
%fT=bitcast i8*%fP to i8**
store i8*%fS,i8**%fT,align 8
%fU=getelementptr inbounds i8,i8*%fP,i64 8
%fV=bitcast i8*%fU to i32*
store i32 1,i32*%fV,align 4
%fW=call i8*@sml_alloc(i32 inreg 28)#0
%fX=getelementptr inbounds i8,i8*%fW,i64 -4
%fY=bitcast i8*%fX to i32*
store i32 1342177304,i32*%fY,align 4
%fZ=load i8*,i8**%c,align 8
store i8*null,i8**%c,align 8
%f0=bitcast i8*%fW to i8**
store i8*%fZ,i8**%f0,align 8
%f1=getelementptr inbounds i8,i8*%fW,i64 8
%f2=bitcast i8*%f1 to void(...)**
store void(...)*bitcast(i8*(i8*,i8*)*@_SMLLN12TypedCalcCon8exExnEnvE_640 to void(...)*),void(...)**%f2,align 8
%f3=getelementptr inbounds i8,i8*%fW,i64 16
%f4=bitcast i8*%f3 to void(...)**
store void(...)*bitcast(i8*(i8*,i8*)*@_SMLLN12TypedCalcCon8exExnEnvE_640 to void(...)*),void(...)**%f4,align 8
%f5=getelementptr inbounds i8,i8*%fW,i64 24
%f6=bitcast i8*%f5 to i32*
store i32 -2147483647,i32*%f6,align 4
call void@sml_write(i8*inreg bitcast(i8**getelementptr inbounds(<{[4x i8],i32,[24x i8*]}>,<{[4x i8],i32,[24x i8*]}>*@_SML_gvar1d09938e346dcc6f_TypedCalcCon,i64 0,i32 2,i64 0)to i8*),i8**inreg getelementptr inbounds(<{[4x i8],i32,[24x i8*]}>,<{[4x i8],i32,[24x i8*]}>*@_SML_gvar1d09938e346dcc6f_TypedCalcCon,i64 0,i32 2,i64 3),i8*inreg%fW)#0
%f7=call i8*@sml_alloc(i32 inreg 12)#0
%f8=getelementptr inbounds i8,i8*%f7,i64 -4
%f9=bitcast i8*%f8 to i32*
store i32 1342177288,i32*%f9,align 4
store i8*%f7,i8**%c,align 8
%ga=load i8*,i8**%b,align 8
%gb=bitcast i8*%f7 to i8**
store i8*%ga,i8**%gb,align 8
%gc=getelementptr inbounds i8,i8*%f7,i64 8
%gd=bitcast i8*%gc to i32*
store i32 1,i32*%gd,align 4
%ge=call i8*@sml_alloc(i32 inreg 28)#0
%gf=getelementptr inbounds i8,i8*%ge,i64 -4
%gg=bitcast i8*%gf to i32*
store i32 1342177304,i32*%gg,align 4
%gh=load i8*,i8**%c,align 8
store i8*null,i8**%c,align 8
%gi=bitcast i8*%ge to i8**
store i8*%gh,i8**%gi,align 8
%gj=getelementptr inbounds i8,i8*%ge,i64 8
%gk=bitcast i8*%gj to void(...)**
store void(...)*bitcast(i8*(i8*,i8*)*@_SMLLN12TypedCalcCon6varEnvE_642 to void(...)*),void(...)**%gk,align 8
%gl=getelementptr inbounds i8,i8*%ge,i64 16
%gm=bitcast i8*%gl to void(...)**
store void(...)*bitcast(i8*(i8*,i8*)*@_SMLLN12TypedCalcCon6varEnvE_642 to void(...)*),void(...)**%gm,align 8
%gn=getelementptr inbounds i8,i8*%ge,i64 24
%go=bitcast i8*%gn to i32*
store i32 -2147483647,i32*%go,align 4
call void@sml_write(i8*inreg bitcast(i8**getelementptr inbounds(<{[4x i8],i32,[24x i8*]}>,<{[4x i8],i32,[24x i8*]}>*@_SML_gvar1d09938e346dcc6f_TypedCalcCon,i64 0,i32 2,i64 0)to i8*),i8**inreg getelementptr inbounds(<{[4x i8],i32,[24x i8*]}>,<{[4x i8],i32,[24x i8*]}>*@_SML_gvar1d09938e346dcc6f_TypedCalcCon,i64 0,i32 2,i64 4),i8*inreg%ge)#0
%gp=call i8*@sml_alloc(i32 inreg 12)#0
%gq=getelementptr inbounds i8,i8*%gp,i64 -4
%gr=bitcast i8*%gq to i32*
store i32 1342177288,i32*%gr,align 4
store i8*%gp,i8**%c,align 8
%gs=load i8*,i8**%b,align 8
%gt=bitcast i8*%gp to i8**
store i8*%gs,i8**%gt,align 8
%gu=getelementptr inbounds i8,i8*%gp,i64 8
%gv=bitcast i8*%gu to i32*
store i32 1,i32*%gv,align 4
%gw=call i8*@sml_alloc(i32 inreg 28)#0
%gx=getelementptr inbounds i8,i8*%gw,i64 -4
%gy=bitcast i8*%gx to i32*
store i32 1342177304,i32*%gy,align 4
%gz=load i8*,i8**%c,align 8
store i8*null,i8**%c,align 8
%gA=bitcast i8*%gw to i8**
store i8*%gz,i8**%gA,align 8
%gB=getelementptr inbounds i8,i8*%gw,i64 8
%gC=bitcast i8*%gB to void(...)**
store void(...)*bitcast(i8*(i8*,i8*)*@_SMLLN12TypedCalcCon8exVarEnvE_644 to void(...)*),void(...)**%gC,align 8
%gD=getelementptr inbounds i8,i8*%gw,i64 16
%gE=bitcast i8*%gD to void(...)**
store void(...)*bitcast(i8*(i8*,i8*)*@_SMLLN12TypedCalcCon8exVarEnvE_644 to void(...)*),void(...)**%gE,align 8
%gF=getelementptr inbounds i8,i8*%gw,i64 24
%gG=bitcast i8*%gF to i32*
store i32 -2147483647,i32*%gG,align 4
call void@sml_write(i8*inreg bitcast(i8**getelementptr inbounds(<{[4x i8],i32,[24x i8*]}>,<{[4x i8],i32,[24x i8*]}>*@_SML_gvar1d09938e346dcc6f_TypedCalcCon,i64 0,i32 2,i64 0)to i8*),i8**inreg getelementptr inbounds(<{[4x i8],i32,[24x i8*]}>,<{[4x i8],i32,[24x i8*]}>*@_SML_gvar1d09938e346dcc6f_TypedCalcCon,i64 0,i32 2,i64 5),i8*inreg%gw)#0
%gH=call i8*@sml_alloc(i32 inreg 12)#0
%gI=getelementptr inbounds i8,i8*%gH,i64 -4
%gJ=bitcast i8*%gI to i32*
store i32 1342177288,i32*%gJ,align 4
store i8*%gH,i8**%c,align 8
%gK=load i8*,i8**%b,align 8
store i8*null,i8**%b,align 8
%gL=bitcast i8*%gH to i8**
store i8*%gK,i8**%gL,align 8
%gM=getelementptr inbounds i8,i8*%gH,i64 8
%gN=bitcast i8*%gM to i32*
store i32 1,i32*%gN,align 4
%gO=call i8*@sml_alloc(i32 inreg 28)#0
%gP=getelementptr inbounds i8,i8*%gO,i64 -4
%gQ=bitcast i8*%gP to i32*
store i32 1342177304,i32*%gQ,align 4
%gR=load i8*,i8**%c,align 8
store i8*null,i8**%c,align 8
%gS=bitcast i8*%gO to i8**
store i8*%gR,i8**%gS,align 8
%gT=getelementptr inbounds i8,i8*%gO,i64 8
%gU=bitcast i8*%gT to void(...)**
store void(...)*bitcast(i8*(i8*,i8*)*@_SMLLN12TypedCalcCon6btvEnvE_646 to void(...)*),void(...)**%gU,align 8
%gV=getelementptr inbounds i8,i8*%gO,i64 16
%gW=bitcast i8*%gV to void(...)**
store void(...)*bitcast(i8*(i8*,i8*)*@_SMLLN12TypedCalcCon6btvEnvE_646 to void(...)*),void(...)**%gW,align 8
%gX=getelementptr inbounds i8,i8*%gO,i64 24
%gY=bitcast i8*%gX to i32*
store i32 -2147483647,i32*%gY,align 4
call void@sml_write(i8*inreg bitcast(i8**getelementptr inbounds(<{[4x i8],i32,[24x i8*]}>,<{[4x i8],i32,[24x i8*]}>*@_SML_gvar1d09938e346dcc6f_TypedCalcCon,i64 0,i32 2,i64 0)to i8*),i8**inreg getelementptr inbounds(<{[4x i8],i32,[24x i8*]}>,<{[4x i8],i32,[24x i8*]}>*@_SML_gvar1d09938e346dcc6f_TypedCalcCon,i64 0,i32 2,i64 6),i8*inreg%gO)#0
%gZ=load i8*,i8**%e,align 8
store i8*null,i8**%e,align 8
call void@sml_write(i8*inreg bitcast(i8**getelementptr inbounds(<{[4x i8],i32,[24x i8*]}>,<{[4x i8],i32,[24x i8*]}>*@_SML_gvar1d09938e346dcc6f_TypedCalcCon,i64 0,i32 2,i64 0)to i8*),i8**inreg getelementptr inbounds(<{[4x i8],i32,[24x i8*]}>,<{[4x i8],i32,[24x i8*]}>*@_SML_gvar1d09938e346dcc6f_TypedCalcCon,i64 0,i32 2,i64 7),i8*inreg%gZ)#0
%g0=load i8*,i8**%g,align 8
store i8*null,i8**%g,align 8
call void@sml_write(i8*inreg bitcast(i8**getelementptr inbounds(<{[4x i8],i32,[24x i8*]}>,<{[4x i8],i32,[24x i8*]}>*@_SML_gvar1d09938e346dcc6f_TypedCalcCon,i64 0,i32 2,i64 0)to i8*),i8**inreg getelementptr inbounds(<{[4x i8],i32,[24x i8*]}>,<{[4x i8],i32,[24x i8*]}>*@_SML_gvar1d09938e346dcc6f_TypedCalcCon,i64 0,i32 2,i64 8),i8*inreg%g0)#0
%g1=load i8*,i8**%h,align 8
store i8*null,i8**%h,align 8
call void@sml_write(i8*inreg bitcast(i8**getelementptr inbounds(<{[4x i8],i32,[24x i8*]}>,<{[4x i8],i32,[24x i8*]}>*@_SML_gvar1d09938e346dcc6f_TypedCalcCon,i64 0,i32 2,i64 0)to i8*),i8**inreg getelementptr inbounds(<{[4x i8],i32,[24x i8*]}>,<{[4x i8],i32,[24x i8*]}>*@_SML_gvar1d09938e346dcc6f_TypedCalcCon,i64 0,i32 2,i64 9),i8*inreg%g1)#0
%g2=load i8*,i8**%j,align 8
store i8*null,i8**%j,align 8
call void@sml_write(i8*inreg bitcast(i8**getelementptr inbounds(<{[4x i8],i32,[24x i8*]}>,<{[4x i8],i32,[24x i8*]}>*@_SML_gvar1d09938e346dcc6f_TypedCalcCon,i64 0,i32 2,i64 0)to i8*),i8**inreg getelementptr inbounds(<{[4x i8],i32,[24x i8*]}>,<{[4x i8],i32,[24x i8*]}>*@_SML_gvar1d09938e346dcc6f_TypedCalcCon,i64 0,i32 2,i64 10),i8*inreg%g2)#0
%g3=load i8*,i8**%l,align 8
store i8*null,i8**%l,align 8
call void@sml_write(i8*inreg bitcast(i8**getelementptr inbounds(<{[4x i8],i32,[24x i8*]}>,<{[4x i8],i32,[24x i8*]}>*@_SML_gvar1d09938e346dcc6f_TypedCalcCon,i64 0,i32 2,i64 0)to i8*),i8**inreg getelementptr inbounds(<{[4x i8],i32,[24x i8*]}>,<{[4x i8],i32,[24x i8*]}>*@_SML_gvar1d09938e346dcc6f_TypedCalcCon,i64 0,i32 2,i64 11),i8*inreg%g3)#0
%g4=load i8*,i8**%n,align 8
store i8*null,i8**%n,align 8
call void@sml_write(i8*inreg bitcast(i8**getelementptr inbounds(<{[4x i8],i32,[24x i8*]}>,<{[4x i8],i32,[24x i8*]}>*@_SML_gvar1d09938e346dcc6f_TypedCalcCon,i64 0,i32 2,i64 0)to i8*),i8**inreg getelementptr inbounds(<{[4x i8],i32,[24x i8*]}>,<{[4x i8],i32,[24x i8*]}>*@_SML_gvar1d09938e346dcc6f_TypedCalcCon,i64 0,i32 2,i64 12),i8*inreg%g4)#0
%g5=load i8*,i8**%o,align 8
store i8*null,i8**%o,align 8
call void@sml_write(i8*inreg bitcast(i8**getelementptr inbounds(<{[4x i8],i32,[24x i8*]}>,<{[4x i8],i32,[24x i8*]}>*@_SML_gvar1d09938e346dcc6f_TypedCalcCon,i64 0,i32 2,i64 0)to i8*),i8**inreg getelementptr inbounds(<{[4x i8],i32,[24x i8*]}>,<{[4x i8],i32,[24x i8*]}>*@_SML_gvar1d09938e346dcc6f_TypedCalcCon,i64 0,i32 2,i64 13),i8*inreg%g5)#0
%g6=load i8*,i8**%m,align 8
store i8*null,i8**%m,align 8
call void@sml_write(i8*inreg bitcast(i8**getelementptr inbounds(<{[4x i8],i32,[24x i8*]}>,<{[4x i8],i32,[24x i8*]}>*@_SML_gvar1d09938e346dcc6f_TypedCalcCon,i64 0,i32 2,i64 0)to i8*),i8**inreg getelementptr inbounds(<{[4x i8],i32,[24x i8*]}>,<{[4x i8],i32,[24x i8*]}>*@_SML_gvar1d09938e346dcc6f_TypedCalcCon,i64 0,i32 2,i64 14),i8*inreg%g6)#0
%g7=load i8*,i8**%p,align 8
store i8*null,i8**%p,align 8
call void@sml_write(i8*inreg bitcast(i8**getelementptr inbounds(<{[4x i8],i32,[24x i8*]}>,<{[4x i8],i32,[24x i8*]}>*@_SML_gvar1d09938e346dcc6f_TypedCalcCon,i64 0,i32 2,i64 0)to i8*),i8**inreg getelementptr inbounds(<{[4x i8],i32,[24x i8*]}>,<{[4x i8],i32,[24x i8*]}>*@_SML_gvar1d09938e346dcc6f_TypedCalcCon,i64 0,i32 2,i64 15),i8*inreg%g7)#0
%g8=load i8*,i8**%q,align 8
store i8*null,i8**%q,align 8
call void@sml_write(i8*inreg bitcast(i8**getelementptr inbounds(<{[4x i8],i32,[24x i8*]}>,<{[4x i8],i32,[24x i8*]}>*@_SML_gvar1d09938e346dcc6f_TypedCalcCon,i64 0,i32 2,i64 0)to i8*),i8**inreg getelementptr inbounds(<{[4x i8],i32,[24x i8*]}>,<{[4x i8],i32,[24x i8*]}>*@_SML_gvar1d09938e346dcc6f_TypedCalcCon,i64 0,i32 2,i64 16),i8*inreg%g8)#0
%g9=call i8*@sml_alloc(i32 inreg 12)#0
%ha=getelementptr inbounds i8,i8*%g9,i64 -4
%hb=bitcast i8*%ha to i32*
store i32 1342177288,i32*%hb,align 4
store i8*%g9,i8**%b,align 8
%hc=load i8*,i8**%f,align 8
store i8*null,i8**%f,align 8
%hd=bitcast i8*%g9 to i8**
store i8*%hc,i8**%hd,align 8
%he=getelementptr inbounds i8,i8*%g9,i64 8
%hf=bitcast i8*%he to i32*
store i32 1,i32*%hf,align 4
%hg=call i8*@sml_alloc(i32 inreg 28)#0
%hh=getelementptr inbounds i8,i8*%hg,i64 -4
%hi=bitcast i8*%hh to i32*
store i32 1342177304,i32*%hi,align 4
%hj=load i8*,i8**%b,align 8
%hk=bitcast i8*%hg to i8**
store i8*%hj,i8**%hk,align 8
%hl=getelementptr inbounds i8,i8*%hg,i64 8
%hm=bitcast i8*%hl to void(...)**
store void(...)*bitcast(i8*(i8*,i8*)*@_SMLLN12TypedCalcCon12TPBUILTINEXNE_658 to void(...)*),void(...)**%hm,align 8
%hn=getelementptr inbounds i8,i8*%hg,i64 16
%ho=bitcast i8*%hn to void(...)**
store void(...)*bitcast(i8*(i8*,i8*)*@_SMLLN12TypedCalcCon12TPBUILTINEXNE_658 to void(...)*),void(...)**%ho,align 8
%hp=getelementptr inbounds i8,i8*%hg,i64 24
%hq=bitcast i8*%hp to i32*
store i32 -2147483647,i32*%hq,align 4
call void@sml_write(i8*inreg bitcast(i8**getelementptr inbounds(<{[4x i8],i32,[24x i8*]}>,<{[4x i8],i32,[24x i8*]}>*@_SML_gvar1d09938e346dcc6f_TypedCalcCon,i64 0,i32 2,i64 0)to i8*),i8**inreg getelementptr inbounds(<{[4x i8],i32,[24x i8*]}>,<{[4x i8],i32,[24x i8*]}>*@_SML_gvar1d09938e346dcc6f_TypedCalcCon,i64 0,i32 2,i64 17),i8*inreg%hg)#0
%hr=load i8*,i8**%i,align 8
call void@sml_write(i8*inreg bitcast(i8**getelementptr inbounds(<{[4x i8],i32,[24x i8*]}>,<{[4x i8],i32,[24x i8*]}>*@_SML_gvar1d09938e346dcc6f_TypedCalcCon,i64 0,i32 2,i64 0)to i8*),i8**inreg getelementptr inbounds(<{[4x i8],i32,[24x i8*]}>,<{[4x i8],i32,[24x i8*]}>*@_SML_gvar1d09938e346dcc6f_TypedCalcCon,i64 0,i32 2,i64 18),i8*inreg%hr)#0
%hs=load i8*,i8**%r,align 8
call void@sml_write(i8*inreg bitcast(i8**getelementptr inbounds(<{[4x i8],i32,[24x i8*]}>,<{[4x i8],i32,[24x i8*]}>*@_SML_gvar1d09938e346dcc6f_TypedCalcCon,i64 0,i32 2,i64 0)to i8*),i8**inreg getelementptr inbounds(<{[4x i8],i32,[24x i8*]}>,<{[4x i8],i32,[24x i8*]}>*@_SML_gvar1d09938e346dcc6f_TypedCalcCon,i64 0,i32 2,i64 19),i8*inreg%hs)#0
%ht=load i8*,i8**%s,align 8
call void@sml_write(i8*inreg bitcast(i8**getelementptr inbounds(<{[4x i8],i32,[24x i8*]}>,<{[4x i8],i32,[24x i8*]}>*@_SML_gvar1d09938e346dcc6f_TypedCalcCon,i64 0,i32 2,i64 0)to i8*),i8**inreg getelementptr inbounds(<{[4x i8],i32,[24x i8*]}>,<{[4x i8],i32,[24x i8*]}>*@_SML_gvar1d09938e346dcc6f_TypedCalcCon,i64 0,i32 2,i64 20),i8*inreg%ht)#0
%hu=load i8*,i8**%t,align 8
call void@sml_write(i8*inreg bitcast(i8**getelementptr inbounds(<{[4x i8],i32,[24x i8*]}>,<{[4x i8],i32,[24x i8*]}>*@_SML_gvar1d09938e346dcc6f_TypedCalcCon,i64 0,i32 2,i64 0)to i8*),i8**inreg getelementptr inbounds(<{[4x i8],i32,[24x i8*]}>,<{[4x i8],i32,[24x i8*]}>*@_SML_gvar1d09938e346dcc6f_TypedCalcCon,i64 0,i32 2,i64 21),i8*inreg%hu)#0
%hv=load i8*,i8**%u,align 8
call void@sml_write(i8*inreg bitcast(i8**getelementptr inbounds(<{[4x i8],i32,[24x i8*]}>,<{[4x i8],i32,[24x i8*]}>*@_SML_gvar1d09938e346dcc6f_TypedCalcCon,i64 0,i32 2,i64 0)to i8*),i8**inreg getelementptr inbounds(<{[4x i8],i32,[24x i8*]}>,<{[4x i8],i32,[24x i8*]}>*@_SML_gvar1d09938e346dcc6f_TypedCalcCon,i64 0,i32 2,i64 22),i8*inreg%hv)#0
%hw=load i8*,i8**%k,align 8
call void@sml_write(i8*inreg bitcast(i8**getelementptr inbounds(<{[4x i8],i32,[24x i8*]}>,<{[4x i8],i32,[24x i8*]}>*@_SML_gvar1d09938e346dcc6f_TypedCalcCon,i64 0,i32 2,i64 0)to i8*),i8**inreg getelementptr inbounds(<{[4x i8],i32,[24x i8*]}>,<{[4x i8],i32,[24x i8*]}>*@_SML_gvar1d09938e346dcc6f_TypedCalcCon,i64 0,i32 2,i64 23),i8*inreg%hw)#0
call void@sml_end()#0
ret void
hx:
%hy=landingpad{i8*,i8*}
cleanup
%hz=extractvalue{i8*,i8*}%hy,1
call void@sml_save_exn(i8*inreg%hz)#0
call void@sml_end()#0
resume{i8*,i8*}%hy
}
define internal fastcc i8*@_SMLLN12TypedCalcCon11instantiateE_245(i8*inreg%a)unnamed_addr#2 gc"smlsharp"{
j:
%b=alloca i8*,align 8
%c=alloca i8*,align 8
call void@llvm.gcroot(i8**%b,i8*null)#0
call void@llvm.gcroot(i8**%c,i8*null)#0
store i8*%a,i8**%b,align 8
%d=load atomic i32,i32*@sml_check_flag unordered,align 4
%e=icmp eq i32%d,0
br i1%e,label%h,label%f
f:
call void@sml_check(i32 inreg%d)
%g=load i8*,i8**%b,align 8
br label%h
h:
%i=phi i8*[%g,%f],[%a,%j]
%k=bitcast i8*%i to i8**
%l=load i8*,i8**%k,align 8
store i8*%l,i8**%b,align 8
%m=getelementptr inbounds i8,i8*%i,i64 8
%n=bitcast i8*%m to i8**
%o=load i8*,i8**%n,align 8
%p=icmp eq i8*%o,null
br i1%p,label%q,label%s
q:
%r=tail call fastcc i8*@_SMLFN11TypesBasics7derefTyE(i8*inreg%l)
ret i8*%r
s:
%t=bitcast i8*%o to i8**
%u=load i8*,i8**%t,align 8
store i8*%u,i8**%c,align 8
%v=call i8*@sml_alloc(i32 inreg 20)#0
%w=getelementptr inbounds i8,i8*%v,i64 -4
%x=bitcast i8*%w to i32*
store i32 1342177296,i32*%x,align 4
%y=load i8*,i8**%b,align 8
%z=bitcast i8*%v to i8**
store i8*%y,i8**%z,align 8
%A=load i8*,i8**%c,align 8
%B=getelementptr inbounds i8,i8*%v,i64 8
%C=bitcast i8*%B to i8**
store i8*%A,i8**%C,align 8
%D=getelementptr inbounds i8,i8*%v,i64 16
%E=bitcast i8*%D to i32*
store i32 3,i32*%E,align 4
%F=tail call fastcc i8*@_SMLFN11TypesBasics7tpappTyE(i8*inreg%v)
ret i8*%F
}
define internal fastcc i8*@_SMLLN12TypedCalcCon7tupleTyE_247(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=icmp eq i8*%h,null
br i1%j,label%k,label%m
k:
%l=load i8*,i8**@_SMLZN12BuiltinTypes6unitTyE,align 8
ret i8*%l
m:
%n=getelementptr inbounds i8,i8*%h,i64 8
%o=bitcast i8*%n to i8**
%p=load i8*,i8**%o,align 8
%q=icmp eq i8*%p,null
br i1%q,label%r,label%u
r:
%s=bitcast i8*%h to i8**
%t=load i8*,i8**%s,align 8
ret i8*%t
u:
%v=call fastcc i8*@_SMLFN11RecordLabel8tupleMapE(i32 inreg 1,i32 inreg 8)
%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**
%A=load i8*,i8**%z,align 8
%B=load i8*,i8**%b,align 8
store i8*null,i8**%b,align 8
%C=call fastcc i8*%y(i8*inreg%A,i8*inreg%B)
store i8*%C,i8**%b,align 8
%D=call i8*@sml_alloc(i32 inreg 20)#0
%E=bitcast i8*%D to i32*
%F=getelementptr inbounds i8,i8*%D,i64 -4
%G=bitcast i8*%F to i32*
store i32 1342177296,i32*%G,align 4
%H=getelementptr inbounds i8,i8*%D,i64 4
%I=bitcast i8*%H to i32*
store i32 0,i32*%I,align 1
store i32 8,i32*%E,align 4
%J=load i8*,i8**%b,align 8
%K=getelementptr inbounds i8,i8*%D,i64 8
%L=bitcast i8*%K to i8**
store i8*%J,i8**%L,align 8
%M=getelementptr inbounds i8,i8*%D,i64 16
%N=bitcast i8*%M to i32*
store i32 2,i32*%N,align 4
ret i8*%D
}
define internal fastcc void@_SMLLN12TypedCalcCon5fail1E_257(i8*inreg%a,i8*inreg%b)#2 gc"smlsharp"{
%c=alloca i8*,align 8
%d=alloca i8*,align 8
%e=alloca i8*,align 8
%f=alloca i8*,align 8
call void@llvm.gcroot(i8**%c,i8*null)#0
call void@llvm.gcroot(i8**%d,i8*null)#0
call void@llvm.gcroot(i8**%e,i8*null)#0
call void@llvm.gcroot(i8**%f,i8*null)#0
store i8*%a,i8**%e,align 8
store i8*%b,i8**%c,align 8
%g=load atomic i32,i32*@sml_check_flag unordered,align 4
%h=icmp eq i32%g,0
br i1%h,label%i,label%k
i:
%j=bitcast i8*%a to i8**
br label%n
k:
call void@sml_check(i32 inreg%g)
%l=bitcast i8**%e to i8***
%m=load i8**,i8***%l,align 8
br label%n
n:
%o=phi i8**[%m,%k],[%j,%i]
%p=load i8*,i8**%o,align 8
store i8*%p,i8**%d,align 8
%q=call i8*@sml_alloc(i32 inreg 20)#0
%r=getelementptr inbounds i8,i8*%q,i64 -4
%s=bitcast i8*%r to i32*
store i32 1342177296,i32*%s,align 4
%t=bitcast i8*%q to i8**
store i8*getelementptr inbounds(<{[4x i8],i32,[29x i8]}>,<{[4x i8],i32,[29x i8]}>*@b,i64 0,i32 2,i64 0),i8**%t,align 8
%u=load i8*,i8**%d,align 8
store i8*null,i8**%d,align 8
%v=getelementptr inbounds i8,i8*%q,i64 8
%w=bitcast i8*%v to i8**
store i8*%u,i8**%w,align 8
%x=getelementptr inbounds i8,i8*%q,i64 16
%y=bitcast i8*%x to i32*
store i32 3,i32*%y,align 4
%z=call fastcc i8*@_SMLFN6String1_ZE(i8*inreg%q)
store i8*%z,i8**%d,align 8
%A=call i8*@sml_alloc(i32 inreg 20)#0
%B=getelementptr inbounds i8,i8*%A,i64 -4
%C=bitcast i8*%B to i32*
store i32 1342177296,i32*%C,align 4
%D=load i8*,i8**%d,align 8
store i8*null,i8**%d,align 8
%E=bitcast i8*%A to i8**
store i8*%D,i8**%E,align 8
%F=getelementptr inbounds i8,i8*%A,i64 8
%G=bitcast i8*%F to i8**
store i8*getelementptr inbounds(<{[4x i8],i32,[5x i8]}>,<{[4x i8],i32,[5x i8]}>*@c,i64 0,i32 2,i64 0),i8**%G,align 8
%H=getelementptr inbounds i8,i8*%A,i64 16
%I=bitcast i8*%H to i32*
store i32 3,i32*%I,align 4
%J=call fastcc i8*@_SMLFN6String1_ZE(i8*inreg%A)
store i8*%J,i8**%d,align 8
%K=load i8*,i8**@_SMLZN6TextIO6stdOutE,align 8
store i8*%K,i8**%f,align 8
%L=call i8*@sml_alloc(i32 inreg 20)#0
%M=getelementptr inbounds i8,i8*%L,i64 -4
%N=bitcast i8*%M to i32*
store i32 1342177296,i32*%N,align 4
%O=load i8*,i8**%f,align 8
store i8*null,i8**%f,align 8
%P=bitcast i8*%L to i8**
store i8*%O,i8**%P,align 8
%Q=load i8*,i8**%d,align 8
store i8*null,i8**%d,align 8
%R=getelementptr inbounds i8,i8*%L,i64 8
%S=bitcast i8*%R to i8**
store i8*%Q,i8**%S,align 8
%T=getelementptr inbounds i8,i8*%L,i64 16
%U=bitcast i8*%T to i32*
store i32 3,i32*%U,align 4
call fastcc void@_SMLFN6TextIO6outputE(i8*inreg%L)
%V=load i8*,i8**%e,align 8
store i8*null,i8**%e,align 8
%W=getelementptr inbounds i8,i8*%V,i64 8
%X=bitcast i8*%W to i8**
%Y=load i8*,i8**%X,align 8
%Z=call fastcc i8*@_SMLFN3Loc10format__locE(i8*inreg%Y)
%aa=call fastcc i8*@_SMLFN3Bug11prettyPrintE(i8*inreg%Z)
store i8*%aa,i8**%d,align 8
%ab=load i8*,i8**@_SMLZN6TextIO6stdOutE,align 8
store i8*%ab,i8**%e,align 8
%ac=call i8*@sml_alloc(i32 inreg 20)#0
%ad=getelementptr inbounds i8,i8*%ac,i64 -4
%ae=bitcast i8*%ad to i32*
store i32 1342177296,i32*%ae,align 4
%af=load i8*,i8**%e,align 8
store i8*null,i8**%e,align 8
%ag=bitcast i8*%ac to i8**
store i8*%af,i8**%ag,align 8
%ah=load i8*,i8**%d,align 8
store i8*null,i8**%d,align 8
%ai=getelementptr inbounds i8,i8*%ac,i64 8
%aj=bitcast i8*%ai to i8**
store i8*%ah,i8**%aj,align 8
%ak=getelementptr inbounds i8,i8*%ac,i64 16
%al=bitcast i8*%ak to i32*
store i32 3,i32*%al,align 4
call fastcc void@_SMLFN6TextIO6outputE(i8*inreg%ac)
%am=load i8*,i8**@_SMLZN6TextIO6stdOutE,align 8
store i8*%am,i8**%d,align 8
%an=call i8*@sml_alloc(i32 inreg 20)#0
%ao=getelementptr inbounds i8,i8*%an,i64 -4
%ap=bitcast i8*%ao to i32*
store i32 1342177296,i32*%ap,align 4
%aq=load i8*,i8**%d,align 8
store i8*null,i8**%d,align 8
%ar=bitcast i8*%an to i8**
store i8*%aq,i8**%ar,align 8
%as=getelementptr inbounds i8,i8*%an,i64 8
%at=bitcast i8*%as to i8**
store i8*getelementptr inbounds(<{[4x i8],i32,[6x i8]}>,<{[4x i8],i32,[6x i8]}>*@a,i64 0,i32 2,i64 0),i8**%at,align 8
%au=getelementptr inbounds i8,i8*%an,i64 16
%av=bitcast i8*%au to i32*
store i32 3,i32*%av,align 4
call fastcc void@_SMLFN6TextIO6outputE(i8*inreg%an)
%aw=load i8*,i8**%c,align 8
store i8*null,i8**%c,align 8
%ax=call fastcc i8*@_SMLFN5Types9format__tyE(i8*inreg%aw)
%ay=call fastcc i8*@_SMLFN3Bug11prettyPrintE(i8*inreg%ax)
store i8*%ay,i8**%c,align 8
%az=load i8*,i8**@_SMLZN6TextIO6stdOutE,align 8
store i8*%az,i8**%d,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
%aD=load i8*,i8**%d,align 8
store i8*null,i8**%d,align 8
%aE=bitcast i8*%aA to i8**
store i8*%aD,i8**%aE,align 8
%aF=load i8*,i8**%c,align 8
store i8*null,i8**%c,align 8
%aG=getelementptr inbounds i8,i8*%aA,i64 8
%aH=bitcast i8*%aG to i8**
store i8*%aF,i8**%aH,align 8
%aI=getelementptr inbounds i8,i8*%aA,i64 16
%aJ=bitcast i8*%aI to i32*
store i32 3,i32*%aJ,align 4
call fastcc void@_SMLFN6TextIO6outputE(i8*inreg%aA)
%aK=load i8*,i8**@_SMLZN6TextIO6stdOutE,align 8
store i8*%aK,i8**%c,align 8
%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
%aP=bitcast i8*%aL to i8**
store i8*%aO,i8**%aP,align 8
%aQ=getelementptr inbounds i8,i8*%aL,i64 8
%aR=bitcast i8*%aQ to i8**
store i8*getelementptr inbounds(<{[4x i8],i32,[22x i8]}>,<{[4x i8],i32,[22x i8]}>*@ag,i64 0,i32 2,i64 0),i8**%aR,align 8
%aS=getelementptr inbounds i8,i8*%aL,i64 16
%aT=bitcast i8*%aS to i32*
store i32 3,i32*%aT,align 4
tail call fastcc void@_SMLFN6TextIO6outputE(i8*inreg%aL)
ret void
}
define internal fastcc i8*@_SMLLN12TypedCalcCon5fail1E_258(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=bitcast i8*%a to i8**
%g=load i8*,i8**%f,align 8
store i8*%g,i8**%d,align 8
%h=call i8*@sml_alloc(i32 inreg 20)#0
%i=getelementptr inbounds i8,i8*%h,i64 -4
%j=bitcast i8*%i to i32*
store i32 1342177296,i32*%j,align 4
store i8*%h,i8**%e,align 8
%k=load i8*,i8**%d,align 8
store i8*null,i8**%d,align 8
%l=bitcast i8*%h to i8**
store i8*%k,i8**%l,align 8
%m=load i8*,i8**%c,align 8
store i8*null,i8**%c,align 8
%n=getelementptr inbounds i8,i8*%h,i64 8
%o=bitcast i8*%n to i8**
store i8*%m,i8**%o,align 8
%p=getelementptr inbounds i8,i8*%h,i64 16
%q=bitcast i8*%p to i32*
store i32 3,i32*%q,align 4
%r=call i8*@sml_alloc(i32 inreg 28)#0
%s=getelementptr inbounds i8,i8*%r,i64 -4
%t=bitcast i8*%s to i32*
store i32 1342177304,i32*%t,align 4
%u=load i8*,i8**%e,align 8
%v=bitcast i8*%r to i8**
store i8*%u,i8**%v,align 8
%w=getelementptr inbounds i8,i8*%r,i64 8
%x=bitcast i8*%w to void(...)**
store void(...)*bitcast(void(i8*,i8*)*@_SMLLN12TypedCalcCon5fail1E_257 to void(...)*),void(...)**%x,align 8
%y=getelementptr inbounds i8,i8*%r,i64 16
%z=bitcast i8*%y to void(...)**
store void(...)*bitcast(i8*(i8*,i8*)*@_SMLLN12TypedCalcCon5fail1E_670 to void(...)*),void(...)**%z,align 8
%A=getelementptr inbounds i8,i8*%r,i64 24
%B=bitcast i8*%A to i32*
store i32 -2147483647,i32*%B,align 4
ret i8*%r
}
define internal fastcc i8*@_SMLLN12TypedCalcCon5fail1E_259(i8*inreg%a)unnamed_addr#4 gc"smlsharp"{
%b=alloca i8*,align 8
%c=alloca i8*,align 8
call void@llvm.gcroot(i8**%b,i8*null)#0
call void@llvm.gcroot(i8**%c,i8*null)#0
store i8*%a,i8**%b,align 8
%d=call i8*@sml_alloc(i32 inreg 12)#0
%e=getelementptr inbounds i8,i8*%d,i64 -4
%f=bitcast i8*%e to i32*
store i32 1342177288,i32*%f,align 4
store i8*%d,i8**%c,align 8
%g=load i8*,i8**%b,align 8
store i8*null,i8**%b,align 8
%h=bitcast i8*%d to i8**
store i8*%g,i8**%h,align 8
%i=getelementptr inbounds i8,i8*%d,i64 8
%j=bitcast i8*%i to i32*
store i32 1,i32*%j,align 4
%k=call i8*@sml_alloc(i32 inreg 28)#0
%l=getelementptr inbounds i8,i8*%k,i64 -4
%m=bitcast i8*%l to i32*
store i32 1342177304,i32*%m,align 4
%n=load i8*,i8**%c,align 8
%o=bitcast i8*%k to i8**
store i8*%n,i8**%o,align 8
%p=getelementptr inbounds i8,i8*%k,i64 8
%q=bitcast i8*%p to void(...)**
store void(...)*bitcast(i8*(i8*,i8*)*@_SMLLN12TypedCalcCon5fail1E_258 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*)*@_SMLLN12TypedCalcCon5fail1E_258 to void(...)*),void(...)**%s,align 8
%t=getelementptr inbounds i8,i8*%k,i64 24
%u=bitcast i8*%t to i32*
store i32 -2147483647,i32*%u,align 4
ret i8*%k
}
define internal fastcc void@_SMLLN12TypedCalcCon5fail2E_266(i8*inreg%a,i8*inreg%b)#2 gc"smlsharp"{
%c=alloca i8*,align 8
%d=alloca i8*,align 8
%e=alloca i8*,align 8
%f=alloca i8*,align 8
call void@llvm.gcroot(i8**%c,i8*null)#0
call void@llvm.gcroot(i8**%d,i8*null)#0
call void@llvm.gcroot(i8**%e,i8*null)#0
call void@llvm.gcroot(i8**%f,i8*null)#0
store i8*%a,i8**%e,align 8
store i8*%b,i8**%c,align 8
%g=load atomic i32,i32*@sml_check_flag unordered,align 4
%h=icmp eq i32%g,0
br i1%h,label%i,label%k
i:
%j=bitcast i8*%a to i8**
br label%n
k:
call void@sml_check(i32 inreg%g)
%l=bitcast i8**%e to i8***
%m=load i8**,i8***%l,align 8
br label%n
n:
%o=phi i8**[%m,%k],[%j,%i]
%p=load i8*,i8**%o,align 8
store i8*%p,i8**%d,align 8
%q=call i8*@sml_alloc(i32 inreg 20)#0
%r=getelementptr inbounds i8,i8*%q,i64 -4
%s=bitcast i8*%r to i32*
store i32 1342177296,i32*%s,align 4
%t=bitcast i8*%q to i8**
store i8*getelementptr inbounds(<{[4x i8],i32,[29x i8]}>,<{[4x i8],i32,[29x i8]}>*@b,i64 0,i32 2,i64 0),i8**%t,align 8
%u=load i8*,i8**%d,align 8
store i8*null,i8**%d,align 8
%v=getelementptr inbounds i8,i8*%q,i64 8
%w=bitcast i8*%v to i8**
store i8*%u,i8**%w,align 8
%x=getelementptr inbounds i8,i8*%q,i64 16
%y=bitcast i8*%x to i32*
store i32 3,i32*%y,align 4
%z=call fastcc i8*@_SMLFN6String1_ZE(i8*inreg%q)
store i8*%z,i8**%d,align 8
%A=call i8*@sml_alloc(i32 inreg 20)#0
%B=getelementptr inbounds i8,i8*%A,i64 -4
%C=bitcast i8*%B to i32*
store i32 1342177296,i32*%C,align 4
%D=load i8*,i8**%d,align 8
store i8*null,i8**%d,align 8
%E=bitcast i8*%A to i8**
store i8*%D,i8**%E,align 8
%F=getelementptr inbounds i8,i8*%A,i64 8
%G=bitcast i8*%F to i8**
store i8*getelementptr inbounds(<{[4x i8],i32,[5x i8]}>,<{[4x i8],i32,[5x i8]}>*@c,i64 0,i32 2,i64 0),i8**%G,align 8
%H=getelementptr inbounds i8,i8*%A,i64 16
%I=bitcast i8*%H to i32*
store i32 3,i32*%I,align 4
%J=call fastcc i8*@_SMLFN6String1_ZE(i8*inreg%A)
store i8*%J,i8**%d,align 8
%K=load i8*,i8**@_SMLZN6TextIO6stdOutE,align 8
store i8*%K,i8**%f,align 8
%L=call i8*@sml_alloc(i32 inreg 20)#0
%M=getelementptr inbounds i8,i8*%L,i64 -4
%N=bitcast i8*%M to i32*
store i32 1342177296,i32*%N,align 4
%O=load i8*,i8**%f,align 8
store i8*null,i8**%f,align 8
%P=bitcast i8*%L to i8**
store i8*%O,i8**%P,align 8
%Q=load i8*,i8**%d,align 8
store i8*null,i8**%d,align 8
%R=getelementptr inbounds i8,i8*%L,i64 8
%S=bitcast i8*%R to i8**
store i8*%Q,i8**%S,align 8
%T=getelementptr inbounds i8,i8*%L,i64 16
%U=bitcast i8*%T to i32*
store i32 3,i32*%U,align 4
call fastcc void@_SMLFN6TextIO6outputE(i8*inreg%L)
%V=load i8*,i8**%e,align 8
store i8*null,i8**%e,align 8
%W=getelementptr inbounds i8,i8*%V,i64 8
%X=bitcast i8*%W to i8**
%Y=load i8*,i8**%X,align 8
%Z=call fastcc i8*@_SMLFN3Loc10format__locE(i8*inreg%Y)
%aa=call fastcc i8*@_SMLFN3Bug11prettyPrintE(i8*inreg%Z)
store i8*%aa,i8**%d,align 8
%ab=load i8*,i8**@_SMLZN6TextIO6stdOutE,align 8
store i8*%ab,i8**%e,align 8
%ac=call i8*@sml_alloc(i32 inreg 20)#0
%ad=getelementptr inbounds i8,i8*%ac,i64 -4
%ae=bitcast i8*%ad to i32*
store i32 1342177296,i32*%ae,align 4
%af=load i8*,i8**%e,align 8
store i8*null,i8**%e,align 8
%ag=bitcast i8*%ac to i8**
store i8*%af,i8**%ag,align 8
%ah=load i8*,i8**%d,align 8
store i8*null,i8**%d,align 8
%ai=getelementptr inbounds i8,i8*%ac,i64 8
%aj=bitcast i8*%ai to i8**
store i8*%ah,i8**%aj,align 8
%ak=getelementptr inbounds i8,i8*%ac,i64 16
%al=bitcast i8*%ak to i32*
store i32 3,i32*%al,align 4
call fastcc void@_SMLFN6TextIO6outputE(i8*inreg%ac)
%am=load i8*,i8**@_SMLZN6TextIO6stdOutE,align 8
store i8*%am,i8**%d,align 8
%an=call i8*@sml_alloc(i32 inreg 20)#0
%ao=getelementptr inbounds i8,i8*%an,i64 -4
%ap=bitcast i8*%ao to i32*
store i32 1342177296,i32*%ap,align 4
%aq=load i8*,i8**%d,align 8
store i8*null,i8**%d,align 8
%ar=bitcast i8*%an to i8**
store i8*%aq,i8**%ar,align 8
%as=getelementptr inbounds i8,i8*%an,i64 8
%at=bitcast i8*%as to i8**
store i8*getelementptr inbounds(<{[4x i8],i32,[7x i8]}>,<{[4x i8],i32,[7x i8]}>*@d,i64 0,i32 2,i64 0),i8**%at,align 8
%au=getelementptr inbounds i8,i8*%an,i64 16
%av=bitcast i8*%au to i32*
store i32 3,i32*%av,align 4
call fastcc void@_SMLFN6TextIO6outputE(i8*inreg%an)
%aw=bitcast i8**%c to i8***
%ax=load i8**,i8***%aw,align 8
%ay=load i8*,i8**%ax,align 8
%az=call fastcc i8*@_SMLFN5Types9format__tyE(i8*inreg%ay)
%aA=call fastcc i8*@_SMLFN3Bug11prettyPrintE(i8*inreg%az)
store i8*%aA,i8**%d,align 8
%aB=load i8*,i8**@_SMLZN6TextIO6stdOutE,align 8
store i8*%aB,i8**%e,align 8
%aC=call i8*@sml_alloc(i32 inreg 20)#0
%aD=getelementptr inbounds i8,i8*%aC,i64 -4
%aE=bitcast i8*%aD to i32*
store i32 1342177296,i32*%aE,align 4
%aF=load i8*,i8**%e,align 8
store i8*null,i8**%e,align 8
%aG=bitcast i8*%aC to i8**
store i8*%aF,i8**%aG,align 8
%aH=load i8*,i8**%d,align 8
store i8*null,i8**%d,align 8
%aI=getelementptr inbounds i8,i8*%aC,i64 8
%aJ=bitcast i8*%aI to i8**
store i8*%aH,i8**%aJ,align 8
%aK=getelementptr inbounds i8,i8*%aC,i64 16
%aL=bitcast i8*%aK to i32*
store i32 3,i32*%aL,align 4
call fastcc void@_SMLFN6TextIO6outputE(i8*inreg%aC)
%aM=load i8*,i8**@_SMLZN6TextIO6stdOutE,align 8
store i8*%aM,i8**%d,align 8
%aN=call i8*@sml_alloc(i32 inreg 20)#0
%aO=getelementptr inbounds i8,i8*%aN,i64 -4
%aP=bitcast i8*%aO to i32*
store i32 1342177296,i32*%aP,align 4
%aQ=load i8*,i8**%d,align 8
store i8*null,i8**%d,align 8
%aR=bitcast i8*%aN to i8**
store i8*%aQ,i8**%aR,align 8
%aS=getelementptr inbounds i8,i8*%aN,i64 8
%aT=bitcast i8*%aS to i8**
store i8*getelementptr inbounds(<{[4x i8],i32,[7x i8]}>,<{[4x i8],i32,[7x i8]}>*@e,i64 0,i32 2,i64 0),i8**%aT,align 8
%aU=getelementptr inbounds i8,i8*%aN,i64 16
%aV=bitcast i8*%aU to i32*
store i32 3,i32*%aV,align 4
call fastcc void@_SMLFN6TextIO6outputE(i8*inreg%aN)
%aW=load i8*,i8**%c,align 8
store i8*null,i8**%c,align 8
%aX=getelementptr inbounds i8,i8*%aW,i64 8
%aY=bitcast i8*%aX to i8**
%aZ=load i8*,i8**%aY,align 8
%a0=call fastcc i8*@_SMLFN5Types9format__tyE(i8*inreg%aZ)
%a1=call fastcc i8*@_SMLFN3Bug11prettyPrintE(i8*inreg%a0)
store i8*%a1,i8**%c,align 8
%a2=load i8*,i8**@_SMLZN6TextIO6stdOutE,align 8
store i8*%a2,i8**%d,align 8
%a3=call i8*@sml_alloc(i32 inreg 20)#0
%a4=getelementptr inbounds i8,i8*%a3,i64 -4
%a5=bitcast i8*%a4 to i32*
store i32 1342177296,i32*%a5,align 4
%a6=load i8*,i8**%d,align 8
store i8*null,i8**%d,align 8
%a7=bitcast i8*%a3 to i8**
store i8*%a6,i8**%a7,align 8
%a8=load i8*,i8**%c,align 8
store i8*null,i8**%c,align 8
%a9=getelementptr inbounds i8,i8*%a3,i64 8
%ba=bitcast i8*%a9 to i8**
store i8*%a8,i8**%ba,align 8
%bb=getelementptr inbounds i8,i8*%a3,i64 16
%bc=bitcast i8*%bb to i32*
store i32 3,i32*%bc,align 4
call fastcc void@_SMLFN6TextIO6outputE(i8*inreg%a3)
%bd=load i8*,i8**@_SMLZN6TextIO6stdOutE,align 8
store i8*%bd,i8**%c,align 8
%be=call i8*@sml_alloc(i32 inreg 20)#0
%bf=getelementptr inbounds i8,i8*%be,i64 -4
%bg=bitcast i8*%bf to i32*
store i32 1342177296,i32*%bg,align 4
%bh=load i8*,i8**%c,align 8
%bi=bitcast i8*%be to i8**
store i8*%bh,i8**%bi,align 8
%bj=getelementptr inbounds i8,i8*%be,i64 8
%bk=bitcast i8*%bj to i8**
store i8*getelementptr inbounds(<{[4x i8],i32,[22x i8]}>,<{[4x i8],i32,[22x i8]}>*@ag,i64 0,i32 2,i64 0),i8**%bk,align 8
%bl=getelementptr inbounds i8,i8*%be,i64 16
%bm=bitcast i8*%bl to i32*
store i32 3,i32*%bm,align 4
tail call fastcc void@_SMLFN6TextIO6outputE(i8*inreg%be)
ret void
}
define internal fastcc i8*@_SMLLN12TypedCalcCon5fail2E_267(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=bitcast i8*%a to i8**
%g=load i8*,i8**%f,align 8
store i8*%g,i8**%d,align 8
%h=call i8*@sml_alloc(i32 inreg 20)#0
%i=getelementptr inbounds i8,i8*%h,i64 -4
%j=bitcast i8*%i to i32*
store i32 1342177296,i32*%j,align 4
store i8*%h,i8**%e,align 8
%k=load i8*,i8**%d,align 8
store i8*null,i8**%d,align 8
%l=bitcast i8*%h to i8**
store i8*%k,i8**%l,align 8
%m=load i8*,i8**%c,align 8
store i8*null,i8**%c,align 8
%n=getelementptr inbounds i8,i8*%h,i64 8
%o=bitcast i8*%n to i8**
store i8*%m,i8**%o,align 8
%p=getelementptr inbounds i8,i8*%h,i64 16
%q=bitcast i8*%p to i32*
store i32 3,i32*%q,align 4
%r=call i8*@sml_alloc(i32 inreg 28)#0
%s=getelementptr inbounds i8,i8*%r,i64 -4
%t=bitcast i8*%s to i32*
store i32 1342177304,i32*%t,align 4
%u=load i8*,i8**%e,align 8
%v=bitcast i8*%r to i8**
store i8*%u,i8**%v,align 8
%w=getelementptr inbounds i8,i8*%r,i64 8
%x=bitcast i8*%w to void(...)**
store void(...)*bitcast(void(i8*,i8*)*@_SMLLN12TypedCalcCon5fail2E_266 to void(...)*),void(...)**%x,align 8
%y=getelementptr inbounds i8,i8*%r,i64 16
%z=bitcast i8*%y to void(...)**
store void(...)*bitcast(i8*(i8*,i8*)*@_SMLLN12TypedCalcCon5fail2E_672 to void(...)*),void(...)**%z,align 8
%A=getelementptr inbounds i8,i8*%r,i64 24
%B=bitcast i8*%A to i32*
store i32 -2147483647,i32*%B,align 4
ret i8*%r
}
define internal fastcc void@_SMLLN12TypedCalcCon17mustBeCONSTRUCTtyE_272(i8*inreg%a,i8*inreg%b)#2 gc"smlsharp"{
l:
%c=alloca i8*,align 8
%d=alloca i8*,align 8
%e=alloca i8*,align 8
call void@llvm.gcroot(i8**%c,i8*null)#0
call void@llvm.gcroot(i8**%d,i8*null)#0
call void@llvm.gcroot(i8**%e,i8*null)#0
store i8*%a,i8**%e,align 8
store i8*%b,i8**%c,align 8
%f=load atomic i32,i32*@sml_check_flag unordered,align 4
%g=icmp eq i32%f,0
br i1%g,label%j,label%h
h:
call void@sml_check(i32 inreg%f)
%i=load i8*,i8**%c,align 8
br label%j
j:
%k=phi i8*[%i,%h],[%b,%l]
%m=call fastcc i8*@_SMLFN11TypesBasics7derefTyE(i8*inreg%k)
%n=icmp eq i8*%m,null
br i1%n,label%D,label%o
o:
%p=bitcast i8*%m to i32*
%q=load i32,i32*%p,align 4
switch i32%q,label%D[
i32 2,label%C
i32 7,label%r
]
r:
%s=getelementptr inbounds i8,i8*%m,i64 8
%t=bitcast i8*%s to i8***
%u=load i8**,i8***%t,align 8
%v=load i8*,i8**%u,align 8
%w=call fastcc i8*@_SMLFN11TypesBasics7derefTyE(i8*inreg%v)
%x=icmp eq i8*%w,null
br i1%x,label%D,label%y
y:
%z=bitcast i8*%w to i32*
%A=load i32,i32*%z,align 4
%B=icmp eq i32%A,2
br i1%B,label%C,label%D
C:
ret void
D:
%E=bitcast i8**%e to i8***
%F=load i8**,i8***%E,align 8
%G=load i8*,i8**%F,align 8
store i8*%G,i8**%d,align 8
%H=call i8*@sml_alloc(i32 inreg 20)#0
%I=getelementptr inbounds i8,i8*%H,i64 -4
%J=bitcast i8*%I to i32*
store i32 1342177296,i32*%J,align 4
%K=bitcast i8*%H to i8**
store i8*getelementptr inbounds(<{[4x i8],i32,[20x i8]}>,<{[4x i8],i32,[20x i8]}>*@f,i64 0,i32 2,i64 0),i8**%K,align 8
%L=load i8*,i8**%d,align 8
store i8*null,i8**%d,align 8
%M=getelementptr inbounds i8,i8*%H,i64 8
%N=bitcast i8*%M to i8**
store i8*%L,i8**%N,align 8
%O=getelementptr inbounds i8,i8*%H,i64 16
%P=bitcast i8*%O to i32*
store i32 3,i32*%P,align 4
%Q=call fastcc i8*@_SMLFN6String1_ZE(i8*inreg%H)
store i8*%Q,i8**%d,align 8
%R=call i8*@sml_alloc(i32 inreg 20)#0
%S=getelementptr inbounds i8,i8*%R,i64 -4
%T=bitcast i8*%S to i32*
store i32 1342177296,i32*%T,align 4
%U=load i8*,i8**%d,align 8
store i8*null,i8**%d,align 8
%V=bitcast i8*%R to i8**
store i8*%U,i8**%V,align 8
%W=getelementptr inbounds i8,i8*%R,i64 8
%X=bitcast i8*%W to i8**
store i8*getelementptr inbounds(<{[4x i8],i32,[2x i8]}>,<{[4x i8],i32,[2x i8]}>*@l,i64 0,i32 2,i64 0),i8**%X,align 8
%Y=getelementptr inbounds i8,i8*%R,i64 16
%Z=bitcast i8*%Y to i32*
store i32 3,i32*%Z,align 4
%aa=call fastcc i8*@_SMLFN6String1_ZE(i8*inreg%R)
%ab=call fastcc i8*@_SMLLN12TypedCalcCon5fail1E_259(i8*inreg%aa)
%ac=getelementptr inbounds i8,i8*%ab,i64 16
%ad=bitcast i8*%ac to i8*(i8*,i8*)**
%ae=load i8*(i8*,i8*)*,i8*(i8*,i8*)**%ad,align 8
%af=bitcast i8*%ab to i8**
%ag=load i8*,i8**%af,align 8
%ah=load i8*,i8**%e,align 8
store i8*null,i8**%e,align 8
%ai=getelementptr inbounds i8,i8*%ah,i64 8
%aj=bitcast i8*%ai to i8**
%ak=load i8*,i8**%aj,align 8
%al=call fastcc i8*%ae(i8*inreg%ag,i8*inreg%ak)
%am=getelementptr inbounds i8,i8*%al,i64 16
%an=bitcast i8*%am to i8*(i8*,i8*)**
%ao=load i8*(i8*,i8*)*,i8*(i8*,i8*)**%an,align 8
%ap=bitcast i8*%al to i8**
%aq=load i8*,i8**%ap,align 8
%ar=load i8*,i8**%c,align 8
store i8*null,i8**%c,align 8
%as=call fastcc i8*%ao(i8*inreg%aq,i8*inreg%ar)
ret void
}
define internal fastcc i8*@_SMLLN12TypedCalcCon17mustBeCONSTRUCTtyE_273(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=bitcast i8*%a to i8**
%g=load i8*,i8**%f,align 8
store i8*%g,i8**%d,align 8
%h=call i8*@sml_alloc(i32 inreg 20)#0
%i=getelementptr inbounds i8,i8*%h,i64 -4
%j=bitcast i8*%i to i32*
store i32 1342177296,i32*%j,align 4
store i8*%h,i8**%e,align 8
%k=load i8*,i8**%d,align 8
store i8*null,i8**%d,align 8
%l=bitcast i8*%h to i8**
store i8*%k,i8**%l,align 8
%m=load i8*,i8**%c,align 8
store i8*null,i8**%c,align 8
%n=getelementptr inbounds i8,i8*%h,i64 8
%o=bitcast i8*%n to i8**
store i8*%m,i8**%o,align 8
%p=getelementptr inbounds i8,i8*%h,i64 16
%q=bitcast i8*%p to i32*
store i32 3,i32*%q,align 4
%r=call i8*@sml_alloc(i32 inreg 28)#0
%s=getelementptr inbounds i8,i8*%r,i64 -4
%t=bitcast i8*%s to i32*
store i32 1342177304,i32*%t,align 4
%u=load i8*,i8**%e,align 8
%v=bitcast i8*%r to i8**
store i8*%u,i8**%v,align 8
%w=getelementptr inbounds i8,i8*%r,i64 8
%x=bitcast i8*%w to void(...)**
store void(...)*bitcast(void(i8*,i8*)*@_SMLLN12TypedCalcCon17mustBeCONSTRUCTtyE_272 to void(...)*),void(...)**%x,align 8
%y=getelementptr inbounds i8,i8*%r,i64 16
%z=bitcast i8*%y to void(...)**
store void(...)*bitcast(i8*(i8*,i8*)*@_SMLLN12TypedCalcCon17mustBeCONSTRUCTtyE_674 to void(...)*),void(...)**%z,align 8
%A=getelementptr inbounds i8,i8*%r,i64 24
%B=bitcast i8*%A to i32*
store i32 -2147483647,i32*%B,align 4
ret i8*%r
}
define internal fastcc i8*@_SMLLN12TypedCalcCon17mustBeCONSTRUCTtyE_274(i8*inreg%a)unnamed_addr#4 gc"smlsharp"{
%b=alloca i8*,align 8
%c=alloca i8*,align 8
call void@llvm.gcroot(i8**%b,i8*null)#0
call void@llvm.gcroot(i8**%c,i8*null)#0
store i8*%a,i8**%b,align 8
%d=call i8*@sml_alloc(i32 inreg 12)#0
%e=getelementptr inbounds i8,i8*%d,i64 -4
%f=bitcast i8*%e to i32*
store i32 1342177288,i32*%f,align 4
store i8*%d,i8**%c,align 8
%g=load i8*,i8**%b,align 8
store i8*null,i8**%b,align 8
%h=bitcast i8*%d to i8**
store i8*%g,i8**%h,align 8
%i=getelementptr inbounds i8,i8*%d,i64 8
%j=bitcast i8*%i to i32*
store i32 1,i32*%j,align 4
%k=call i8*@sml_alloc(i32 inreg 28)#0
%l=getelementptr inbounds i8,i8*%k,i64 -4
%m=bitcast i8*%l to i32*
store i32 1342177304,i32*%m,align 4
%n=load i8*,i8**%c,align 8
%o=bitcast i8*%k to i8**
store i8*%n,i8**%o,align 8
%p=getelementptr inbounds i8,i8*%k,i64 8
%q=bitcast i8*%p to void(...)**
store void(...)*bitcast(i8*(i8*,i8*)*@_SMLLN12TypedCalcCon17mustBeCONSTRUCTtyE_273 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*)*@_SMLLN12TypedCalcCon17mustBeCONSTRUCTtyE_273 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@_SMLLN12TypedCalcCon4eqTyE_276(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*@_SMLFN14BoundTypeVarID3Map5emptyE(i32 inreg 0,i32 inreg 4)
%h=call fastcc i8*@_SMLFN5Unify4eqTyE(i8*inreg%g)
%i=getelementptr inbounds i8,i8*%h,i64 16
%j=bitcast i8*%i to i8*(i8*,i8*)**
%k=load i8*(i8*,i8*)*,i8*(i8*,i8*)**%j,align 8
%l=bitcast i8*%h to i8**
%m=load i8*,i8**%l,align 8
%n=load i8*,i8**%b,align 8
store i8*null,i8**%b,align 8
%o=getelementptr inbounds i8,i8*%n,i64 8
%p=bitcast i8*%o to i8**
%q=load i8*,i8**%p,align 8
%r=call fastcc i8*%k(i8*inreg%m,i8*inreg%q)
%s=bitcast i8*%r to i32*
%t=load i32,i32*%s,align 4
%u=tail call fastcc i32@_SMLFN4Bool3notE(i32 inreg%t)
ret i32%u
}
define internal fastcc i8*@_SMLLN12TypedCalcCon4eqTyE_278(i8*inreg%a)#4 gc"smlsharp"{
%b=alloca i8*,align 8
%c=alloca i8*,align 8
%d=alloca i8*,align 8
call void@llvm.gcroot(i8**%b,i8*null)#0
call void@llvm.gcroot(i8**%c,i8*null)#0
call void@llvm.gcroot(i8**%d,i8*null)#0
%e=bitcast i8*%a to i8**
%f=load i8*,i8**%e,align 8
store i8*%f,i8**%b,align 8
%g=getelementptr inbounds i8,i8*%a,i64 8
%h=bitcast i8*%g to i8**
%i=load i8*,i8**%h,align 8
%j=bitcast i8*%i to i32*
%k=load i32,i32*%j,align 4
%l=getelementptr inbounds i8,i8*%i,i64 8
%m=bitcast i8*%l to i8**
%n=load i8*,i8**%m,align 8
store i8*%n,i8**%c,align 8
%o=add nsw i32%k,1
%p=call i8*@sml_alloc(i32 inreg 20)#0
%q=getelementptr inbounds i8,i8*%p,i64 -4
%r=bitcast i8*%q to i32*
store i32 1342177296,i32*%r,align 4
store i8*%p,i8**%d,align 8
%s=getelementptr inbounds i8,i8*%p,i64 4
%t=bitcast i8*%s to i32*
store i32 0,i32*%t,align 1
%u=bitcast i8*%p to i32*
store i32%k,i32*%u,align 4
%v=load i8*,i8**%b,align 8
store i8*null,i8**%b,align 8
%w=getelementptr inbounds i8,i8*%p,i64 8
%x=bitcast i8*%w to i8**
store i8*%v,i8**%x,align 8
%y=getelementptr inbounds i8,i8*%p,i64 16
%z=bitcast i8*%y to i32*
store i32 2,i32*%z,align 4
%A=call i8*@sml_alloc(i32 inreg 20)#0
%B=getelementptr inbounds i8,i8*%A,i64 -4
%C=bitcast i8*%B to i32*
store i32 1342177296,i32*%C,align 4
store i8*%A,i8**%b,align 8
%D=load i8*,i8**%d,align 8
store i8*null,i8**%d,align 8
%E=bitcast i8*%A to i8**
store i8*%D,i8**%E,align 8
%F=load i8*,i8**%c,align 8
store i8*null,i8**%c,align 8
%G=getelementptr inbounds i8,i8*%A,i64 8
%H=bitcast i8*%G to i8**
store i8*%F,i8**%H,align 8
%I=getelementptr inbounds i8,i8*%A,i64 16
%J=bitcast i8*%I to i32*
store i32 3,i32*%J,align 4
%K=call i8*@sml_alloc(i32 inreg 20)#0
%L=bitcast i8*%K to i32*
%M=getelementptr inbounds i8,i8*%K,i64 -4
%N=bitcast i8*%M to i32*
store i32 1342177296,i32*%N,align 4
%O=getelementptr inbounds i8,i8*%K,i64 4
%P=bitcast i8*%O to i32*
store i32 0,i32*%P,align 1
store i32%o,i32*%L,align 4
%Q=load i8*,i8**%b,align 8
%R=getelementptr inbounds i8,i8*%K,i64 8
%S=bitcast i8*%R to i8**
store i8*%Q,i8**%S,align 8
%T=getelementptr inbounds i8,i8*%K,i64 16
%U=bitcast i8*%T to i32*
store i32 2,i32*%U,align 4
ret i8*%K
}
define internal fastcc void@_SMLLN12TypedCalcCon4eqTyE_284(i8*inreg%a,i8*inreg%b)#2 gc"smlsharp"{
%c=alloca i8*,align 8
%d=alloca i8*,align 8
%e=alloca i8*,align 8
%f=alloca i8*,align 8
%g=alloca i8*,align 8
%h=alloca i8*,align 8
%i=alloca i8*,align 8
call void@llvm.gcroot(i8**%e,i8*null)#0
call void@llvm.gcroot(i8**%f,i8*null)#0
call void@llvm.gcroot(i8**%g,i8*null)#0
call void@llvm.gcroot(i8**%h,i8*null)#0
call void@llvm.gcroot(i8**%i,i8*null)#0
store i8*%a,i8**%i,align 8
store i8*%b,i8**%e,align 8
%j=load atomic i32,i32*@sml_check_flag unordered,align 4
%k=icmp eq i32%j,0
br i1%k,label%l,label%n
l:
%m=bitcast i8*%a to i8**
br label%r
n:
call void@sml_check(i32 inreg%j)
%o=load i8*,i8**%e,align 8
%p=bitcast i8**%i to i8***
%q=load i8**,i8***%p,align 8
br label%r
r:
%s=phi i8**[%q,%n],[%m,%l]
%t=phi i8*[%o,%n],[%b,%l]
%u=getelementptr inbounds i8,i8*%t,i64 8
%v=bitcast i8*%u to i8***
%w=load i8**,i8***%v,align 8
%x=load i8*,i8**%w,align 8
store i8*%x,i8**%g,align 8
%y=getelementptr inbounds i8*,i8**%w,i64 1
%z=load i8*,i8**%y,align 8
store i8*%z,i8**%h,align 8
%A=load i8*,i8**%s,align 8
store i8*%A,i8**%f,align 8
%B=call i8*@sml_alloc(i32 inreg 20)#0
%C=getelementptr inbounds i8,i8*%B,i64 -4
%D=bitcast i8*%C to i32*
store i32 1342177296,i32*%D,align 4
%E=bitcast i8*%B to i8**
store i8*getelementptr inbounds(<{[4x i8],i32,[7x i8]}>,<{[4x i8],i32,[7x i8]}>*@j,i64 0,i32 2,i64 0),i8**%E,align 8
%F=load i8*,i8**%f,align 8
store i8*null,i8**%f,align 8
%G=getelementptr inbounds i8,i8*%B,i64 8
%H=bitcast i8*%G to i8**
store i8*%F,i8**%H,align 8
%I=getelementptr inbounds i8,i8*%B,i64 16
%J=bitcast i8*%I to i32*
store i32 3,i32*%J,align 4
%K=call fastcc i8*@_SMLFN6String1_ZE(i8*inreg%B)
store i8*%K,i8**%f,align 8
%L=call i8*@sml_alloc(i32 inreg 20)#0
%M=getelementptr inbounds i8,i8*%L,i64 -4
%N=bitcast i8*%M to i32*
store i32 1342177296,i32*%N,align 4
%O=load i8*,i8**%f,align 8
store i8*null,i8**%f,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 i8**
store i8*getelementptr inbounds(<{[4x i8],i32,[11x i8]}>,<{[4x i8],i32,[11x i8]}>*@k,i64 0,i32 2,i64 0),i8**%R,align 8
%S=getelementptr inbounds i8,i8*%L,i64 16
%T=bitcast i8*%S to i32*
store i32 3,i32*%T,align 4
%U=call fastcc i8*@_SMLFN6String1_ZE(i8*inreg%L)
store i8*%U,i8**%f,align 8
%V=bitcast i8**%e to i32**
%W=load i32*,i32**%V,align 8
store i8*null,i8**%e,align 8
%X=load i32,i32*%W,align 4
%Y=call fastcc i8*@_SMLFN5Int328toStringE(i32 inreg%X)
store i8*%Y,i8**%e,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
%ac=load i8*,i8**%f,align 8
store i8*null,i8**%f,align 8
%ad=bitcast i8*%Z to i8**
store i8*%ac,i8**%ad,align 8
%ae=load i8*,i8**%e,align 8
store i8*null,i8**%e,align 8
%af=getelementptr inbounds i8,i8*%Z,i64 8
%ag=bitcast i8*%af to i8**
store i8*%ae,i8**%ag,align 8
%ah=getelementptr inbounds i8,i8*%Z,i64 16
%ai=bitcast i8*%ah to i32*
store i32 3,i32*%ai,align 4
%aj=call fastcc i8*@_SMLFN6String1_ZE(i8*inreg%Z)
store i8*%aj,i8**%e,align 8
%ak=call i8*@sml_alloc(i32 inreg 20)#0
%al=getelementptr inbounds i8,i8*%ak,i64 -4
%am=bitcast i8*%al to i32*
store i32 1342177296,i32*%am,align 4
%an=load i8*,i8**%e,align 8
store i8*null,i8**%e,align 8
%ao=bitcast i8*%ak to i8**
store i8*%an,i8**%ao,align 8
%ap=getelementptr inbounds i8,i8*%ak,i64 8
%aq=bitcast i8*%ap to i8**
store i8*getelementptr inbounds(<{[4x i8],i32,[2x i8]}>,<{[4x i8],i32,[2x i8]}>*@l,i64 0,i32 2,i64 0),i8**%aq,align 8
%ar=getelementptr inbounds i8,i8*%ak,i64 16
%as=bitcast i8*%ar to i32*
store i32 3,i32*%as,align 4
%at=call fastcc i8*@_SMLFN6String1_ZE(i8*inreg%ak)
%au=bitcast i8**%c to i8*
call void@llvm.lifetime.start.p0i8(i64 8,i8*%au)
%av=bitcast i8**%d to i8*
call void@llvm.lifetime.start.p0i8(i64 8,i8*%av)
call void@llvm.gcroot(i8**%c,i8*null)#0
call void@llvm.gcroot(i8**%d,i8*null)#0
store i8*%at,i8**%c,align 8
%aw=call i8*@sml_alloc(i32 inreg 12)#0
%ax=getelementptr inbounds i8,i8*%aw,i64 -4
%ay=bitcast i8*%ax to i32*
store i32 1342177288,i32*%ay,align 4
store i8*%aw,i8**%d,align 8
%az=load i8*,i8**%c,align 8
store i8*null,i8**%c,align 8
%aA=bitcast i8*%aw to i8**
store i8*%az,i8**%aA,align 8
%aB=getelementptr inbounds i8,i8*%aw,i64 8
%aC=bitcast i8*%aB to i32*
store i32 1,i32*%aC,align 4
%aD=call i8*@sml_alloc(i32 inreg 28)#0
%aE=getelementptr inbounds i8,i8*%aD,i64 -4
%aF=bitcast i8*%aE to i32*
store i32 1342177304,i32*%aF,align 4
%aG=load i8*,i8**%d,align 8
%aH=bitcast i8*%aD to i8**
store i8*%aG,i8**%aH,align 8
%aI=getelementptr inbounds i8,i8*%aD,i64 8
%aJ=bitcast i8*%aI to void(...)**
store void(...)*bitcast(i8*(i8*,i8*)*@_SMLLN12TypedCalcCon5fail2E_267 to void(...)*),void(...)**%aJ,align 8
%aK=getelementptr inbounds i8,i8*%aD,i64 16
%aL=bitcast i8*%aK to void(...)**
store void(...)*bitcast(i8*(i8*,i8*)*@_SMLLN12TypedCalcCon5fail2E_267 to void(...)*),void(...)**%aL,align 8
%aM=getelementptr inbounds i8,i8*%aD,i64 24
%aN=bitcast i8*%aM to i32*
store i32 -2147483647,i32*%aN,align 4
call void@llvm.lifetime.end.p0i8(i64 8,i8*%au)
call void@llvm.lifetime.end.p0i8(i64 8,i8*%av)
%aO=load i8*,i8**%i,align 8
store i8*null,i8**%i,align 8
%aP=getelementptr inbounds i8,i8*%aO,i64 8
%aQ=bitcast i8*%aP to i8**
%aR=load i8*,i8**%aQ,align 8
%aS=call fastcc i8*@_SMLLN12TypedCalcCon5fail2E_267(i8*inreg%aG,i8*inreg%aR)
%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*%aX,i8**%e,align 8
%aY=call i8*@sml_alloc(i32 inreg 20)#0
%aZ=getelementptr inbounds i8,i8*%aY,i64 -4
%a0=bitcast i8*%aZ to i32*
store i32 1342177296,i32*%a0,align 4
%a1=load i8*,i8**%g,align 8
store i8*null,i8**%g,align 8
%a2=bitcast i8*%aY to i8**
store i8*%a1,i8**%a2,align 8
%a3=load i8*,i8**%h,align 8
store i8*null,i8**%h,align 8
%a4=getelementptr inbounds i8,i8*%aY,i64 8
%a5=bitcast i8*%a4 to i8**
store i8*%a3,i8**%a5,align 8
%a6=getelementptr inbounds i8,i8*%aY,i64 16
%a7=bitcast i8*%a6 to i32*
store i32 3,i32*%a7,align 4
%a8=load i8*,i8**%e,align 8
store i8*null,i8**%e,align 8
%a9=call fastcc i8*%aV(i8*inreg%a8,i8*inreg%aY)
ret void
}
define internal fastcc void@_SMLLN12TypedCalcCon4eqTyE_285(i8*inreg%a,i8*inreg%b)#2 gc"smlsharp"{
%c=alloca i8*,align 8
%d=alloca i8*,align 8
%e=alloca i8*,align 8
%f=alloca i8*,align 8
%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**%d,align 8
store i8*%b,i8**%c,align 8
%h=load atomic i32,i32*@sml_check_flag unordered,align 4
%i=icmp eq i32%h,0
br i1%i,label%k,label%j
j:
call void@sml_check(i32 inreg%h)
br label%k
k:
%l=call fastcc i8*@_SMLFN4List6filterE(i32 inreg 1,i32 inreg 8)
%m=getelementptr inbounds i8,i8*%l,i64 16
%n=bitcast i8*%m to i8*(i8*,i8*)**
%o=load i8*(i8*,i8*)*,i8*(i8*,i8*)**%n,align 8
%p=bitcast i8*%l to i8**
%q=load i8*,i8**%p,align 8
%r=call fastcc i8*%o(i8*inreg%q,i8*inreg 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*))
%s=getelementptr inbounds i8,i8*%r,i64 16
%t=bitcast i8*%s to i8*(i8*,i8*)**
%u=load i8*(i8*,i8*)*,i8*(i8*,i8*)**%t,align 8
%v=bitcast i8*%r to i8**
%w=load i8*,i8**%v,align 8
store i8*%w,i8**%f,align 8
%x=call fastcc i8*@_SMLFN4List3revE(i32 inreg 1,i32 inreg 8)
%y=getelementptr inbounds i8,i8*%x,i64 16
%z=bitcast i8*%y to i8*(i8*,i8*)**
%A=load i8*(i8*,i8*)*,i8*(i8*,i8*)**%z,align 8
%B=bitcast i8*%x to i8**
%C=load i8*,i8**%B,align 8
store i8*%C,i8**%e,align 8
%D=call fastcc i8*@_SMLFN4List5foldlE(i32 inreg 1,i32 inreg 8,i32 inreg 1,i32 inreg 8)
%E=getelementptr inbounds i8,i8*%D,i64 16
%F=bitcast i8*%E to i8*(i8*,i8*)**
%G=load i8*(i8*,i8*)*,i8*(i8*,i8*)**%F,align 8
%H=bitcast i8*%D to i8**
%I=load i8*,i8**%H,align 8
%J=call fastcc i8*%G(i8*inreg%I,i8*inreg 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*))
%K=getelementptr inbounds i8,i8*%J,i64 16
%L=bitcast i8*%K to i8*(i8*,i8*)**
%M=load i8*(i8*,i8*)*,i8*(i8*,i8*)**%L,align 8
%N=bitcast i8*%J to i8**
%O=load i8*,i8**%N,align 8
%P=call fastcc i8*%M(i8*inreg%O,i8*inreg bitcast(i32*getelementptr inbounds(<{[4x i8],i32,i32,[4x i8],i8*,i32}>,<{[4x i8],i32,i32,[4x i8],i8*,i32}>*@i,i64 0,i32 2)to i8*))
%Q=getelementptr inbounds i8,i8*%P,i64 16
%R=bitcast i8*%Q to i8*(i8*,i8*)**
%S=load i8*(i8*,i8*)*,i8*(i8*,i8*)**%R,align 8
%T=bitcast i8*%P to i8**
%U=load i8*,i8**%T,align 8
%V=load i8*,i8**%c,align 8
store i8*null,i8**%c,align 8
%W=call fastcc i8*%S(i8*inreg%U,i8*inreg%V)
%X=getelementptr inbounds i8,i8*%W,i64 8
%Y=bitcast i8*%X to i8**
%Z=load i8*,i8**%Y,align 8
%aa=load i8*,i8**%e,align 8
store i8*null,i8**%e,align 8
%ab=call fastcc i8*%A(i8*inreg%aa,i8*inreg%Z)
%ac=load i8*,i8**%f,align 8
store i8*null,i8**%f,align 8
%ad=call fastcc i8*%u(i8*inreg%ac,i8*inreg%ab)
store i8*%ad,i8**%c,align 8
%ae=icmp eq i8*%ad,null
br i1%ae,label%af,label%ag
af:
ret void
ag:
%ah=call fastcc i8*@_SMLFN4List3appE(i32 inreg 1,i32 inreg 8)
%ai=getelementptr inbounds i8,i8*%ah,i64 16
%aj=bitcast i8*%ai to i8*(i8*,i8*)**
%ak=load i8*(i8*,i8*)*,i8*(i8*,i8*)**%aj,align 8
%al=bitcast i8*%ah to i8**
%am=load i8*,i8**%al,align 8
store i8*%am,i8**%f,align 8
%an=bitcast i8**%d to i8***
%ao=load i8**,i8***%an,align 8
%ap=load i8*,i8**%ao,align 8
store i8*%ap,i8**%e,align 8
%aq=getelementptr inbounds i8*,i8**%ao,i64 1
%ar=load i8*,i8**%aq,align 8
store i8*%ar,i8**%d,align 8
%as=call i8*@sml_alloc(i32 inreg 20)#0
%at=getelementptr inbounds i8,i8*%as,i64 -4
%au=bitcast i8*%at to i32*
store i32 1342177296,i32*%au,align 4
store i8*%as,i8**%g,align 8
%av=load i8*,i8**%e,align 8
store i8*null,i8**%e,align 8
%aw=bitcast i8*%as to i8**
store i8*%av,i8**%aw,align 8
%ax=load i8*,i8**%d,align 8
store i8*null,i8**%d,align 8
%ay=getelementptr inbounds i8,i8*%as,i64 8
%az=bitcast i8*%ay to i8**
store i8*%ax,i8**%az,align 8
%aA=getelementptr inbounds i8,i8*%as,i64 16
%aB=bitcast i8*%aA to i32*
store i32 3,i32*%aB,align 4
%aC=call i8*@sml_alloc(i32 inreg 28)#0
%aD=getelementptr inbounds i8,i8*%aC,i64 -4
%aE=bitcast i8*%aD to i32*
store i32 1342177304,i32*%aE,align 4
%aF=load i8*,i8**%g,align 8
store i8*null,i8**%g,align 8
%aG=bitcast i8*%aC to i8**
store i8*%aF,i8**%aG,align 8
%aH=getelementptr inbounds i8,i8*%aC,i64 8
%aI=bitcast i8*%aH to void(...)**
store void(...)*bitcast(void(i8*,i8*)*@_SMLLN12TypedCalcCon4eqTyE_284 to void(...)*),void(...)**%aI,align 8
%aJ=getelementptr inbounds i8,i8*%aC,i64 16
%aK=bitcast i8*%aJ to void(...)**
store void(...)*bitcast(i8*(i8*,i8*)*@_SMLLN12TypedCalcCon4eqTyE_678 to void(...)*),void(...)**%aK,align 8
%aL=getelementptr inbounds i8,i8*%aC,i64 24
%aM=bitcast i8*%aL to i32*
store i32 -2147483647,i32*%aM,align 4
%aN=load i8*,i8**%f,align 8
store i8*null,i8**%f,align 8
%aO=call fastcc i8*%ak(i8*inreg%aN,i8*inreg%aC)
%aP=getelementptr inbounds i8,i8*%aO,i64 16
%aQ=bitcast i8*%aP to i8*(i8*,i8*)**
%aR=load i8*(i8*,i8*)*,i8*(i8*,i8*)**%aQ,align 8
%aS=bitcast i8*%aO to i8**
%aT=load i8*,i8**%aS,align 8
%aU=load i8*,i8**%c,align 8
store i8*null,i8**%c,align 8
%aV=call fastcc i8*%aR(i8*inreg%aT,i8*inreg%aU)
ret void
}
define internal fastcc i8*@_SMLLN12TypedCalcCon4eqTyE_286(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=bitcast i8*%a to i8**
%g=load i8*,i8**%f,align 8
store i8*%g,i8**%d,align 8
%h=call i8*@sml_alloc(i32 inreg 20)#0
%i=getelementptr inbounds i8,i8*%h,i64 -4
%j=bitcast i8*%i to i32*
store i32 1342177296,i32*%j,align 4
store i8*%h,i8**%e,align 8
%k=load i8*,i8**%d,align 8
store i8*null,i8**%d,align 8
%l=bitcast i8*%h to i8**
store i8*%k,i8**%l,align 8
%m=load i8*,i8**%c,align 8
store i8*null,i8**%c,align 8
%n=getelementptr inbounds i8,i8*%h,i64 8
%o=bitcast i8*%n to i8**
store i8*%m,i8**%o,align 8
%p=getelementptr inbounds i8,i8*%h,i64 16
%q=bitcast i8*%p to i32*
store i32 3,i32*%q,align 4
%r=call i8*@sml_alloc(i32 inreg 28)#0
%s=getelementptr inbounds i8,i8*%r,i64 -4
%t=bitcast i8*%s to i32*
store i32 1342177304,i32*%t,align 4
%u=load i8*,i8**%e,align 8
%v=bitcast i8*%r to i8**
store i8*%u,i8**%v,align 8
%w=getelementptr inbounds i8,i8*%r,i64 8
%x=bitcast i8*%w to void(...)**
store void(...)*bitcast(void(i8*,i8*)*@_SMLLN12TypedCalcCon4eqTyE_285 to void(...)*),void(...)**%x,align 8
%y=getelementptr inbounds i8,i8*%r,i64 16
%z=bitcast i8*%y to void(...)**
store void(...)*bitcast(i8*(i8*,i8*)*@_SMLLN12TypedCalcCon4eqTyE_679 to void(...)*),void(...)**%z,align 8
%A=getelementptr inbounds i8,i8*%r,i64 24
%B=bitcast i8*%A to i32*
store i32 -2147483647,i32*%B,align 4
ret i8*%r
}
define internal fastcc i8*@_SMLLN12TypedCalcCon4eqTyE_287(i8*inreg%a)unnamed_addr#4 gc"smlsharp"{
%b=alloca i8*,align 8
%c=alloca i8*,align 8
call void@llvm.gcroot(i8**%b,i8*null)#0
call void@llvm.gcroot(i8**%c,i8*null)#0
store i8*%a,i8**%b,align 8
%d=call i8*@sml_alloc(i32 inreg 12)#0
%e=getelementptr inbounds i8,i8*%d,i64 -4
%f=bitcast i8*%e to i32*
store i32 1342177288,i32*%f,align 4
store i8*%d,i8**%c,align 8
%g=load i8*,i8**%b,align 8
store i8*null,i8**%b,align 8
%h=bitcast i8*%d to i8**
store i8*%g,i8**%h,align 8
%i=getelementptr inbounds i8,i8*%d,i64 8
%j=bitcast i8*%i to i32*
store i32 1,i32*%j,align 4
%k=call i8*@sml_alloc(i32 inreg 28)#0
%l=getelementptr inbounds i8,i8*%k,i64 -4
%m=bitcast i8*%l to i32*
store i32 1342177304,i32*%m,align 4
%n=load i8*,i8**%c,align 8
%o=bitcast i8*%k to i8**
store i8*%n,i8**%o,align 8
%p=getelementptr inbounds i8,i8*%k,i64 8
%q=bitcast i8*%p to void(...)**
store void(...)*bitcast(i8*(i8*,i8*)*@_SMLLN12TypedCalcCon4eqTyE_286 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*)*@_SMLLN12TypedCalcCon4eqTyE_286 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*@_SMLFN12TypedCalcCon9TPREIFYTYE(i8*inreg%a)#2 gc"smlsharp"{
l:
%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=load atomic i32,i32*@sml_check_flag unordered,align 4
%g=icmp eq i32%f,0
br i1%g,label%j,label%h
h:
call void@sml_check(i32 inreg%f)
%i=load i8*,i8**%b,align 8
br label%j
j:
%k=phi i8*[%i,%h],[%a,%l]
store i8*null,i8**%b,align 8
%m=bitcast i8*%k to i8**
%n=load i8*,i8**%m,align 8
store i8*%n,i8**%c,align 8
%o=getelementptr inbounds i8,i8*%k,i64 8
%p=bitcast i8*%o to i8**
%q=load i8*,i8**%p,align 8
store i8*%q,i8**%d,align 8
%r=call fastcc i8*@_SMLFN13ReifiedTyData7TyRepTyE(i8*inreg%q)
store i8*%r,i8**%b,align 8
%s=call i8*@sml_alloc(i32 inreg 20)#0
%t=getelementptr inbounds i8,i8*%s,i64 -4
%u=bitcast i8*%t to i32*
store i32 1342177296,i32*%u,align 4
store i8*%s,i8**%e,align 8
%v=load i8*,i8**%c,align 8
store i8*null,i8**%c,align 8
%w=bitcast i8*%s to i8**
store i8*%v,i8**%w,align 8
%x=load i8*,i8**%d,align 8
store i8*null,i8**%d,align 8
%y=getelementptr inbounds i8,i8*%s,i64 8
%z=bitcast i8*%y to i8**
store i8*%x,i8**%z,align 8
%A=getelementptr inbounds i8,i8*%s,i64 16
%B=bitcast i8*%A to i32*
store i32 3,i32*%B,align 4
%C=call i8*@sml_alloc(i32 inreg 20)#0
%D=getelementptr inbounds i8,i8*%C,i64 -4
%E=bitcast i8*%D to i32*
store i32 1342177296,i32*%E,align 4
store i8*%C,i8**%c,align 8
%F=getelementptr inbounds i8,i8*%C,i64 4
%G=bitcast i8*%F to i32*
store i32 0,i32*%G,align 1
%H=bitcast i8*%C to i32*
store i32 34,i32*%H,align 4
%I=load i8*,i8**%e,align 8
store i8*null,i8**%e,align 8
%J=getelementptr inbounds i8,i8*%C,i64 8
%K=bitcast i8*%J to i8**
store i8*%I,i8**%K,align 8
%L=getelementptr inbounds i8,i8*%C,i64 16
%M=bitcast i8*%L to i32*
store i32 2,i32*%M,align 4
%N=call i8*@sml_alloc(i32 inreg 20)#0
%O=getelementptr inbounds i8,i8*%N,i64 -4
%P=bitcast i8*%O to i32*
store i32 1342177296,i32*%P,align 4
%Q=load i8*,i8**%c,align 8
%R=bitcast i8*%N to i8**
store i8*%Q,i8**%R,align 8
%S=load i8*,i8**%b,align 8
%T=getelementptr inbounds i8,i8*%N,i64 8
%U=bitcast i8*%T to i8**
store i8*%S,i8**%U,align 8
%V=getelementptr inbounds i8,i8*%N,i64 16
%W=bitcast i8*%V to i32*
store i32 3,i32*%W,align 4
ret i8*%N
}
define internal fastcc void@_SMLL1f_292(i8*inreg%a,i32 inreg%b)#2 gc"smlsharp"{
%c=alloca i8*,align 8
%d=alloca i8*,align 8
%e=alloca i8*,align 8
%f=alloca i8*,align 8
call void@llvm.gcroot(i8**%c,i8*null)#0
call void@llvm.gcroot(i8**%d,i8*null)#0
call void@llvm.gcroot(i8**%e,i8*null)#0
call void@llvm.gcroot(i8**%f,i8*null)#0
store i8*%a,i8**%c,align 8
%g=load atomic i32,i32*@sml_check_flag unordered,align 4
%h=icmp eq i32%g,0
br i1%h,label%j,label%i
i:
call void@sml_check(i32 inreg%g)
br label%j
j:
%k=call fastcc i8*@_SMLLN12TypedCalcCon4eqTyE_287(i8*inreg getelementptr inbounds(<{[4x i8],i32,[7x i8]}>,<{[4x i8],i32,[7x i8]}>*@n,i64 0,i32 2,i64 0))
%l=getelementptr inbounds i8,i8*%k,i64 16
%m=bitcast i8*%l to i8*(i8*,i8*)**
%n=load i8*(i8*,i8*)*,i8*(i8*,i8*)**%m,align 8
%o=bitcast i8*%k to i8**
%p=load i8*,i8**%o,align 8
%q=load i8*,i8**%c,align 8
%r=getelementptr inbounds i8,i8*%q,i64 16
%s=bitcast i8*%r to i8**
%t=load i8*,i8**%s,align 8
%u=call fastcc i8*%n(i8*inreg%p,i8*inreg%t)
%v=getelementptr inbounds i8,i8*%u,i64 16
%w=bitcast i8*%v to i8*(i8*,i8*)**
%x=load i8*(i8*,i8*)*,i8*(i8*,i8*)**%w,align 8
%y=bitcast i8*%u to i8**
%z=load i8*,i8**%y,align 8
store i8*%z,i8**%f,align 8
%A=bitcast i8**%c to i8***
%B=load i8**,i8***%A,align 8
%C=load i8*,i8**%B,align 8
store i8*%C,i8**%d,align 8
store i8*null,i8**%c,align 8
%D=getelementptr inbounds i8*,i8**%B,i64 1
%E=load i8*,i8**%D,align 8
store i8*%E,i8**%e,align 8
%F=call i8*@sml_alloc(i32 inreg 20)#0
%G=getelementptr inbounds i8,i8*%F,i64 -4
%H=bitcast i8*%G to i32*
store i32 1342177296,i32*%H,align 4
store i8*%F,i8**%c,align 8
%I=load i8*,i8**%d,align 8
store i8*null,i8**%d,align 8
%J=bitcast i8*%F to i8**
store i8*%I,i8**%J,align 8
%K=load i8*,i8**%e,align 8
store i8*null,i8**%e,align 8
%L=getelementptr inbounds i8,i8*%F,i64 8
%M=bitcast i8*%L to i8**
store i8*%K,i8**%M,align 8
%N=getelementptr inbounds i8,i8*%F,i64 16
%O=bitcast i8*%N to i32*
store i32 3,i32*%O,align 4
%P=call i8*@sml_alloc(i32 inreg 20)#0
%Q=getelementptr inbounds i8,i8*%P,i64 -4
%R=bitcast i8*%Q to i32*
store i32 1342177296,i32*%R,align 4
%S=load i8*,i8**%c,align 8
store i8*null,i8**%c,align 8
%T=bitcast i8*%P to i8**
store i8*%S,i8**%T,align 8
%U=getelementptr inbounds i8,i8*%P,i64 8
%V=bitcast i8*%U to i8**
store i8*null,i8**%V,align 8
%W=getelementptr inbounds i8,i8*%P,i64 16
%X=bitcast i8*%W to i32*
store i32 3,i32*%X,align 4
%Y=load i8*,i8**%f,align 8
store i8*null,i8**%f,align 8
%Z=call fastcc i8*%x(i8*inreg%Y,i8*inreg%P)
ret void
}
define fastcc i8*@_SMLFN12TypedCalcCon6TPCASTE(i8*inreg%a)#2 gc"smlsharp"{
n:
%b=alloca i8*,align 8
%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**%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
call void@llvm.gcroot(i8**%f,i8*null)#0
call void@llvm.gcroot(i8**%g,i8*null)#0
store i8*%a,i8**%b,align 8
%h=load atomic i32,i32*@sml_check_flag unordered,align 4
%i=icmp eq i32%h,0
br i1%i,label%l,label%j
j:
call void@sml_check(i32 inreg%h)
%k=load i8*,i8**%b,align 8
br label%l
l:
%m=phi i8*[%k,%j],[%a,%n]
%o=bitcast i8*%m to i8**
%p=bitcast i8*%m to i8****
%q=load i8***,i8****%p,align 8
%r=load i8**,i8***%q,align 8
%s=load i8*,i8**%r,align 8
store i8*%s,i8**%b,align 8
%t=bitcast i8*%m to i8***
%u=load i8**,i8***%t,align 8
%v=load i8*,i8**%u,align 8
%w=getelementptr inbounds i8,i8*%v,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**%o,align 8
%A=getelementptr inbounds i8,i8*%z,i64 8
%B=bitcast i8*%A to i8**
%C=load i8*,i8**%B,align 8
store i8*%C,i8**%d,align 8
%D=getelementptr inbounds i8,i8*%m,i64 8
%E=bitcast i8*%D to i8**
%F=load i8*,i8**%E,align 8
store i8*%F,i8**%e,align 8
%G=getelementptr inbounds i8,i8*%m,i64 16
%H=bitcast i8*%G to i8**
%I=load i8*,i8**%H,align 8
store i8*%I,i8**%f,align 8
%J=call i8*@sml_alloc(i32 inreg 28)#0
%K=getelementptr inbounds i8,i8*%J,i64 -4
%L=bitcast i8*%K to i32*
store i32 1342177304,i32*%L,align 4
store i8*%J,i8**%g,align 8
%M=load i8*,i8**%c,align 8
%N=bitcast i8*%J to i8**
store i8*%M,i8**%N,align 8
%O=load i8*,i8**%d,align 8
store i8*null,i8**%d,align 8
%P=getelementptr inbounds i8,i8*%J,i64 8
%Q=bitcast i8*%P to i8**
store i8*%O,i8**%Q,align 8
%R=load i8*,i8**%f,align 8
%S=getelementptr inbounds i8,i8*%J,i64 16
%T=bitcast i8*%S to i8**
store i8*%R,i8**%T,align 8
%U=getelementptr inbounds i8,i8*%J,i64 24
%V=bitcast i8*%U to i32*
store i32 7,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**%g,align 8
%aa=bitcast i8*%W to i8**
store i8*%Z,i8**%aa,align 8
%ab=getelementptr inbounds i8,i8*%W,i64 8
%ac=bitcast i8*%ab to void(...)**
store void(...)*bitcast(void(i8*,i32)*@_SMLL1f_292 to void(...)*),void(...)**%ac,align 8
%ad=getelementptr inbounds i8,i8*%W,i64 16
%ae=bitcast i8*%ad to void(...)**
store void(...)*bitcast(i8*(i8*,i8*)*@_SMLL1f_682 to void(...)*),void(...)**%ae,align 8
%af=getelementptr inbounds i8,i8*%W,i64 24
%ag=bitcast i8*%af to i32*
store i32 -2147483647,i32*%ag,align 4
%ah=load i32*,i32**bitcast(i8**@_SMLZN7Control9checkTypeE to i32**),align 8
%ai=load i32,i32*%ah,align 4
%aj=icmp eq i32%ai,0
store i8*null,i8**%g,align 8
br i1%aj,label%al,label%ak
ak:
call fastcc void@_SMLL1f_292(i8*inreg%Z,i32 inreg 0)
br label%al
al:
%am=call i8*@sml_alloc(i32 inreg 20)#0
%an=getelementptr inbounds i8,i8*%am,i64 -4
%ao=bitcast i8*%an to i32*
store i32 1342177296,i32*%ao,align 4
store i8*%am,i8**%d,align 8
%ap=load i8*,i8**%b,align 8
store i8*null,i8**%b,align 8
%aq=bitcast i8*%am to i8**
store i8*%ap,i8**%aq,align 8
%ar=load i8*,i8**%c,align 8
store i8*null,i8**%c,align 8
%as=getelementptr inbounds i8,i8*%am,i64 8
%at=bitcast i8*%as to i8**
store i8*%ar,i8**%at,align 8
%au=getelementptr inbounds i8,i8*%am,i64 16
%av=bitcast i8*%au to i32*
store i32 3,i32*%av,align 4
%aw=call i8*@sml_alloc(i32 inreg 28)#0
%ax=getelementptr inbounds i8,i8*%aw,i64 -4
%ay=bitcast i8*%ax to i32*
store i32 1342177304,i32*%ay,align 4
store i8*%aw,i8**%b,align 8
%az=load i8*,i8**%d,align 8
store i8*null,i8**%d,align 8
%aA=bitcast i8*%aw to i8**
store i8*%az,i8**%aA,align 8
%aB=load i8*,i8**%e,align 8
%aC=getelementptr inbounds i8,i8*%aw,i64 8
%aD=bitcast i8*%aC to i8**
store i8*%aB,i8**%aD,align 8
%aE=load i8*,i8**%f,align 8
store i8*null,i8**%f,align 8
%aF=getelementptr inbounds i8,i8*%aw,i64 16
%aG=bitcast i8*%aF to i8**
store i8*%aE,i8**%aG,align 8
%aH=getelementptr inbounds i8,i8*%aw,i64 24
%aI=bitcast i8*%aH to i32*
store i32 7,i32*%aI,align 4
%aJ=call i8*@sml_alloc(i32 inreg 20)#0
%aK=getelementptr inbounds i8,i8*%aJ,i64 -4
%aL=bitcast i8*%aK to i32*
store i32 1342177296,i32*%aL,align 4
store i8*%aJ,i8**%c,align 8
%aM=getelementptr inbounds i8,i8*%aJ,i64 4
%aN=bitcast i8*%aM to i32*
store i32 0,i32*%aN,align 1
%aO=bitcast i8*%aJ to i32*
store i32 3,i32*%aO,align 4
%aP=load i8*,i8**%b,align 8
store i8*null,i8**%b,align 8
%aQ=getelementptr inbounds i8,i8*%aJ,i64 8
%aR=bitcast i8*%aQ to i8**
store i8*%aP,i8**%aR,align 8
%aS=getelementptr inbounds i8,i8*%aJ,i64 16
%aT=bitcast i8*%aS to i32*
store i32 2,i32*%aT,align 4
%aU=call i8*@sml_alloc(i32 inreg 20)#0
%aV=getelementptr inbounds i8,i8*%aU,i64 -4
%aW=bitcast i8*%aV to i32*
store i32 1342177296,i32*%aW,align 4
%aX=load i8*,i8**%c,align 8
%aY=bitcast i8*%aU to i8**
store i8*%aX,i8**%aY,align 8
%aZ=load i8*,i8**%e,align 8
%a0=getelementptr inbounds i8,i8*%aU,i64 8
%a1=bitcast i8*%a0 to i8**
store i8*%aZ,i8**%a1,align 8
%a2=getelementptr inbounds i8,i8*%aU,i64 16
%a3=bitcast i8*%a2 to i32*
store i32 3,i32*%a3,align 4
ret i8*%aU
}
define internal fastcc void@_SMLL1f_299(i8*inreg%a,i32 inreg%b)#2 gc"smlsharp"{
%c=alloca i8*,align 8
%d=alloca i8*,align 8
%e=alloca i8*,align 8
%f=alloca i8*,align 8
%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**%d,align 8
%h=load atomic i32,i32*@sml_check_flag unordered,align 4
%i=icmp eq i32%h,0
br i1%i,label%k,label%j
j:
call void@sml_check(i32 inreg%h)
br label%k
k:
%l=call fastcc i8*@_SMLLN12TypedCalcCon4eqTyE_287(i8*inreg getelementptr inbounds(<{[4x i8],i32,[16x i8]}>,<{[4x i8],i32,[16x i8]}>*@q,i64 0,i32 2,i64 0))
%m=getelementptr inbounds i8,i8*%l,i64 16
%n=bitcast i8*%m to i8*(i8*,i8*)**
%o=load i8*(i8*,i8*)*,i8*(i8*,i8*)**%n,align 8
%p=bitcast i8*%l to i8**
%q=load i8*,i8**%p,align 8
%r=load i8*,i8**%d,align 8
%s=getelementptr inbounds i8,i8*%r,i64 8
%t=bitcast i8*%s to i8**
%u=load i8*,i8**%t,align 8
%v=call fastcc i8*%o(i8*inreg%q,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**
%A=load i8*,i8**%z,align 8
store i8*%A,i8**%g,align 8
%B=load i8*,i8**%d,align 8
%C=getelementptr inbounds i8,i8*%B,i64 24
%D=bitcast i8*%C to i8**
%E=load i8*,i8**%D,align 8
store i8*%E,i8**%e,align 8
%F=bitcast i8*%B to i8**
%G=load i8*,i8**%F,align 8
store i8*%G,i8**%f,align 8
%H=call i8*@sml_alloc(i32 inreg 20)#0
%I=getelementptr inbounds i8,i8*%H,i64 -4
%J=bitcast i8*%I to i32*
store i32 1342177296,i32*%J,align 4
store i8*%H,i8**%c,align 8
%K=load i8*,i8**%e,align 8
store i8*null,i8**%e,align 8
%L=bitcast i8*%H to i8**
store i8*%K,i8**%L,align 8
%M=load i8*,i8**%f,align 8
store i8*null,i8**%f,align 8
%N=getelementptr inbounds i8,i8*%H,i64 8
%O=bitcast i8*%N to i8**
store i8*%M,i8**%O,align 8
%P=getelementptr inbounds i8,i8*%H,i64 16
%Q=bitcast i8*%P to i32*
store i32 3,i32*%Q,align 4
%R=call i8*@sml_alloc(i32 inreg 20)#0
%S=getelementptr inbounds i8,i8*%R,i64 -4
%T=bitcast i8*%S to i32*
store i32 1342177296,i32*%T,align 4
%U=load i8*,i8**%c,align 8
store i8*null,i8**%c,align 8
%V=bitcast i8*%R to i8**
store i8*%U,i8**%V,align 8
%W=getelementptr inbounds i8,i8*%R,i64 8
%X=bitcast i8*%W to i8**
store i8*null,i8**%X,align 8
%Y=getelementptr inbounds i8,i8*%R,i64 16
%Z=bitcast i8*%Y to i32*
store i32 3,i32*%Z,align 4
%aa=load i8*,i8**%g,align 8
store i8*null,i8**%g,align 8
%ab=call fastcc i8*%y(i8*inreg%aa,i8*inreg%R)
%ac=call fastcc i8*@_SMLLN12TypedCalcCon17mustBeCONSTRUCTtyE_274(i8*inreg getelementptr inbounds(<{[4x i8],i32,[16x i8]}>,<{[4x i8],i32,[16x i8]}>*@q,i64 0,i32 2,i64 0))
%ad=getelementptr inbounds i8,i8*%ac,i64 16
%ae=bitcast i8*%ad to i8*(i8*,i8*)**
%af=load i8*(i8*,i8*)*,i8*(i8*,i8*)**%ae,align 8
%ag=bitcast i8*%ac to i8**
%ah=load i8*,i8**%ag,align 8
%ai=load i8*,i8**%d,align 8
%aj=getelementptr inbounds i8,i8*%ai,i64 8
%ak=bitcast i8*%aj to i8**
%al=load i8*,i8**%ak,align 8
%am=call fastcc i8*%af(i8*inreg%ah,i8*inreg%al)
%an=getelementptr inbounds i8,i8*%am,i64 16
%ao=bitcast i8*%an to i8*(i8*,i8*)**
%ap=load i8*(i8*,i8*)*,i8*(i8*,i8*)**%ao,align 8
%aq=bitcast i8*%am to i8**
%ar=load i8*,i8**%aq,align 8
%as=load i8*,i8**%d,align 8
store i8*null,i8**%d,align 8
%at=getelementptr inbounds i8,i8*%as,i64 16
%au=bitcast i8*%at to i8**
%av=load i8*,i8**%au,align 8
%aw=getelementptr inbounds i8,i8*%av,i64 8
%ax=bitcast i8*%aw to i8**
%ay=load i8*,i8**%ax,align 8
%az=call fastcc i8*%ap(i8*inreg%ar,i8*inreg%ay)
ret void
}
define fastcc i8*@_SMLFN12TypedCalcCon15TPDATACONSTRUCTE(i8*inreg%a)#2 gc"smlsharp"{
p:
%b=alloca i8*,align 8
%c=alloca i8*,align 8
%d=alloca i8*,align 8
%e=alloca i8*,align 8
%f=alloca i8*,align 8
%g=alloca i8*,align 8
%h=alloca i8*,align 8
%i=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
call void@llvm.gcroot(i8**%f,i8*null)#0
call void@llvm.gcroot(i8**%g,i8*null)#0
call void@llvm.gcroot(i8**%h,i8*null)#0
call void@llvm.gcroot(i8**%i,i8*null)#0
store i8*%a,i8**%b,align 8
%j=load atomic i32,i32*@sml_check_flag unordered,align 4
%k=icmp eq i32%j,0
br i1%k,label%n,label%l
l:
call void@sml_check(i32 inreg%j)
%m=load i8*,i8**%b,align 8
br label%n
n:
%o=phi i8*[%m,%l],[%a,%p]
%q=bitcast i8*%o to i8**
%r=load i8*,i8**%q,align 8
%s=icmp eq i8*%r,null
br i1%s,label%t,label%aV
t:
%u=getelementptr inbounds i8,i8*%o,i64 8
%v=bitcast i8*%u to i8**
%w=load i8*,i8**%v,align 8
store i8*%w,i8**%b,align 8
%x=getelementptr inbounds i8,i8*%o,i64 16
%y=bitcast i8*%x to i8**
%z=load i8*,i8**%y,align 8
store i8*%z,i8**%c,align 8
%A=getelementptr inbounds i8,i8*%o,i64 24
%B=bitcast i8*%A to i8**
%C=load i8*,i8**%B,align 8
store i8*%C,i8**%d,align 8
%D=getelementptr inbounds i8,i8*%w,i64 16
%E=bitcast i8*%D to i8**
%F=load i8*,i8**%E,align 8
store i8*%F,i8**%e,align 8
%G=call i8*@sml_alloc(i32 inreg 20)#0
%H=getelementptr inbounds i8,i8*%G,i64 -4
%I=bitcast i8*%H to i32*
store i32 1342177296,i32*%I,align 4
%J=load i8*,i8**%e,align 8
store i8*null,i8**%e,align 8
%K=bitcast i8*%G to i8**
store i8*%J,i8**%K,align 8
%L=load i8*,i8**%c,align 8
%M=getelementptr inbounds i8,i8*%G,i64 8
%N=bitcast i8*%M to i8**
store i8*%L,i8**%N,align 8
%O=getelementptr inbounds i8,i8*%G,i64 16
%P=bitcast i8*%O to i32*
store i32 3,i32*%P,align 4
%Q=call fastcc i8*@_SMLLN12TypedCalcCon11instantiateE_245(i8*inreg%G)
store i8*%Q,i8**%e,align 8
%R=load i32*,i32**bitcast(i8**@_SMLZN7Control9checkTypeE to i32**),align 8
%S=load i32,i32*%R,align 4
%T=icmp eq i32%S,0
br i1%T,label%ak,label%U
U:
%V=call fastcc i8*@_SMLLN12TypedCalcCon17mustBeCONSTRUCTtyE_274(i8*inreg getelementptr inbounds(<{[4x i8],i32,[16x i8]}>,<{[4x i8],i32,[16x i8]}>*@q,i64 0,i32 2,i64 0))
%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
%ab=load i8*,i8**%d,align 8
%ac=call fastcc i8*%Y(i8*inreg%aa,i8*inreg%ab)
%ad=getelementptr inbounds i8,i8*%ac,i64 16
%ae=bitcast i8*%ad to i8*(i8*,i8*)**
%af=load i8*(i8*,i8*)*,i8*(i8*,i8*)**%ae,align 8
%ag=bitcast i8*%ac to i8**
%ah=load i8*,i8**%ag,align 8
%ai=load i8*,i8**%e,align 8
%aj=call fastcc i8*%af(i8*inreg%ah,i8*inreg%ai)
br label%ak
ak:
%al=call i8*@sml_alloc(i32 inreg 36)#0
%am=getelementptr inbounds i8,i8*%al,i64 -4
%an=bitcast i8*%am to i32*
store i32 1342177312,i32*%an,align 4
store i8*%al,i8**%f,align 8
%ao=bitcast i8*%al to i8**
store i8*null,i8**%ao,align 8
%ap=load i8*,i8**%b,align 8
store i8*null,i8**%b,align 8
%aq=getelementptr inbounds i8,i8*%al,i64 8
%ar=bitcast i8*%aq to i8**
store i8*%ap,i8**%ar,align 8
%as=load i8*,i8**%c,align 8
store i8*null,i8**%c,align 8
%at=getelementptr inbounds i8,i8*%al,i64 16
%au=bitcast i8*%at to i8**
store i8*%as,i8**%au,align 8
%av=load i8*,i8**%d,align 8
store i8*null,i8**%d,align 8
%aw=getelementptr inbounds i8,i8*%al,i64 24
%ax=bitcast i8*%aw to i8**
store i8*%av,i8**%ax,align 8
%ay=getelementptr inbounds i8,i8*%al,i64 32
%az=bitcast i8*%ay to i32*
store i32 15,i32*%az,align 4
%aA=call i8*@sml_alloc(i32 inreg 20)#0
%aB=getelementptr inbounds i8,i8*%aA,i64 -4
%aC=bitcast i8*%aB to i32*
store i32 1342177296,i32*%aC,align 4
store i8*%aA,i8**%b,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 6,i32*%aF,align 4
%aG=load i8*,i8**%f,align 8
store i8*null,i8**%f,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**%b,align 8
%aP=bitcast i8*%aL to i8**
store i8*%aO,i8**%aP,align 8
%aQ=load i8*,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
ret i8*%aL
aV:
%aW=bitcast i8*%r to i8**
%aX=load i8*,i8**%aW,align 8
store i8*%aX,i8**%c,align 8
%aY=getelementptr inbounds i8,i8*%aX,i64 8
%aZ=bitcast i8*%aY to i8**
%a0=load i8*,i8**%aZ,align 8
store i8*%a0,i8**%b,align 8
%a1=getelementptr inbounds i8,i8*%o,i64 8
%a2=bitcast i8*%a1 to i8**
%a3=load i8*,i8**%a2,align 8
store i8*%a3,i8**%d,align 8
%a4=getelementptr inbounds i8,i8*%o,i64 16
%a5=bitcast i8*%a4 to i8**
%a6=load i8*,i8**%a5,align 8
store i8*%a6,i8**%e,align 8
%a7=getelementptr inbounds i8,i8*%o,i64 24
%a8=bitcast i8*%a7 to i8**
%a9=load i8*,i8**%a8,align 8
store i8*%a9,i8**%f,align 8
%ba=getelementptr inbounds i8,i8*%a3,i64 16
%bb=bitcast i8*%ba to i8**
%bc=load i8*,i8**%bb,align 8
store i8*%bc,i8**%g,align 8
%bd=call i8*@sml_alloc(i32 inreg 20)#0
%be=getelementptr inbounds i8,i8*%bd,i64 -4
%bf=bitcast i8*%be to i32*
store i32 1342177296,i32*%bf,align 4
%bg=load i8*,i8**%g,align 8
store i8*null,i8**%g,align 8
%bh=bitcast i8*%bd to i8**
store i8*%bg,i8**%bh,align 8
%bi=load i8*,i8**%e,align 8
%bj=getelementptr inbounds i8,i8*%bd,i64 8
%bk=bitcast i8*%bj to i8**
store i8*%bi,i8**%bk,align 8
%bl=getelementptr inbounds i8,i8*%bd,i64 16
%bm=bitcast i8*%bl to i32*
store i32 3,i32*%bm,align 4
%bn=call fastcc i8*@_SMLLN12TypedCalcCon11instantiateE_245(i8*inreg%bd)
%bo=icmp eq i8*%bn,null
br i1%bo,label%bt,label%bp
bp:
%bq=bitcast i8*%bn to i32*
%br=load i32,i32*%bq,align 4
%bs=icmp eq i32%br,6
br i1%bs,label%bu,label%bt
bt:
store i8*null,i8**%c,align 8
store i8*null,i8**%d,align 8
store i8*null,i8**%e,align 8
store i8*null,i8**%f,align 8
br label%c6
bu:
%bv=getelementptr inbounds i8,i8*%bn,i64 8
%bw=bitcast i8*%bv to i8**
%bx=load i8*,i8**%bw,align 8
store i8*%bx,i8**%g,align 8
%by=bitcast i8*%bx to i8**
%bz=load i8*,i8**%by,align 8
%bA=icmp eq i8*%bz,null
br i1%bA,label%bB,label%bC
bB:
store i8*null,i8**%c,align 8
store i8*null,i8**%d,align 8
store i8*null,i8**%e,align 8
store i8*null,i8**%f,align 8
store i8*null,i8**%g,align 8
br label%c6
bC:
%bD=bitcast i8*%bz to i8**
%bE=load i8*,i8**%bD,align 8
store i8*%bE,i8**%h,align 8
%bF=getelementptr inbounds i8,i8*%bz,i64 8
%bG=bitcast i8*%bF to i8**
%bH=load i8*,i8**%bG,align 8
%bI=icmp eq i8*%bH,null
br i1%bI,label%bJ,label%c5
bJ:
%bK=call i8*@sml_alloc(i32 inreg 36)#0
%bL=getelementptr inbounds i8,i8*%bK,i64 -4
%bM=bitcast i8*%bL to i32*
store i32 1342177312,i32*%bM,align 4
store i8*%bK,i8**%i,align 8
%bN=load i8*,i8**%b,align 8
store i8*null,i8**%b,align 8
%bO=bitcast i8*%bK to i8**
store i8*%bN,i8**%bO,align 8
%bP=load i8*,i8**%f,align 8
%bQ=getelementptr inbounds i8,i8*%bK,i64 8
%bR=bitcast i8*%bQ to i8**
store i8*%bP,i8**%bR,align 8
%bS=load i8*,i8**%g,align 8
%bT=getelementptr inbounds i8,i8*%bK,i64 16
%bU=bitcast i8*%bT to i8**
store i8*%bS,i8**%bU,align 8
%bV=load i8*,i8**%h,align 8
store i8*null,i8**%h,align 8
%bW=getelementptr inbounds i8,i8*%bK,i64 24
%bX=bitcast i8*%bW to i8**
store i8*%bV,i8**%bX,align 8
%bY=getelementptr inbounds i8,i8*%bK,i64 32
%bZ=bitcast i8*%bY to i32*
store i32 15,i32*%bZ,align 4
%b0=call i8*@sml_alloc(i32 inreg 28)#0
%b1=getelementptr inbounds i8,i8*%b0,i64 -4
%b2=bitcast i8*%b1 to i32*
store i32 1342177304,i32*%b2,align 4
%b3=load i8*,i8**%i,align 8
%b4=bitcast i8*%b0 to i8**
store i8*%b3,i8**%b4,align 8
%b5=getelementptr inbounds i8,i8*%b0,i64 8
%b6=bitcast i8*%b5 to void(...)**
store void(...)*bitcast(void(i8*,i32)*@_SMLL1f_299 to void(...)*),void(...)**%b6,align 8
%b7=getelementptr inbounds i8,i8*%b0,i64 16
%b8=bitcast i8*%b7 to void(...)**
store void(...)*bitcast(i8*(i8*,i8*)*@_SMLL1f_684 to void(...)*),void(...)**%b8,align 8
%b9=getelementptr inbounds i8,i8*%b0,i64 24
%ca=bitcast i8*%b9 to i32*
store i32 -2147483647,i32*%ca,align 4
%cb=load i32*,i32**bitcast(i8**@_SMLZN7Control9checkTypeE to i32**),align 8
%cc=load i32,i32*%cb,align 4
%cd=icmp eq i32%cc,0
store i8*null,i8**%i,align 8
br i1%cd,label%cf,label%ce
ce:
call fastcc void@_SMLL1f_299(i8*inreg%b3,i32 inreg 0)
br label%cf
cf:
%cg=load i8*,i8**%g,align 8
store i8*null,i8**%g,align 8
%ch=getelementptr inbounds i8,i8*%cg,i64 8
%ci=bitcast i8*%ch to i8**
%cj=load i8*,i8**%ci,align 8
store i8*%cj,i8**%b,align 8
%ck=bitcast i8**%c to i8***
%cl=load i8**,i8***%ck,align 8
%cm=load i8*,i8**%cl,align 8
store i8*%cm,i8**%c,align 8
%cn=call i8*@sml_alloc(i32 inreg 12)#0
%co=getelementptr inbounds i8,i8*%cn,i64 -4
%cp=bitcast i8*%co to i32*
store i32 1342177288,i32*%cp,align 4
store i8*%cn,i8**%g,align 8
%cq=load i8*,i8**%c,align 8
store i8*null,i8**%c,align 8
%cr=bitcast i8*%cn to i8**
store i8*%cq,i8**%cr,align 8
%cs=getelementptr inbounds i8,i8*%cn,i64 8
%ct=bitcast i8*%cs to i32*
store i32 1,i32*%ct,align 4
%cu=call i8*@sml_alloc(i32 inreg 36)#0
%cv=getelementptr inbounds i8,i8*%cu,i64 -4
%cw=bitcast i8*%cv to i32*
store i32 1342177312,i32*%cw,align 4
store i8*%cu,i8**%c,align 8
%cx=load i8*,i8**%g,align 8
store i8*null,i8**%g,align 8
%cy=bitcast i8*%cu to i8**
store i8*%cx,i8**%cy,align 8
%cz=load i8*,i8**%d,align 8
store i8*null,i8**%d,align 8
%cA=getelementptr inbounds i8,i8*%cu,i64 8
%cB=bitcast i8*%cA to i8**
store i8*%cz,i8**%cB,align 8
%cC=load i8*,i8**%e,align 8
store i8*null,i8**%e,align 8
%cD=getelementptr inbounds i8,i8*%cu,i64 16
%cE=bitcast i8*%cD to i8**
store i8*%cC,i8**%cE,align 8
%cF=load i8*,i8**%f,align 8
store i8*null,i8**%f,align 8
%cG=getelementptr inbounds i8,i8*%cu,i64 24
%cH=bitcast i8*%cG to i8**
store i8*%cF,i8**%cH,align 8
%cI=getelementptr inbounds i8,i8*%cu,i64 32
%cJ=bitcast i8*%cI to i32*
store i32 15,i32*%cJ,align 4
%cK=call i8*@sml_alloc(i32 inreg 20)#0
%cL=getelementptr inbounds i8,i8*%cK,i64 -4
%cM=bitcast i8*%cL to i32*
store i32 1342177296,i32*%cM,align 4
store i8*%cK,i8**%d,align 8
%cN=getelementptr inbounds i8,i8*%cK,i64 4
%cO=bitcast i8*%cN to i32*
store i32 0,i32*%cO,align 1
%cP=bitcast i8*%cK to i32*
store i32 6,i32*%cP,align 4
%cQ=load i8*,i8**%c,align 8
store i8*null,i8**%c,align 8
%cR=getelementptr inbounds i8,i8*%cK,i64 8
%cS=bitcast i8*%cR to i8**
store i8*%cQ,i8**%cS,align 8
%cT=getelementptr inbounds i8,i8*%cK,i64 16
%cU=bitcast i8*%cT to i32*
store i32 2,i32*%cU,align 4
%cV=call i8*@sml_alloc(i32 inreg 20)#0
%cW=getelementptr inbounds i8,i8*%cV,i64 -4
%cX=bitcast i8*%cW to i32*
store i32 1342177296,i32*%cX,align 4
%cY=load i8*,i8**%d,align 8
%cZ=bitcast i8*%cV to i8**
store i8*%cY,i8**%cZ,align 8
%c0=load i8*,i8**%b,align 8
%c1=getelementptr inbounds i8,i8*%cV,i64 8
%c2=bitcast i8*%c1 to i8**
store i8*%c0,i8**%c2,align 8
%c3=getelementptr inbounds i8,i8*%cV,i64 16
%c4=bitcast i8*%c3 to i32*
store i32 3,i32*%c4,align 4
ret i8*%cV
c5:
store i8*null,i8**%c,align 8
store i8*null,i8**%d,align 8
store i8*null,i8**%e,align 8
store i8*null,i8**%f,align 8
store i8*null,i8**%g,align 8
store i8*null,i8**%h,align 8
br label%c6
c6:
%c7=load i8*,i8**@_SMLZN3Bug3BugE,align 8
store i8*%c7,i8**%b,align 8
%c8=call i8*@sml_alloc(i32 inreg 28)#0
%c9=getelementptr inbounds i8,i8*%c8,i64 -4
%da=bitcast i8*%c9 to i32*
store i32 1342177304,i32*%da,align 4
store i8*%c8,i8**%c,align 8
%db=load i8*,i8**%b,align 8
store i8*null,i8**%b,align 8
%dc=bitcast i8*%c8 to i8**
store i8*%db,i8**%dc,align 8
%dd=getelementptr inbounds i8,i8*%c8,i64 8
%de=bitcast i8*%dd to i8**
store i8*getelementptr inbounds(<{[4x i8],i32,[70x i8]}>,<{[4x i8],i32,[70x i8]}>*@p,i64 0,i32 2,i64 0),i8**%de,align 8
%df=getelementptr inbounds i8,i8*%c8,i64 16
%dg=bitcast i8*%df to i8**
store i8*getelementptr inbounds(<{[4x i8],i32,[16x i8]}>,<{[4x i8],i32,[16x i8]}>*@q,i64 0,i32 2,i64 0),i8**%dg,align 8
%dh=getelementptr inbounds i8,i8*%c8,i64 24
%di=bitcast i8*%dh to i32*
store i32 7,i32*%di,align 4
%dj=call i8*@sml_alloc(i32 inreg 60)#0
%dk=getelementptr inbounds i8,i8*%dj,i64 -4
%dl=bitcast i8*%dk to i32*
store i32 1342177336,i32*%dl,align 4
%dm=getelementptr inbounds i8,i8*%dj,i64 56
%dn=bitcast i8*%dm to i32*
store i32 1,i32*%dn,align 4
%do=load i8*,i8**%c,align 8
%dp=bitcast i8*%dj to i8**
store i8*%do,i8**%dp,align 8
call void@sml_raise(i8*inreg%dj)#1
unreachable
}
define internal fastcc void@_SMLL1f_307(i8*inreg%a,i32 inreg%b)#2 gc"smlsharp"{
%c=alloca i8*,align 8
%d=alloca i8*,align 8
%e=alloca i8*,align 8
%f=alloca i8*,align 8
%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**%c,align 8
%h=load atomic i32,i32*@sml_check_flag unordered,align 4
%i=icmp eq i32%h,0
br i1%i,label%k,label%j
j:
call void@sml_check(i32 inreg%h)
br label%k
k:
%l=call fastcc i8*@_SMLLN12TypedCalcCon4eqTyE_287(i8*inreg getelementptr inbounds(<{[4x i8],i32,[13x i8]}>,<{[4x i8],i32,[13x i8]}>*@t,i64 0,i32 2,i64 0))
%m=getelementptr inbounds i8,i8*%l,i64 16
%n=bitcast i8*%m to i8*(i8*,i8*)**
%o=load i8*(i8*,i8*)*,i8*(i8*,i8*)**%n,align 8
%p=bitcast i8*%l to i8**
%q=load i8*,i8**%p,align 8
%r=load i8*,i8**%c,align 8
%s=getelementptr inbounds i8,i8*%r,i64 8
%t=bitcast i8*%s to i8**
%u=load i8*,i8**%t,align 8
%v=call fastcc i8*%o(i8*inreg%q,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**
%A=load i8*,i8**%z,align 8
store i8*%A,i8**%f,align 8
%B=load i8*,i8**%c,align 8
%C=getelementptr inbounds i8,i8*%B,i64 16
%D=bitcast i8*%C to i8**
%E=load i8*,i8**%D,align 8
store i8*%E,i8**%d,align 8
%F=call i8*@sml_alloc(i32 inreg 20)#0
%G=getelementptr inbounds i8,i8*%F,i64 -4
%H=bitcast i8*%G to i32*
store i32 1342177296,i32*%H,align 4
store i8*%F,i8**%g,align 8
%I=load i8*,i8**%d,align 8
%J=bitcast i8*%F to i8**
store i8*%I,i8**%J,align 8
%K=getelementptr inbounds i8,i8*%F,i64 8
%L=bitcast i8*%K to i8**
store i8*null,i8**%L,align 8
%M=getelementptr inbounds i8,i8*%F,i64 16
%N=bitcast i8*%M to i32*
store i32 3,i32*%N,align 4
%O=load i8*,i8**%c,align 8
%P=getelementptr inbounds i8,i8*%O,i64 24
%Q=bitcast i8*%P to i8**
%R=load i8*,i8**%Q,align 8
store i8*%R,i8**%d,align 8
%S=call i8*@sml_alloc(i32 inreg 20)#0
%T=getelementptr inbounds i8,i8*%S,i64 -4
%U=bitcast i8*%T to i32*
store i32 1342177296,i32*%U,align 4
store i8*%S,i8**%e,align 8
%V=load i8*,i8**%g,align 8
store i8*null,i8**%g,align 8
%W=bitcast i8*%S to i8**
store i8*%V,i8**%W,align 8
%X=load i8*,i8**%d,align 8
store i8*null,i8**%d,align 8
%Y=getelementptr inbounds i8,i8*%S,i64 8
%Z=bitcast i8*%Y to i8**
store i8*%X,i8**%Z,align 8
%aa=getelementptr inbounds i8,i8*%S,i64 16
%ab=bitcast i8*%aa to i32*
store i32 3,i32*%ab,align 4
%ac=call i8*@sml_alloc(i32 inreg 20)#0
%ad=getelementptr inbounds i8,i8*%ac,i64 -4
%ae=bitcast i8*%ad to i32*
store i32 1342177296,i32*%ae,align 4
store i8*%ac,i8**%g,align 8
%af=getelementptr inbounds i8,i8*%ac,i64 4
%ag=bitcast i8*%af to i32*
store i32 0,i32*%ag,align 1
%ah=bitcast i8*%ac to i32*
store i32 6,i32*%ah,align 4
%ai=load i8*,i8**%e,align 8
store i8*null,i8**%e,align 8
%aj=getelementptr inbounds i8,i8*%ac,i64 8
%ak=bitcast i8*%aj to i8**
store i8*%ai,i8**%ak,align 8
%al=getelementptr inbounds i8,i8*%ac,i64 16
%am=bitcast i8*%al to i32*
store i32 2,i32*%am,align 4
%an=bitcast i8**%c to i8***
%ao=load i8**,i8***%an,align 8
%ap=load i8*,i8**%ao,align 8
store i8*%ap,i8**%c,align 8
%aq=call i8*@sml_alloc(i32 inreg 20)#0
%ar=getelementptr inbounds i8,i8*%aq,i64 -4
%as=bitcast i8*%ar to i32*
store i32 1342177296,i32*%as,align 4
store i8*%aq,i8**%e,align 8
%at=load i8*,i8**%c,align 8
%au=bitcast i8*%aq to i8**
store i8*%at,i8**%au,align 8
%av=getelementptr inbounds i8,i8*%aq,i64 8
%aw=bitcast i8*%av to i8**
store i8*null,i8**%aw,align 8
%ax=getelementptr inbounds i8,i8*%aq,i64 16
%ay=bitcast i8*%ax to i32*
store i32 3,i32*%ay,align 4
%az=load i8*,i8**@_SMLZN12BuiltinTypes5exnTyE,align 8
store i8*%az,i8**%c,align 8
%aA=call i8*@sml_alloc(i32 inreg 20)#0
%aB=getelementptr inbounds i8,i8*%aA,i64 -4
%aC=bitcast i8*%aB to i32*
store i32 1342177296,i32*%aC,align 4
store i8*%aA,i8**%d,align 8
%aD=load i8*,i8**%e,align 8
store i8*null,i8**%e,align 8
%aE=bitcast i8*%aA to i8**
store i8*%aD,i8**%aE,align 8
%aF=load i8*,i8**%c,align 8
store i8*null,i8**%c,align 8
%aG=getelementptr inbounds i8,i8*%aA,i64 8
%aH=bitcast i8*%aG to i8**
store i8*%aF,i8**%aH,align 8
%aI=getelementptr inbounds i8,i8*%aA,i64 16
%aJ=bitcast i8*%aI to i32*
store i32 3,i32*%aJ,align 4
%aK=call i8*@sml_alloc(i32 inreg 20)#0
%aL=getelementptr inbounds i8,i8*%aK,i64 -4
%aM=bitcast i8*%aL to i32*
store i32 1342177296,i32*%aM,align 4
store i8*%aK,i8**%e,align 8
%aN=getelementptr inbounds i8,i8*%aK,i64 4
%aO=bitcast i8*%aN to i32*
store i32 0,i32*%aO,align 1
%aP=bitcast i8*%aK to i32*
store i32 6,i32*%aP,align 4
%aQ=load i8*,i8**%d,align 8
store i8*null,i8**%d,align 8
%aR=getelementptr inbounds i8,i8*%aK,i64 8
%aS=bitcast i8*%aR to i8**
store i8*%aQ,i8**%aS,align 8
%aT=getelementptr inbounds i8,i8*%aK,i64 16
%aU=bitcast i8*%aT to i32*
store i32 2,i32*%aU,align 4
%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
store i8*%aV,i8**%c,align 8
%aY=load i8*,i8**%g,align 8
store i8*null,i8**%g,align 8
%aZ=bitcast i8*%aV to i8**
store i8*%aY,i8**%aZ,align 8
%a0=load i8*,i8**%e,align 8
store i8*null,i8**%e,align 8
%a1=getelementptr inbounds i8,i8*%aV,i64 8
%a2=bitcast i8*%a1 to i8**
store i8*%a0,i8**%a2,align 8
%a3=getelementptr inbounds i8,i8*%aV,i64 16
%a4=bitcast i8*%a3 to i32*
store i32 3,i32*%a4,align 4
%a5=call i8*@sml_alloc(i32 inreg 20)#0
%a6=getelementptr inbounds i8,i8*%a5,i64 -4
%a7=bitcast i8*%a6 to i32*
store i32 1342177296,i32*%a7,align 4
%a8=load i8*,i8**%c,align 8
store i8*null,i8**%c,align 8
%a9=bitcast i8*%a5 to i8**
store i8*%a8,i8**%a9,align 8
%ba=getelementptr inbounds i8,i8*%a5,i64 8
%bb=bitcast i8*%ba to i8**
store i8*null,i8**%bb,align 8
%bc=getelementptr inbounds i8,i8*%a5,i64 16
%bd=bitcast i8*%bc to i32*
store i32 3,i32*%bd,align 4
%be=load i8*,i8**%f,align 8
store i8*null,i8**%f,align 8
%bf=call fastcc i8*%y(i8*inreg%be,i8*inreg%a5)
ret void
}
define internal fastcc void@_SMLL1f_310(i8*inreg%a,i32 inreg%b)#2 gc"smlsharp"{
%c=alloca i8*,align 8
%d=alloca i8*,align 8
%e=alloca i8*,align 8
%f=alloca i8*,align 8
call void@llvm.gcroot(i8**%c,i8*null)#0
call void@llvm.gcroot(i8**%d,i8*null)#0
call void@llvm.gcroot(i8**%e,i8*null)#0
call void@llvm.gcroot(i8**%f,i8*null)#0
store i8*%a,i8**%c,align 8
%g=load atomic i32,i32*@sml_check_flag unordered,align 4
%h=icmp eq i32%g,0
br i1%h,label%j,label%i
i:
call void@sml_check(i32 inreg%g)
br label%j
j:
%k=call fastcc i8*@_SMLLN12TypedCalcCon4eqTyE_287(i8*inreg getelementptr inbounds(<{[4x i8],i32,[15x i8]}>,<{[4x i8],i32,[15x i8]}>*@u,i64 0,i32 2,i64 0))
%l=getelementptr inbounds i8,i8*%k,i64 16
%m=bitcast i8*%l to i8*(i8*,i8*)**
%n=load i8*(i8*,i8*)*,i8*(i8*,i8*)**%m,align 8
%o=bitcast i8*%k to i8**
%p=load i8*,i8**%o,align 8
%q=bitcast i8**%c to i8***
%r=load i8**,i8***%q,align 8
%s=load i8*,i8**%r,align 8
%t=call fastcc i8*%n(i8*inreg%p,i8*inreg%s)
%u=getelementptr inbounds i8,i8*%t,i64 16
%v=bitcast i8*%u to i8*(i8*,i8*)**
%w=load i8*(i8*,i8*)*,i8*(i8*,i8*)**%v,align 8
%x=bitcast i8*%t to i8**
%y=load i8*,i8**%x,align 8
store i8*%y,i8**%f,align 8
%z=load i8*,i8**%c,align 8
store i8*null,i8**%c,align 8
%A=getelementptr inbounds i8,i8*%z,i64 8
%B=bitcast i8*%A to i8**
%C=load i8*,i8**%B,align 8
store i8*%C,i8**%d,align 8
%D=load i8*,i8**@_SMLZN12BuiltinTypes5exnTyE,align 8
store i8*%D,i8**%e,align 8
%E=call i8*@sml_alloc(i32 inreg 20)#0
%F=getelementptr inbounds i8,i8*%E,i64 -4
%G=bitcast i8*%F to i32*
store i32 1342177296,i32*%G,align 4
store i8*%E,i8**%c,align 8
%H=load i8*,i8**%d,align 8
store i8*null,i8**%d,align 8
%I=bitcast i8*%E to i8**
store i8*%H,i8**%I,align 8
%J=load i8*,i8**%e,align 8
store i8*null,i8**%e,align 8
%K=getelementptr inbounds i8,i8*%E,i64 8
%L=bitcast i8*%K to i8**
store i8*%J,i8**%L,align 8
%M=getelementptr inbounds i8,i8*%E,i64 16
%N=bitcast i8*%M to i32*
store i32 3,i32*%N,align 4
%O=call i8*@sml_alloc(i32 inreg 20)#0
%P=getelementptr inbounds i8,i8*%O,i64 -4
%Q=bitcast i8*%P to i32*
store i32 1342177296,i32*%Q,align 4
%R=load i8*,i8**%c,align 8
store i8*null,i8**%c,align 8
%S=bitcast i8*%O to i8**
store i8*%R,i8**%S,align 8
%T=getelementptr inbounds i8,i8*%O,i64 8
%U=bitcast i8*%T to i8**
store i8*null,i8**%U,align 8
%V=getelementptr inbounds i8,i8*%O,i64 16
%W=bitcast i8*%V to i32*
store i32 3,i32*%W,align 4
%X=load i8*,i8**%f,align 8
store i8*null,i8**%f,align 8
%Y=call fastcc i8*%w(i8*inreg%X,i8*inreg%O)
ret void
}
define fastcc i8*@_SMLFN12TypedCalcCon14TPEXNCONSTRUCTE(i8*inreg%a)#2 gc"smlsharp"{
o:
%b=alloca i8*,align 8
%c=alloca i8*,align 8
%d=alloca i8*,align 8
%e=alloca i8*,align 8
%f=alloca i8*,align 8
%g=alloca i8*,align 8
%h=alloca i8*,align 8
call void@llvm.gcroot(i8**%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
call void@llvm.gcroot(i8**%f,i8*null)#0
call void@llvm.gcroot(i8**%g,i8*null)#0
call void@llvm.gcroot(i8**%h,i8*null)#0
store i8*%a,i8**%b,align 8
%i=load atomic i32,i32*@sml_check_flag unordered,align 4
%j=icmp eq i32%i,0
br i1%j,label%m,label%k
k:
call void@sml_check(i32 inreg%i)
%l=load i8*,i8**%b,align 8
br label%m
m:
%n=phi i8*[%l,%k],[%a,%o]
%p=bitcast i8*%n to i8**
%q=load i8*,i8**%p,align 8
%r=icmp eq i8*%q,null
br i1%r,label%s,label%ba
s:
%t=getelementptr inbounds i8,i8*%n,i64 8
%u=bitcast i8*%t to i8**
%v=load i8*,i8**%u,align 8
store i8*%v,i8**%b,align 8
%w=getelementptr inbounds i8,i8*%n,i64 16
%x=bitcast i8*%w to i8**
%y=load i8*,i8**%x,align 8
store i8*%y,i8**%c,align 8
%z=bitcast i8*%v to i32*
%A=load i32,i32*%z,align 4
switch i32%A,label%B[
i32 0,label%T
i32 1,label%U
]
B:
store i8*null,i8**%c,align 8
call void@sml_matchcomp_bug()
%C=load i8*,i8**@_SMLZ5Match,align 8
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
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 i8**
store i8*getelementptr inbounds(<{[4x i8],i32,[69x i8]}>,<{[4x i8],i32,[69x i8]}>*@a9,i64 0,i32 2,i64 0),i8**%J,align 8
%K=getelementptr inbounds i8,i8*%D,i64 16
%L=bitcast i8*%K to i32*
store i32 3,i32*%L,align 4
%M=call i8*@sml_alloc(i32 inreg 60)#0
%N=getelementptr inbounds i8,i8*%M,i64 -4
%O=bitcast i8*%N to i32*
store i32 1342177336,i32*%O,align 4
%P=getelementptr inbounds i8,i8*%M,i64 56
%Q=bitcast i8*%P to i32*
store i32 1,i32*%Q,align 4
%R=load i8*,i8**%c,align 8
%S=bitcast i8*%M to i8**
store i8*%R,i8**%S,align 8
call void@sml_raise(i8*inreg%M)#1
unreachable
T:
br label%U
U:
%V=phi i64[8,%T],[16,%s]
%W=getelementptr inbounds i8,i8*%v,i64 8
%X=bitcast i8*%W to i8**
%Y=load i8*,i8**%X,align 8
%Z=getelementptr inbounds i8,i8*%Y,i64%V
%aa=bitcast i8*%Z to i8**
%ab=load i8*,i8**%aa,align 8
%ac=call fastcc i8*@_SMLFN11TypesBasics7derefTyE(i8*inreg%ab)
store i8*%ac,i8**%d,align 8
%ad=call i8*@sml_alloc(i32 inreg 20)#0
%ae=getelementptr inbounds i8,i8*%ad,i64 -4
%af=bitcast i8*%ae to i32*
store i32 1342177296,i32*%af,align 4
store i8*%ad,i8**%e,align 8
%ag=load i8*,i8**%c,align 8
%ah=bitcast i8*%ad to i8**
store i8*%ag,i8**%ah,align 8
%ai=load i8*,i8**%d,align 8
%aj=getelementptr inbounds i8,i8*%ad,i64 8
%ak=bitcast i8*%aj to i8**
store i8*%ai,i8**%ak,align 8
%al=getelementptr inbounds i8,i8*%ad,i64 16
%am=bitcast i8*%al to i32*
store i32 3,i32*%am,align 4
%an=call i8*@sml_alloc(i32 inreg 28)#0
%ao=getelementptr inbounds i8,i8*%an,i64 -4
%ap=bitcast i8*%ao to i32*
store i32 1342177304,i32*%ap,align 4
%aq=load i8*,i8**%e,align 8
%ar=bitcast i8*%an to i8**
store i8*%aq,i8**%ar,align 8
%as=getelementptr inbounds i8,i8*%an,i64 8
%at=bitcast i8*%as to void(...)**
store void(...)*bitcast(void(i8*,i32)*@_SMLL1f_310 to void(...)*),void(...)**%at,align 8
%au=getelementptr inbounds i8,i8*%an,i64 16
%av=bitcast i8*%au to void(...)**
store void(...)*bitcast(i8*(i8*,i8*)*@_SMLL1f_687 to void(...)*),void(...)**%av,align 8
%aw=getelementptr inbounds i8,i8*%an,i64 24
%ax=bitcast i8*%aw to i32*
store i32 -2147483647,i32*%ax,align 4
%ay=load i32*,i32**bitcast(i8**@_SMLZN7Control9checkTypeE to i32**),align 8
%az=load i32,i32*%ay,align 4
%aA=icmp eq i32%az,0
store i8*null,i8**%e,align 8
br i1%aA,label%aC,label%aB
aB:
call fastcc void@_SMLL1f_310(i8*inreg%aq,i32 inreg 0)
br label%aC
aC:
%aD=call i8*@sml_alloc(i32 inreg 28)#0
%aE=getelementptr inbounds i8,i8*%aD,i64 -4
%aF=bitcast i8*%aE to i32*
store i32 1342177304,i32*%aF,align 4
store i8*%aD,i8**%e,align 8
%aG=bitcast i8*%aD to i8**
store i8*null,i8**%aG,align 8
%aH=load i8*,i8**%b,align 8
store i8*null,i8**%b,align 8
%aI=getelementptr inbounds i8,i8*%aD,i64 8
%aJ=bitcast i8*%aI to i8**
store i8*%aH,i8**%aJ,align 8
%aK=load i8*,i8**%c,align 8
store i8*null,i8**%c,align 8
%aL=getelementptr inbounds i8,i8*%aD,i64 16
%aM=bitcast i8*%aL to i8**
store i8*%aK,i8**%aM,align 8
%aN=getelementptr inbounds i8,i8*%aD,i64 24
%aO=bitcast i8*%aN to i32*
store i32 7,i32*%aO,align 4
%aP=call i8*@sml_alloc(i32 inreg 20)#0
%aQ=getelementptr inbounds i8,i8*%aP,i64 -4
%aR=bitcast i8*%aQ to i32*
store i32 1342177296,i32*%aR,align 4
store i8*%aP,i8**%b,align 8
%aS=getelementptr inbounds i8,i8*%aP,i64 4
%aT=bitcast i8*%aS to i32*
store i32 0,i32*%aT,align 1
%aU=bitcast i8*%aP to i32*
store i32 16,i32*%aU,align 4
%aV=load i8*,i8**%e,align 8
store i8*null,i8**%e,align 8
%aW=getelementptr inbounds i8,i8*%aP,i64 8
%aX=bitcast i8*%aW to i8**
store i8*%aV,i8**%aX,align 8
%aY=getelementptr inbounds i8,i8*%aP,i64 16
%aZ=bitcast i8*%aY to i32*
store i32 2,i32*%aZ,align 4
%a0=call i8*@sml_alloc(i32 inreg 20)#0
%a1=getelementptr inbounds i8,i8*%a0,i64 -4
%a2=bitcast i8*%a1 to i32*
store i32 1342177296,i32*%a2,align 4
%a3=load i8*,i8**%b,align 8
%a4=bitcast i8*%a0 to i8**
store i8*%a3,i8**%a4,align 8
%a5=load i8*,i8**%d,align 8
%a6=getelementptr inbounds i8,i8*%a0,i64 8
%a7=bitcast i8*%a6 to i8**
store i8*%a5,i8**%a7,align 8
%a8=getelementptr inbounds i8,i8*%a0,i64 16
%a9=bitcast i8*%a8 to i32*
store i32 3,i32*%a9,align 4
ret i8*%a0
ba:
%bb=bitcast i8*%q to i8**
%bc=load i8*,i8**%bb,align 8
store i8*%bc,i8**%c,align 8
%bd=getelementptr inbounds i8,i8*%bc,i64 8
%be=bitcast i8*%bd to i8**
%bf=load i8*,i8**%be,align 8
store i8*%bf,i8**%b,align 8
%bg=getelementptr inbounds i8,i8*%n,i64 8
%bh=bitcast i8*%bg to i8**
%bi=load i8*,i8**%bh,align 8
store i8*%bi,i8**%d,align 8
%bj=getelementptr inbounds i8,i8*%n,i64 16
%bk=bitcast i8*%bj to i8**
%bl=load i8*,i8**%bk,align 8
store i8*%bl,i8**%e,align 8
%bm=bitcast i8*%bi to i32*
%bn=load i32,i32*%bm,align 4
switch i32%bn,label%bo[
i32 0,label%bG
i32 1,label%bH
]
bo:
store i8*null,i8**%c,align 8
store i8*null,i8**%d,align 8
store i8*null,i8**%e,align 8
call void@sml_matchcomp_bug()
%bp=load i8*,i8**@_SMLZ5Match,align 8
store i8*%bp,i8**%b,align 8
%bq=call i8*@sml_alloc(i32 inreg 20)#0
%br=getelementptr inbounds i8,i8*%bq,i64 -4
%bs=bitcast i8*%br to i32*
store i32 1342177296,i32*%bs,align 4
store i8*%bq,i8**%c,align 8
%bt=load i8*,i8**%b,align 8
store i8*null,i8**%b,align 8
%bu=bitcast i8*%bq to i8**
store i8*%bt,i8**%bu,align 8
%bv=getelementptr inbounds i8,i8*%bq,i64 8
%bw=bitcast i8*%bv to i8**
store i8*getelementptr inbounds(<{[4x i8],i32,[69x i8]}>,<{[4x i8],i32,[69x i8]}>*@a9,i64 0,i32 2,i64 0),i8**%bw,align 8
%bx=getelementptr inbounds i8,i8*%bq,i64 16
%by=bitcast i8*%bx to i32*
store i32 3,i32*%by,align 4
%bz=call i8*@sml_alloc(i32 inreg 60)#0
%bA=getelementptr inbounds i8,i8*%bz,i64 -4
%bB=bitcast i8*%bA to i32*
store i32 1342177336,i32*%bB,align 4
%bC=getelementptr inbounds i8,i8*%bz,i64 56
%bD=bitcast i8*%bC to i32*
store i32 1,i32*%bD,align 4
%bE=load i8*,i8**%c,align 8
%bF=bitcast i8*%bz to i8**
store i8*%bE,i8**%bF,align 8
call void@sml_raise(i8*inreg%bz)#1
unreachable
bG:
br label%bH
bH:
%bI=phi i64[8,%bG],[16,%ba]
%bJ=getelementptr inbounds i8,i8*%bi,i64 8
%bK=bitcast i8*%bJ to i8**
%bL=load i8*,i8**%bK,align 8
%bM=getelementptr inbounds i8,i8*%bL,i64%bI
%bN=bitcast i8*%bM to i8**
%bO=load i8*,i8**%bN,align 8
%bP=call fastcc i8*@_SMLFN11TypesBasics7derefTyE(i8*inreg%bO)
%bQ=icmp eq i8*%bP,null
br i1%bQ,label%bV,label%bR
bR:
%bS=bitcast i8*%bP to i32*
%bT=load i32,i32*%bS,align 4
%bU=icmp eq i32%bT,6
br i1%bU,label%bW,label%bV
bV:
store i8*null,i8**%c,align 8
store i8*null,i8**%d,align 8
store i8*null,i8**%e,align 8
br label%dv
bW:
%bX=getelementptr inbounds i8,i8*%bP,i64 8
%bY=bitcast i8*%bX to i8**
%bZ=load i8*,i8**%bY,align 8
%b0=bitcast i8*%bZ to i8**
%b1=load i8*,i8**%b0,align 8
%b2=icmp eq i8*%b1,null
br i1%b2,label%b3,label%b4
b3:
store i8*null,i8**%c,align 8
store i8*null,i8**%d,align 8
store i8*null,i8**%e,align 8
br label%dv
b4:
%b5=bitcast i8*%b1 to i8**
%b6=load i8*,i8**%b5,align 8
store i8*%b6,i8**%f,align 8
%b7=getelementptr inbounds i8,i8*%b1,i64 8
%b8=bitcast i8*%b7 to i8**
%b9=load i8*,i8**%b8,align 8
%ca=icmp eq i8*%b9,null
br i1%ca,label%cb,label%du
cb:
%cc=getelementptr inbounds i8,i8*%bZ,i64 8
%cd=bitcast i8*%cc to i8**
%ce=load i8*,i8**%cd,align 8
store i8*%ce,i8**%g,align 8
%cf=call i8*@sml_alloc(i32 inreg 36)#0
%cg=getelementptr inbounds i8,i8*%cf,i64 -4
%ch=bitcast i8*%cg to i32*
store i32 1342177312,i32*%ch,align 4
store i8*%cf,i8**%h,align 8
%ci=load i8*,i8**%b,align 8
store i8*null,i8**%b,align 8
%cj=bitcast i8*%cf to i8**
store i8*%ci,i8**%cj,align 8
%ck=load i8*,i8**%e,align 8
%cl=getelementptr inbounds i8,i8*%cf,i64 8
%cm=bitcast i8*%cl to i8**
store i8*%ck,i8**%cm,align 8
%cn=load i8*,i8**%f,align 8
store i8*null,i8**%f,align 8
%co=getelementptr inbounds i8,i8*%cf,i64 16
%cp=bitcast i8*%co to i8**
store i8*%cn,i8**%cp,align 8
%cq=load i8*,i8**%g,align 8
%cr=getelementptr inbounds i8,i8*%cf,i64 24
%cs=bitcast i8*%cr to i8**
store i8*%cq,i8**%cs,align 8
%ct=getelementptr inbounds i8,i8*%cf,i64 32
%cu=bitcast i8*%ct to i32*
store i32 15,i32*%cu,align 4
%cv=call i8*@sml_alloc(i32 inreg 28)#0
%cw=getelementptr inbounds i8,i8*%cv,i64 -4
%cx=bitcast i8*%cw to i32*
store i32 1342177304,i32*%cx,align 4
%cy=load i8*,i8**%h,align 8
%cz=bitcast i8*%cv to i8**
store i8*%cy,i8**%cz,align 8
%cA=getelementptr inbounds i8,i8*%cv,i64 8
%cB=bitcast i8*%cA to void(...)**
store void(...)*bitcast(void(i8*,i32)*@_SMLL1f_307 to void(...)*),void(...)**%cB,align 8
%cC=getelementptr inbounds i8,i8*%cv,i64 16
%cD=bitcast i8*%cC to void(...)**
store void(...)*bitcast(i8*(i8*,i8*)*@_SMLL1f_686 to void(...)*),void(...)**%cD,align 8
%cE=getelementptr inbounds i8,i8*%cv,i64 24
%cF=bitcast i8*%cE to i32*
store i32 -2147483647,i32*%cF,align 4
%cG=load i32*,i32**bitcast(i8**@_SMLZN7Control9checkTypeE to i32**),align 8
%cH=load i32,i32*%cG,align 4
%cI=icmp eq i32%cH,0
store i8*null,i8**%h,align 8
br i1%cI,label%cK,label%cJ
cJ:
call fastcc void@_SMLL1f_307(i8*inreg%cy,i32 inreg 0)
br label%cK
cK:
%cL=load i8*,i8**%g,align 8
store i8*null,i8**%g,align 8
store i8*%cL,i8**%b,align 8
%cM=bitcast i8**%c to i8***
%cN=load i8**,i8***%cM,align 8
%cO=load i8*,i8**%cN,align 8
store i8*%cO,i8**%c,align 8
%cP=call i8*@sml_alloc(i32 inreg 12)#0
%cQ=getelementptr inbounds i8,i8*%cP,i64 -4
%cR=bitcast i8*%cQ to i32*
store i32 1342177288,i32*%cR,align 4
store i8*%cP,i8**%f,align 8
%cS=load i8*,i8**%c,align 8
store i8*null,i8**%c,align 8
%cT=bitcast i8*%cP to i8**
store i8*%cS,i8**%cT,align 8
%cU=getelementptr inbounds i8,i8*%cP,i64 8
%cV=bitcast i8*%cU to i32*
store i32 1,i32*%cV,align 4
%cW=call i8*@sml_alloc(i32 inreg 28)#0
%cX=getelementptr inbounds i8,i8*%cW,i64 -4
%cY=bitcast i8*%cX to i32*
store i32 1342177304,i32*%cY,align 4
store i8*%cW,i8**%c,align 8
%cZ=load i8*,i8**%f,align 8
store i8*null,i8**%f,align 8
%c0=bitcast i8*%cW to i8**
store i8*%cZ,i8**%c0,align 8
%c1=load i8*,i8**%d,align 8
store i8*null,i8**%d,align 8
%c2=getelementptr inbounds i8,i8*%cW,i64 8
%c3=bitcast i8*%c2 to i8**
store i8*%c1,i8**%c3,align 8
%c4=load i8*,i8**%e,align 8
store i8*null,i8**%e,align 8
%c5=getelementptr inbounds i8,i8*%cW,i64 16
%c6=bitcast i8*%c5 to i8**
store i8*%c4,i8**%c6,align 8
%c7=getelementptr inbounds i8,i8*%cW,i64 24
%c8=bitcast i8*%c7 to i32*
store i32 7,i32*%c8,align 4
%c9=call i8*@sml_alloc(i32 inreg 20)#0
%da=getelementptr inbounds i8,i8*%c9,i64 -4
%db=bitcast i8*%da to i32*
store i32 1342177296,i32*%db,align 4
store i8*%c9,i8**%d,align 8
%dc=getelementptr inbounds i8,i8*%c9,i64 4
%dd=bitcast i8*%dc to i32*
store i32 0,i32*%dd,align 1
%de=bitcast i8*%c9 to i32*
store i32 16,i32*%de,align 4
%df=load i8*,i8**%c,align 8
store i8*null,i8**%c,align 8
%dg=getelementptr inbounds i8,i8*%c9,i64 8
%dh=bitcast i8*%dg to i8**
store i8*%df,i8**%dh,align 8
%di=getelementptr inbounds i8,i8*%c9,i64 16
%dj=bitcast i8*%di to i32*
store i32 2,i32*%dj,align 4
%dk=call i8*@sml_alloc(i32 inreg 20)#0
%dl=getelementptr inbounds i8,i8*%dk,i64 -4
%dm=bitcast i8*%dl to i32*
store i32 1342177296,i32*%dm,align 4
%dn=load i8*,i8**%d,align 8
%do=bitcast i8*%dk to i8**
store i8*%dn,i8**%do,align 8
%dp=load i8*,i8**%b,align 8
%dq=getelementptr inbounds i8,i8*%dk,i64 8
%dr=bitcast i8*%dq to i8**
store i8*%dp,i8**%dr,align 8
%ds=getelementptr inbounds i8,i8*%dk,i64 16
%dt=bitcast i8*%ds to i32*
store i32 3,i32*%dt,align 4
ret i8*%dk
du:
store i8*null,i8**%c,align 8
store i8*null,i8**%d,align 8
store i8*null,i8**%e,align 8
store i8*null,i8**%f,align 8
br label%dv
dv:
%dw=load i8*,i8**@_SMLZN3Bug3BugE,align 8
store i8*%dw,i8**%b,align 8
%dx=call i8*@sml_alloc(i32 inreg 28)#0
%dy=getelementptr inbounds i8,i8*%dx,i64 -4
%dz=bitcast i8*%dy to i32*
store i32 1342177304,i32*%dz,align 4
store i8*%dx,i8**%c,align 8
%dA=load i8*,i8**%b,align 8
store i8*null,i8**%b,align 8
%dB=bitcast i8*%dx to i8**
store i8*%dA,i8**%dB,align 8
%dC=getelementptr inbounds i8,i8*%dx,i64 8
%dD=bitcast i8*%dC to i8**
store i8*getelementptr inbounds(<{[4x i8],i32,[70x i8]}>,<{[4x i8],i32,[70x i8]}>*@s,i64 0,i32 2,i64 0),i8**%dD,align 8
%dE=getelementptr inbounds i8,i8*%dx,i64 16
%dF=bitcast i8*%dE to i8**
store i8*getelementptr inbounds(<{[4x i8],i32,[15x i8]}>,<{[4x i8],i32,[15x i8]}>*@u,i64 0,i32 2,i64 0),i8**%dF,align 8
%dG=getelementptr inbounds i8,i8*%dx,i64 24
%dH=bitcast i8*%dG to i32*
store i32 7,i32*%dH,align 4
%dI=call i8*@sml_alloc(i32 inreg 60)#0
%dJ=getelementptr inbounds i8,i8*%dI,i64 -4
%dK=bitcast i8*%dJ to i32*
store i32 1342177336,i32*%dK,align 4
%dL=getelementptr inbounds i8,i8*%dI,i64 56
%dM=bitcast i8*%dL to i32*
store i32 1,i32*%dM,align 4
%dN=load i8*,i8**%c,align 8
%dO=bitcast i8*%dI to i8**
store i8*%dN,i8**%dO,align 8
call void@sml_raise(i8*inreg%dI)#1
unreachable
}
define internal fastcc i8*@_SMLL6argTys_320(i8*inreg%a)#2 gc"smlsharp"{
i:
%b=alloca i8*,align 8
call void@llvm.gcroot(i8**%b,i8*null)#0
store i8*%a,i8**%b,align 8
%c=load atomic i32,i32*@sml_check_flag unordered,align 4
%d=icmp eq i32%c,0
br i1%d,label%g,label%e
e:
call void@sml_check(i32 inreg%c)
%f=load i8*,i8**%b,align 8
br label%g
g:
%h=phi i8*[%f,%e],[%a,%i]
%j=tail call fastcc i8*@_SMLLN12TypedCalcCon9ffiStubTyE_313(i8*inreg%h)
ret i8*%j
}
define internal fastcc i8*@_SMLL6varTys_322(i8*inreg%a)#2 gc"smlsharp"{
i:
%b=alloca i8*,align 8
call void@llvm.gcroot(i8**%b,i8*null)#0
store i8*%a,i8**%b,align 8
%c=load atomic i32,i32*@sml_check_flag unordered,align 4
%d=icmp eq i32%c,0
br i1%d,label%g,label%e
e:
call void@sml_check(i32 inreg%c)
%f=load i8*,i8**%b,align 8
br label%g
g:
%h=phi i8*[%f,%e],[%a,%i]
%j=tail call fastcc i8*@_SMLLN12TypedCalcCon9ffiStubTyE_313(i8*inreg%h)
ret i8*%j
}
define internal fastcc i8*@_SMLL6retTys_324(i8*inreg%a)#2 gc"smlsharp"{
i:
%b=alloca i8*,align 8
call void@llvm.gcroot(i8**%b,i8*null)#0
store i8*%a,i8**%b,align 8
%c=load atomic i32,i32*@sml_check_flag unordered,align 4
%d=icmp eq i32%c,0
br i1%d,label%g,label%e
e:
call void@sml_check(i32 inreg%c)
%f=load i8*,i8**%b,align 8
br label%g
g:
%h=phi i8*[%f,%e],[%a,%i]
%j=tail call fastcc i8*@_SMLLN12TypedCalcCon9ffiStubTyE_313(i8*inreg%h)
ret i8*%j
}
define internal fastcc i8*@_SMLLN12TypedCalcCon9ffiStubTyE_326(i8*inreg%a)#2 gc"smlsharp"{
%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=load atomic i32,i32*@sml_check_flag unordered,align 4
%g=icmp eq i32%f,0
br i1%g,label%h,label%j
h:
%i=bitcast i8*%a to i8***
br label%m
j:
call void@sml_check(i32 inreg%f)
%k=bitcast i8**%b to i8****
%l=load i8***,i8****%k,align 8
br label%m
m:
%n=phi i8***[%l,%j],[%i,%h]
%o=load i8**,i8***%n,align 8
%p=load i8*,i8**%o,align 8
store i8*%p,i8**%c,align 8
%q=getelementptr inbounds i8**,i8***%n,i64 1
%r=bitcast i8***%q to i8**
%s=load i8*,i8**%r,align 8
store i8*%s,i8**%d,align 8
%t=call fastcc i8*@_SMLFN11RecordLabel3Map6insertE(i32 inreg 1,i32 inreg 8)
%u=getelementptr inbounds i8,i8*%t,i64 16
%v=bitcast i8*%u to i8*(i8*,i8*)**
%w=load i8*(i8*,i8*)*,i8*(i8*,i8*)**%v,align 8
%x=bitcast i8*%t to i8**
%y=load i8*,i8**%x,align 8
store i8*%y,i8**%e,align 8
%z=bitcast i8**%b to i8***
%A=load i8**,i8***%z,align 8
store i8*null,i8**%b,align 8
%B=load i8*,i8**%A,align 8
%C=getelementptr inbounds i8,i8*%B,i64 8
%D=bitcast i8*%C to i8**
%E=load i8*,i8**%D,align 8
%F=call fastcc i8*@_SMLLN12TypedCalcCon9ffiStubTyE_313(i8*inreg%E)
store i8*%F,i8**%b,align 8
%G=call i8*@sml_alloc(i32 inreg 28)#0
%H=getelementptr inbounds i8,i8*%G,i64 -4
%I=bitcast i8*%H to i32*
store i32 1342177304,i32*%I,align 4
%J=load i8*,i8**%d,align 8
%K=bitcast i8*%G to i8**
store i8*%J,i8**%K,align 8
%L=load i8*,i8**%c,align 8
%M=getelementptr inbounds i8,i8*%G,i64 8
%N=bitcast i8*%M to i8**
store i8*%L,i8**%N,align 8
%O=load i8*,i8**%b,align 8
%P=getelementptr inbounds i8,i8*%G,i64 16
%Q=bitcast i8*%P to i8**
store i8*%O,i8**%Q,align 8
%R=getelementptr inbounds i8,i8*%G,i64 24
%S=bitcast i8*%R to i32*
store i32 7,i32*%S,align 4
%T=load i8*,i8**%e,align 8
%U=tail call fastcc i8*%w(i8*inreg%T,i8*inreg%G)
ret i8*%U
}
define internal fastcc i8*@_SMLLN12TypedCalcCon9ffiStubTyE_313(i8*inreg%a)unnamed_addr#2 gc"smlsharp"{
l:
%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=load atomic i32,i32*@sml_check_flag unordered,align 4
%g=icmp eq i32%f,0
br i1%g,label%j,label%h
h:
call void@sml_check(i32 inreg%f)
%i=load i8*,i8**%b,align 8
br label%j
j:
%k=phi i8*[%i,%h],[%a,%l]
%m=bitcast i8*%k to i32*
%n=load i32,i32*%m,align 4
switch i32%n,label%o[
i32 0,label%cs
i32 1,label%at
i32 2,label%G
]
o:
call void@sml_matchcomp_bug()
%p=load i8*,i8**@_SMLZ5Match,align 8
store i8*%p,i8**%b,align 8
%q=call i8*@sml_alloc(i32 inreg 20)#0
%r=getelementptr inbounds i8,i8*%q,i64 -4
%s=bitcast i8*%r to i32*
store i32 1342177296,i32*%s,align 4
store i8*%q,i8**%c,align 8
%t=load i8*,i8**%b,align 8
store i8*null,i8**%b,align 8
%u=bitcast i8*%q to i8**
store i8*%t,i8**%u,align 8
%v=getelementptr inbounds i8,i8*%q,i64 8
%w=bitcast i8*%v to i8**
store i8*getelementptr inbounds(<{[4x i8],i32,[69x i8]}>,<{[4x i8],i32,[69x i8]}>*@A,i64 0,i32 2,i64 0),i8**%w,align 8
%x=getelementptr inbounds i8,i8*%q,i64 16
%y=bitcast i8*%x to i32*
store i32 3,i32*%y,align 4
%z=call i8*@sml_alloc(i32 inreg 60)#0
%A=getelementptr inbounds i8,i8*%z,i64 -4
%B=bitcast i8*%A to i32*
store i32 1342177336,i32*%B,align 4
%C=getelementptr inbounds i8,i8*%z,i64 56
%D=bitcast i8*%C to i32*
store i32 1,i32*%D,align 4
%E=load i8*,i8**%c,align 8
%F=bitcast i8*%z to i8**
store i8*%E,i8**%F,align 8
call void@sml_raise(i8*inreg%z)#1
unreachable
G:
%H=getelementptr inbounds i8,i8*%k,i64 8
%I=bitcast i8*%H to i8**
%J=load i8*,i8**%I,align 8
store i8*%J,i8**%b,align 8
%K=call fastcc i8*@_SMLFN4List5foldlE(i32 inreg 1,i32 inreg 8,i32 inreg 1,i32 inreg 8)
%L=getelementptr inbounds i8,i8*%K,i64 16
%M=bitcast i8*%L to i8*(i8*,i8*)**
%N=load i8*(i8*,i8*)*,i8*(i8*,i8*)**%M,align 8
%O=bitcast i8*%K to i8**
%P=load i8*,i8**%O,align 8
%Q=call fastcc i8*%N(i8*inreg%P,i8*inreg 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*))
%R=getelementptr inbounds i8,i8*%Q,i64 16
%S=bitcast i8*%R to i8*(i8*,i8*)**
%T=load i8*(i8*,i8*)*,i8*(i8*,i8*)**%S,align 8
%U=bitcast i8*%Q to i8**
%V=load i8*,i8**%U,align 8
store i8*%V,i8**%c,align 8
%W=call fastcc i8*@_SMLFN11RecordLabel3Map5emptyE(i32 inreg 1,i32 inreg 8)
%X=load i8*,i8**%c,align 8
store i8*null,i8**%c,align 8
%Y=call fastcc i8*%T(i8*inreg%X,i8*inreg%W)
%Z=getelementptr inbounds i8,i8*%Y,i64 16
%aa=bitcast i8*%Z to i8*(i8*,i8*)**
%ab=load i8*(i8*,i8*)*,i8*(i8*,i8*)**%aa,align 8
%ac=bitcast i8*%Y to i8**
%ad=load i8*,i8**%ac,align 8
%ae=bitcast i8**%b to i8***
%af=load i8**,i8***%ae,align 8
store i8*null,i8**%b,align 8
%ag=load i8*,i8**%af,align 8
%ah=call fastcc i8*%ab(i8*inreg%ad,i8*inreg%ag)
store i8*%ah,i8**%b,align 8
%ai=call i8*@sml_alloc(i32 inreg 20)#0
%aj=bitcast i8*%ai to i32*
%ak=getelementptr inbounds i8,i8*%ai,i64 -4
%al=bitcast i8*%ak to i32*
store i32 1342177296,i32*%al,align 4
%am=getelementptr inbounds i8,i8*%ai,i64 4
%an=bitcast i8*%am to i32*
store i32 0,i32*%an,align 1
store i32 8,i32*%aj,align 4
%ao=load i8*,i8**%b,align 8
%ap=getelementptr inbounds i8,i8*%ai,i64 8
%aq=bitcast i8*%ap to i8**
store i8*%ao,i8**%aq,align 8
%ar=getelementptr inbounds i8,i8*%ai,i64 16
%as=bitcast i8*%ar to i32*
store i32 2,i32*%as,align 4
ret i8*%ai
at:
%au=getelementptr inbounds i8,i8*%k,i64 8
%av=bitcast i8*%au to i8**
%aw=load i8*,i8**%av,align 8
store i8*%aw,i8**%d,align 8
%ax=call fastcc i8*@_SMLFN4List3mapE(i32 inreg 1,i32 inreg 8,i32 inreg 1,i32 inreg 8)
%ay=getelementptr inbounds i8,i8*%ax,i64 16
%az=bitcast i8*%ay to i8*(i8*,i8*)**
%aA=load i8*(i8*,i8*)*,i8*(i8*,i8*)**%az,align 8
%aB=bitcast i8*%ax to i8**
%aC=load i8*,i8**%aB,align 8
%aD=call fastcc i8*%aA(i8*inreg%aC,i8*inreg 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*))
%aE=getelementptr inbounds i8,i8*%aD,i64 16
%aF=bitcast i8*%aE to i8*(i8*,i8*)**
%aG=load i8*(i8*,i8*)*,i8*(i8*,i8*)**%aF,align 8
%aH=bitcast i8*%aD to i8**
%aI=load i8*,i8**%aH,align 8
%aJ=load i8*,i8**%d,align 8
%aK=getelementptr inbounds i8,i8*%aJ,i64 8
%aL=bitcast i8*%aK to i8**
%aM=load i8*,i8**%aL,align 8
%aN=call fastcc i8*%aG(i8*inreg%aI,i8*inreg%aM)
store i8*%aN,i8**%b,align 8
%aO=load i8*,i8**%d,align 8
%aP=getelementptr inbounds i8,i8*%aO,i64 16
%aQ=bitcast i8*%aP to i8**
%aR=load i8*,i8**%aQ,align 8
%aS=icmp eq i8*%aR,null
br i1%aS,label%ba,label%aT
aT:
%aU=bitcast i8*%aR to i8**
%aV=load i8*,i8**%aU,align 8
store i8*%aV,i8**%c,align 8
%aW=call fastcc i8*@_SMLFN4List3mapE(i32 inreg 1,i32 inreg 8,i32 inreg 1,i32 inreg 8)
%aX=getelementptr inbounds i8,i8*%aW,i64 16
%aY=bitcast i8*%aX to i8*(i8*,i8*)**
%aZ=load i8*(i8*,i8*)*,i8*(i8*,i8*)**%aY,align 8
%a0=bitcast i8*%aW to i8**
%a1=load i8*,i8**%a0,align 8
%a2=call fastcc i8*%aZ(i8*inreg%a1,i8*inreg 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*))
%a3=getelementptr inbounds i8,i8*%a2,i64 16
%a4=bitcast i8*%a3 to i8*(i8*,i8*)**
%a5=load i8*(i8*,i8*)*,i8*(i8*,i8*)**%a4,align 8
%a6=bitcast i8*%a2 to i8**
%a7=load i8*,i8**%a6,align 8
%a8=load i8*,i8**%c,align 8
store i8*null,i8**%c,align 8
%a9=call fastcc i8*%a5(i8*inreg%a7,i8*inreg%a8)
br label%ba
ba:
%bb=phi i8*[%a9,%aT],[null,%at]
store i8*%bb,i8**%c,align 8
%bc=call fastcc i8*@_SMLFN4List3mapE(i32 inreg 1,i32 inreg 8,i32 inreg 1,i32 inreg 8)
%bd=getelementptr inbounds i8,i8*%bc,i64 16
%be=bitcast i8*%bd to i8*(i8*,i8*)**
%bf=load i8*(i8*,i8*)*,i8*(i8*,i8*)**%be,align 8
%bg=bitcast i8*%bc to i8**
%bh=load i8*,i8**%bg,align 8
%bi=call fastcc i8*%bf(i8*inreg%bh,i8*inreg 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*))
%bj=getelementptr inbounds i8,i8*%bi,i64 16
%bk=bitcast i8*%bj to i8*(i8*,i8*)**
%bl=load i8*(i8*,i8*)*,i8*(i8*,i8*)**%bk,align 8
%bm=bitcast i8*%bi to i8**
%bn=load i8*,i8**%bm,align 8
%bo=load i8*,i8**%d,align 8
store i8*null,i8**%d,align 8
%bp=getelementptr inbounds i8,i8*%bo,i64 24
%bq=bitcast i8*%bp to i8**
%br=load i8*,i8**%bq,align 8
%bs=call fastcc i8*%bl(i8*inreg%bn,i8*inreg%br)
store i8*%bs,i8**%d,align 8
%bt=call fastcc i8*@_SMLFN4List1_VE(i32 inreg 1,i32 inreg 8)
%bu=getelementptr inbounds i8,i8*%bt,i64 16
%bv=bitcast i8*%bu to i8*(i8*,i8*)**
%bw=load i8*(i8*,i8*)*,i8*(i8*,i8*)**%bv,align 8
%bx=bitcast i8*%bt to i8**
%by=load i8*,i8**%bx,align 8
store i8*%by,i8**%e,align 8
%bz=call i8*@sml_alloc(i32 inreg 20)#0
%bA=getelementptr inbounds i8,i8*%bz,i64 -4
%bB=bitcast i8*%bA to i32*
store i32 1342177296,i32*%bB,align 4
%bC=load i8*,i8**%b,align 8
store i8*null,i8**%b,align 8
%bD=bitcast i8*%bz to i8**
store i8*%bC,i8**%bD,align 8
%bE=load i8*,i8**%c,align 8
store i8*null,i8**%c,align 8
%bF=getelementptr inbounds i8,i8*%bz,i64 8
%bG=bitcast i8*%bF to i8**
store i8*%bE,i8**%bG,align 8
%bH=getelementptr inbounds i8,i8*%bz,i64 16
%bI=bitcast i8*%bH to i32*
store i32 3,i32*%bI,align 4
%bJ=load i8*,i8**%e,align 8
store i8*null,i8**%e,align 8
%bK=call fastcc i8*%bw(i8*inreg%bJ,i8*inreg%bz)
%bL=call fastcc i8*@_SMLLN12TypedCalcCon7tupleTyE_247(i8*inreg%bK)
store i8*%bL,i8**%b,align 8
%bM=call i8*@sml_alloc(i32 inreg 20)#0
%bN=getelementptr inbounds i8,i8*%bM,i64 -4
%bO=bitcast i8*%bN to i32*
store i32 1342177296,i32*%bO,align 4
%bP=load i8*,i8**%b,align 8
%bQ=bitcast i8*%bM to i8**
store i8*%bP,i8**%bQ,align 8
%bR=getelementptr inbounds i8,i8*%bM,i64 8
%bS=bitcast i8*%bR to i8**
store i8*null,i8**%bS,align 8
%bT=getelementptr inbounds i8,i8*%bM,i64 16
%bU=bitcast i8*%bT to i32*
store i32 3,i32*%bU,align 4
store i8*null,i8**%c,align 8
%bV=call i8*@sml_alloc(i32 inreg 20)#0
%bW=getelementptr inbounds i8,i8*%bV,i64 -4
%bX=bitcast i8*%bW to i32*
store i32 1342177296,i32*%bX,align 4
store i8*%bV,i8**%e,align 8
%bY=load i8*,i8**%b,align 8
store i8*null,i8**%b,align 8
%bZ=bitcast i8*%bV to i8**
store i8*%bY,i8**%bZ,align 8
%b0=load i8*,i8**%c,align 8
store i8*null,i8**%c,align 8
%b1=getelementptr inbounds i8,i8*%bV,i64 8
%b2=bitcast i8*%b1 to i8**
store i8*%b0,i8**%b2,align 8
%b3=getelementptr inbounds i8,i8*%bV,i64 16
%b4=bitcast i8*%b3 to i32*
store i32 3,i32*%b4,align 4
%b5=load i8*,i8**%d,align 8
store i8*null,i8**%d,align 8
%b6=call fastcc i8*@_SMLLN12TypedCalcCon7tupleTyE_247(i8*inreg%b5)
store i8*%b6,i8**%b,align 8
%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
store i8*%b7,i8**%c,align 8
%ca=load i8*,i8**%e,align 8
store i8*null,i8**%e,align 8
%cb=bitcast i8*%b7 to i8**
store i8*%ca,i8**%cb,align 8
%cc=load i8*,i8**%b,align 8
store i8*null,i8**%b,align 8
%cd=getelementptr inbounds i8,i8*%b7,i64 8
%ce=bitcast i8*%cd to i8**
store i8*%cc,i8**%ce,align 8
%cf=getelementptr inbounds i8,i8*%b7,i64 16
%cg=bitcast i8*%cf to i32*
store i32 3,i32*%cg,align 4
%ch=call i8*@sml_alloc(i32 inreg 20)#0
%ci=bitcast i8*%ch to i32*
%cj=getelementptr inbounds i8,i8*%ch,i64 -4
%ck=bitcast i8*%cj to i32*
store i32 1342177296,i32*%ck,align 4
%cl=getelementptr inbounds i8,i8*%ch,i64 4
%cm=bitcast i8*%cl to i32*
store i32 0,i32*%cm,align 1
store i32 6,i32*%ci,align 4
%cn=load i8*,i8**%c,align 8
%co=getelementptr inbounds i8,i8*%ch,i64 8
%cp=bitcast i8*%co to i8**
store i8*%cn,i8**%cp,align 8
%cq=getelementptr inbounds i8,i8*%ch,i64 16
%cr=bitcast i8*%cq to i32*
store i32 2,i32*%cr,align 4
ret i8*%ch
cs:
%ct=getelementptr inbounds i8,i8*%k,i64 8
%cu=bitcast i8*%ct to i8***
%cv=load i8**,i8***%cu,align 8
%cw=load i8*,i8**%cv,align 8
ret i8*%cw
}
define internal fastcc void@_SMLL1f_330(i8*inreg%a,i32 inreg%b)#2 gc"smlsharp"{
%c=alloca i8*,align 8
%d=alloca i8*,align 8
%e=alloca i8*,align 8
%f=alloca i8*,align 8
call void@llvm.gcroot(i8**%c,i8*null)#0
call void@llvm.gcroot(i8**%d,i8*null)#0
call void@llvm.gcroot(i8**%e,i8*null)#0
call void@llvm.gcroot(i8**%f,i8*null)#0
store i8*%a,i8**%c,align 8
%g=load atomic i32,i32*@sml_check_flag unordered,align 4
%h=icmp eq i32%g,0
br i1%h,label%j,label%i
i:
call void@sml_check(i32 inreg%g)
br label%j
j:
%k=call fastcc i8*@_SMLLN12TypedCalcCon4eqTyE_287(i8*inreg getelementptr inbounds(<{[4x i8],i32,[16x i8]}>,<{[4x i8],i32,[16x i8]}>*@B,i64 0,i32 2,i64 0))
%l=getelementptr inbounds i8,i8*%k,i64 16
%m=bitcast i8*%l to i8*(i8*,i8*)**
%n=load i8*(i8*,i8*)*,i8*(i8*,i8*)**%m,align 8
%o=bitcast i8*%k to i8**
%p=load i8*,i8**%o,align 8
%q=load i8*,i8**%c,align 8
%r=getelementptr inbounds i8,i8*%q,i64 8
%s=bitcast i8*%r to i8**
%t=load i8*,i8**%s,align 8
%u=call fastcc i8*%n(i8*inreg%p,i8*inreg%t)
%v=getelementptr inbounds i8,i8*%u,i64 16
%w=bitcast i8*%v to i8*(i8*,i8*)**
%x=load i8*(i8*,i8*)*,i8*(i8*,i8*)**%w,align 8
%y=bitcast i8*%u to i8**
%z=load i8*,i8**%y,align 8
store i8*%z,i8**%f,align 8
%A=bitcast i8**%c to i8***
%B=load i8**,i8***%A,align 8
store i8*null,i8**%c,align 8
%C=load i8*,i8**%B,align 8
store i8*%C,i8**%d,align 8
%D=load i8*,i8**@_SMLZN12BuiltinTypes9codeptrTyE,align 8
store i8*%D,i8**%e,align 8
%E=call i8*@sml_alloc(i32 inreg 20)#0
%F=getelementptr inbounds i8,i8*%E,i64 -4
%G=bitcast i8*%F to i32*
store i32 1342177296,i32*%G,align 4
store i8*%E,i8**%c,align 8
%H=load i8*,i8**%d,align 8
store i8*null,i8**%d,align 8
%I=bitcast i8*%E to i8**
store i8*%H,i8**%I,align 8
%J=load i8*,i8**%e,align 8
store i8*null,i8**%e,align 8
%K=getelementptr inbounds i8,i8*%E,i64 8
%L=bitcast i8*%K to i8**
store i8*%J,i8**%L,align 8
%M=getelementptr inbounds i8,i8*%E,i64 16
%N=bitcast i8*%M to i32*
store i32 3,i32*%N,align 4
%O=call i8*@sml_alloc(i32 inreg 20)#0
%P=getelementptr inbounds i8,i8*%O,i64 -4
%Q=bitcast i8*%P to i32*
store i32 1342177296,i32*%Q,align 4
%R=load i8*,i8**%c,align 8
store i8*null,i8**%c,align 8
%S=bitcast i8*%O to i8**
store i8*%R,i8**%S,align 8
%T=getelementptr inbounds i8,i8*%O,i64 8
%U=bitcast i8*%T to i8**
store i8*null,i8**%U,align 8
%V=getelementptr inbounds i8,i8*%O,i64 16
%W=bitcast i8*%V to i32*
store i32 3,i32*%W,align 4
%X=load i8*,i8**%f,align 8
store i8*null,i8**%f,align 8
%Y=call fastcc i8*%x(i8*inreg%X,i8*inreg%O)
ret void
}
define fastcc i8*@_SMLFN12TypedCalcCon15TPFFIIMPORT__FUNE(i8*inreg%a)#2 gc"smlsharp"{
n:
%b=alloca i8*,align 8
%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**%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
call void@llvm.gcroot(i8**%f,i8*null)#0
call void@llvm.gcroot(i8**%g,i8*null)#0
store i8*%a,i8**%b,align 8
%h=load atomic i32,i32*@sml_check_flag unordered,align 4
%i=icmp eq i32%h,0
br i1%i,label%l,label%j
j:
call void@sml_check(i32 inreg%h)
%k=load i8*,i8**%b,align 8
br label%l
l:
%m=phi i8*[%k,%j],[%a,%n]
store i8*null,i8**%b,align 8
%o=bitcast i8*%m to i8**
%p=load i8*,i8**%o,align 8
store i8*%p,i8**%c,align 8
%q=getelementptr inbounds i8,i8*%m,i64 8
%r=bitcast i8*%q to i8***
%s=load i8**,i8***%r,align 8
%t=load i8*,i8**%s,align 8
store i8*%t,i8**%d,align 8
%u=getelementptr inbounds i8*,i8**%s,i64 1
%v=load i8*,i8**%u,align 8
store i8*%v,i8**%e,align 8
%w=getelementptr inbounds i8,i8*%m,i64 16
%x=bitcast i8*%w to i8**
%y=load i8*,i8**%x,align 8
store i8*%y,i8**%f,align 8
%z=call fastcc i8*@_SMLLN12TypedCalcCon9ffiStubTyE_313(i8*inreg%p)
store i8*%z,i8**%b,align 8
%A=call i8*@sml_alloc(i32 inreg 20)#0
%B=getelementptr inbounds i8,i8*%A,i64 -4
%C=bitcast i8*%B to i32*
store i32 1342177296,i32*%C,align 4
store i8*%A,i8**%g,align 8
%D=load i8*,i8**%e,align 8
%E=bitcast i8*%A to i8**
store i8*%D,i8**%E,align 8
%F=load i8*,i8**%f,align 8
%G=getelementptr inbounds i8,i8*%A,i64 8
%H=bitcast i8*%G to i8**
store i8*%F,i8**%H,align 8
%I=getelementptr inbounds i8,i8*%A,i64 16
%J=bitcast i8*%I to i32*
store i32 3,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**%g,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*,i32)*@_SMLL1f_330 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*)*@_SMLL1f_694 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
%V=load i32*,i32**bitcast(i8**@_SMLZN7Control9checkTypeE to i32**),align 8
%W=load i32,i32*%V,align 4
%X=icmp eq i32%W,0
store i8*null,i8**%g,align 8
br i1%X,label%Z,label%Y
Y:
call fastcc void@_SMLL1f_330(i8*inreg%N,i32 inreg 0)
br label%Z
Z:
%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**%g,align 8
%ad=load i8*,i8**%d,align 8
store i8*null,i8**%d,align 8
%ae=bitcast i8*%aa to i8**
store i8*%ad,i8**%ae,align 8
%af=load i8*,i8**%e,align 8
store i8*null,i8**%e,align 8
%ag=getelementptr inbounds i8,i8*%aa,i64 8
%ah=bitcast i8*%ag to i8**
store i8*%af,i8**%ah,align 8
%ai=getelementptr inbounds i8,i8*%aa,i64 16
%aj=bitcast i8*%ai to i32*
store i32 3,i32*%aj,align 4
%ak=call i8*@sml_alloc(i32 inreg 20)#0
%al=getelementptr inbounds i8,i8*%ak,i64 -4
%am=bitcast i8*%al to i32*
store i32 1342177296,i32*%am,align 4
store i8*%ak,i8**%e,align 8
%an=getelementptr inbounds i8,i8*%ak,i64 4
%ao=bitcast i8*%an to i32*
store i32 0,i32*%ao,align 1
%ap=bitcast i8*%ak to i32*
store i32 1,i32*%ap,align 4
%aq=load i8*,i8**%g,align 8
store i8*null,i8**%g,align 8
%ar=getelementptr inbounds i8,i8*%ak,i64 8
%as=bitcast i8*%ar to i8**
store i8*%aq,i8**%as,align 8
%at=getelementptr inbounds i8,i8*%ak,i64 16
%au=bitcast i8*%at to i32*
store i32 2,i32*%au,align 4
%av=call i8*@sml_alloc(i32 inreg 36)#0
%aw=getelementptr inbounds i8,i8*%av,i64 -4
%ax=bitcast i8*%aw to i32*
store i32 1342177312,i32*%ax,align 4
store i8*%av,i8**%d,align 8
%ay=load i8*,i8**%c,align 8
store i8*null,i8**%c,align 8
%az=bitcast i8*%av to i8**
store i8*%ay,i8**%az,align 8
%aA=load i8*,i8**%e,align 8
store i8*null,i8**%e,align 8
%aB=getelementptr inbounds i8,i8*%av,i64 8
%aC=bitcast i8*%aB to i8**
store i8*%aA,i8**%aC,align 8
%aD=load i8*,i8**%f,align 8
store i8*null,i8**%f,align 8
%aE=getelementptr inbounds i8,i8*%av,i64 16
%aF=bitcast i8*%aE to i8**
store i8*%aD,i8**%aF,align 8
%aG=load i8*,i8**%b,align 8
%aH=getelementptr inbounds i8,i8*%av,i64 24
%aI=bitcast i8*%aH to i8**
store i8*%aG,i8**%aI,align 8
%aJ=getelementptr inbounds i8,i8*%av,i64 32
%aK=bitcast i8*%aJ to i32*
store i32 15,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
store i8*%aL,i8**%c,align 8
%aO=getelementptr inbounds i8,i8*%aL,i64 4
%aP=bitcast i8*%aO to i32*
store i32 0,i32*%aP,align 1
%aQ=bitcast i8*%aL to i32*
store i32 19,i32*%aQ,align 4
%aR=load i8*,i8**%d,align 8
store i8*null,i8**%d,align 8
%aS=getelementptr inbounds i8,i8*%aL,i64 8
%aT=bitcast i8*%aS to i8**
store i8*%aR,i8**%aT,align 8
%aU=getelementptr inbounds i8,i8*%aL,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=load i8*,i8**%c,align 8
%a0=bitcast i8*%aW to i8**
store i8*%aZ,i8**%a0,align 8
%a1=load i8*,i8**%b,align 8
%a2=getelementptr inbounds i8,i8*%aW,i64 8
%a3=bitcast i8*%a2 to i8**
store i8*%a1,i8**%a3,align 8
%a4=getelementptr inbounds i8,i8*%aW,i64 16
%a5=bitcast i8*%a4 to i32*
store i32 3,i32*%a5,align 4
ret i8*%aW
}
define fastcc i8*@_SMLFN12TypedCalcCon15TPFFIIMPORT__EXTE(i8*inreg%a)#2 gc"smlsharp"{
m:
%b=alloca i8*,align 8
%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**%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
call void@llvm.gcroot(i8**%f,i8*null)#0
store i8*%a,i8**%b,align 8
%g=load atomic i32,i32*@sml_check_flag unordered,align 4
%h=icmp eq i32%g,0
br i1%h,label%k,label%i
i:
call void@sml_check(i32 inreg%g)
%j=load i8*,i8**%b,align 8
br label%k
k:
%l=phi i8*[%j,%i],[%a,%m]
store i8*null,i8**%b,align 8
store i8*%l,i8**%c,align 8
%n=bitcast i8*%l to i8**
%o=load i8*,i8**%n,align 8
store i8*%o,i8**%d,align 8
%p=getelementptr inbounds i8,i8*%l,i64 16
%q=bitcast i8*%p to i8**
%r=load i8*,i8**%q,align 8
store i8*%r,i8**%e,align 8
%s=call fastcc i8*@_SMLLN12TypedCalcCon9ffiStubTyE_313(i8*inreg%o)
store i8*%s,i8**%b,align 8
%t=load i8*,i8**%c,align 8
%u=getelementptr inbounds i8,i8*%t,i64 8
%v=bitcast i8*%u to i8**
%w=load i8*,i8**%v,align 8
store i8*%w,i8**%c,align 8
%x=call i8*@sml_alloc(i32 inreg 20)#0
%y=getelementptr inbounds i8,i8*%x,i64 -4
%z=bitcast i8*%y to i32*
store i32 1342177296,i32*%z,align 4
store i8*%x,i8**%f,align 8
%A=bitcast i8*%x to i64*
store i64 0,i64*%A,align 4
%B=load i8*,i8**%c,align 8
store i8*null,i8**%c,align 8
%C=getelementptr inbounds i8,i8*%x,i64 8
%D=bitcast i8*%C to i8**
store i8*%B,i8**%D,align 8
%E=getelementptr inbounds i8,i8*%x,i64 16
%F=bitcast i8*%E to i32*
store i32 2,i32*%F,align 4
%G=call i8*@sml_alloc(i32 inreg 36)#0
%H=getelementptr inbounds i8,i8*%G,i64 -4
%I=bitcast i8*%H to i32*
store i32 1342177312,i32*%I,align 4
store i8*%G,i8**%c,align 8
%J=load i8*,i8**%d,align 8
store i8*null,i8**%d,align 8
%K=bitcast i8*%G to i8**
store i8*%J,i8**%K,align 8
%L=load i8*,i8**%f,align 8
store i8*null,i8**%f,align 8
%M=getelementptr inbounds i8,i8*%G,i64 8
%N=bitcast i8*%M to i8**
store i8*%L,i8**%N,align 8
%O=load i8*,i8**%e,align 8
store i8*null,i8**%e,align 8
%P=getelementptr inbounds i8,i8*%G,i64 16
%Q=bitcast i8*%P to i8**
store i8*%O,i8**%Q,align 8
%R=load i8*,i8**%b,align 8
%S=getelementptr inbounds i8,i8*%G,i64 24
%T=bitcast i8*%S to i8**
store i8*%R,i8**%T,align 8
%U=getelementptr inbounds i8,i8*%G,i64 32
%V=bitcast i8*%U to i32*
store i32 15,i32*%V,align 4
%W=call i8*@sml_alloc(i32 inreg 20)#0
%X=getelementptr inbounds i8,i8*%W,i64 -4
%Y=bitcast i8*%X to i32*
store i32 1342177296,i32*%Y,align 4
store i8*%W,i8**%d,align 8
%Z=getelementptr inbounds i8,i8*%W,i64 4
%aa=bitcast i8*%Z to i32*
store i32 0,i32*%aa,align 1
%ab=bitcast i8*%W to i32*
store i32 19,i32*%ab,align 4
%ac=load i8*,i8**%c,align 8
store i8*null,i8**%c,align 8
%ad=getelementptr inbounds i8,i8*%W,i64 8
%ae=bitcast i8*%ad to i8**
store i8*%ac,i8**%ae,align 8
%af=getelementptr inbounds i8,i8*%W,i64 16
%ag=bitcast i8*%af to i32*
store i32 2,i32*%ag,align 4
%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
%al=bitcast i8*%ah to i8**
store i8*%ak,i8**%al,align 8
%am=load i8*,i8**%b,align 8
%an=getelementptr inbounds i8,i8*%ah,i64 8
%ao=bitcast i8*%an to i8**
store i8*%am,i8**%ao,align 8
%ap=getelementptr inbounds i8,i8*%ah,i64 16
%aq=bitcast i8*%ap to i32*
store i32 3,i32*%aq,align 4
ret i8*%ah
}
define fastcc i8*@_SMLFN12TypedCalcCon15TPFOREIGNSYMBOLE(i8*inreg%a)#4 gc"smlsharp"{
%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
%f=bitcast i8*%a to i8**
%g=load i8*,i8**%f,align 8
store i8*%g,i8**%b,align 8
%h=getelementptr inbounds i8,i8*%a,i64 8
%i=bitcast i8*%h to i8**
%j=load i8*,i8**%i,align 8
store i8*%j,i8**%c,align 8
%k=getelementptr inbounds i8,i8*%a,i64 16
%l=bitcast i8*%k to i8**
%m=load i8*,i8**%l,align 8
store i8*%m,i8**%d,align 8
%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
store i8*%n,i8**%e,align 8
%q=load i8*,i8**%b,align 8
store i8*null,i8**%b,align 8
%r=bitcast i8*%n to i8**
store i8*%q,i8**%r,align 8
%s=load i8*,i8**%c,align 8
store i8*null,i8**%c,align 8
%t=getelementptr inbounds i8,i8*%n,i64 8
%u=bitcast i8*%t to i8**
store i8*%s,i8**%u,align 8
%v=load i8*,i8**%d,align 8
%w=getelementptr inbounds i8,i8*%n,i64 16
%x=bitcast i8*%w to i8**
store i8*%v,i8**%x,align 8
%y=getelementptr inbounds i8,i8*%n,i64 24
%z=bitcast i8*%y to i32*
store i32 7,i32*%z,align 4
%A=call i8*@sml_alloc(i32 inreg 20)#0
%B=getelementptr inbounds i8,i8*%A,i64 -4
%C=bitcast i8*%B to i32*
store i32 1342177296,i32*%C,align 4
store i8*%A,i8**%b,align 8
%D=getelementptr inbounds i8,i8*%A,i64 4
%E=bitcast i8*%D to i32*
store i32 0,i32*%E,align 1
%F=bitcast i8*%A to i32*
store i32 22,i32*%F,align 4
%G=load i8*,i8**%e,align 8
store i8*null,i8**%e,align 8
%H=getelementptr inbounds i8,i8*%A,i64 8
%I=bitcast i8*%H to i8**
store i8*%G,i8**%I,align 8
%J=getelementptr inbounds i8,i8*%A,i64 16
%K=bitcast i8*%J to i32*
store i32 2,i32*%K,align 4
%L=call i8*@sml_alloc(i32 inreg 20)#0
%M=getelementptr inbounds i8,i8*%L,i64 -4
%N=bitcast i8*%M to i32*
store i32 1342177296,i32*%N,align 4
%O=load i8*,i8**%b,align 8
%P=bitcast i8*%L to i8**
store i8*%O,i8**%P,align 8
%Q=load i8*,i8**%d,align 8
%R=getelementptr inbounds i8,i8*%L,i64 8
%S=bitcast i8*%R to i8**
store i8*%Q,i8**%S,align 8
%T=getelementptr inbounds i8,i8*%L,i64 16
%U=bitcast i8*%T to i32*
store i32 3,i32*%U,align 4
ret i8*%L
}
define fastcc i8*@_SMLFN12TypedCalcCon14TPFOREIGNAPPLYE(i8*inreg%a)#2 gc"smlsharp"personality i32(...)*@sml_personality{
r:
%b=alloca i8*,align 8
%c=alloca i8*,align 8
%d=alloca i8*,align 8
%e=alloca i8*,align 8
%f=alloca i8*,align 8
%g=alloca i8*,align 8
%h=alloca i8*,align 8
%i=alloca i8*,align 8
%j=alloca i8*,align 8
%k=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
call void@llvm.gcroot(i8**%f,i8*null)#0
call void@llvm.gcroot(i8**%g,i8*null)#0
call void@llvm.gcroot(i8**%h,i8*null)#0
call void@llvm.gcroot(i8**%i,i8*null)#0
call void@llvm.gcroot(i8**%j,i8*null)#0
call void@llvm.gcroot(i8**%k,i8*null)#0
store i8*%a,i8**%b,align 8
%l=load atomic i32,i32*@sml_check_flag unordered,align 4
%m=icmp eq i32%l,0
br i1%m,label%p,label%n
n:
call void@sml_check(i32 inreg%l)
%o=load i8*,i8**%b,align 8
br label%p
p:
%q=phi i8*[%o,%n],[%a,%r]
store i8*null,i8**%b,align 8
store i8*%q,i8**%d,align 8
%s=getelementptr inbounds i8,i8*%q,i64 8
%t=bitcast i8*%s to i8***
%u=load i8**,i8***%t,align 8
%v=load i8*,i8**%u,align 8
store i8*%v,i8**%e,align 8
%w=getelementptr inbounds i8,i8*%q,i64 16
%x=bitcast i8*%w to i8**
%y=load i8*,i8**%x,align 8
store i8*%y,i8**%f,align 8
%z=call fastcc i8*@_SMLFN8ListPair5unzipE(i32 inreg 1,i32 inreg 8,i32 inreg 1,i32 inreg 8)
%A=getelementptr inbounds i8,i8*%z,i64 16
%B=bitcast i8*%A to i8*(i8*,i8*)**
%C=load i8*(i8*,i8*)*,i8*(i8*,i8*)**%B,align 8
%D=bitcast i8*%z to i8**
%E=load i8*,i8**%D,align 8
%F=bitcast i8**%d to i8***
%G=load i8**,i8***%F,align 8
%H=load i8*,i8**%G,align 8
%I=call fastcc i8*%C(i8*inreg%E,i8*inreg%H)
%J=bitcast i8*%I to i8**
%K=load i8*,i8**%J,align 8
store i8*%K,i8**%b,align 8
%L=getelementptr inbounds i8,i8*%I,i64 8
%M=bitcast i8*%L to i8**
%N=load i8*,i8**%M,align 8
store i8*%N,i8**%c,align 8
%O=load i8*,i8**%d,align 8
%P=getelementptr inbounds i8,i8*%O,i64 8
%Q=bitcast i8*%P to i8**
%R=load i8*,i8**%Q,align 8
%S=getelementptr inbounds i8,i8*%R,i64 8
%T=bitcast i8*%S to i8**
%U=load i8*,i8**%T,align 8
%V=call fastcc i8*@_SMLFN11TypesBasics7derefTyE(i8*inreg%U)
%W=icmp eq i8*%V,null
br i1%W,label%cV,label%X
X:
%Y=bitcast i8*%V to i32*
%Z=load i32,i32*%Y,align 4
%aa=icmp eq i32%Z,0
br i1%aa,label%ab,label%cV
ab:
%ac=getelementptr inbounds i8,i8*%V,i64 8
%ad=bitcast i8*%ac to i8**
%ae=load i8*,i8**%ad,align 8
%af=bitcast i8*%ae to i32*
%ag=load i32,i32*%af,align 4
%ah=icmp eq i32%ag,2
br i1%ah,label%ai,label%cV
ai:
%aj=getelementptr inbounds i8,i8*%ae,i64 8
%ak=bitcast i8*%aj to i8**
%al=load i8*,i8**%ak,align 8
%am=bitcast i8*%al to i8**
%an=load i8*,i8**%am,align 8
store i8*%an,i8**%g,align 8
%ao=getelementptr inbounds i8,i8*%al,i64 8
%ap=bitcast i8*%ao to i8**
%aq=load i8*,i8**%ap,align 8
store i8*%aq,i8**%h,align 8
%ar=getelementptr inbounds i8,i8*%al,i64 16
%as=bitcast i8*%ar to i8**
%at=load i8*,i8**%as,align 8
store i8*%at,i8**%i,align 8
%au=getelementptr inbounds i8,i8*%al,i64 24
%av=bitcast i8*%au to i8**
%aw=load i8*,i8**%av,align 8
%ax=icmp eq i8*%aw,null
br i1%ax,label%aB,label%ay
ay:
%az=bitcast i8*%aw to i8**
%aA=load i8*,i8**%az,align 8
br label%aB
aB:
%aC=phi i8*[%aA,%ay],[null,%ai]
store i8*%aC,i8**%d,align 8
%aD=invoke fastcc i8*@_SMLFN8ListPair5zipEqE(i32 inreg 1,i32 inreg 8,i32 inreg 1,i32 inreg 8)
to label%aE unwind label%bk
aE:
%aF=getelementptr inbounds i8,i8*%aD,i64 16
%aG=bitcast i8*%aF to i8*(i8*,i8*)**
%aH=load i8*(i8*,i8*)*,i8*(i8*,i8*)**%aG,align 8
%aI=bitcast i8*%aD to i8**
%aJ=load i8*,i8**%aI,align 8
store i8*%aJ,i8**%k,align 8
%aK=invoke fastcc i8*@_SMLFN4List1_VE(i32 inreg 1,i32 inreg 8)
to label%aL unwind label%bk
aL:
%aM=getelementptr inbounds i8,i8*%aK,i64 16
%aN=bitcast i8*%aM to i8*(i8*,i8*)**
%aO=load i8*(i8*,i8*)*,i8*(i8*,i8*)**%aN,align 8
%aP=bitcast i8*%aK to i8**
%aQ=load i8*,i8**%aP,align 8
store i8*%aQ,i8**%j,align 8
%aR=call i8*@sml_alloc(i32 inreg 20)#0
%aS=getelementptr inbounds i8,i8*%aR,i64 -4
%aT=bitcast i8*%aS to i32*
store i32 1342177296,i32*%aT,align 4
%aU=load i8*,i8**%g,align 8
store i8*null,i8**%g,align 8
%aV=bitcast i8*%aR to i8**
store i8*%aU,i8**%aV,align 8
%aW=load i8*,i8**%d,align 8
store i8*null,i8**%d,align 8
%aX=getelementptr inbounds i8,i8*%aR,i64 8
%aY=bitcast i8*%aX to i8**
store i8*%aW,i8**%aY,align 8
%aZ=getelementptr inbounds i8,i8*%aR,i64 16
%a0=bitcast i8*%aZ to i32*
store i32 3,i32*%a0,align 4
%a1=load i8*,i8**%j,align 8
store i8*null,i8**%j,align 8
%a2=invoke fastcc i8*%aO(i8*inreg%a1,i8*inreg%aR)
to label%a3 unwind label%bk
a3:
store i8*%a2,i8**%d,align 8
%a4=call i8*@sml_alloc(i32 inreg 20)#0
%a5=getelementptr inbounds i8,i8*%a4,i64 -4
%a6=bitcast i8*%a5 to i32*
store i32 1342177296,i32*%a6,align 4
%a7=load i8*,i8**%d,align 8
store i8*null,i8**%d,align 8
%a8=bitcast i8*%a4 to i8**
store i8*%a7,i8**%a8,align 8
%a9=load i8*,i8**%c,align 8
store i8*null,i8**%c,align 8
%ba=getelementptr inbounds i8,i8*%a4,i64 8
%bb=bitcast i8*%ba to i8**
store i8*%a9,i8**%bb,align 8
%bc=getelementptr inbounds i8,i8*%a4,i64 16
%bd=bitcast i8*%bc to i32*
store i32 3,i32*%bd,align 4
%be=load i8*,i8**%k,align 8
store i8*null,i8**%k,align 8
%bf=invoke fastcc i8*%aH(i8*inreg%be,i8*inreg%a4)
to label%bg unwind label%bk
bg:
store i8*%bf,i8**%c,align 8
%bh=load i32*,i32**bitcast(i8**@_SMLZN7Control9checkTypeE to i32**),align 8
%bi=load i32,i32*%bh,align 4
%bj=icmp eq i32%bi,0
br i1%bj,label%cb,label%bV
bk:
%bl=landingpad{i8*,i8*}
catch i8*null
%bm=extractvalue{i8*,i8*}%bl,1
%bn=bitcast i8*%bm to i8**
%bo=load i8*,i8**%bn,align 8
store i8*null,i8**%c,align 8
store i8*null,i8**%d,align 8
store i8*null,i8**%e,align 8
store i8*null,i8**%f,align 8
store i8*null,i8**%g,align 8
store i8*null,i8**%h,align 8
store i8*null,i8**%i,align 8
store i8*null,i8**%k,align 8
store i8*%bo,i8**%b,align 8
%bp=bitcast i8*%bo to i8**
%bq=load i8*,i8**%bp,align 8
%br=load i8*,i8**@_SMLZN8ListPair14UnequalLengthsE,align 8
%bs=icmp eq i8*%bq,%br
br i1%bs,label%bt,label%bN
bt:
%bu=load i8*,i8**@_SMLZN3Bug3BugE,align 8
store i8*%bu,i8**%b,align 8
%bv=call i8*@sml_alloc(i32 inreg 28)#0
%bw=getelementptr inbounds i8,i8*%bv,i64 -4
%bx=bitcast i8*%bw to i32*
store i32 1342177304,i32*%bx,align 4
store i8*%bv,i8**%c,align 8
%by=load i8*,i8**%b,align 8
store i8*null,i8**%b,align 8
%bz=bitcast i8*%bv to i8**
store i8*%by,i8**%bz,align 8
%bA=getelementptr inbounds i8,i8*%bv,i64 8
%bB=bitcast i8*%bA to i8**
store i8*getelementptr inbounds(<{[4x i8],i32,[70x i8]}>,<{[4x i8],i32,[70x i8]}>*@H,i64 0,i32 2,i64 0),i8**%bB,align 8
%bC=getelementptr inbounds i8,i8*%bv,i64 16
%bD=bitcast i8*%bC to i8**
store i8*getelementptr inbounds(<{[4x i8],i32,[31x i8]}>,<{[4x i8],i32,[31x i8]}>*@I,i64 0,i32 2,i64 0),i8**%bD,align 8
%bE=getelementptr inbounds i8,i8*%bv,i64 24
%bF=bitcast i8*%bE to i32*
store i32 7,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=call i8*@sml_alloc(i32 inreg 60)#0
%bP=getelementptr inbounds i8,i8*%bO,i64 -4
%bQ=bitcast i8*%bP to i32*
store i32 1342177336,i32*%bQ,align 4
%bR=getelementptr inbounds i8,i8*%bO,i64 56
%bS=bitcast i8*%bR to i32*
store i32 1,i32*%bS,align 4
%bT=load i8*,i8**%b,align 8
%bU=bitcast i8*%bO to i8**
store i8*%bT,i8**%bU,align 8
call void@sml_raise(i8*inreg%bO)#1
unreachable
bV:
%bW=call fastcc i8*@_SMLLN12TypedCalcCon4eqTyE_287(i8*inreg getelementptr inbounds(<{[4x i8],i32,[15x i8]}>,<{[4x i8],i32,[15x i8]}>*@J,i64 0,i32 2,i64 0))
%bX=getelementptr inbounds i8,i8*%bW,i64 16
%bY=bitcast i8*%bX to i8*(i8*,i8*)**
%bZ=load i8*(i8*,i8*)*,i8*(i8*,i8*)**%bY,align 8
%b0=bitcast i8*%bW to i8**
%b1=load i8*,i8**%b0,align 8
%b2=load i8*,i8**%f,align 8
%b3=call fastcc i8*%bZ(i8*inreg%b1,i8*inreg%b2)
%b4=getelementptr inbounds i8,i8*%b3,i64 16
%b5=bitcast i8*%b4 to i8*(i8*,i8*)**
%b6=load i8*(i8*,i8*)*,i8*(i8*,i8*)**%b5,align 8
%b7=bitcast i8*%b3 to i8**
%b8=load i8*,i8**%b7,align 8
%b9=load i8*,i8**%c,align 8
store i8*null,i8**%c,align 8
%ca=call fastcc i8*%b6(i8*inreg%b8,i8*inreg%b9)
br label%cb
cb:
%cc=load i8*,i8**%i,align 8
%cd=icmp eq i8*%cc,null
%ce=bitcast i8*%cc to i8**
%cf=select i1%cd,i8**@_SMLZN12BuiltinTypes6unitTyE,i8**%ce
%cg=load i8*,i8**%cf,align 8
store i8*%cg,i8**%c,align 8
%ch=call i8*@sml_alloc(i32 inreg 44)#0
%ci=getelementptr inbounds i8,i8*%ch,i64 -4
%cj=bitcast i8*%ci to i32*
store i32 1342177320,i32*%cj,align 4
store i8*%ch,i8**%d,align 8
%ck=load i8*,i8**%b,align 8
store i8*null,i8**%b,align 8
%cl=bitcast i8*%ch to i8**
store i8*%ck,i8**%cl,align 8
%cm=load i8*,i8**%h,align 8
store i8*null,i8**%h,align 8
%cn=getelementptr inbounds i8,i8*%ch,i64 8
%co=bitcast i8*%cn to i8**
store i8*%cm,i8**%co,align 8
%cp=load i8*,i8**%e,align 8
store i8*null,i8**%e,align 8
%cq=getelementptr inbounds i8,i8*%ch,i64 16
%cr=bitcast i8*%cq to i8**
store i8*%cp,i8**%cr,align 8
%cs=load i8*,i8**%f,align 8
store i8*null,i8**%f,align 8
%ct=getelementptr inbounds i8,i8*%ch,i64 24
%cu=bitcast i8*%ct to i8**
store i8*%cs,i8**%cu,align 8
%cv=load i8*,i8**%i,align 8
store i8*null,i8**%i,align 8
%cw=getelementptr inbounds i8,i8*%ch,i64 32
%cx=bitcast i8*%cw to i8**
store i8*%cv,i8**%cx,align 8
%cy=getelementptr inbounds i8,i8*%ch,i64 40
%cz=bitcast i8*%cy to i32*
store i32 31,i32*%cz,align 4
%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**%b,align 8
%cD=getelementptr inbounds i8,i8*%cA,i64 4
%cE=bitcast i8*%cD to i32*
store i32 0,i32*%cE,align 1
%cF=bitcast i8*%cA to i32*
store i32 21,i32*%cF,align 4
%cG=load i8*,i8**%d,align 8
store i8*null,i8**%d,align 8
%cH=getelementptr inbounds i8,i8*%cA,i64 8
%cI=bitcast i8*%cH to i8**
store i8*%cG,i8**%cI,align 8
%cJ=getelementptr inbounds i8,i8*%cA,i64 16
%cK=bitcast i8*%cJ to i32*
store i32 2,i32*%cK,align 4
%cL=call i8*@sml_alloc(i32 inreg 20)#0
%cM=getelementptr inbounds i8,i8*%cL,i64 -4
%cN=bitcast i8*%cM to i32*
store i32 1342177296,i32*%cN,align 4
%cO=load i8*,i8**%b,align 8
%cP=bitcast i8*%cL to i8**
store i8*%cO,i8**%cP,align 8
%cQ=load i8*,i8**%c,align 8
%cR=getelementptr inbounds i8,i8*%cL,i64 8
%cS=bitcast i8*%cR to i8**
store i8*%cQ,i8**%cS,align 8
%cT=getelementptr inbounds i8,i8*%cL,i64 16
%cU=bitcast i8*%cT to i32*
store i32 3,i32*%cU,align 4
ret i8*%cL
cV:
store i8*null,i8**%b,align 8
store i8*null,i8**%c,align 8
store i8*null,i8**%e,align 8
%cW=call fastcc i8*@_SMLLN12TypedCalcCon5fail1E_259(i8*inreg getelementptr inbounds(<{[4x i8],i32,[23x i8]}>,<{[4x i8],i32,[23x i8]}>*@F,i64 0,i32 2,i64 0))
%cX=getelementptr inbounds i8,i8*%cW,i64 16
%cY=bitcast i8*%cX to i8*(i8*,i8*)**
%cZ=load i8*(i8*,i8*)*,i8*(i8*,i8*)**%cY,align 8
%c0=bitcast i8*%cW to i8**
%c1=load i8*,i8**%c0,align 8
%c2=load i8*,i8**%f,align 8
store i8*null,i8**%f,align 8
%c3=call fastcc i8*%cZ(i8*inreg%c1,i8*inreg%c2)
%c4=getelementptr inbounds i8,i8*%c3,i64 16
%c5=bitcast i8*%c4 to i8*(i8*,i8*)**
%c6=load i8*(i8*,i8*)*,i8*(i8*,i8*)**%c5,align 8
%c7=bitcast i8*%c3 to i8**
%c8=load i8*,i8**%c7,align 8
%c9=load i8*,i8**%d,align 8
store i8*null,i8**%d,align 8
%da=getelementptr inbounds i8,i8*%c9,i64 8
%db=bitcast i8*%da to i8**
%dc=load i8*,i8**%db,align 8
%dd=getelementptr inbounds i8,i8*%dc,i64 8
%de=bitcast i8*%dd to i8**
%df=load i8*,i8**%de,align 8
%dg=call fastcc i8*%c6(i8*inreg%c8,i8*inreg%df)
%dh=load i8*,i8**@_SMLZN3Bug3BugE,align 8
store i8*%dh,i8**%b,align 8
%di=call i8*@sml_alloc(i32 inreg 28)#0
%dj=getelementptr inbounds i8,i8*%di,i64 -4
%dk=bitcast i8*%dj to i32*
store i32 1342177304,i32*%dk,align 4
store i8*%di,i8**%c,align 8
%dl=load i8*,i8**%b,align 8
store i8*null,i8**%b,align 8
%dm=bitcast i8*%di to i8**
store i8*%dl,i8**%dm,align 8
%dn=getelementptr inbounds i8,i8*%di,i64 8
%do=bitcast i8*%dn to i8**
store i8*getelementptr inbounds(<{[4x i8],i32,[70x i8]}>,<{[4x i8],i32,[70x i8]}>*@G,i64 0,i32 2,i64 0),i8**%do,align 8
%dp=getelementptr inbounds i8,i8*%di,i64 16
%dq=bitcast i8*%dp to i8**
store i8*getelementptr inbounds(<{[4x i8],i32,[15x i8]}>,<{[4x i8],i32,[15x i8]}>*@J,i64 0,i32 2,i64 0),i8**%dq,align 8
%dr=getelementptr inbounds i8,i8*%di,i64 24
%ds=bitcast i8*%dr to i32*
store i32 7,i32*%ds,align 4
%dt=call i8*@sml_alloc(i32 inreg 60)#0
%du=getelementptr inbounds i8,i8*%dt,i64 -4
%dv=bitcast i8*%du to i32*
store i32 1342177336,i32*%dv,align 4
%dw=getelementptr inbounds i8,i8*%dt,i64 56
%dx=bitcast i8*%dw to i32*
store i32 1,i32*%dx,align 4
%dy=load i8*,i8**%c,align 8
%dz=bitcast i8*%dt to i8**
store i8*%dy,i8**%dz,align 8
call void@sml_raise(i8*inreg%dt)#1
unreachable
}
define internal fastcc i8*@_SMLLN12TypedCalcCon12TPCALLBACKFNE_345(i8*inreg%a)#4 gc"smlsharp"{
%b=getelementptr inbounds i8,i8*%a,i64 16
%c=bitcast i8*%b to i8**
%d=load i8*,i8**%c,align 8
ret i8*%d
}
define fastcc i8*@_SMLFN12TypedCalcCon12TPCALLBACKFNE(i8*inreg%a)#2 gc"smlsharp"{
r:
%b=alloca i8*,align 8
%c=alloca i8*,align 8
%d=alloca i8*,align 8
%e=alloca i8*,align 8
%f=alloca i8*,align 8
%g=alloca i8*,align 8
%h=alloca i8*,align 8
%i=alloca i8*,align 8
%j=alloca i8*,align 8
%k=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
call void@llvm.gcroot(i8**%f,i8*null)#0
call void@llvm.gcroot(i8**%g,i8*null)#0
call void@llvm.gcroot(i8**%h,i8*null)#0
call void@llvm.gcroot(i8**%i,i8*null)#0
call void@llvm.gcroot(i8**%j,i8*null)#0
call void@llvm.gcroot(i8**%k,i8*null)#0
store i8*%a,i8**%b,align 8
%l=load atomic i32,i32*@sml_check_flag unordered,align 4
%m=icmp eq i32%l,0
br i1%m,label%p,label%n
n:
call void@sml_check(i32 inreg%l)
%o=load i8*,i8**%b,align 8
br label%p
p:
%q=phi i8*[%o,%n],[%a,%r]
%s=bitcast i8*%q to i8**
%t=load i8*,i8**%s,align 8
store i8*%t,i8**%g,align 8
%u=getelementptr inbounds i8,i8*%q,i64 8
%v=bitcast i8*%u to i8**
%w=load i8*,i8**%v,align 8
store i8*%w,i8**%h,align 8
%x=getelementptr inbounds i8,i8*%q,i64 16
%y=bitcast i8*%x to i8***
%z=load i8**,i8***%y,align 8
%A=load i8*,i8**%z,align 8
store i8*%A,i8**%i,align 8
%B=getelementptr inbounds i8,i8*%q,i64 32
%C=bitcast i8*%B to i8**
%D=load i8*,i8**%C,align 8
store i8*%D,i8**%j,align 8
%E=getelementptr inbounds i8,i8*%q,i64 24
%F=bitcast i8*%E to i32*
%G=load i32,i32*%F,align 4
%H=icmp eq i32%G,0
br i1%H,label%I,label%S
I:
%J=getelementptr inbounds i8*,i8**%z,i64 1
%K=load i8*,i8**%J,align 8
store i8*%K,i8**%b,align 8
%L=call i8*@sml_alloc(i32 inreg 12)#0
%M=getelementptr inbounds i8,i8*%L,i64 -4
%N=bitcast i8*%M to i32*
store i32 1342177288,i32*%N,align 4
%O=load i8*,i8**%b,align 8
store i8*null,i8**%b,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 i32*
store i32 1,i32*%R,align 4
br label%S
S:
%T=phi i8*[%L,%I],[null,%p]
store i8*%T,i8**%b,align 8
%U=call fastcc i8*@_SMLFN4List3mapE(i32 inreg 1,i32 inreg 8,i32 inreg 1,i32 inreg 8)
%V=getelementptr inbounds i8,i8*%U,i64 16
%W=bitcast i8*%V to i8*(i8*,i8*)**
%X=load i8*(i8*,i8*)*,i8*(i8*,i8*)**%W,align 8
%Y=bitcast i8*%U to i8**
%Z=load i8*,i8**%Y,align 8
%aa=call fastcc i8*%X(i8*inreg%Z,i8*inreg bitcast(i8**getelementptr inbounds(<{[4x i8],i32,i8*,void(...)*,void(...)*,i32}>,<{[4x i8],i32,i8*,void(...)*,void(...)*,i32}>*@L,i64 0,i32 2)to i8*))
%ab=getelementptr inbounds i8,i8*%aa,i64 16
%ac=bitcast i8*%ab to i8*(i8*,i8*)**
%ad=load i8*(i8*,i8*)*,i8*(i8*,i8*)**%ac,align 8
%ae=bitcast i8*%aa to i8**
%af=load i8*,i8**%ae,align 8
%ag=load i8*,i8**%g,align 8
%ah=call fastcc i8*%ad(i8*inreg%af,i8*inreg%ag)
store i8*%ah,i8**%c,align 8
%ai=call i8*@sml_alloc(i32 inreg 36)#0
%aj=getelementptr inbounds i8,i8*%ai,i64 -4
%ak=bitcast i8*%aj to i32*
store i32 1342177312,i32*%ak,align 4
%al=load i8*,i8**%c,align 8
%am=bitcast i8*%ai to i8**
store i8*%al,i8**%am,align 8
%an=load i8*,i8**%h,align 8
%ao=getelementptr inbounds i8,i8*%ai,i64 8
%ap=bitcast i8*%ao to i8**
store i8*%an,i8**%ap,align 8
%aq=load i8*,i8**%b,align 8
%ar=getelementptr inbounds i8,i8*%ai,i64 16
%as=bitcast i8*%ar to i8**
store i8*%aq,i8**%as,align 8
%at=getelementptr inbounds i8,i8*%ai,i64 24
%au=bitcast i8*%at to i8**
store i8*null,i8**%au,align 8
%av=getelementptr inbounds i8,i8*%ai,i64 32
%aw=bitcast i8*%av to i32*
store i32 15,i32*%aw,align 4
store i8*%an,i8**%d,align 8
store i8*%aq,i8**%e,align 8
store i8*null,i8**%f,align 8
%ax=call i8*@sml_alloc(i32 inreg 36)#0
%ay=getelementptr inbounds i8,i8*%ax,i64 -4
%az=bitcast i8*%ay to i32*
store i32 1342177312,i32*%az,align 4
store i8*%ax,i8**%k,align 8
%aA=load i8*,i8**%c,align 8
store i8*null,i8**%c,align 8
%aB=bitcast i8*%ax to i8**
store i8*%aA,i8**%aB,align 8
%aC=load i8*,i8**%d,align 8
store i8*null,i8**%d,align 8
%aD=getelementptr inbounds i8,i8*%ax,i64 8
%aE=bitcast i8*%aD to i8**
store i8*%aC,i8**%aE,align 8
%aF=load i8*,i8**%e,align 8
store i8*null,i8**%e,align 8
%aG=getelementptr inbounds i8,i8*%ax,i64 16
%aH=bitcast i8*%aG to i8**
store i8*%aF,i8**%aH,align 8
%aI=load i8*,i8**%f,align 8
store i8*null,i8**%f,align 8
%aJ=getelementptr inbounds i8,i8*%ax,i64 24
%aK=bitcast i8*%aJ to i8**
store i8*%aI,i8**%aK,align 8
%aL=getelementptr inbounds i8,i8*%ax,i64 32
%aM=bitcast i8*%aL to i32*
store i32 15,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**%c,align 8
%aQ=getelementptr inbounds i8,i8*%aN,i64 4
%aR=bitcast i8*%aQ to i32*
store i32 0,i32*%aR,align 1
%aS=bitcast i8*%aN to i32*
store i32 2,i32*%aS,align 4
%aT=load i8*,i8**%k,align 8
store i8*null,i8**%k,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 i8*@sml_alloc(i32 inreg 20)#0
%aZ=getelementptr inbounds i8,i8*%aY,i64 -4
%a0=bitcast i8*%aZ to i32*
store i32 1342177296,i32*%a0,align 4
store i8*%aY,i8**%d,align 8
%a1=bitcast i8*%aY to i64*
store i64 0,i64*%a1,align 4
%a2=load i8*,i8**%c,align 8
store i8*null,i8**%c,align 8
%a3=getelementptr inbounds i8,i8*%aY,i64 8
%a4=bitcast i8*%a3 to i8**
store i8*%a2,i8**%a4,align 8
%a5=getelementptr inbounds i8,i8*%aY,i64 16
%a6=bitcast i8*%a5 to i32*
store i32 2,i32*%a6,align 4
%a7=call i8*@sml_alloc(i32 inreg 44)#0
%a8=getelementptr inbounds i8,i8*%a7,i64 -4
%a9=bitcast i8*%a8 to i32*
store i32 1342177320,i32*%a9,align 4
store i8*%a7,i8**%c,align 8
%ba=load i8*,i8**%g,align 8
store i8*null,i8**%g,align 8
%bb=bitcast i8*%a7 to i8**
store i8*%ba,i8**%bb,align 8
%bc=load i8*,i8**%h,align 8
store i8*null,i8**%h,align 8
%bd=getelementptr inbounds i8,i8*%a7,i64 8
%be=bitcast i8*%bd to i8**
store i8*%bc,i8**%be,align 8
%bf=load i8*,i8**%i,align 8
store i8*null,i8**%i,align 8
%bg=getelementptr inbounds i8,i8*%a7,i64 16
%bh=bitcast i8*%bg to i8**
store i8*%bf,i8**%bh,align 8
%bi=load i8*,i8**%j,align 8
store i8*null,i8**%j,align 8
%bj=getelementptr inbounds i8,i8*%a7,i64 24
%bk=bitcast i8*%bj to i8**
store i8*%bi,i8**%bk,align 8
%bl=load i8*,i8**%b,align 8
store i8*null,i8**%b,align 8
%bm=getelementptr inbounds i8,i8*%a7,i64 32
%bn=bitcast i8*%bm to i8**
store i8*%bl,i8**%bn,align 8
%bo=getelementptr inbounds i8,i8*%a7,i64 40
%bp=bitcast i8*%bo to i32*
store i32 31,i32*%bp,align 4
%bq=call i8*@sml_alloc(i32 inreg 20)#0
%br=getelementptr inbounds i8,i8*%bq,i64 -4
%bs=bitcast i8*%br to i32*
store i32 1342177296,i32*%bs,align 4
store i8*%bq,i8**%b,align 8
%bt=getelementptr inbounds i8,i8*%bq,i64 4
%bu=bitcast i8*%bt to i32*
store i32 0,i32*%bu,align 1
%bv=bitcast i8*%bq to i32*
store i32 1,i32*%bv,align 4
%bw=load i8*,i8**%c,align 8
store i8*null,i8**%c,align 8
%bx=getelementptr inbounds i8,i8*%bq,i64 8
%by=bitcast i8*%bx to i8**
store i8*%bw,i8**%by,align 8
%bz=getelementptr inbounds i8,i8*%bq,i64 16
%bA=bitcast i8*%bz to i32*
store i32 2,i32*%bA,align 4
%bB=call i8*@sml_alloc(i32 inreg 20)#0
%bC=getelementptr inbounds i8,i8*%bB,i64 -4
%bD=bitcast i8*%bC to i32*
store i32 1342177296,i32*%bD,align 4
%bE=load i8*,i8**%b,align 8
%bF=bitcast i8*%bB to i8**
store i8*%bE,i8**%bF,align 8
%bG=load i8*,i8**%d,align 8
%bH=getelementptr inbounds i8,i8*%bB,i64 8
%bI=bitcast i8*%bH to i8**
store i8*%bG,i8**%bI,align 8
%bJ=getelementptr inbounds i8,i8*%bB,i64 16
%bK=bitcast i8*%bJ to i32*
store i32 3,i32*%bK,align 4
ret i8*%bB
}
define fastcc i8*@_SMLFN12TypedCalcCon6TPTAPPE(i8*inreg%a)#2 gc"smlsharp"{
n:
%b=alloca i8*,align 8
%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**%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
call void@llvm.gcroot(i8**%f,i8*null)#0
call void@llvm.gcroot(i8**%g,i8*null)#0
store i8*%a,i8**%b,align 8
%h=load atomic i32,i32*@sml_check_flag unordered,align 4
%i=icmp eq i32%h,0
br i1%i,label%l,label%j
j:
call void@sml_check(i32 inreg%h)
%k=load i8*,i8**%b,align 8
br label%l
l:
%m=phi i8*[%k,%j],[%a,%n]
store i8*null,i8**%b,align 8
%o=bitcast i8*%m to i8**
%p=bitcast i8*%m to i8***
%q=load i8**,i8***%p,align 8
%r=load i8*,i8**%q,align 8
store i8*%r,i8**%c,align 8
%s=load i8*,i8**%o,align 8
%t=getelementptr inbounds i8,i8*%s,i64 8
%u=bitcast i8*%t to i8**
%v=load i8*,i8**%u,align 8
store i8*%v,i8**%d,align 8
%w=getelementptr inbounds i8,i8*%m,i64 8
%x=bitcast i8*%w to i8**
%y=load i8*,i8**%x,align 8
store i8*%y,i8**%e,align 8
%z=icmp eq i8*%y,null
br i1%z,label%A,label%C
A:
%B=load i8*,i8**%o,align 8
ret i8*%B
C:
%D=getelementptr inbounds i8,i8*%m,i64 16
%E=bitcast i8*%D to i8**
%F=load i8*,i8**%E,align 8
store i8*%F,i8**%f,align 8
%G=call i8*@sml_alloc(i32 inreg 20)#0
%H=getelementptr inbounds i8,i8*%G,i64 -4
%I=bitcast i8*%H to i32*
store i32 1342177296,i32*%I,align 4
%J=load i8*,i8**%d,align 8
%K=bitcast i8*%G to i8**
store i8*%J,i8**%K,align 8
%L=load i8*,i8**%e,align 8
%M=getelementptr inbounds i8,i8*%G,i64 8
%N=bitcast i8*%M to i8**
store i8*%L,i8**%N,align 8
%O=getelementptr inbounds i8,i8*%G,i64 16
%P=bitcast i8*%O to i32*
store i32 3,i32*%P,align 4
%Q=call fastcc i8*@_SMLFN11TypesBasics7tpappTyE(i8*inreg%G)
store i8*%Q,i8**%b,align 8
%R=call i8*@sml_alloc(i32 inreg 36)#0
%S=getelementptr inbounds i8,i8*%R,i64 -4
%T=bitcast i8*%S to i32*
store i32 1342177312,i32*%T,align 4
store i8*%R,i8**%g,align 8
%U=load i8*,i8**%c,align 8
store i8*null,i8**%c,align 8
%V=bitcast i8*%R to i8**
store i8*%U,i8**%V,align 8
%W=load i8*,i8**%d,align 8
store i8*null,i8**%d,align 8
%X=getelementptr inbounds i8,i8*%R,i64 8
%Y=bitcast i8*%X to i8**
store i8*%W,i8**%Y,align 8
%Z=load i8*,i8**%e,align 8
store i8*null,i8**%e,align 8
%aa=getelementptr inbounds i8,i8*%R,i64 16
%ab=bitcast i8*%aa to i8**
store i8*%Z,i8**%ab,align 8
%ac=load i8*,i8**%f,align 8
store i8*null,i8**%f,align 8
%ad=getelementptr inbounds i8,i8*%R,i64 24
%ae=bitcast i8*%ad to i8**
store i8*%ac,i8**%ae,align 8
%af=getelementptr inbounds i8,i8*%R,i64 32
%ag=bitcast i8*%af to i32*
store i32 15,i32*%ag,align 4
%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
store i8*%ah,i8**%c,align 8
%ak=getelementptr inbounds i8,i8*%ah,i64 4
%al=bitcast i8*%ak to i32*
store i32 0,i32*%al,align 1
%am=bitcast i8*%ah to i32*
store i32 38,i32*%am,align 4
%an=load i8*,i8**%g,align 8
store i8*null,i8**%g,align 8
%ao=getelementptr inbounds i8,i8*%ah,i64 8
%ap=bitcast i8*%ao to i8**
store i8*%an,i8**%ap,align 8
%aq=getelementptr inbounds i8,i8*%ah,i64 16
%ar=bitcast i8*%aq to i32*
store i32 2,i32*%ar,align 4
%as=call i8*@sml_alloc(i32 inreg 20)#0
%at=getelementptr inbounds i8,i8*%as,i64 -4
%au=bitcast i8*%at to i32*
store i32 1342177296,i32*%au,align 4
%av=load i8*,i8**%c,align 8
%aw=bitcast i8*%as to i8**
store i8*%av,i8**%aw,align 8
%ax=load i8*,i8**%b,align 8
%ay=getelementptr inbounds i8,i8*%as,i64 8
%az=bitcast i8*%ay to i8**
store i8*%ax,i8**%az,align 8
%aA=getelementptr inbounds i8,i8*%as,i64 16
%aB=bitcast i8*%aA to i32*
store i32 3,i32*%aB,align 4
ret i8*%as
}
define fastcc i8*@_SMLFN12TypedCalcCon6TPPOLYE(i8*inreg%a)#2 gc"smlsharp"{
n:
%b=alloca i8*,align 8
%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**%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
call void@llvm.gcroot(i8**%f,i8*null)#0
call void@llvm.gcroot(i8**%g,i8*null)#0
store i8*%a,i8**%b,align 8
%h=load atomic i32,i32*@sml_check_flag unordered,align 4
%i=icmp eq i32%h,0
br i1%i,label%l,label%j
j:
call void@sml_check(i32 inreg%h)
%k=load i8*,i8**%b,align 8
br label%l
l:
%m=phi i8*[%k,%j],[%a,%n]
%o=bitcast i8*%m to i8**
%p=load i8*,i8**%o,align 8
store i8*%p,i8**%b,align 8
%q=getelementptr inbounds i8,i8*%m,i64 8
%r=bitcast i8*%q to i8**
%s=load i8*,i8**%r,align 8
store i8*%s,i8**%c,align 8
%t=getelementptr inbounds i8,i8*%m,i64 16
%u=bitcast i8*%t to i8***
%v=load i8**,i8***%u,align 8
%w=load i8*,i8**%v,align 8
store i8*%w,i8**%d,align 8
%x=getelementptr inbounds i8*,i8**%v,i64 1
%y=load i8*,i8**%x,align 8
store i8*%y,i8**%e,align 8
%z=getelementptr inbounds i8,i8*%m,i64 24
%A=bitcast i8*%z to i8**
%B=load i8*,i8**%A,align 8
store i8*%B,i8**%f,align 8
%C=call fastcc i8*@_SMLFN14BoundTypeVarID3Map7isEmptyE(i32 inreg 1,i32 inreg 8)
%D=getelementptr inbounds i8,i8*%C,i64 16
%E=bitcast i8*%D to i8*(i8*,i8*)**
%F=load i8*(i8*,i8*)*,i8*(i8*,i8*)**%E,align 8
%G=bitcast i8*%C to i8**
%H=load i8*,i8**%G,align 8
%I=load i8*,i8**%b,align 8
%J=call fastcc i8*%F(i8*inreg%H,i8*inreg%I)
%K=bitcast i8*%J to i32*
%L=load i32,i32*%K,align 4
%M=icmp eq i32%L,0
br i1%M,label%Y,label%N
N:
store i8*null,i8**%b,align 8
store i8*null,i8**%c,align 8
store i8*null,i8**%f,align 8
%O=call i8*@sml_alloc(i32 inreg 20)#0
%P=getelementptr inbounds i8,i8*%O,i64 -4
%Q=bitcast i8*%P to i32*
store i32 1342177296,i32*%Q,align 4
%R=load i8*,i8**%d,align 8
%S=bitcast i8*%O to i8**
store i8*%R,i8**%S,align 8
%T=load i8*,i8**%e,align 8
%U=getelementptr inbounds i8,i8*%O,i64 8
%V=bitcast i8*%U to i8**
store i8*%T,i8**%V,align 8
%W=getelementptr inbounds i8,i8*%O,i64 16
%X=bitcast i8*%W to i32*
store i32 3,i32*%X,align 4
ret i8*%O
Y:
%Z=call i8*@sml_alloc(i32 inreg 44)#0
%aa=getelementptr inbounds i8,i8*%Z,i64 -4
%ab=bitcast i8*%aa to i32*
store i32 1342177320,i32*%ab,align 4
store i8*%Z,i8**%g,align 8
%ac=load i8*,i8**%b,align 8
%ad=bitcast i8*%Z to i8**
store i8*%ac,i8**%ad,align 8
%ae=load i8*,i8**%c,align 8
%af=getelementptr inbounds i8,i8*%Z,i64 8
%ag=bitcast i8*%af to i8**
store i8*%ae,i8**%ag,align 8
%ah=load i8*,i8**%d,align 8
store i8*null,i8**%d,align 8
%ai=getelementptr inbounds i8,i8*%Z,i64 16
%aj=bitcast i8*%ai to i8**
store i8*%ah,i8**%aj,align 8
%ak=load i8*,i8**%e,align 8
%al=getelementptr inbounds i8,i8*%Z,i64 24
%am=bitcast i8*%al to i8**
store i8*%ak,i8**%am,align 8
%an=load i8*,i8**%f,align 8
store i8*null,i8**%f,align 8
%ao=getelementptr inbounds i8,i8*%Z,i64 32
%ap=bitcast i8*%ao to i8**
store i8*%an,i8**%ap,align 8
%aq=getelementptr inbounds i8,i8*%Z,i64 40
%ar=bitcast i8*%aq to i32*
store i32 31,i32*%ar,align 4
%as=call i8*@sml_alloc(i32 inreg 20)#0
%at=getelementptr inbounds i8,i8*%as,i64 -4
%au=bitcast i8*%at to i32*
store i32 1342177296,i32*%au,align 4
store i8*%as,i8**%f,align 8
%av=getelementptr inbounds i8,i8*%as,i64 4
%aw=bitcast i8*%av to i32*
store i32 0,i32*%aw,align 1
%ax=bitcast i8*%as to i32*
store i32 29,i32*%ax,align 4
%ay=load i8*,i8**%g,align 8
store i8*null,i8**%g,align 8
%az=getelementptr inbounds i8,i8*%as,i64 8
%aA=bitcast i8*%az to i8**
store i8*%ay,i8**%aA,align 8
%aB=getelementptr inbounds i8,i8*%as,i64 16
%aC=bitcast i8*%aB to i32*
store i32 2,i32*%aC,align 4
%aD=call i8*@sml_alloc(i32 inreg 28)#0
%aE=getelementptr inbounds i8,i8*%aD,i64 -4
%aF=bitcast i8*%aE to i32*
store i32 1342177304,i32*%aF,align 4
store i8*%aD,i8**%d,align 8
%aG=load i8*,i8**%e,align 8
store i8*null,i8**%e,align 8
%aH=bitcast i8*%aD to i8**
store i8*%aG,i8**%aH,align 8
%aI=load i8*,i8**%b,align 8
store i8*null,i8**%b,align 8
%aJ=getelementptr inbounds i8,i8*%aD,i64 8
%aK=bitcast i8*%aJ to i8**
store i8*%aI,i8**%aK,align 8
%aL=load i8*,i8**%c,align 8
store i8*null,i8**%c,align 8
%aM=getelementptr inbounds i8,i8*%aD,i64 16
%aN=bitcast i8*%aM to i8**
store i8*%aL,i8**%aN,align 8
%aO=getelementptr inbounds i8,i8*%aD,i64 24
%aP=bitcast i8*%aO to i32*
store i32 7,i32*%aP,align 4
%aQ=call i8*@sml_alloc(i32 inreg 20)#0
%aR=getelementptr inbounds i8,i8*%aQ,i64 -4
%aS=bitcast i8*%aR to i32*
store i32 1342177296,i32*%aS,align 4
store i8*%aQ,i8**%b,align 8
%aT=getelementptr inbounds i8,i8*%aQ,i64 4
%aU=bitcast i8*%aT to i32*
store i32 0,i32*%aU,align 1
%aV=bitcast i8*%aQ to i32*
store i32 7,i32*%aV,align 4
%aW=load i8*,i8**%d,align 8
store i8*null,i8**%d,align 8
%aX=getelementptr inbounds i8,i8*%aQ,i64 8
%aY=bitcast i8*%aX to i8**
store i8*%aW,i8**%aY,align 8
%aZ=getelementptr inbounds i8,i8*%aQ,i64 16
%a0=bitcast i8*%aZ to i32*
store i32 2,i32*%a0,align 4
%a1=call i8*@sml_alloc(i32 inreg 20)#0
%a2=getelementptr inbounds i8,i8*%a1,i64 -4
%a3=bitcast i8*%a2 to i32*
store i32 1342177296,i32*%a3,align 4
%a4=load i8*,i8**%f,align 8
%a5=bitcast i8*%a1 to i8**
store i8*%a4,i8**%a5,align 8
%a6=load i8*,i8**%b,align 8
%a7=getelementptr inbounds i8,i8*%a1,i64 8
%a8=bitcast i8*%a7 to i8**
store i8*%a6,i8**%a8,align 8
%a9=getelementptr inbounds i8,i8*%a1,i64 16
%ba=bitcast i8*%a9 to i32*
store i32 3,i32*%ba,align 4
ret i8*%a1
}
define fastcc i8*@_SMLFN12TypedCalcCon5TPLETE(i8*inreg%a)#2 gc"smlsharp"{
n:
%b=alloca i8*,align 8
%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**%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
call void@llvm.gcroot(i8**%f,i8*null)#0
call void@llvm.gcroot(i8**%g,i8*null)#0
store i8*%a,i8**%b,align 8
%h=load atomic i32,i32*@sml_check_flag unordered,align 4
%i=icmp eq i32%h,0
br i1%i,label%l,label%j
j:
call void@sml_check(i32 inreg%h)
%k=load i8*,i8**%b,align 8
br label%l
l:
%m=phi i8*[%k,%j],[%a,%n]
%o=bitcast i8*%m to i8**
%p=bitcast i8*%m to i8***
%q=load i8**,i8***%p,align 8
%r=load i8*,i8**%q,align 8
store i8*%r,i8**%b,align 8
%s=icmp eq i8*%r,null
br i1%s,label%x,label%t
t:
%u=bitcast i8*%r to i32*
%v=load i32,i32*%u,align 4
%w=icmp eq i32%v,25
br i1%w,label%as,label%x
x:
%y=load i8*,i8**%o,align 8
%z=getelementptr inbounds i8,i8*%y,i64 8
%A=bitcast i8*%z to i8**
%B=load i8*,i8**%A,align 8
store i8*%B,i8**%c,align 8
%C=getelementptr inbounds i8,i8*%m,i64 8
%D=bitcast i8*%C to i8**
%E=load i8*,i8**%D,align 8
store i8*%E,i8**%d,align 8
%F=icmp eq i8*%E,null
br i1%F,label%bD,label%G
G:
%H=getelementptr inbounds i8,i8*%m,i64 16
%I=bitcast i8*%H to i8**
%J=load i8*,i8**%I,align 8
store i8*%J,i8**%e,align 8
%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
store i8*%K,i8**%f,align 8
%N=load i8*,i8**%b,align 8
store i8*null,i8**%b,align 8
%O=bitcast i8*%K to i8**
store i8*%N,i8**%O,align 8
%P=load i8*,i8**%d,align 8
store i8*null,i8**%d,align 8
%Q=getelementptr inbounds i8,i8*%K,i64 8
%R=bitcast i8*%Q to i8**
store i8*%P,i8**%R,align 8
%S=load i8*,i8**%e,align 8
store i8*null,i8**%e,align 8
%T=getelementptr inbounds i8,i8*%K,i64 16
%U=bitcast i8*%T to i8**
store i8*%S,i8**%U,align 8
%V=getelementptr inbounds i8,i8*%K,i64 24
%W=bitcast i8*%V to i32*
store i32 7,i32*%W,align 4
%X=call i8*@sml_alloc(i32 inreg 20)#0
%Y=getelementptr inbounds i8,i8*%X,i64 -4
%Z=bitcast i8*%Y to i32*
store i32 1342177296,i32*%Z,align 4
store i8*%X,i8**%b,align 8
%aa=getelementptr inbounds i8,i8*%X,i64 4
%ab=bitcast i8*%aa to i32*
store i32 0,i32*%ab,align 1
%ac=bitcast i8*%X to i32*
store i32 25,i32*%ac,align 4
%ad=load i8*,i8**%f,align 8
store i8*null,i8**%f,align 8
%ae=getelementptr inbounds i8,i8*%X,i64 8
%af=bitcast i8*%ae to i8**
store i8*%ad,i8**%af,align 8
%ag=getelementptr inbounds i8,i8*%X,i64 16
%ah=bitcast i8*%ag to i32*
store i32 2,i32*%ah,align 4
%ai=call i8*@sml_alloc(i32 inreg 20)#0
%aj=getelementptr inbounds i8,i8*%ai,i64 -4
%ak=bitcast i8*%aj to i32*
store i32 1342177296,i32*%ak,align 4
%al=load i8*,i8**%b,align 8
%am=bitcast i8*%ai to i8**
store i8*%al,i8**%am,align 8
%an=load i8*,i8**%c,align 8
%ao=getelementptr inbounds i8,i8*%ai,i64 8
%ap=bitcast i8*%ao to i8**
store i8*%an,i8**%ap,align 8
%aq=getelementptr inbounds i8,i8*%ai,i64 16
%ar=bitcast i8*%aq to i32*
store i32 3,i32*%ar,align 4
ret i8*%ai
as:
%at=getelementptr inbounds i8,i8*%r,i64 8
%au=bitcast i8*%at to i8**
%av=load i8*,i8**%au,align 8
%aw=bitcast i8*%av to i8**
%ax=load i8*,i8**%aw,align 8
store i8*%ax,i8**%c,align 8
%ay=getelementptr inbounds i8,i8*%av,i64 8
%az=bitcast i8*%ay to i8**
%aA=load i8*,i8**%az,align 8
store i8*%aA,i8**%b,align 8
%aB=load i8*,i8**%o,align 8
%aC=getelementptr inbounds i8,i8*%aB,i64 8
%aD=bitcast i8*%aC to i8**
%aE=load i8*,i8**%aD,align 8
store i8*%aE,i8**%d,align 8
%aF=getelementptr inbounds i8,i8*%m,i64 8
%aG=bitcast i8*%aF to i8**
%aH=load i8*,i8**%aG,align 8
store i8*%aH,i8**%e,align 8
%aI=icmp eq i8*%aH,null
br i1%aI,label%bD,label%aJ
aJ:
%aK=getelementptr inbounds i8,i8*%m,i64 16
%aL=bitcast i8*%aK to i8**
%aM=load i8*,i8**%aL,align 8
store i8*%aM,i8**%f,align 8
%aN=call fastcc i8*@_SMLFN4List1_VE(i32 inreg 1,i32 inreg 8)
%aO=getelementptr inbounds i8,i8*%aN,i64 16
%aP=bitcast i8*%aO to i8*(i8*,i8*)**
%aQ=load i8*(i8*,i8*)*,i8*(i8*,i8*)**%aP,align 8
%aR=bitcast i8*%aN to i8**
%aS=load i8*,i8**%aR,align 8
store i8*%aS,i8**%g,align 8
%aT=call i8*@sml_alloc(i32 inreg 20)#0
%aU=getelementptr inbounds i8,i8*%aT,i64 -4
%aV=bitcast i8*%aU to i32*
store i32 1342177296,i32*%aV,align 4
%aW=load i8*,i8**%e,align 8
store i8*null,i8**%e,align 8
%aX=bitcast i8*%aT to i8**
store i8*%aW,i8**%aX,align 8
%aY=load i8*,i8**%b,align 8
store i8*null,i8**%b,align 8
%aZ=getelementptr inbounds i8,i8*%aT,i64 8
%a0=bitcast i8*%aZ to i8**
store i8*%aY,i8**%a0,align 8
%a1=getelementptr inbounds i8,i8*%aT,i64 16
%a2=bitcast i8*%a1 to i32*
store i32 3,i32*%a2,align 4
%a3=load i8*,i8**%g,align 8
store i8*null,i8**%g,align 8
%a4=call fastcc i8*%aQ(i8*inreg%a3,i8*inreg%aT)
store i8*%a4,i8**%b,align 8
%a5=call i8*@sml_alloc(i32 inreg 28)#0
%a6=getelementptr inbounds i8,i8*%a5,i64 -4
%a7=bitcast i8*%a6 to i32*
store i32 1342177304,i32*%a7,align 4
store i8*%a5,i8**%e,align 8
%a8=load i8*,i8**%c,align 8
store i8*null,i8**%c,align 8
%a9=bitcast i8*%a5 to i8**
store i8*%a8,i8**%a9,align 8
%ba=load i8*,i8**%b,align 8
store i8*null,i8**%b,align 8
%bb=getelementptr inbounds i8,i8*%a5,i64 8
%bc=bitcast i8*%bb to i8**
store i8*%ba,i8**%bc,align 8
%bd=load i8*,i8**%f,align 8
store i8*null,i8**%f,align 8
%be=getelementptr inbounds i8,i8*%a5,i64 16
%bf=bitcast i8*%be to i8**
store i8*%bd,i8**%bf,align 8
%bg=getelementptr inbounds i8,i8*%a5,i64 24
%bh=bitcast i8*%bg to i32*
store i32 7,i32*%bh,align 4
%bi=call i8*@sml_alloc(i32 inreg 20)#0
%bj=getelementptr inbounds i8,i8*%bi,i64 -4
%bk=bitcast i8*%bj to i32*
store i32 1342177296,i32*%bk,align 4
store i8*%bi,i8**%b,align 8
%bl=getelementptr inbounds i8,i8*%bi,i64 4
%bm=bitcast i8*%bl to i32*
store i32 0,i32*%bm,align 1
%bn=bitcast i8*%bi to i32*
store i32 25,i32*%bn,align 4
%bo=load i8*,i8**%e,align 8
store i8*null,i8**%e,align 8
%bp=getelementptr inbounds i8,i8*%bi,i64 8
%bq=bitcast i8*%bp to i8**
store i8*%bo,i8**%bq,align 8
%br=getelementptr inbounds i8,i8*%bi,i64 16
%bs=bitcast i8*%br to i32*
store i32 2,i32*%bs,align 4
%bt=call i8*@sml_alloc(i32 inreg 20)#0
%bu=getelementptr inbounds i8,i8*%bt,i64 -4
%bv=bitcast i8*%bu to i32*
store i32 1342177296,i32*%bv,align 4
%bw=load i8*,i8**%b,align 8
%bx=bitcast i8*%bt to i8**
store i8*%bw,i8**%bx,align 8
%by=load i8*,i8**%d,align 8
%bz=getelementptr inbounds i8,i8*%bt,i64 8
%bA=bitcast i8*%bz to i8**
store i8*%by,i8**%bA,align 8
%bB=getelementptr inbounds i8,i8*%bt,i64 16
%bC=bitcast i8*%bB to i32*
store i32 3,i32*%bC,align 4
ret i8*%bt
bD:
%bE=load i8*,i8**%o,align 8
ret i8*%bE
}
define internal fastcc i8*@_SMLLN12TypedCalcCon5TPFNME_355(i8*inreg%a)#4 gc"smlsharp"{
%b=getelementptr inbounds i8,i8*%a,i64 16
%c=bitcast i8*%b to i8**
%d=load i8*,i8**%c,align 8
ret i8*%d
}
define fastcc i8*@_SMLFN12TypedCalcCon5TPFNME(i8*inreg%a)#2 gc"smlsharp"{
o:
%b=alloca i8*,align 8
%c=alloca i8*,align 8
%d=alloca i8*,align 8
%e=alloca i8*,align 8
%f=alloca i8*,align 8
%g=alloca i8*,align 8
%h=alloca i8*,align 8
call void@llvm.gcroot(i8**%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
call void@llvm.gcroot(i8**%f,i8*null)#0
call void@llvm.gcroot(i8**%g,i8*null)#0
call void@llvm.gcroot(i8**%h,i8*null)#0
store i8*%a,i8**%b,align 8
%i=load atomic i32,i32*@sml_check_flag unordered,align 4
%j=icmp eq i32%i,0
br i1%j,label%m,label%k
k:
call void@sml_check(i32 inreg%i)
%l=load i8*,i8**%b,align 8
br label%m
m:
%n=phi i8*[%l,%k],[%a,%o]
store i8*null,i8**%b,align 8
%p=bitcast i8*%n to i8**
%q=load i8*,i8**%p,align 8
store i8*%q,i8**%c,align 8
%r=getelementptr inbounds i8,i8*%n,i64 8
%s=bitcast i8*%r to i8***
%t=load i8**,i8***%s,align 8
%u=load i8*,i8**%t,align 8
store i8*%u,i8**%d,align 8
%v=getelementptr inbounds i8*,i8**%t,i64 1
%w=load i8*,i8**%v,align 8
store i8*%w,i8**%e,align 8
%x=getelementptr inbounds i8,i8*%n,i64 16
%y=bitcast i8*%x to i8**
%z=load i8*,i8**%y,align 8
store i8*%z,i8**%f,align 8
%A=call fastcc i8*@_SMLFN4List3mapE(i32 inreg 1,i32 inreg 8,i32 inreg 1,i32 inreg 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
%G=call fastcc i8*%D(i8*inreg%F,i8*inreg bitcast(i8**getelementptr inbounds(<{[4x i8],i32,i8*,void(...)*,void(...)*,i32}>,<{[4x i8],i32,i8*,void(...)*,void(...)*,i32}>*@Q,i64 0,i32 2)to i8*))
%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=load i8*,i8**%c,align 8
%N=call fastcc i8*%J(i8*inreg%L,i8*inreg%M)
store i8*%N,i8**%b,align 8
%O=call i8*@sml_alloc(i32 inreg 20)#0
%P=getelementptr inbounds i8,i8*%O,i64 -4
%Q=bitcast i8*%P to i32*
store i32 1342177296,i32*%Q,align 4
store i8*%O,i8**%g,align 8
%R=load i8*,i8**%b,align 8
store i8*null,i8**%b,align 8
%S=bitcast i8*%O to i8**
store i8*%R,i8**%S,align 8
%T=load i8*,i8**%e,align 8
%U=getelementptr inbounds i8,i8*%O,i64 8
%V=bitcast i8*%U to i8**
store i8*%T,i8**%V,align 8
%W=getelementptr inbounds i8,i8*%O,i64 16
%X=bitcast i8*%W to i32*
store i32 3,i32*%X,align 4
%Y=call i8*@sml_alloc(i32 inreg 20)#0
%Z=getelementptr inbounds i8,i8*%Y,i64 -4
%aa=bitcast i8*%Z to i32*
store i32 1342177296,i32*%aa,align 4
store i8*%Y,i8**%h,align 8
%ab=getelementptr inbounds i8,i8*%Y,i64 4
%ac=bitcast i8*%ab to i32*
store i32 0,i32*%ac,align 1
%ad=bitcast i8*%Y to i32*
store i32 6,i32*%ad,align 4
%ae=load i8*,i8**%g,align 8
store i8*null,i8**%g,align 8
%af=getelementptr inbounds i8,i8*%Y,i64 8
%ag=bitcast i8*%af to i8**
store i8*%ae,i8**%ag,align 8
%ah=getelementptr inbounds i8,i8*%Y,i64 16
%ai=bitcast i8*%ah to i32*
store i32 2,i32*%ai,align 4
%aj=call i8*@sml_alloc(i32 inreg 36)#0
%ak=getelementptr inbounds i8,i8*%aj,i64 -4
%al=bitcast i8*%ak to i32*
store i32 1342177312,i32*%al,align 4
store i8*%aj,i8**%b,align 8
%am=load i8*,i8**%c,align 8
store i8*null,i8**%c,align 8
%an=bitcast i8*%aj to i8**
store i8*%am,i8**%an,align 8
%ao=load i8*,i8**%d,align 8
store i8*null,i8**%d,align 8
%ap=getelementptr inbounds i8,i8*%aj,i64 8
%aq=bitcast i8*%ap to i8**
store i8*%ao,i8**%aq,align 8
%ar=load i8*,i8**%e,align 8
store i8*null,i8**%e,align 8
%as=getelementptr inbounds i8,i8*%aj,i64 16
%at=bitcast i8*%as to i8**
store i8*%ar,i8**%at,align 8
%au=load i8*,i8**%f,align 8
store i8*null,i8**%f,align 8
%av=getelementptr inbounds i8,i8*%aj,i64 24
%aw=bitcast i8*%av to i8**
store i8*%au,i8**%aw,align 8
%ax=getelementptr inbounds i8,i8*%aj,i64 32
%ay=bitcast i8*%ax to i32*
store i32 15,i32*%ay,align 4
%az=call i8*@sml_alloc(i32 inreg 20)#0
%aA=getelementptr inbounds i8,i8*%az,i64 -4
%aB=bitcast i8*%aA to i32*
store i32 1342177296,i32*%aB,align 4
store i8*%az,i8**%c,align 8
%aC=getelementptr inbounds i8,i8*%az,i64 4
%aD=bitcast i8*%aC to i32*
store i32 0,i32*%aD,align 1
%aE=bitcast i8*%az to i32*
store i32 20,i32*%aE,align 4
%aF=load i8*,i8**%b,align 8
store i8*null,i8**%b,align 8
%aG=getelementptr inbounds i8,i8*%az,i64 8
%aH=bitcast i8*%aG to i8**
store i8*%aF,i8**%aH,align 8
%aI=getelementptr inbounds i8,i8*%az,i64 16
%aJ=bitcast i8*%aI to i32*
store i32 2,i32*%aJ,align 4
%aK=call i8*@sml_alloc(i32 inreg 20)#0
%aL=getelementptr inbounds i8,i8*%aK,i64 -4
%aM=bitcast i8*%aL to i32*
store i32 1342177296,i32*%aM,align 4
%aN=load i8*,i8**%c,align 8
%aO=bitcast i8*%aK to i8**
store i8*%aN,i8**%aO,align 8
%aP=load i8*,i8**%h,align 8
%aQ=getelementptr inbounds i8,i8*%aK,i64 8
%aR=bitcast i8*%aQ to i8**
store i8*%aP,i8**%aR,align 8
%aS=getelementptr inbounds i8,i8*%aK,i64 16
%aT=bitcast i8*%aS to i32*
store i32 3,i32*%aT,align 4
ret i8*%aK
}
define internal fastcc i8*@_SMLLN12TypedCalcCon6TPAPPME_359(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=bitcast i8*%a to i8**
%g=load i8*,i8**%f,align 8
store i8*%g,i8**%d,align 8
%h=call i8*@sml_alloc(i32 inreg 20)#0
%i=getelementptr inbounds i8,i8*%h,i64 -4
%j=bitcast i8*%i to i32*
store i32 1342177296,i32*%j,align 4
store i8*%h,i8**%e,align 8
%k=load i8*,i8**%c,align 8
store i8*null,i8**%c,align 8
%l=bitcast i8*%h to i8**
store i8*%k,i8**%l,align 8
%m=load i8*,i8**%d,align 8
store i8*null,i8**%d,align 8
%n=getelementptr inbounds i8,i8*%h,i64 8
%o=bitcast i8*%n to i8**
store i8*%m,i8**%o,align 8
%p=getelementptr inbounds i8,i8*%h,i64 16
%q=bitcast i8*%p to i32*
store i32 3,i32*%q,align 4
%r=call i8*@sml_alloc(i32 inreg 20)#0
%s=bitcast i8*%r to i32*
%t=getelementptr inbounds i8,i8*%r,i64 -4
%u=bitcast i8*%t to i32*
store i32 1342177296,i32*%u,align 4
%v=getelementptr inbounds i8,i8*%r,i64 4
%w=bitcast i8*%v to i32*
store i32 0,i32*%w,align 1
store i32 9,i32*%s,align 4
%x=load i8*,i8**%e,align 8
%y=getelementptr inbounds i8,i8*%r,i64 8
%z=bitcast i8*%y to i8**
store i8*%x,i8**%z,align 8
%A=getelementptr inbounds i8,i8*%r,i64 16
%B=bitcast i8*%A to i32*
store i32 2,i32*%B,align 4
ret i8*%r
}
define internal fastcc void@_SMLL1f_363(i8*inreg%a,i32 inreg%b)#2 gc"smlsharp"{
%c=alloca i8*,align 8
%d=alloca i8*,align 8
%e=alloca i8*,align 8
%f=alloca i8*,align 8
%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**%c,align 8
%h=load atomic i32,i32*@sml_check_flag unordered,align 4
%i=icmp eq i32%h,0
br i1%i,label%k,label%j
j:
call void@sml_check(i32 inreg%h)
br label%k
k:
%l=call fastcc i8*@_SMLLN12TypedCalcCon4eqTyE_287(i8*inreg getelementptr inbounds(<{[4x i8],i32,[7x i8]}>,<{[4x i8],i32,[7x i8]}>*@W,i64 0,i32 2,i64 0))
%m=getelementptr inbounds i8,i8*%l,i64 16
%n=bitcast i8*%m to i8*(i8*,i8*)**
%o=load i8*(i8*,i8*)*,i8*(i8*,i8*)**%n,align 8
%p=bitcast i8*%l to i8**
%q=load i8*,i8**%p,align 8
%r=load i8*,i8**%c,align 8
%s=getelementptr inbounds i8,i8*%r,i64 8
%t=bitcast i8*%s to i8**
%u=load i8*,i8**%t,align 8
%v=call fastcc i8*%o(i8*inreg%q,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**
%A=load i8*,i8**%z,align 8
store i8*%A,i8**%g,align 8
%B=load i8*,i8**%c,align 8
%C=getelementptr inbounds i8,i8*%B,i64 16
%D=bitcast i8*%C to i8**
%E=load i8*,i8**%D,align 8
store i8*%E,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=getelementptr inbounds i8,i8*%B,i64 24
%I=bitcast i8*%H to i8**
%J=load i8*,i8**%I,align 8
store i8*%J,i8**%c,align 8
%K=call i8*@sml_alloc(i32 inreg 20)#0
%L=getelementptr inbounds i8,i8*%K,i64 -4
%M=bitcast i8*%L to i32*
store i32 1342177296,i32*%M,align 4
store i8*%K,i8**%f,align 8
%N=load i8*,i8**%e,align 8
store i8*null,i8**%e,align 8
%O=bitcast i8*%K to i8**
store i8*%N,i8**%O,align 8
%P=load i8*,i8**%c,align 8
store i8*null,i8**%c,align 8
%Q=getelementptr inbounds i8,i8*%K,i64 8
%R=bitcast i8*%Q to i8**
store i8*%P,i8**%R,align 8
%S=getelementptr inbounds i8,i8*%K,i64 16
%T=bitcast i8*%S to i32*
store i32 3,i32*%T,align 4
%U=call i8*@sml_alloc(i32 inreg 20)#0
%V=getelementptr inbounds i8,i8*%U,i64 -4
%W=bitcast i8*%V to i32*
store i32 1342177296,i32*%W,align 4
store i8*%U,i8**%e,align 8
%X=getelementptr inbounds i8,i8*%U,i64 4
%Y=bitcast i8*%X to i32*
store i32 0,i32*%Y,align 1
%Z=bitcast i8*%U to i32*
store i32 6,i32*%Z,align 4
%aa=load i8*,i8**%f,align 8
store i8*null,i8**%f,align 8
%ab=getelementptr inbounds i8,i8*%U,i64 8
%ac=bitcast i8*%ab to i8**
store i8*%aa,i8**%ac,align 8
%ad=getelementptr inbounds i8,i8*%U,i64 16
%ae=bitcast i8*%ad to i32*
store i32 2,i32*%ae,align 4
%af=call i8*@sml_alloc(i32 inreg 20)#0
%ag=getelementptr inbounds i8,i8*%af,i64 -4
%ah=bitcast i8*%ag to i32*
store i32 1342177296,i32*%ah,align 4
store i8*%af,i8**%c,align 8
%ai=load i8*,i8**%d,align 8
store i8*null,i8**%d,align 8
%aj=bitcast i8*%af to i8**
store i8*%ai,i8**%aj,align 8
%ak=load i8*,i8**%e,align 8
store i8*null,i8**%e,align 8
%al=getelementptr inbounds i8,i8*%af,i64 8
%am=bitcast i8*%al to i8**
store i8*%ak,i8**%am,align 8
%an=getelementptr inbounds i8,i8*%af,i64 16
%ao=bitcast i8*%an to i32*
store i32 3,i32*%ao,align 4
%ap=call i8*@sml_alloc(i32 inreg 20)#0
%aq=getelementptr inbounds i8,i8*%ap,i64 -4
%ar=bitcast i8*%aq to i32*
store i32 1342177296,i32*%ar,align 4
%as=load i8*,i8**%c,align 8
store i8*null,i8**%c,align 8
%at=bitcast i8*%ap to i8**
store i8*%as,i8**%at,align 8
%au=getelementptr inbounds i8,i8*%ap,i64 8
%av=bitcast i8*%au to i8**
store i8*null,i8**%av,align 8
%aw=getelementptr inbounds i8,i8*%ap,i64 16
%ax=bitcast i8*%aw to i32*
store i32 3,i32*%ax,align 4
%ay=load i8*,i8**%g,align 8
store i8*null,i8**%g,align 8
%az=call fastcc i8*%y(i8*inreg%ay,i8*inreg%ap)
ret void
}
define fastcc i8*@_SMLFN12TypedCalcCon6TPAPPME(i8*inreg%a)#2 gc"smlsharp"personality i32(...)*@sml_personality{
p:
%b=alloca i8*,align 8
%c=alloca i8*,align 8
%d=alloca i8*,align 8
%e=alloca i8*,align 8
%f=alloca i8*,align 8
%g=alloca i8*,align 8
%h=alloca i8*,align 8
%i=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
call void@llvm.gcroot(i8**%f,i8*null)#0
call void@llvm.gcroot(i8**%g,i8*null)#0
call void@llvm.gcroot(i8**%h,i8*null)#0
call void@llvm.gcroot(i8**%i,i8*null)#0
store i8*%a,i8**%b,align 8
%j=load atomic i32,i32*@sml_check_flag unordered,align 4
%k=icmp eq i32%j,0
br i1%k,label%n,label%l
l:
call void@sml_check(i32 inreg%j)
%m=load i8*,i8**%b,align 8
br label%n
n:
%o=phi i8*[%m,%l],[%a,%p]
%q=getelementptr inbounds i8,i8*%o,i64 8
%r=bitcast i8*%q to i8***
%s=load i8**,i8***%r,align 8
%t=load i8*,i8**%s,align 8
store i8*%t,i8**%d,align 8
%u=getelementptr inbounds i8*,i8**%s,i64 1
%v=load i8*,i8**%u,align 8
store i8*%v,i8**%e,align 8
%w=getelementptr inbounds i8,i8*%o,i64 16
%x=bitcast i8*%w to i8**
%y=load i8*,i8**%x,align 8
store i8*%y,i8**%f,align 8
%z=call fastcc i8*@_SMLFN8ListPair5unzipE(i32 inreg 1,i32 inreg 8,i32 inreg 1,i32 inreg 8)
%A=getelementptr inbounds i8,i8*%z,i64 16
%B=bitcast i8*%A to i8*(i8*,i8*)**
%C=load i8*(i8*,i8*)*,i8*(i8*,i8*)**%B,align 8
%D=bitcast i8*%z to i8**
%E=load i8*,i8**%D,align 8
%F=bitcast i8**%b to i8***
%G=load i8**,i8***%F,align 8
store i8*null,i8**%b,align 8
%H=load i8*,i8**%G,align 8
%I=call fastcc i8*%C(i8*inreg%E,i8*inreg%H)
%J=bitcast i8*%I to i8**
%K=load i8*,i8**%J,align 8
store i8*%K,i8**%b,align 8
%L=getelementptr inbounds i8,i8*%I,i64 8
%M=bitcast i8*%L to i8**
%N=load i8*,i8**%M,align 8
store i8*%N,i8**%c,align 8
%O=load i8*,i8**%d,align 8
%P=icmp eq i8*%O,null
br i1%P,label%U,label%Q
Q:
%R=bitcast i8*%O to i32*
%S=load i32,i32*%R,align 4
%T=icmp eq i32%S,20
br i1%T,label%aq,label%U
U:
%V=call i8*@sml_alloc(i32 inreg 36)#0
%W=getelementptr inbounds i8,i8*%V,i64 -4
%X=bitcast i8*%W to i32*
store i32 1342177312,i32*%X,align 4
store i8*%V,i8**%g,align 8
%Y=load i8*,i8**%b,align 8
store i8*null,i8**%b,align 8
%Z=bitcast i8*%V to i8**
store i8*%Y,i8**%Z,align 8
%aa=load i8*,i8**%d,align 8
store i8*null,i8**%d,align 8
%ab=getelementptr inbounds i8,i8*%V,i64 8
%ac=bitcast i8*%ab to i8**
store i8*%aa,i8**%ac,align 8
%ad=load i8*,i8**%e,align 8
%ae=getelementptr inbounds i8,i8*%V,i64 16
%af=bitcast i8*%ae to i8**
store i8*%ad,i8**%af,align 8
%ag=load i8*,i8**%f,align 8
%ah=getelementptr inbounds i8,i8*%V,i64 24
%ai=bitcast i8*%ah to i8**
store i8*%ag,i8**%ai,align 8
%aj=getelementptr inbounds i8,i8*%V,i64 32
%ak=bitcast i8*%aj to i32*
store i32 15,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=bitcast i8*%al to i64*
store i64 0,i64*%ao,align 4
%ap=load i8*,i8**%g,align 8
store i8*null,i8**%g,align 8
br label%ce
aq:
%ar=getelementptr inbounds i8,i8*%O,i64 8
%as=bitcast i8*%ar to i8**
%at=load i8*,i8**%as,align 8
%au=bitcast i8*%at to i8**
%av=load i8*,i8**%au,align 8
store i8*%av,i8**%d,align 8
%aw=getelementptr inbounds i8,i8*%at,i64 8
%ax=bitcast i8*%aw to i8**
%ay=load i8*,i8**%ax,align 8
store i8*%ay,i8**%g,align 8
%az=invoke fastcc i8*@_SMLFN8ListPair5mapEqE(i32 inreg 1,i32 inreg 8,i32 inreg 1,i32 inreg 8,i32 inreg 1,i32 inreg 8)
to label%aA unwind label%bD
aA:
%aB=getelementptr inbounds i8,i8*%az,i64 16
%aC=bitcast i8*%aB to i8*(i8*,i8*)**
%aD=load i8*(i8*,i8*)*,i8*(i8*,i8*)**%aC,align 8
%aE=bitcast i8*%az to i8**
%aF=load i8*,i8**%aE,align 8
store i8*%aF,i8**%h,align 8
%aG=call i8*@sml_alloc(i32 inreg 12)#0
%aH=getelementptr inbounds i8,i8*%aG,i64 -4
%aI=bitcast i8*%aH to i32*
store i32 1342177288,i32*%aI,align 4
store i8*%aG,i8**%i,align 8
%aJ=load i8*,i8**%f,align 8
%aK=bitcast i8*%aG to i8**
store i8*%aJ,i8**%aK,align 8
%aL=getelementptr inbounds i8,i8*%aG,i64 8
%aM=bitcast i8*%aL to i32*
store i32 1,i32*%aM,align 4
%aN=call i8*@sml_alloc(i32 inreg 28)#0
%aO=getelementptr inbounds i8,i8*%aN,i64 -4
%aP=bitcast i8*%aO to i32*
store i32 1342177304,i32*%aP,align 4
%aQ=load i8*,i8**%i,align 8
store i8*null,i8**%i,align 8
%aR=bitcast i8*%aN to i8**
store i8*%aQ,i8**%aR,align 8
%aS=getelementptr inbounds i8,i8*%aN,i64 8
%aT=bitcast i8*%aS to void(...)**
store void(...)*bitcast(i8*(i8*,i8*)*@_SMLLN12TypedCalcCon6TPAPPME_359 to void(...)*),void(...)**%aT,align 8
%aU=getelementptr inbounds i8,i8*%aN,i64 16
%aV=bitcast i8*%aU to void(...)**
store void(...)*bitcast(i8*(i8*,i8*)*@_SMLLN12TypedCalcCon6TPAPPME_359 to void(...)*),void(...)**%aV,align 8
%aW=getelementptr inbounds i8,i8*%aN,i64 24
%aX=bitcast i8*%aW to i32*
store i32 -2147483647,i32*%aX,align 4
%aY=load i8*,i8**%h,align 8
store i8*null,i8**%h,align 8
%aZ=invoke fastcc i8*%aD(i8*inreg%aY,i8*inreg%aN)
to label%a0 unwind label%bD
a0:
%a1=getelementptr inbounds i8,i8*%aZ,i64 16
%a2=bitcast i8*%a1 to i8*(i8*,i8*)**
%a3=load i8*(i8*,i8*)*,i8*(i8*,i8*)**%a2,align 8
%a4=bitcast i8*%aZ to i8**
%a5=load i8*,i8**%a4,align 8
store i8*%a5,i8**%h,align 8
%a6=call i8*@sml_alloc(i32 inreg 20)#0
%a7=getelementptr inbounds i8,i8*%a6,i64 -4
%a8=bitcast i8*%a7 to i32*
store i32 1342177296,i32*%a8,align 4
%a9=load i8*,i8**%d,align 8
store i8*null,i8**%d,align 8
%ba=bitcast i8*%a6 to i8**
store i8*%a9,i8**%ba,align 8
%bb=load i8*,i8**%b,align 8
store i8*null,i8**%b,align 8
%bc=getelementptr inbounds i8,i8*%a6,i64 8
%bd=bitcast i8*%bc to i8**
store i8*%bb,i8**%bd,align 8
%be=getelementptr inbounds i8,i8*%a6,i64 16
%bf=bitcast i8*%be to i32*
store i32 3,i32*%bf,align 4
%bg=load i8*,i8**%h,align 8
store i8*null,i8**%h,align 8
%bh=invoke fastcc i8*%a3(i8*inreg%bg,i8*inreg%a6)
to label%bi unwind label%bD
bi:
store i8*%bh,i8**%d,align 8
%bj=call i8*@sml_alloc(i32 inreg 28)#0
%bk=getelementptr inbounds i8,i8*%bj,i64 -4
%bl=bitcast i8*%bk to i32*
store i32 1342177304,i32*%bl,align 4
store i8*%bj,i8**%b,align 8
%bm=load i8*,i8**%g,align 8
store i8*null,i8**%g,align 8
%bn=bitcast i8*%bj to i8**
store i8*%bm,i8**%bn,align 8
%bo=load i8*,i8**%d,align 8
store i8*null,i8**%d,align 8
%bp=getelementptr inbounds i8,i8*%bj,i64 8
%bq=bitcast i8*%bp to i8**
store i8*%bo,i8**%bq,align 8
%br=load i8*,i8**%f,align 8
%bs=getelementptr inbounds i8,i8*%bj,i64 16
%bt=bitcast i8*%bs to i8**
store i8*%br,i8**%bt,align 8
%bu=getelementptr inbounds i8,i8*%bj,i64 24
%bv=bitcast i8*%bu to i32*
store i32 7,i32*%bv,align 4
%bw=call i8*@sml_alloc(i32 inreg 20)#0
%bx=bitcast i8*%bw to i32*
%by=getelementptr inbounds i8,i8*%bw,i64 -4
%bz=bitcast i8*%by to i32*
store i32 1342177296,i32*%bz,align 4
%bA=getelementptr inbounds i8,i8*%bw,i64 4
%bB=bitcast i8*%bA to i32*
store i32 0,i32*%bB,align 1
store i32 25,i32*%bx,align 4
%bC=load i8*,i8**%b,align 8
store i8*null,i8**%b,align 8
br label%ce
bD:
%bE=landingpad{i8*,i8*}
catch i8*null
%bF=extractvalue{i8*,i8*}%bE,1
%bG=bitcast i8*%bF to i8**
%bH=load i8*,i8**%bG,align 8
store i8*null,i8**%c,align 8
store i8*null,i8**%e,align 8
store i8*null,i8**%f,align 8
store i8*null,i8**%d,align 8
store i8*null,i8**%g,align 8
store i8*%bH,i8**%b,align 8
%bI=bitcast i8*%bH to i8**
%bJ=load i8*,i8**%bI,align 8
%bK=load i8*,i8**@_SMLZN8ListPair14UnequalLengthsE,align 8
%bL=icmp eq i8*%bJ,%bK
br i1%bL,label%bM,label%b6
bM:
%bN=load i8*,i8**@_SMLZN3Bug3BugE,align 8
store i8*%bN,i8**%b,align 8
%bO=call i8*@sml_alloc(i32 inreg 28)#0
%bP=getelementptr inbounds i8,i8*%bO,i64 -4
%bQ=bitcast i8*%bP to i32*
store i32 1342177304,i32*%bQ,align 4
store i8*%bO,i8**%c,align 8
%bR=load i8*,i8**%b,align 8
store i8*null,i8**%b,align 8
%bS=bitcast i8*%bO to i8**
store i8*%bR,i8**%bS,align 8
%bT=getelementptr inbounds i8,i8*%bO,i64 8
%bU=bitcast i8*%bT to i8**
store i8*getelementptr inbounds(<{[4x i8],i32,[71x i8]}>,<{[4x i8],i32,[71x i8]}>*@S,i64 0,i32 2,i64 0),i8**%bU,align 8
%bV=getelementptr inbounds i8,i8*%bO,i64 16
%bW=bitcast i8*%bV to i8**
store i8*getelementptr inbounds(<{[4x i8],i32,[23x i8]}>,<{[4x i8],i32,[23x i8]}>*@T,i64 0,i32 2,i64 0),i8**%bW,align 8
%bX=getelementptr inbounds i8,i8*%bO,i64 24
%bY=bitcast i8*%bX to i32*
store i32 7,i32*%bY,align 4
%bZ=call i8*@sml_alloc(i32 inreg 60)#0
%b0=getelementptr inbounds i8,i8*%bZ,i64 -4
%b1=bitcast i8*%b0 to i32*
store i32 1342177336,i32*%b1,align 4
%b2=getelementptr inbounds i8,i8*%bZ,i64 56
%b3=bitcast i8*%b2 to i32*
store i32 1,i32*%b3,align 4
%b4=load i8*,i8**%c,align 8
%b5=bitcast i8*%bZ to i8**
store i8*%b4,i8**%b5,align 8
call void@sml_raise(i8*inreg%bZ)#1
unreachable
b6:
%b7=call i8*@sml_alloc(i32 inreg 60)#0
%b8=getelementptr inbounds i8,i8*%b7,i64 -4
%b9=bitcast i8*%b8 to i32*
store i32 1342177336,i32*%b9,align 4
%ca=getelementptr inbounds i8,i8*%b7,i64 56
%cb=bitcast i8*%ca to i32*
store i32 1,i32*%cb,align 4
%cc=load i8*,i8**%b,align 8
%cd=bitcast i8*%b7 to i8**
store i8*%cc,i8**%cd,align 8
call void@sml_raise(i8*inreg%b7)#1
unreachable
ce:
%cf=phi i8*[%bw,%bi],[%al,%U]
%cg=phi i8*[%bC,%bi],[%ap,%U]
%ch=getelementptr inbounds i8,i8*%cf,i64 8
%ci=bitcast i8*%ch to i8**
store i8*%cg,i8**%ci,align 8
%cj=getelementptr inbounds i8,i8*%cf,i64 16
%ck=bitcast i8*%cj to i32*
store i32 2,i32*%ck,align 4
store i8*%cf,i8**%b,align 8
%cl=load i8*,i8**%e,align 8
store i8*null,i8**%e,align 8
%cm=call fastcc i8*@_SMLFN11TypesBasics7derefTyE(i8*inreg%cl)
store i8*%cm,i8**%d,align 8
%cn=icmp eq i8*%cm,null
br i1%cn,label%cs,label%co
co:
%cp=bitcast i8*%cm to i32*
%cq=load i32,i32*%cp,align 4
%cr=icmp eq i32%cq,6
br i1%cr,label%c1,label%cs
cs:
store i8*null,i8**%c,align 8
store i8*null,i8**%b,align 8
%ct=call fastcc i8*@_SMLLN12TypedCalcCon5fail1E_259(i8*inreg getelementptr inbounds(<{[4x i8],i32,[15x i8]}>,<{[4x i8],i32,[15x i8]}>*@U,i64 0,i32 2,i64 0))
%cu=getelementptr inbounds i8,i8*%ct,i64 16
%cv=bitcast i8*%cu to i8*(i8*,i8*)**
%cw=load i8*(i8*,i8*)*,i8*(i8*,i8*)**%cv,align 8
%cx=bitcast i8*%ct to i8**
%cy=load i8*,i8**%cx,align 8
%cz=load i8*,i8**%f,align 8
store i8*null,i8**%f,align 8
%cA=call fastcc i8*%cw(i8*inreg%cy,i8*inreg%cz)
%cB=getelementptr inbounds i8,i8*%cA,i64 16
%cC=bitcast i8*%cB to i8*(i8*,i8*)**
%cD=load i8*(i8*,i8*)*,i8*(i8*,i8*)**%cC,align 8
%cE=bitcast i8*%cA to i8**
%cF=load i8*,i8**%cE,align 8
%cG=load i8*,i8**%d,align 8
store i8*null,i8**%d,align 8
%cH=call fastcc i8*%cD(i8*inreg%cF,i8*inreg%cG)
%cI=load i8*,i8**@_SMLZN3Bug3BugE,align 8
store i8*%cI,i8**%b,align 8
%cJ=call i8*@sml_alloc(i32 inreg 28)#0
%cK=getelementptr inbounds i8,i8*%cJ,i64 -4
%cL=bitcast i8*%cK to i32*
store i32 1342177304,i32*%cL,align 4
store i8*%cJ,i8**%c,align 8
%cM=load i8*,i8**%b,align 8
store i8*null,i8**%b,align 8
%cN=bitcast i8*%cJ to i8**
store i8*%cM,i8**%cN,align 8
%cO=getelementptr inbounds i8,i8*%cJ,i64 8
%cP=bitcast i8*%cO to i8**
store i8*getelementptr inbounds(<{[4x i8],i32,[71x i8]}>,<{[4x i8],i32,[71x i8]}>*@V,i64 0,i32 2,i64 0),i8**%cP,align 8
%cQ=getelementptr inbounds i8,i8*%cJ,i64 16
%cR=bitcast i8*%cQ to i8**
store i8*getelementptr inbounds(<{[4x i8],i32,[7x i8]}>,<{[4x i8],i32,[7x i8]}>*@W,i64 0,i32 2,i64 0),i8**%cR,align 8
%cS=getelementptr inbounds i8,i8*%cJ,i64 24
%cT=bitcast i8*%cS to i32*
store i32 7,i32*%cT,align 4
%cU=call i8*@sml_alloc(i32 inreg 60)#0
%cV=getelementptr inbounds i8,i8*%cU,i64 -4
%cW=bitcast i8*%cV to i32*
store i32 1342177336,i32*%cW,align 4
%cX=getelementptr inbounds i8,i8*%cU,i64 56
%cY=bitcast i8*%cX to i32*
store i32 1,i32*%cY,align 4
%cZ=load i8*,i8**%c,align 8
%c0=bitcast i8*%cU to i8**
store i8*%cZ,i8**%c0,align 8
call void@sml_raise(i8*inreg%cU)#1
unreachable
c1:
%c2=getelementptr inbounds i8,i8*%cm,i64 8
%c3=bitcast i8*%c2 to i8**
%c4=load i8*,i8**%c3,align 8
%c5=getelementptr inbounds i8,i8*%c4,i64 8
%c6=bitcast i8*%c5 to i8**
%c7=load i8*,i8**%c6,align 8
store i8*%c7,i8**%e,align 8
%c8=call i8*@sml_alloc(i32 inreg 36)#0
%c9=getelementptr inbounds i8,i8*%c8,i64 -4
%da=bitcast i8*%c9 to i32*
store i32 1342177312,i32*%da,align 4
store i8*%c8,i8**%g,align 8
%db=load i8*,i8**%c,align 8
store i8*null,i8**%c,align 8
%dc=bitcast i8*%c8 to i8**
store i8*%db,i8**%dc,align 8
%dd=load i8*,i8**%f,align 8
store i8*null,i8**%f,align 8
%de=getelementptr inbounds i8,i8*%c8,i64 8
%df=bitcast i8*%de to i8**
store i8*%dd,i8**%df,align 8
%dg=load i8*,i8**%d,align 8
store i8*null,i8**%d,align 8
%dh=getelementptr inbounds i8,i8*%c8,i64 16
%di=bitcast i8*%dh to i8**
store i8*%dg,i8**%di,align 8
%dj=load i8*,i8**%e,align 8
%dk=getelementptr inbounds i8,i8*%c8,i64 24
%dl=bitcast i8*%dk to i8**
store i8*%dj,i8**%dl,align 8
%dm=getelementptr inbounds i8,i8*%c8,i64 32
%dn=bitcast i8*%dm to i32*
store i32 15,i32*%dn,align 4
%do=call i8*@sml_alloc(i32 inreg 28)#0
%dp=getelementptr inbounds i8,i8*%do,i64 -4
%dq=bitcast i8*%dp to i32*
store i32 1342177304,i32*%dq,align 4
%dr=load i8*,i8**%g,align 8
%ds=bitcast i8*%do to i8**
store i8*%dr,i8**%ds,align 8
%dt=getelementptr inbounds i8,i8*%do,i64 8
%du=bitcast i8*%dt to void(...)**
store void(...)*bitcast(void(i8*,i32)*@_SMLL1f_363 to void(...)*),void(...)**%du,align 8
%dv=getelementptr inbounds i8,i8*%do,i64 16
%dw=bitcast i8*%dv to void(...)**
store void(...)*bitcast(i8*(i8*,i8*)*@_SMLL1f_706 to void(...)*),void(...)**%dw,align 8
%dx=getelementptr inbounds i8,i8*%do,i64 24
%dy=bitcast i8*%dx to i32*
store i32 -2147483647,i32*%dy,align 4
%dz=load i32*,i32**bitcast(i8**@_SMLZN7Control9checkTypeE to i32**),align 8
%dA=load i32,i32*%dz,align 4
%dB=icmp eq i32%dA,0
store i8*null,i8**%g,align 8
br i1%dB,label%dD,label%dC
dC:
call fastcc void@_SMLL1f_363(i8*inreg%dr,i32 inreg 0)
br label%dD
dD:
%dE=load i8*,i8**%e,align 8
store i8*null,i8**%e,align 8
store i8*%dE,i8**%c,align 8
%dF=call i8*@sml_alloc(i32 inreg 20)#0
%dG=getelementptr inbounds i8,i8*%dF,i64 -4
%dH=bitcast i8*%dG to i32*
store i32 1342177296,i32*%dH,align 4
%dI=load i8*,i8**%b,align 8
%dJ=bitcast i8*%dF to i8**
store i8*%dI,i8**%dJ,align 8
%dK=load i8*,i8**%c,align 8
%dL=getelementptr inbounds i8,i8*%dF,i64 8
%dM=bitcast i8*%dL to i8**
store i8*%dK,i8**%dM,align 8
%dN=getelementptr inbounds i8,i8*%dF,i64 16
%dO=bitcast i8*%dN to i32*
store i32 3,i32*%dO,align 4
ret i8*%dF
}
define internal fastcc i8*@_SMLLN12TypedCalcCon10checkMatchE_372(i8*inreg%a)#4 gc"smlsharp"{
%b=getelementptr inbounds i8,i8*%a,i64 8
%c=bitcast i8*%b to i8**
%d=load i8*,i8**%c,align 8
ret i8*%d
}
define internal fastcc i8*@_SMLLN12TypedCalcCon10checkMatchE_375(i8*inreg%a,i8*inreg%b)#5 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 20)#0
%h=getelementptr inbounds i8,i8*%g,i64 -4
%i=bitcast i8*%h to i32*
store i32 1342177296,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 i8**
store i8*getelementptr inbounds(<{[4x i8],i32,[71x i8]}>,<{[4x i8],i32,[71x i8]}>*@ac,i64 0,i32 2,i64 0),i8**%m,align 8
%n=getelementptr inbounds i8,i8*%g,i64 16
%o=bitcast i8*%n to i32*
store i32 3,i32*%o,align 4
%p=call i8*@sml_alloc(i32 inreg 60)#0
%q=getelementptr inbounds i8,i8*%p,i64 -4
%r=bitcast i8*%q to i32*
store i32 1342177336,i32*%r,align 4
%s=getelementptr inbounds i8,i8*%p,i64 56
%t=bitcast i8*%s to i32*
store i32 1,i32*%t,align 4
%u=load i8*,i8**%d,align 8
%v=bitcast i8*%p to i8**
store i8*%u,i8**%v,align 8
call void@sml_raise(i8*inreg%p)#1
unreachable
}
define internal fastcc i8*@_SMLLN12TypedCalcCon10checkMatchE_376(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
%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
store i8*%b,i8**%c,align 8
%h=load atomic i32,i32*@sml_check_flag unordered,align 4
%i=icmp eq i32%h,0
br i1%i,label%l,label%j
j:
call void@sml_check(i32 inreg%h)
%k=load i8*,i8**%c,align 8
br label%l
l:
%m=phi i8*[%k,%j],[%b,%n]
%o=bitcast i8*%m to i8**
%p=load i8*,i8**%o,align 8
%q=getelementptr inbounds i8,i8*%p,i64 16
%r=bitcast i8*%q to i8**
%s=load i8*,i8**%r,align 8
store i8*%s,i8**%c,align 8
%t=getelementptr inbounds i8,i8*%m,i64 8
%u=bitcast i8*%t to i8**
%v=load i8*,i8**%u,align 8
store i8*%v,i8**%d,align 8
%w=call fastcc i8*@_SMLFN5VarID3Map9unionWithE(i32 inreg 1,i32 inreg 8)
%x=getelementptr inbounds i8,i8*%w,i64 16
%y=bitcast i8*%x to i8*(i8*,i8*)**
%z=load i8*(i8*,i8*)*,i8*(i8*,i8*)**%y,align 8
%A=bitcast i8*%w to i8**
%B=load i8*,i8**%A,align 8
store i8*%B,i8**%f,align 8
%C=bitcast i8**%e to i8***
%D=load i8**,i8***%C,align 8
%E=load i8*,i8**%D,align 8
store i8*%E,i8**%e,align 8
%F=call i8*@sml_alloc(i32 inreg 12)#0
%G=getelementptr inbounds i8,i8*%F,i64 -4
%H=bitcast i8*%G to i32*
store i32 1342177288,i32*%H,align 4
store i8*%F,i8**%g,align 8
%I=load i8*,i8**%e,align 8
store i8*null,i8**%e,align 8
%J=bitcast i8*%F to i8**
store i8*%I,i8**%J,align 8
%K=getelementptr inbounds i8,i8*%F,i64 8
%L=bitcast i8*%K to i32*
store i32 1,i32*%L,align 4
%M=call i8*@sml_alloc(i32 inreg 28)#0
%N=getelementptr inbounds i8,i8*%M,i64 -4
%O=bitcast i8*%N to i32*
store i32 1342177304,i32*%O,align 4
%P=load i8*,i8**%g,align 8
store i8*null,i8**%g,align 8
%Q=bitcast i8*%M to i8**
store i8*%P,i8**%Q,align 8
%R=getelementptr inbounds i8,i8*%M,i64 8
%S=bitcast i8*%R to void(...)**
store void(...)*bitcast(i8*(i8*,i8*)*@_SMLLN12TypedCalcCon10checkMatchE_375 to void(...)*),void(...)**%S,align 8
%T=getelementptr inbounds i8,i8*%M,i64 16
%U=bitcast i8*%T to void(...)**
store void(...)*bitcast(i8*(i8*,i8*)*@_SMLLN12TypedCalcCon10checkMatchE_375 to void(...)*),void(...)**%U,align 8
%V=getelementptr inbounds i8,i8*%M,i64 24
%W=bitcast i8*%V to i32*
store i32 -2147483647,i32*%W,align 4
%X=load i8*,i8**%f,align 8
store i8*null,i8**%f,align 8
%Y=call fastcc i8*%z(i8*inreg%X,i8*inreg%M)
%Z=getelementptr inbounds i8,i8*%Y,i64 16
%aa=bitcast i8*%Z to i8*(i8*,i8*)**
%ab=load i8*(i8*,i8*)*,i8*(i8*,i8*)**%aa,align 8
%ac=bitcast i8*%Y to i8**
%ad=load i8*,i8**%ac,align 8
store i8*%ad,i8**%e,align 8
%ae=call i8*@sml_alloc(i32 inreg 20)#0
%af=getelementptr inbounds i8,i8*%ae,i64 -4
%ag=bitcast i8*%af to i32*
store i32 1342177296,i32*%ag,align 4
%ah=load i8*,i8**%c,align 8
%ai=bitcast i8*%ae to i8**
store i8*%ah,i8**%ai,align 8
%aj=load i8*,i8**%d,align 8
%ak=getelementptr inbounds i8,i8*%ae,i64 8
%al=bitcast i8*%ak to i8**
store i8*%aj,i8**%al,align 8
%am=getelementptr inbounds i8,i8*%ae,i64 16
%an=bitcast i8*%am to i32*
store i32 3,i32*%an,align 4
%ao=load i8*,i8**%e,align 8
%ap=tail call fastcc i8*%ab(i8*inreg%ao,i8*inreg%ae)
ret i8*%ap
}
define internal fastcc void@_SMLLN12TypedCalcCon10checkMatchE_379(i8*inreg%a)#2 gc"smlsharp"{
%b=alloca i8*,align 8
%c=alloca i8*,align 8
call void@llvm.gcroot(i8**%b,i8*null)#0
call void@llvm.gcroot(i8**%c,i8*null)#0
store i8*%a,i8**%b,align 8
%d=load atomic i32,i32*@sml_check_flag unordered,align 4
%e=icmp eq i32%d,0
br i1%e,label%f,label%h
f:
%g=bitcast i8*%a to i8**
br label%k
h:
call void@sml_check(i32 inreg%d)
%i=bitcast i8**%b to i8***
%j=load i8**,i8***%i,align 8
br label%k
k:
%l=phi i8**[%j,%h],[%g,%f]
store i8*null,i8**%b,align 8
%m=load i8*,i8**%l,align 8
%n=call fastcc i8*@_SMLFN9TypedCalc12format__tppatE(i8*inreg%m)
%o=call fastcc i8*@_SMLFN3Bug11prettyPrintE(i8*inreg%n)
store i8*%o,i8**%b,align 8
%p=load i8*,i8**@_SMLZN6TextIO6stdOutE,align 8
store i8*%p,i8**%c,align 8
%q=call i8*@sml_alloc(i32 inreg 20)#0
%r=getelementptr inbounds i8,i8*%q,i64 -4
%s=bitcast i8*%r to i32*
store i32 1342177296,i32*%s,align 4
%t=load i8*,i8**%c,align 8
store i8*null,i8**%c,align 8
%u=bitcast i8*%q to i8**
store i8*%t,i8**%u,align 8
%v=load i8*,i8**%b,align 8
store i8*null,i8**%b,align 8
%w=getelementptr inbounds i8,i8*%q,i64 8
%x=bitcast i8*%w to i8**
store i8*%v,i8**%x,align 8
%y=getelementptr inbounds i8,i8*%q,i64 16
%z=bitcast i8*%y to i32*
store i32 3,i32*%z,align 4
call fastcc void@_SMLFN6TextIO6outputE(i8*inreg%q)
%A=load i8*,i8**@_SMLZN6TextIO6stdOutE,align 8
store i8*%A,i8**%b,align 8
%B=call i8*@sml_alloc(i32 inreg 20)#0
%C=getelementptr inbounds i8,i8*%B,i64 -4
%D=bitcast i8*%C to i32*
store i32 1342177296,i32*%D,align 4
%E=load i8*,i8**%b,align 8
%F=bitcast i8*%B to i8**
store i8*%E,i8**%F,align 8
%G=getelementptr inbounds i8,i8*%B,i64 8
%H=bitcast i8*%G to i8**
store i8*getelementptr inbounds(<{[4x i8],i32,[2x i8]}>,<{[4x i8],i32,[2x i8]}>*@ae,i64 0,i32 2,i64 0),i8**%H,align 8
%I=getelementptr inbounds i8,i8*%B,i64 16
%J=bitcast i8*%I to i32*
store i32 3,i32*%J,align 4
tail call fastcc void@_SMLFN6TextIO6outputE(i8*inreg%B)
ret void
}
define internal fastcc void@_SMLLN12TypedCalcCon10checkMatchE_382(i8*inreg%a,i8*inreg%b)#2 gc"smlsharp"personality i32(...)*@sml_personality{
q:
%c=alloca i8*,align 8
%d=alloca i8*,align 8
%e=alloca i8*,align 8
%f=alloca i8*,align 8
%g=alloca i8*,align 8
%h=alloca i8*,align 8
%i=alloca i8*,align 8
%j=alloca i8*,align 8
call void@llvm.gcroot(i8**%c,i8*null)#0
call void@llvm.gcroot(i8**%d,i8*null)#0
call void@llvm.gcroot(i8**%e,i8*null)#0
call void@llvm.gcroot(i8**%f,i8*null)#0
call void@llvm.gcroot(i8**%g,i8*null)#0
call void@llvm.gcroot(i8**%h,i8*null)#0
call void@llvm.gcroot(i8**%i,i8*null)#0
call void@llvm.gcroot(i8**%j,i8*null)#0
store i8*%a,i8**%f,align 8
store i8*%b,i8**%c,align 8
%k=load atomic i32,i32*@sml_check_flag unordered,align 4
%l=icmp eq i32%k,0
br i1%l,label%o,label%m
m:
call void@sml_check(i32 inreg%k)
%n=load i8*,i8**%c,align 8
br label%o
o:
%p=phi i8*[%n,%m],[%b,%q]
%r=getelementptr inbounds i8,i8*%p,i64 8
%s=bitcast i8*%r to i8**
%t=load i8*,i8**%s,align 8
%u=getelementptr inbounds i8,i8*%t,i64 8
%v=bitcast i8*%u to i8**
%w=load i8*,i8**%v,align 8
store i8*%w,i8**%e,align 8
%x=call i8*@sml_alloc(i32 inreg 8)#0
%y=getelementptr inbounds i8,i8*%x,i64 -4
%z=bitcast i8*%y to i32*
store i32 268435464,i32*%z,align 4
store i8*%x,i8**%g,align 8
%A=bitcast i8*%x to i64*
store i64 0,i64*%A,align 1
%B=bitcast i8*%x to i8**
call void@sml_write(i8*inreg%x,i8**inreg%B,i8*inreg bitcast(i8**getelementptr inbounds(<{[4x i8],i32,i8*,i32,[4x i8],i32}>,<{[4x i8],i32,i8*,i32,[4x i8],i32}>*@Z,i64 0,i32 2)to i8*))#0
%C=call fastcc i8*@_SMLLN12TypedCalcCon4eqTyE_287(i8*inreg getelementptr inbounds(<{[4x i8],i32,[6x i8]}>,<{[4x i8],i32,[6x i8]}>*@aa,i64 0,i32 2,i64 0))
%D=getelementptr inbounds i8,i8*%C,i64 16
%E=bitcast i8*%D to i8*(i8*,i8*)**
%F=load i8*(i8*,i8*)*,i8*(i8*,i8*)**%E,align 8
%G=bitcast i8*%C to i8**
%H=load i8*,i8**%G,align 8
%I=bitcast i8**%f to i8***
%J=load i8**,i8***%I,align 8
%K=load i8*,i8**%J,align 8
%L=call fastcc i8*%F(i8*inreg%H,i8*inreg%K)
%M=getelementptr inbounds i8,i8*%L,i64 16
%N=bitcast i8*%M to i8*(i8*,i8*)**
%O=load i8*(i8*,i8*)*,i8*(i8*,i8*)**%N,align 8
%P=bitcast i8*%L to i8**
%Q=load i8*,i8**%P,align 8
store i8*%Q,i8**%i,align 8
%R=call fastcc i8*@_SMLFN4List3mapE(i32 inreg 1,i32 inreg 8,i32 inreg 1,i32 inreg 8)
%S=getelementptr inbounds i8,i8*%R,i64 16
%T=bitcast i8*%S to i8*(i8*,i8*)**
%U=load i8*(i8*,i8*)*,i8*(i8*,i8*)**%T,align 8
%V=bitcast i8*%R to i8**
%W=load i8*,i8**%V,align 8
%X=call fastcc i8*%U(i8*inreg%W,i8*inreg bitcast(i8**getelementptr inbounds(<{[4x i8],i32,i8*,void(...)*,void(...)*,i32}>,<{[4x i8],i32,i8*,void(...)*,void(...)*,i32}>*@ab,i64 0,i32 2)to i8*))
%Y=getelementptr inbounds i8,i8*%X,i64 16
%Z=bitcast i8*%Y to i8*(i8*,i8*)**
%aa=load i8*(i8*,i8*)*,i8*(i8*,i8*)**%Z,align 8
%ab=bitcast i8*%X to i8**
%ac=load i8*,i8**%ab,align 8
%ad=bitcast i8**%c to i8***
%ae=load i8**,i8***%ad,align 8
%af=load i8*,i8**%ae,align 8
%ag=call fastcc i8*%aa(i8*inreg%ac,i8*inreg%af)
store i8*%ag,i8**%d,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
store i8*%ah,i8**%h,align 8
%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**%e,align 8
store i8*null,i8**%e,align 8
%an=getelementptr inbounds i8,i8*%ah,i64 8
%ao=bitcast i8*%an to i8**
store i8*%am,i8**%ao,align 8
%ap=getelementptr inbounds i8,i8*%ah,i64 16
%aq=bitcast i8*%ap to i32*
store i32 3,i32*%aq,align 4
%ar=call i8*@sml_alloc(i32 inreg 20)#0
%as=getelementptr inbounds i8,i8*%ar,i64 -4
%at=bitcast i8*%as to i32*
store i32 1342177296,i32*%at,align 4
store i8*%ar,i8**%j,align 8
%au=getelementptr inbounds i8,i8*%ar,i64 4
%av=bitcast i8*%au to i32*
store i32 0,i32*%av,align 1
%aw=bitcast i8*%ar to i32*
store i32 6,i32*%aw,align 4
%ax=load i8*,i8**%h,align 8
store i8*null,i8**%h,align 8
%ay=getelementptr inbounds i8,i8*%ar,i64 8
%az=bitcast i8*%ay to i8**
store i8*%ax,i8**%az,align 8
%aA=getelementptr inbounds i8,i8*%ar,i64 16
%aB=bitcast i8*%aA to i32*
store i32 2,i32*%aB,align 4
%aC=load i8*,i8**%f,align 8
store i8*null,i8**%f,align 8
%aD=getelementptr inbounds i8,i8*%aC,i64 8
%aE=bitcast i8*%aD to i8**
%aF=load i8*,i8**%aE,align 8
store i8*%aF,i8**%e,align 8
%aG=call i8*@sml_alloc(i32 inreg 20)#0
%aH=getelementptr inbounds i8,i8*%aG,i64 -4
%aI=bitcast i8*%aH to i32*
store i32 1342177296,i32*%aI,align 4
store i8*%aG,i8**%d,align 8
%aJ=load i8*,i8**%j,align 8
store i8*null,i8**%j,align 8
%aK=bitcast i8*%aG to i8**
store i8*%aJ,i8**%aK,align 8
%aL=load i8*,i8**%e,align 8
store i8*null,i8**%e,align 8
%aM=getelementptr inbounds i8,i8*%aG,i64 8
%aN=bitcast i8*%aM to i8**
store i8*%aL,i8**%aN,align 8
%aO=getelementptr inbounds i8,i8*%aG,i64 16
%aP=bitcast i8*%aO to i32*
store i32 3,i32*%aP,align 4
%aQ=call i8*@sml_alloc(i32 inreg 20)#0
%aR=getelementptr inbounds i8,i8*%aQ,i64 -4
%aS=bitcast i8*%aR to i32*
store i32 1342177296,i32*%aS,align 4
%aT=load i8*,i8**%d,align 8
%aU=bitcast i8*%aQ to i8**
store i8*%aT,i8**%aU,align 8
%aV=getelementptr inbounds i8,i8*%aQ,i64 8
%aW=bitcast i8*%aV to i8**
store i8*null,i8**%aW,align 8
%aX=getelementptr inbounds i8,i8*%aQ,i64 16
%aY=bitcast i8*%aX to i32*
store i32 3,i32*%aY,align 4
store i8*null,i8**%e,align 8
%aZ=call i8*@sml_alloc(i32 inreg 20)#0
%a0=getelementptr inbounds i8,i8*%aZ,i64 -4
%a1=bitcast i8*%a0 to i32*
store i32 1342177296,i32*%a1,align 4
%a2=load i8*,i8**%d,align 8
store i8*null,i8**%d,align 8
%a3=bitcast i8*%aZ to i8**
store i8*%a2,i8**%a3,align 8
%a4=load i8*,i8**%e,align 8
store i8*null,i8**%e,align 8
%a5=getelementptr inbounds i8,i8*%aZ,i64 8
%a6=bitcast i8*%a5 to i8**
store i8*%a4,i8**%a6,align 8
%a7=getelementptr inbounds i8,i8*%aZ,i64 16
%a8=bitcast i8*%a7 to i32*
store i32 3,i32*%a8,align 4
%a9=load i8*,i8**%i,align 8
store i8*null,i8**%i,align 8
%ba=call fastcc i8*%O(i8*inreg%a9,i8*inreg%aZ)
%bb=invoke fastcc i8*@_SMLFN4List5foldlE(i32 inreg 1,i32 inreg 8,i32 inreg 1,i32 inreg 8)
to label%bc unwind label%bV
bc:
%bd=getelementptr inbounds i8,i8*%bb,i64 16
%be=bitcast i8*%bd to i8*(i8*,i8*)**
%bf=load i8*(i8*,i8*)*,i8*(i8*,i8*)**%be,align 8
%bg=bitcast i8*%bb to i8**
%bh=load i8*,i8**%bg,align 8
store i8*%bh,i8**%d,align 8
%bi=call i8*@sml_alloc(i32 inreg 12)#0
%bj=getelementptr inbounds i8,i8*%bi,i64 -4
%bk=bitcast i8*%bj to i32*
store i32 1342177288,i32*%bk,align 4
store i8*%bi,i8**%e,align 8
%bl=load i8*,i8**%g,align 8
%bm=bitcast i8*%bi to i8**
store i8*%bl,i8**%bm,align 8
%bn=getelementptr inbounds i8,i8*%bi,i64 8
%bo=bitcast i8*%bn to i32*
store i32 1,i32*%bo,align 4
%bp=call i8*@sml_alloc(i32 inreg 28)#0
%bq=getelementptr inbounds i8,i8*%bp,i64 -4
%br=bitcast i8*%bq to i32*
store i32 1342177304,i32*%br,align 4
%bs=load i8*,i8**%e,align 8
store i8*null,i8**%e,align 8
%bt=bitcast i8*%bp to i8**
store i8*%bs,i8**%bt,align 8
%bu=getelementptr inbounds i8,i8*%bp,i64 8
%bv=bitcast i8*%bu to void(...)**
store void(...)*bitcast(i8*(i8*,i8*)*@_SMLLN12TypedCalcCon10checkMatchE_376 to void(...)*),void(...)**%bv,align 8
%bw=getelementptr inbounds i8,i8*%bp,i64 16
%bx=bitcast i8*%bw to void(...)**
store void(...)*bitcast(i8*(i8*,i8*)*@_SMLLN12TypedCalcCon10checkMatchE_376 to void(...)*),void(...)**%bx,align 8
%by=getelementptr inbounds i8,i8*%bp,i64 24
%bz=bitcast i8*%by to i32*
store i32 -2147483647,i32*%bz,align 4
%bA=load i8*,i8**%d,align 8
store i8*null,i8**%d,align 8
%bB=invoke fastcc i8*%bf(i8*inreg%bA,i8*inreg%bp)
to label%bC unwind label%bV
bC:
%bD=getelementptr inbounds i8,i8*%bB,i64 16
%bE=bitcast i8*%bD to i8*(i8*,i8*)**
%bF=load i8*(i8*,i8*)*,i8*(i8*,i8*)**%bE,align 8
%bG=bitcast i8*%bB to i8**
%bH=load i8*,i8**%bG,align 8
store i8*%bH,i8**%d,align 8
%bI=invoke fastcc i8*@_SMLFN5VarID3Map5emptyE(i32 inreg 1,i32 inreg 8)
to label%bJ unwind label%bV
bJ:
%bK=load i8*,i8**%d,align 8
store i8*null,i8**%d,align 8
%bL=invoke fastcc i8*%bF(i8*inreg%bK,i8*inreg%bI)
to label%bM unwind label%bV
bM:
%bN=getelementptr inbounds i8,i8*%bL,i64 16
%bO=bitcast i8*%bN to i8*(i8*,i8*)**
%bP=load i8*(i8*,i8*)*,i8*(i8*,i8*)**%bO,align 8
%bQ=bitcast i8*%bL to i8**
%bR=load i8*,i8**%bQ,align 8
%bS=load i8**,i8***%ad,align 8
%bT=load i8*,i8**%bS,align 8
%bU=invoke fastcc i8*%bP(i8*inreg%bR,i8*inreg%bT)
to label%cM unwind label%bV
bV:
%bW=landingpad{i8*,i8*}
catch i8*null
%bX=extractvalue{i8*,i8*}%bW,1
%bY=bitcast i8*%bX to i8**
%bZ=load i8*,i8**%bY,align 8
store i8*%bZ,i8**%d,align 8
%b0=bitcast i8*%bZ to i8**
%b1=load i8*,i8**%b0,align 8
%b2=load i8*,i8**%g,align 8
store i8*null,i8**%g,align 8
%b3=icmp eq i8*%b1,%b2
br i1%b3,label%b4,label%cE
b4:
%b5=load i8*,i8**@_SMLZN6TextIO6stdOutE,align 8
store i8*%b5,i8**%d,align 8
%b6=call i8*@sml_alloc(i32 inreg 20)#0
%b7=getelementptr inbounds i8,i8*%b6,i64 -4
%b8=bitcast i8*%b7 to i32*
store i32 1342177296,i32*%b8,align 4
%b9=load i8*,i8**%d,align 8
store i8*null,i8**%d,align 8
%ca=bitcast i8*%b6 to i8**
store i8*%b9,i8**%ca,align 8
%cb=getelementptr inbounds i8,i8*%b6,i64 8
%cc=bitcast i8*%cb to i8**
store i8*getelementptr inbounds(<{[4x i8],i32,[40x i8]}>,<{[4x i8],i32,[40x i8]}>*@ad,i64 0,i32 2,i64 0),i8**%cc,align 8
%cd=getelementptr inbounds i8,i8*%b6,i64 16
%ce=bitcast i8*%cd to i32*
store i32 3,i32*%ce,align 4
call fastcc void@_SMLFN6TextIO6outputE(i8*inreg%b6)
%cf=call fastcc i8*@_SMLFN4List3appE(i32 inreg 1,i32 inreg 8)
%cg=getelementptr inbounds i8,i8*%cf,i64 16
%ch=bitcast i8*%cg to i8*(i8*,i8*)**
%ci=load i8*(i8*,i8*)*,i8*(i8*,i8*)**%ch,align 8
%cj=bitcast i8*%cf to i8**
%ck=load i8*,i8**%cj,align 8
%cl=call fastcc i8*%ci(i8*inreg%ck,i8*inreg bitcast(i8**getelementptr inbounds(<{[4x i8],i32,i8*,void(...)*,void(...)*,i32}>,<{[4x i8],i32,i8*,void(...)*,void(...)*,i32}>*@af,i64 0,i32 2)to i8*))
%cm=getelementptr inbounds i8,i8*%cl,i64 16
%cn=bitcast i8*%cm to i8*(i8*,i8*)**
%co=load i8*(i8*,i8*)*,i8*(i8*,i8*)**%cn,align 8
%cp=bitcast i8*%cl to i8**
%cq=load i8*,i8**%cp,align 8
%cr=load i8**,i8***%ad,align 8
store i8*null,i8**%c,align 8
%cs=load i8*,i8**%cr,align 8
%ct=call fastcc i8*%co(i8*inreg%cq,i8*inreg%cs)
%cu=load i8*,i8**@_SMLZN6TextIO6stdOutE,align 8
store i8*%cu,i8**%c,align 8
%cv=call i8*@sml_alloc(i32 inreg 20)#0
%cw=getelementptr inbounds i8,i8*%cv,i64 -4
%cx=bitcast i8*%cw to i32*
store i32 1342177296,i32*%cx,align 4
%cy=load i8*,i8**%c,align 8
%cz=bitcast i8*%cv to i8**
store i8*%cy,i8**%cz,align 8
%cA=getelementptr inbounds i8,i8*%cv,i64 8
%cB=bitcast i8*%cA to i8**
store i8*getelementptr inbounds(<{[4x i8],i32,[22x i8]}>,<{[4x i8],i32,[22x i8]}>*@ag,i64 0,i32 2,i64 0),i8**%cB,align 8
%cC=getelementptr inbounds i8,i8*%cv,i64 16
%cD=bitcast i8*%cC to i32*
store i32 3,i32*%cD,align 4
tail call fastcc void@_SMLFN6TextIO6outputE(i8*inreg%cv)
ret void
cE:
store i8*null,i8**%c,align 8
%cF=call i8*@sml_alloc(i32 inreg 60)#0
%cG=getelementptr inbounds i8,i8*%cF,i64 -4
%cH=bitcast i8*%cG to i32*
store i32 1342177336,i32*%cH,align 4
%cI=getelementptr inbounds i8,i8*%cF,i64 56
%cJ=bitcast i8*%cI to i32*
store i32 1,i32*%cJ,align 4
%cK=load i8*,i8**%d,align 8
%cL=bitcast i8*%cF to i8**
store i8*%cK,i8**%cL,align 8
call void@sml_raise(i8*inreg%cF)#1
unreachable
cM:
ret void
}
define internal fastcc i8*@_SMLLN12TypedCalcCon10checkMatchE_383(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=bitcast i8*%a to i8**
%g=load i8*,i8**%f,align 8
store i8*%g,i8**%d,align 8
%h=call i8*@sml_alloc(i32 inreg 20)#0
%i=getelementptr inbounds i8,i8*%h,i64 -4
%j=bitcast i8*%i to i32*
store i32 1342177296,i32*%j,align 4
store i8*%h,i8**%e,align 8
%k=load i8*,i8**%d,align 8
store i8*null,i8**%d,align 8
%l=bitcast i8*%h to i8**
store i8*%k,i8**%l,align 8
%m=load i8*,i8**%c,align 8
store i8*null,i8**%c,align 8
%n=getelementptr inbounds i8,i8*%h,i64 8
%o=bitcast i8*%n to i8**
store i8*%m,i8**%o,align 8
%p=getelementptr inbounds i8,i8*%h,i64 16
%q=bitcast i8*%p to i32*
store i32 3,i32*%q,align 4
%r=call i8*@sml_alloc(i32 inreg 28)#0
%s=getelementptr inbounds i8,i8*%r,i64 -4
%t=bitcast i8*%s to i32*
store i32 1342177304,i32*%t,align 4
%u=load i8*,i8**%e,align 8
%v=bitcast i8*%r to i8**
store i8*%u,i8**%v,align 8
%w=getelementptr inbounds i8,i8*%r,i64 8
%x=bitcast i8*%w to void(...)**
store void(...)*bitcast(void(i8*,i8*)*@_SMLLN12TypedCalcCon10checkMatchE_382 to void(...)*),void(...)**%x,align 8
%y=getelementptr inbounds i8,i8*%r,i64 16
%z=bitcast i8*%y to void(...)**
store void(...)*bitcast(i8*(i8*,i8*)*@_SMLLN12TypedCalcCon10checkMatchE_710 to void(...)*),void(...)**%z,align 8
%A=getelementptr inbounds i8,i8*%r,i64 24
%B=bitcast i8*%A to i32*
store i32 -2147483647,i32*%B,align 4
ret i8*%r
}
define internal fastcc i8*@_SMLLN12TypedCalcCon10checkMatchE_384(i8*inreg%a)unnamed_addr#4 gc"smlsharp"{
%b=alloca i8*,align 8
%c=alloca i8*,align 8
call void@llvm.gcroot(i8**%b,i8*null)#0
call void@llvm.gcroot(i8**%c,i8*null)#0
store i8*%a,i8**%b,align 8
%d=call i8*@sml_alloc(i32 inreg 12)#0
%e=getelementptr inbounds i8,i8*%d,i64 -4
%f=bitcast i8*%e to i32*
store i32 1342177288,i32*%f,align 4
store i8*%d,i8**%c,align 8
%g=load i8*,i8**%b,align 8
store i8*null,i8**%b,align 8
%h=bitcast i8*%d to i8**
store i8*%g,i8**%h,align 8
%i=getelementptr inbounds i8,i8*%d,i64 8
%j=bitcast i8*%i to i32*
store i32 1,i32*%j,align 4
%k=call i8*@sml_alloc(i32 inreg 28)#0
%l=getelementptr inbounds i8,i8*%k,i64 -4
%m=bitcast i8*%l to i32*
store i32 1342177304,i32*%m,align 4
%n=load i8*,i8**%c,align 8
%o=bitcast i8*%k to i8**
store i8*%n,i8**%o,align 8
%p=getelementptr inbounds i8,i8*%k,i64 8
%q=bitcast i8*%p to void(...)**
store void(...)*bitcast(i8*(i8*,i8*)*@_SMLLN12TypedCalcCon10checkMatchE_383 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*)*@_SMLLN12TypedCalcCon10checkMatchE_383 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*@_SMLLN12TypedCalcCon7TPCASEME_386(i8*inreg%a)#4 gc"smlsharp"{
%b=bitcast i8*%a to i8**
%c=load i8*,i8**%b,align 8
ret i8*%c
}
define internal fastcc i8*@_SMLLN12TypedCalcCon7TPCASEME_388(i8*inreg%a)#2 gc"smlsharp"{
j:
%b=alloca i8*,align 8
%c=alloca i8*,align 8
call void@llvm.gcroot(i8**%b,i8*null)#0
call void@llvm.gcroot(i8**%c,i8*null)#0
store i8*%a,i8**%b,align 8
%d=load atomic i32,i32*@sml_check_flag unordered,align 4
%e=icmp eq i32%d,0
br i1%e,label%h,label%f
f:
call void@sml_check(i32 inreg%d)
%g=load i8*,i8**%b,align 8
br label%h
h:
%i=phi i8*[%g,%f],[%a,%j]
%k=getelementptr inbounds i8,i8*%i,i64 8
%l=bitcast i8*%k to i8***
%m=load i8**,i8***%l,align 8
%n=load i8*,i8**%m,align 8
store i8*%n,i8**%c,align 8
%o=call fastcc i8*@_SMLFN4List3mapE(i32 inreg 1,i32 inreg 8,i32 inreg 1,i32 inreg 8)
%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
%u=call fastcc i8*%r(i8*inreg%t,i8*inreg bitcast(i8**getelementptr inbounds(<{[4x i8],i32,i8*,void(...)*,void(...)*,i32}>,<{[4x i8],i32,i8*,void(...)*,void(...)*,i32}>*@ah,i64 0,i32 2)to i8*))
%v=getelementptr inbounds i8,i8*%u,i64 16
%w=bitcast i8*%v to i8*(i8*,i8*)**
%x=load i8*(i8*,i8*)*,i8*(i8*,i8*)**%w,align 8
%y=bitcast i8*%u to i8**
%z=load i8*,i8**%y,align 8
%A=bitcast i8**%b to i8***
%B=load i8**,i8***%A,align 8
store i8*null,i8**%b,align 8
%C=load i8*,i8**%B,align 8
%D=call fastcc i8*%x(i8*inreg%z,i8*inreg%C)
store i8*%D,i8**%b,align 8
%E=call i8*@sml_alloc(i32 inreg 20)#0
%F=getelementptr inbounds i8,i8*%E,i64 -4
%G=bitcast i8*%F to i32*
store i32 1342177296,i32*%G,align 4
%H=load i8*,i8**%b,align 8
%I=bitcast i8*%E to i8**
store i8*%H,i8**%I,align 8
%J=load i8*,i8**%c,align 8
%K=getelementptr inbounds i8,i8*%E,i64 8
%L=bitcast i8*%K to i8**
store i8*%J,i8**%L,align 8
%M=getelementptr inbounds i8,i8*%E,i64 16
%N=bitcast i8*%M to i32*
store i32 3,i32*%N,align 4
ret i8*%E
}
define fastcc i8*@_SMLFN12TypedCalcCon7TPCASEME(i8*inreg%a)#2 gc"smlsharp"{
p:
%b=alloca i8*,align 8
%c=alloca i8*,align 8
%d=alloca i8*,align 8
%e=alloca i8*,align 8
%f=alloca i8*,align 8
%g=alloca i8*,align 8
%h=alloca i8*,align 8
%i=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
call void@llvm.gcroot(i8**%f,i8*null)#0
call void@llvm.gcroot(i8**%g,i8*null)#0
call void@llvm.gcroot(i8**%h,i8*null)#0
call void@llvm.gcroot(i8**%i,i8*null)#0
store i8*%a,i8**%b,align 8
%j=load atomic i32,i32*@sml_check_flag unordered,align 4
%k=icmp eq i32%j,0
br i1%k,label%n,label%l
l:
call void@sml_check(i32 inreg%j)
%m=load i8*,i8**%b,align 8
br label%n
n:
%o=phi i8*[%m,%l],[%a,%p]
store i8*%o,i8**%d,align 8
%q=bitcast i8*%o to i32*
%r=load i32,i32*%q,align 4
%s=getelementptr inbounds i8,i8*%o,i64 16
%t=bitcast i8*%s to i8**
%u=load i8*,i8**%t,align 8
store i8*%u,i8**%e,align 8
%v=getelementptr inbounds i8,i8*%o,i64 24
%w=bitcast i8*%v to i8**
%x=load i8*,i8**%w,align 8
%y=icmp eq i8*%x,null
br i1%y,label%z,label%T
z:
store i8*null,i8**%d,align 8
store i8*null,i8**%e,align 8
%A=load i8*,i8**@_SMLZN3Bug3BugE,align 8
store i8*%A,i8**%b,align 8
%B=call i8*@sml_alloc(i32 inreg 28)#0
%C=getelementptr inbounds i8,i8*%B,i64 -4
%D=bitcast i8*%C to i32*
store i32 1342177304,i32*%D,align 4
store i8*%B,i8**%c,align 8
%E=load i8*,i8**%b,align 8
store i8*null,i8**%b,align 8
%F=bitcast i8*%B to i8**
store i8*%E,i8**%F,align 8
%G=getelementptr inbounds i8,i8*%B,i64 8
%H=bitcast i8*%G to i8**
store i8*getelementptr inbounds(<{[4x i8],i32,[71x i8]}>,<{[4x i8],i32,[71x i8]}>*@aj,i64 0,i32 2,i64 0),i8**%H,align 8
%I=getelementptr inbounds i8,i8*%B,i64 16
%J=bitcast i8*%I to i8**
store i8*getelementptr inbounds(<{[4x i8],i32,[8x i8]}>,<{[4x i8],i32,[8x i8]}>*@ak,i64 0,i32 2,i64 0),i8**%J,align 8
%K=getelementptr inbounds i8,i8*%B,i64 24
%L=bitcast i8*%K to i32*
store i32 7,i32*%L,align 4
%M=call i8*@sml_alloc(i32 inreg 60)#0
%N=getelementptr inbounds i8,i8*%M,i64 -4
%O=bitcast i8*%N to i32*
store i32 1342177336,i32*%O,align 4
%P=getelementptr inbounds i8,i8*%M,i64 56
%Q=bitcast i8*%P to i32*
store i32 1,i32*%Q,align 4
%R=load i8*,i8**%c,align 8
%S=bitcast i8*%M to i8**
store i8*%R,i8**%S,align 8
call void@sml_raise(i8*inreg%M)#1
unreachable
T:
%U=bitcast i8*%x to i8**
%V=load i8*,i8**%U,align 8
%W=getelementptr inbounds i8,i8*%V,i64 8
%X=bitcast i8*%W to i8**
%Y=load i8*,i8**%X,align 8
%Z=getelementptr inbounds i8,i8*%Y,i64 8
%aa=bitcast i8*%Z to i8**
%ab=load i8*,i8**%aa,align 8
store i8*%ab,i8**%f,align 8
%ac=call fastcc i8*@_SMLFN8ListPair5unzipE(i32 inreg 1,i32 inreg 8,i32 inreg 1,i32 inreg 8)
%ad=getelementptr inbounds i8,i8*%ac,i64 16
%ae=bitcast i8*%ad to i8*(i8*,i8*)**
%af=load i8*(i8*,i8*)*,i8*(i8*,i8*)**%ae,align 8
%ag=bitcast i8*%ac to i8**
%ah=load i8*,i8**%ag,align 8
%ai=load i8*,i8**%d,align 8
%aj=getelementptr inbounds i8,i8*%ai,i64 8
%ak=bitcast i8*%aj to i8**
%al=load i8*,i8**%ak,align 8
%am=call fastcc i8*%af(i8*inreg%ah,i8*inreg%al)
%an=bitcast i8*%am to i8**
%ao=load i8*,i8**%an,align 8
store i8*%ao,i8**%b,align 8
%ap=getelementptr inbounds i8,i8*%am,i64 8
%aq=bitcast i8*%ap to i8**
%ar=load i8*,i8**%aq,align 8
store i8*%ar,i8**%c,align 8
%as=load i32*,i32**bitcast(i8**@_SMLZN7Control9checkTypeE to i32**),align 8
%at=load i32,i32*%as,align 4
%au=icmp eq i32%at,0
br i1%au,label%bi,label%av
av:
%aw=call fastcc i8*@_SMLFN4List3appE(i32 inreg 1,i32 inreg 8)
%ax=getelementptr inbounds i8,i8*%aw,i64 16
%ay=bitcast i8*%ax to i8*(i8*,i8*)**
%az=load i8*(i8*,i8*)*,i8*(i8*,i8*)**%ay,align 8
%aA=bitcast i8*%aw to i8**
%aB=load i8*,i8**%aA,align 8
store i8*%aB,i8**%i,align 8
%aC=load i8*,i8**%e,align 8
%aD=call fastcc i8*@_SMLLN12TypedCalcCon10checkMatchE_384(i8*inreg%aC)
%aE=getelementptr inbounds i8,i8*%aD,i64 16
%aF=bitcast i8*%aE to i8*(i8*,i8*)**
%aG=load i8*(i8*,i8*)*,i8*(i8*,i8*)**%aF,align 8
%aH=bitcast i8*%aD to i8**
%aI=load i8*,i8**%aH,align 8
store i8*%aI,i8**%h,align 8
%aJ=call i8*@sml_alloc(i32 inreg 20)#0
%aK=getelementptr inbounds i8,i8*%aJ,i64 -4
%aL=bitcast i8*%aK to i32*
store i32 1342177296,i32*%aL,align 4
store i8*%aJ,i8**%g,align 8
%aM=load i8*,i8**%c,align 8
%aN=bitcast i8*%aJ to i8**
store i8*%aM,i8**%aN,align 8
%aO=load i8*,i8**%f,align 8
%aP=getelementptr inbounds i8,i8*%aJ,i64 8
%aQ=bitcast i8*%aP to i8**
store i8*%aO,i8**%aQ,align 8
%aR=getelementptr inbounds i8,i8*%aJ,i64 16
%aS=bitcast i8*%aR to i32*
store i32 3,i32*%aS,align 4
%aT=call i8*@sml_alloc(i32 inreg 20)#0
%aU=bitcast i8*%aT to i32*
%aV=getelementptr inbounds i8,i8*%aT,i64 -4
%aW=bitcast i8*%aV to i32*
store i32 1342177296,i32*%aW,align 4
%aX=getelementptr inbounds i8,i8*%aT,i64 4
%aY=bitcast i8*%aX to i32*
store i32 0,i32*%aY,align 1
store i32 6,i32*%aU,align 4
%aZ=load i8*,i8**%g,align 8
store i8*null,i8**%g,align 8
%a0=getelementptr inbounds i8,i8*%aT,i64 8
%a1=bitcast i8*%a0 to i8**
store i8*%aZ,i8**%a1,align 8
%a2=getelementptr inbounds i8,i8*%aT,i64 16
%a3=bitcast i8*%a2 to i32*
store i32 2,i32*%a3,align 4
%a4=load i8*,i8**%h,align 8
store i8*null,i8**%h,align 8
%a5=call fastcc i8*%aG(i8*inreg%a4,i8*inreg%aT)
%a6=load i8*,i8**%i,align 8
store i8*null,i8**%i,align 8
%a7=call fastcc i8*%az(i8*inreg%a6,i8*inreg%a5)
%a8=getelementptr inbounds i8,i8*%a7,i64 16
%a9=bitcast i8*%a8 to i8*(i8*,i8*)**
%ba=load i8*(i8*,i8*)*,i8*(i8*,i8*)**%a9,align 8
%bb=bitcast i8*%a7 to i8**
%bc=load i8*,i8**%bb,align 8
%bd=load i8*,i8**%d,align 8
%be=getelementptr inbounds i8,i8*%bd,i64 24
%bf=bitcast i8*%be to i8**
%bg=load i8*,i8**%bf,align 8
%bh=call fastcc i8*%ba(i8*inreg%bc,i8*inreg%bg)
br label%bi
bi:
%bj=call fastcc i8*@_SMLFN4List3mapE(i32 inreg 1,i32 inreg 8,i32 inreg 1,i32 inreg 8)
%bk=getelementptr inbounds i8,i8*%bj,i64 16
%bl=bitcast i8*%bk to i8*(i8*,i8*)**
%bm=load i8*(i8*,i8*)*,i8*(i8*,i8*)**%bl,align 8
%bn=bitcast i8*%bj to i8**
%bo=load i8*,i8**%bn,align 8
%bp=call fastcc i8*%bm(i8*inreg%bo,i8*inreg bitcast(i8**getelementptr inbounds(<{[4x i8],i32,i8*,void(...)*,void(...)*,i32}>,<{[4x i8],i32,i8*,void(...)*,void(...)*,i32}>*@ai,i64 0,i32 2)to i8*))
%bq=getelementptr inbounds i8,i8*%bp,i64 16
%br=bitcast i8*%bq to i8*(i8*,i8*)**
%bs=load i8*(i8*,i8*)*,i8*(i8*,i8*)**%br,align 8
%bt=bitcast i8*%bp to i8**
%bu=load i8*,i8**%bt,align 8
%bv=load i8*,i8**%d,align 8
store i8*null,i8**%d,align 8
%bw=getelementptr inbounds i8,i8*%bv,i64 24
%bx=bitcast i8*%bw to i8**
%by=load i8*,i8**%bx,align 8
%bz=call fastcc i8*%bs(i8*inreg%bu,i8*inreg%by)
store i8*%bz,i8**%d,align 8
%bA=call i8*@sml_alloc(i32 inreg 52)#0
%bB=getelementptr inbounds i8,i8*%bA,i64 -4
%bC=bitcast i8*%bB to i32*
store i32 1342177328,i32*%bC,align 4
store i8*%bA,i8**%g,align 8
%bD=getelementptr inbounds i8,i8*%bA,i64 4
%bE=bitcast i8*%bD to i32*
store i32 0,i32*%bE,align 1
%bF=bitcast i8*%bA to i32*
store i32%r,i32*%bF,align 4
%bG=load i8*,i8**%b,align 8
store i8*null,i8**%b,align 8
%bH=getelementptr inbounds i8,i8*%bA,i64 8
%bI=bitcast i8*%bH to i8**
store i8*%bG,i8**%bI,align 8
%bJ=load i8*,i8**%c,align 8
store i8*null,i8**%c,align 8
%bK=getelementptr inbounds i8,i8*%bA,i64 16
%bL=bitcast i8*%bK to i8**
store i8*%bJ,i8**%bL,align 8
%bM=load i8*,i8**%e,align 8
store i8*null,i8**%e,align 8
%bN=getelementptr inbounds i8,i8*%bA,i64 24
%bO=bitcast i8*%bN to i8**
store i8*%bM,i8**%bO,align 8
%bP=load i8*,i8**%f,align 8
%bQ=getelementptr inbounds i8,i8*%bA,i64 32
%bR=bitcast i8*%bQ to i8**
store i8*%bP,i8**%bR,align 8
%bS=load i8*,i8**%d,align 8
store i8*null,i8**%d,align 8
%bT=getelementptr inbounds i8,i8*%bA,i64 40
%bU=bitcast i8*%bT to i8**
store i8*%bS,i8**%bU,align 8
%bV=getelementptr inbounds i8,i8*%bA,i64 48
%bW=bitcast i8*%bV to i32*
store i32 62,i32*%bW,align 4
%bX=call i8*@sml_alloc(i32 inreg 20)#0
%bY=getelementptr inbounds i8,i8*%bX,i64 -4
%bZ=bitcast i8*%bY to i32*
store i32 1342177296,i32*%bZ,align 4
store i8*%bX,i8**%b,align 8
%b0=getelementptr inbounds i8,i8*%bX,i64 4
%b1=bitcast i8*%b0 to i32*
store i32 0,i32*%b1,align 1
%b2=bitcast i8*%bX to i32*
store i32 2,i32*%b2,align 4
%b3=load i8*,i8**%g,align 8
store i8*null,i8**%g,align 8
%b4=getelementptr inbounds i8,i8*%bX,i64 8
%b5=bitcast i8*%b4 to i8**
store i8*%b3,i8**%b5,align 8
%b6=getelementptr inbounds i8,i8*%bX,i64 16
%b7=bitcast i8*%b6 to i32*
store i32 2,i32*%b7,align 4
%b8=call i8*@sml_alloc(i32 inreg 20)#0
%b9=getelementptr inbounds i8,i8*%b8,i64 -4
%ca=bitcast i8*%b9 to i32*
store i32 1342177296,i32*%ca,align 4
%cb=load i8*,i8**%b,align 8
%cc=bitcast i8*%b8 to i8**
store i8*%cb,i8**%cc,align 8
%cd=load i8*,i8**%f,align 8
%ce=getelementptr inbounds i8,i8*%b8,i64 8
%cf=bitcast i8*%ce to i8**
store i8*%cd,i8**%cf,align 8
%cg=getelementptr inbounds i8,i8*%b8,i64 16
%ch=bitcast i8*%cg to i32*
store i32 3,i32*%ch,align 4
ret i8*%b8
}
define internal fastcc void@_SMLL9checkRule_395(i8*inreg%a,i8*inreg%b)#2 gc"smlsharp"{
o:
%c=alloca i8*,align 8
%d=alloca i8*,align 8
%e=alloca i8*,align 8
%f=alloca i8*,align 8
%g=alloca i8*,align 8
%h=alloca i8*,align 8
call void@llvm.gcroot(i8**%c,i8*null)#0
call void@llvm.gcroot(i8**%d,i8*null)#0
call void@llvm.gcroot(i8**%e,i8*null)#0
call void@llvm.gcroot(i8**%f,i8*null)#0
call void@llvm.gcroot(i8**%g,i8*null)#0
call void@llvm.gcroot(i8**%h,i8*null)#0
store i8*%a,i8**%e,align 8
store i8*%b,i8**%c,align 8
%i=load atomic i32,i32*@sml_check_flag unordered,align 4
%j=icmp eq i32%i,0
br i1%j,label%m,label%k
k:
call void@sml_check(i32 inreg%i)
%l=load i8*,i8**%c,align 8
br label%m
m:
%n=phi i8*[%l,%k],[%b,%o]
%p=bitcast i8*%n to i8**
%q=load i8*,i8**%p,align 8
%r=getelementptr inbounds i8,i8*%q,i64 8
%s=bitcast i8*%r to i8**
%t=load i8*,i8**%s,align 8
store i8*%t,i8**%c,align 8
%u=getelementptr inbounds i8,i8*%n,i64 16
%v=bitcast i8*%u to i8**
%w=load i8*,i8**%v,align 8
store i8*%w,i8**%d,align 8
%x=call fastcc i8*@_SMLLN12TypedCalcCon4eqTyE_287(i8*inreg getelementptr inbounds(<{[4x i8],i32,[19x i8]}>,<{[4x i8],i32,[19x i8]}>*@am,i64 0,i32 2,i64 0))
%y=getelementptr inbounds i8,i8*%x,i64 16
%z=bitcast i8*%y to i8*(i8*,i8*)**
%A=load i8*(i8*,i8*)*,i8*(i8*,i8*)**%z,align 8
%B=bitcast i8*%x to i8**
%C=load i8*,i8**%B,align 8
%D=load i8*,i8**%e,align 8
%E=getelementptr inbounds i8,i8*%D,i64 16
%F=bitcast i8*%E to i8**
%G=load i8*,i8**%F,align 8
%H=call fastcc i8*%A(i8*inreg%C,i8*inreg%G)
%I=getelementptr inbounds i8,i8*%H,i64 16
%J=bitcast i8*%I to i8*(i8*,i8*)**
%K=load i8*(i8*,i8*)*,i8*(i8*,i8*)**%J,align 8
%L=bitcast i8*%H to i8**
%M=load i8*,i8**%L,align 8
store i8*%M,i8**%f,align 8
%N=call i8*@sml_alloc(i32 inreg 20)#0
%O=getelementptr inbounds i8,i8*%N,i64 -4
%P=bitcast i8*%O to i32*
store i32 1342177296,i32*%P,align 4
store i8*%N,i8**%g,align 8
%Q=load i8*,i8**%d,align 8
store i8*null,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 i8**
store i8*null,i8**%T,align 8
%U=getelementptr inbounds i8,i8*%N,i64 16
%V=bitcast i8*%U to i32*
store i32 3,i32*%V,align 4
%W=call i8*@sml_alloc(i32 inreg 20)#0
%X=getelementptr inbounds i8,i8*%W,i64 -4
%Y=bitcast i8*%X to i32*
store i32 1342177296,i32*%Y,align 4
store i8*%W,i8**%d,align 8
%Z=load i8*,i8**%g,align 8
store i8*null,i8**%g,align 8
%aa=bitcast i8*%W to i8**
store i8*%Z,i8**%aa,align 8
%ab=load i8*,i8**%c,align 8
store i8*null,i8**%c,align 8
%ac=getelementptr inbounds i8,i8*%W,i64 8
%ad=bitcast i8*%ac to i8**
store i8*%ab,i8**%ad,align 8
%ae=getelementptr inbounds i8,i8*%W,i64 16
%af=bitcast i8*%ae to i32*
store i32 3,i32*%af,align 4
%ag=call i8*@sml_alloc(i32 inreg 20)#0
%ah=getelementptr inbounds i8,i8*%ag,i64 -4
%ai=bitcast i8*%ah to i32*
store i32 1342177296,i32*%ai,align 4
store i8*%ag,i8**%g,align 8
%aj=getelementptr inbounds i8,i8*%ag,i64 4
%ak=bitcast i8*%aj to i32*
store i32 0,i32*%ak,align 1
%al=bitcast i8*%ag to i32*
store i32 6,i32*%al,align 4
%am=load i8*,i8**%d,align 8
store i8*null,i8**%d,align 8
%an=getelementptr inbounds i8,i8*%ag,i64 8
%ao=bitcast i8*%an to i8**
store i8*%am,i8**%ao,align 8
%ap=getelementptr inbounds i8,i8*%ag,i64 16
%aq=bitcast i8*%ap to i32*
store i32 2,i32*%aq,align 4
%ar=load i8*,i8**%e,align 8
%as=getelementptr inbounds i8,i8*%ar,i64 8
%at=bitcast i8*%as to i8**
%au=load i8*,i8**%at,align 8
store i8*%au,i8**%c,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
store i8*%av,i8**%h,align 8
%ay=load i8*,i8**%c,align 8
%az=bitcast i8*%av to i8**
store i8*%ay,i8**%az,align 8
%aA=getelementptr inbounds i8,i8*%av,i64 8
%aB=bitcast i8*%aA to i8**
store i8*null,i8**%aB,align 8
%aC=getelementptr inbounds i8,i8*%av,i64 16
%aD=bitcast i8*%aC to i32*
store i32 3,i32*%aD,align 4
%aE=bitcast i8**%e to i8***
%aF=load i8**,i8***%aE,align 8
store i8*null,i8**%e,align 8
%aG=load i8*,i8**%aF,align 8
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
store i8*%aH,i8**%d,align 8
%aK=load i8*,i8**%h,align 8
store i8*null,i8**%h,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
%aN=getelementptr inbounds i8,i8*%aH,i64 8
%aO=bitcast i8*%aN to i8**
store i8*%aM,i8**%aO,align 8
%aP=getelementptr inbounds i8,i8*%aH,i64 16
%aQ=bitcast i8*%aP to i32*
store i32 3,i32*%aQ,align 4
%aR=call i8*@sml_alloc(i32 inreg 20)#0
%aS=getelementptr inbounds i8,i8*%aR,i64 -4
%aT=bitcast i8*%aS to i32*
store i32 1342177296,i32*%aT,align 4
store i8*%aR,i8**%e,align 8
%aU=getelementptr inbounds i8,i8*%aR,i64 4
%aV=bitcast i8*%aU to i32*
store i32 0,i32*%aV,align 1
%aW=bitcast i8*%aR to i32*
store i32 6,i32*%aW,align 4
%aX=load i8*,i8**%d,align 8
store i8*null,i8**%d,align 8
%aY=getelementptr inbounds i8,i8*%aR,i64 8
%aZ=bitcast i8*%aY to i8**
store i8*%aX,i8**%aZ,align 8
%a0=getelementptr inbounds i8,i8*%aR,i64 16
%a1=bitcast i8*%a0 to i32*
store i32 2,i32*%a1,align 4
%a2=call i8*@sml_alloc(i32 inreg 20)#0
%a3=getelementptr inbounds i8,i8*%a2,i64 -4
%a4=bitcast i8*%a3 to i32*
store i32 1342177296,i32*%a4,align 4
store i8*%a2,i8**%c,align 8
%a5=load i8*,i8**%g,align 8
store i8*null,i8**%g,align 8
%a6=bitcast i8*%a2 to i8**
store i8*%a5,i8**%a6,align 8
%a7=load i8*,i8**%e,align 8
store i8*null,i8**%e,align 8
%a8=getelementptr inbounds i8,i8*%a2,i64 8
%a9=bitcast i8*%a8 to i8**
store i8*%a7,i8**%a9,align 8
%ba=getelementptr inbounds i8,i8*%a2,i64 16
%bb=bitcast i8*%ba to i32*
store i32 3,i32*%bb,align 4
%bc=call i8*@sml_alloc(i32 inreg 20)#0
%bd=getelementptr inbounds i8,i8*%bc,i64 -4
%be=bitcast i8*%bd to i32*
store i32 1342177296,i32*%be,align 4
%bf=load i8*,i8**%c,align 8
store i8*null,i8**%c,align 8
%bg=bitcast i8*%bc to i8**
store i8*%bf,i8**%bg,align 8
%bh=getelementptr inbounds i8,i8*%bc,i64 8
%bi=bitcast i8*%bh to i8**
store i8*null,i8**%bi,align 8
%bj=getelementptr inbounds i8,i8*%bc,i64 16
%bk=bitcast i8*%bj to i32*
store i32 3,i32*%bk,align 4
%bl=load i8*,i8**%f,align 8
store i8*null,i8**%f,align 8
%bm=call fastcc i8*%K(i8*inreg%bl,i8*inreg%bc)
ret void
}
define internal fastcc i8*@_SMLLN12TypedCalcCon18TPSWITCH__CONSTCASEE_396(i8*inreg%a)#4 gc"smlsharp"{
%b=alloca i8*,align 8
%c=alloca i8*,align 8
%d=alloca i8*,align 8
call void@llvm.gcroot(i8**%b,i8*null)#0
call void@llvm.gcroot(i8**%c,i8*null)#0
call void@llvm.gcroot(i8**%d,i8*null)#0
%e=bitcast i8*%a to i8***
%f=load i8**,i8***%e,align 8
%g=load i8*,i8**%f,align 8
store i8*%g,i8**%b,align 8
%h=getelementptr inbounds i8,i8*%a,i64 8
%i=bitcast i8*%h to i8**
%j=load i8*,i8**%i,align 8
store i8*%j,i8**%c,align 8
%k=getelementptr inbounds i8,i8*%a,i64 16
%l=bitcast i8*%k to i8**
%m=load i8*,i8**%l,align 8
store i8*%m,i8**%d,align 8
%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**%b,align 8
%r=bitcast i8*%n to i8**
store i8*%q,i8**%r,align 8
%s=load i8*,i8**%c,align 8
%t=getelementptr inbounds i8,i8*%n,i64 8
%u=bitcast i8*%t to i8**
store i8*%s,i8**%u,align 8
%v=load i8*,i8**%d,align 8
%w=getelementptr inbounds i8,i8*%n,i64 16
%x=bitcast i8*%w to i8**
store i8*%v,i8**%x,align 8
%y=getelementptr inbounds i8,i8*%n,i64 24
%z=bitcast i8*%y to i32*
store i32 7,i32*%z,align 4
ret i8*%n
}
define fastcc i8*@_SMLFN12TypedCalcCon18TPSWITCH__CONSTCASEE(i8*inreg%a)#2 gc"smlsharp"{
%b=alloca i8*,align 8
%c=alloca i8*,align 8
%d=alloca i8*,align 8
%e=alloca i8*,align 8
%f=alloca i8*,align 8
%g=alloca i8*,align 8
%h=alloca i8*,align 8
%i=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
call void@llvm.gcroot(i8**%f,i8*null)#0
call void@llvm.gcroot(i8**%g,i8*null)#0
call void@llvm.gcroot(i8**%h,i8*null)#0
call void@llvm.gcroot(i8**%i,i8*null)#0
store i8*%a,i8**%b,align 8
%j=load atomic i32,i32*@sml_check_flag unordered,align 4
%k=icmp eq i32%j,0
br i1%k,label%l,label%n
l:
%m=bitcast i8*%a to i8***
br label%r
n:
call void@sml_check(i32 inreg%j)
%o=bitcast i8**%b to i8****
%p=load i8***,i8****%o,align 8
%q=bitcast i8***%p to i8*
br label%r
r:
%s=phi i8*[%q,%n],[%a,%l]
%t=phi i8***[%p,%n],[%m,%l]
%u=load i8**,i8***%t,align 8
%v=load i8*,i8**%u,align 8
store i8*%v,i8**%c,align 8
%w=bitcast i8***%t to i8**
%x=load i8*,i8**%w,align 8
%y=getelementptr inbounds i8,i8*%x,i64 8
%z=bitcast i8*%y to i8**
%A=load i8*,i8**%z,align 8
store i8*%A,i8**%d,align 8
%B=getelementptr inbounds i8,i8*%s,i64 8
%C=bitcast i8*%B to i8***
%D=load i8**,i8***%C,align 8
%E=load i8*,i8**%D,align 8
store i8*%E,i8**%e,align 8
%F=getelementptr inbounds i8*,i8**%D,i64 1
%G=load i8*,i8**%F,align 8
store i8*%G,i8**%f,align 8
%H=getelementptr inbounds i8,i8*%s,i64 16
%I=bitcast i8*%H to i8**
%J=load i8*,i8**%I,align 8
store i8*%J,i8**%g,align 8
%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
store i8*%K,i8**%h,align 8
%N=load i8*,i8**%d,align 8
%O=bitcast i8*%K to i8**
store i8*%N,i8**%O,align 8
%P=load i8*,i8**%f,align 8
%Q=getelementptr inbounds i8,i8*%K,i64 8
%R=bitcast i8*%Q to i8**
store i8*%P,i8**%R,align 8
%S=load i8*,i8**%g,align 8
%T=getelementptr inbounds i8,i8*%K,i64 16
%U=bitcast i8*%T to i8**
store i8*%S,i8**%U,align 8
%V=getelementptr inbounds i8,i8*%K,i64 24
%W=bitcast i8*%V to i32*
store i32 7,i32*%W,align 4
%X=call i8*@sml_alloc(i32 inreg 28)#0
%Y=getelementptr inbounds i8,i8*%X,i64 -4
%Z=bitcast i8*%Y to i32*
store i32 1342177304,i32*%Z,align 4
store i8*%X,i8**%i,align 8
%aa=load i8*,i8**%h,align 8
store i8*null,i8**%h,align 8
%ab=bitcast i8*%X to i8**
store i8*%aa,i8**%ab,align 8
%ac=getelementptr inbounds i8,i8*%X,i64 8
%ad=bitcast i8*%ac to void(...)**
store void(...)*bitcast(void(i8*,i8*)*@_SMLL9checkRule_395 to void(...)*),void(...)**%ad,align 8
%ae=getelementptr inbounds i8,i8*%X,i64 16
%af=bitcast i8*%ae to void(...)**
store void(...)*bitcast(i8*(i8*,i8*)*@_SMLL9checkRule_715 to void(...)*),void(...)**%af,align 8
%ag=getelementptr inbounds i8,i8*%X,i64 24
%ah=bitcast i8*%ag to i32*
store i32 -2147483647,i32*%ah,align 4
%ai=load i32*,i32**bitcast(i8**@_SMLZN7Control9checkTypeE to i32**),align 8
%aj=load i32,i32*%ai,align 4
%ak=icmp eq i32%aj,0
br i1%ak,label%aE,label%al
al:
%am=call fastcc i8*@_SMLFN4List3appE(i32 inreg 1,i32 inreg 8)
%an=getelementptr inbounds i8,i8*%am,i64 16
%ao=bitcast i8*%an to i8*(i8*,i8*)**
%ap=load i8*(i8*,i8*)*,i8*(i8*,i8*)**%ao,align 8
%aq=bitcast i8*%am to i8**
%ar=load i8*,i8**%aq,align 8
%as=load i8*,i8**%i,align 8
store i8*null,i8**%i,align 8
%at=call fastcc i8*%ap(i8*inreg%ar,i8*inreg%as)
%au=getelementptr inbounds i8,i8*%at,i64 16
%av=bitcast i8*%au to i8*(i8*,i8*)**
%aw=load i8*(i8*,i8*)*,i8*(i8*,i8*)**%av,align 8
%ax=bitcast i8*%at to i8**
%ay=load i8*,i8**%ax,align 8
%az=load i8*,i8**%b,align 8
%aA=getelementptr inbounds i8,i8*%az,i64 24
%aB=bitcast i8*%aA to i8**
%aC=load i8*,i8**%aB,align 8
%aD=call fastcc i8*%aw(i8*inreg%ay,i8*inreg%aC)
br label%aF
aE:
store i8*null,i8**%i,align 8
br label%aF
aF:
%aG=call fastcc i8*@_SMLFN4List3mapE(i32 inreg 1,i32 inreg 8,i32 inreg 1,i32 inreg 8)
%aH=getelementptr inbounds i8,i8*%aG,i64 16
%aI=bitcast i8*%aH to i8*(i8*,i8*)**
%aJ=load i8*(i8*,i8*)*,i8*(i8*,i8*)**%aI,align 8
%aK=bitcast i8*%aG to i8**
%aL=load i8*,i8**%aK,align 8
%aM=call fastcc i8*%aJ(i8*inreg%aL,i8*inreg bitcast(i8**getelementptr inbounds(<{[4x i8],i32,i8*,void(...)*,void(...)*,i32}>,<{[4x i8],i32,i8*,void(...)*,void(...)*,i32}>*@an,i64 0,i32 2)to i8*))
%aN=getelementptr inbounds i8,i8*%aM,i64 16
%aO=bitcast i8*%aN to i8*(i8*,i8*)**
%aP=load i8*(i8*,i8*)*,i8*(i8*,i8*)**%aO,align 8
%aQ=bitcast i8*%aM to i8**
%aR=load i8*,i8**%aQ,align 8
%aS=load i8*,i8**%b,align 8
store i8*null,i8**%b,align 8
%aT=getelementptr inbounds i8,i8*%aS,i64 24
%aU=bitcast i8*%aT to i8**
%aV=load i8*,i8**%aU,align 8
%aW=call fastcc i8*%aP(i8*inreg%aR,i8*inreg%aV)
store i8*%aW,i8**%b,align 8
%aX=call i8*@sml_alloc(i32 inreg 20)#0
%aY=getelementptr inbounds i8,i8*%aX,i64 -4
%aZ=bitcast i8*%aY to i32*
store i32 1342177296,i32*%aZ,align 4
store i8*%aX,i8**%h,align 8
%a0=getelementptr inbounds i8,i8*%aX,i64 4
%a1=bitcast i8*%a0 to i32*
store i32 0,i32*%a1,align 1
%a2=bitcast i8*%aX to i32*
store i32 1,i32*%a2,align 4
%a3=load i8*,i8**%b,align 8
store i8*null,i8**%b,align 8
%a4=getelementptr inbounds i8,i8*%aX,i64 8
%a5=bitcast i8*%a4 to i8**
store i8*%a3,i8**%a5,align 8
%a6=getelementptr inbounds i8,i8*%aX,i64 16
%a7=bitcast i8*%a6 to i32*
store i32 2,i32*%a7,align 4
%a8=call i8*@sml_alloc(i32 inreg 52)#0
%a9=getelementptr inbounds i8,i8*%a8,i64 -4
%ba=bitcast i8*%a9 to i32*
store i32 1342177328,i32*%ba,align 4
store i8*%a8,i8**%b,align 8
%bb=load i8*,i8**%c,align 8
store i8*null,i8**%c,align 8
%bc=bitcast i8*%a8 to i8**
store i8*%bb,i8**%bc,align 8
%bd=load i8*,i8**%e,align 8
store i8*null,i8**%e,align 8
%be=getelementptr inbounds i8,i8*%a8,i64 8
%bf=bitcast i8*%be to i8**
store i8*%bd,i8**%bf,align 8
%bg=load i8*,i8**%f,align 8
store i8*null,i8**%f,align 8
%bh=getelementptr inbounds i8,i8*%a8,i64 16
%bi=bitcast i8*%bh to i8**
store i8*%bg,i8**%bi,align 8
%bj=load i8*,i8**%g,align 8
store i8*null,i8**%g,align 8
%bk=getelementptr inbounds i8,i8*%a8,i64 24
%bl=bitcast i8*%bk to i8**
store i8*%bj,i8**%bl,align 8
%bm=load i8*,i8**%d,align 8
%bn=getelementptr inbounds i8,i8*%a8,i64 32
%bo=bitcast i8*%bn to i8**
store i8*%bm,i8**%bo,align 8
%bp=load i8*,i8**%h,align 8
store i8*null,i8**%h,align 8
%bq=getelementptr inbounds i8,i8*%a8,i64 40
%br=bitcast i8*%bq to i8**
store i8*%bp,i8**%br,align 8
%bs=getelementptr inbounds i8,i8*%a8,i64 48
%bt=bitcast i8*%bs to i32*
store i32 63,i32*%bt,align 4
%bu=call i8*@sml_alloc(i32 inreg 20)#0
%bv=getelementptr inbounds i8,i8*%bu,i64 -4
%bw=bitcast i8*%bv to i32*
store i32 1342177296,i32*%bw,align 4
store i8*%bu,i8**%c,align 8
%bx=getelementptr inbounds i8,i8*%bu,i64 4
%by=bitcast i8*%bx to i32*
store i32 0,i32*%by,align 1
%bz=bitcast i8*%bu to i32*
store i32 37,i32*%bz,align 4
%bA=load i8*,i8**%b,align 8
store i8*null,i8**%b,align 8
%bB=getelementptr inbounds i8,i8*%bu,i64 8
%bC=bitcast i8*%bB to i8**
store i8*%bA,i8**%bC,align 8
%bD=getelementptr inbounds i8,i8*%bu,i64 16
%bE=bitcast i8*%bD to i32*
store i32 2,i32*%bE,align 4
%bF=call i8*@sml_alloc(i32 inreg 20)#0
%bG=getelementptr inbounds i8,i8*%bF,i64 -4
%bH=bitcast i8*%bG to i32*
store i32 1342177296,i32*%bH,align 4
%bI=load i8*,i8**%c,align 8
%bJ=bitcast i8*%bF to i8**
store i8*%bI,i8**%bJ,align 8
%bK=load i8*,i8**%d,align 8
%bL=getelementptr inbounds i8,i8*%bF,i64 8
%bM=bitcast i8*%bL to i8**
store i8*%bK,i8**%bM,align 8
%bN=getelementptr inbounds i8,i8*%bF,i64 16
%bO=bitcast i8*%bN to i32*
store i32 3,i32*%bO,align 4
ret i8*%bF
}
define internal fastcc void@_SMLL9checkRule_406(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
%h=alloca i8*,align 8
%i=alloca i8*,align 8
call void@llvm.gcroot(i8**%c,i8*null)#0
call void@llvm.gcroot(i8**%d,i8*null)#0
call void@llvm.gcroot(i8**%e,i8*null)#0
call void@llvm.gcroot(i8**%f,i8*null)#0
call void@llvm.gcroot(i8**%g,i8*null)#0
call void@llvm.gcroot(i8**%h,i8*null)#0
call void@llvm.gcroot(i8**%i,i8*null)#0
store i8*%a,i8**%g,align 8
store i8*%b,i8**%c,align 8
%j=load atomic i32,i32*@sml_check_flag unordered,align 4
%k=icmp eq i32%j,0
br i1%k,label%n,label%l
l:
call void@sml_check(i32 inreg%j)
%m=load i8*,i8**%c,align 8
br label%n
n:
%o=phi i8*[%m,%l],[%b,%p]
%q=bitcast i8*%o to i8**
%r=load i8*,i8**%q,align 8
store i8*%r,i8**%d,align 8
%s=getelementptr inbounds i8,i8*%o,i64 8
%t=bitcast i8*%s to i8**
%u=load i8*,i8**%t,align 8
%v=getelementptr inbounds i8,i8*%u,i64 8
%w=bitcast i8*%v to i8**
%x=load i8*,i8**%w,align 8
store i8*%x,i8**%e,align 8
%y=getelementptr inbounds i8,i8*%o,i64 24
%z=bitcast i8*%y to i8**
%A=load i8*,i8**%z,align 8
store i8*%A,i8**%c,align 8
%B=getelementptr inbounds i8,i8*%o,i64 16
%C=bitcast i8*%B to i8**
%D=load i8*,i8**%C,align 8
%E=getelementptr inbounds i8,i8*%D,i64 16
%F=bitcast i8*%E to i8**
%G=load i8*,i8**%F,align 8
store i8*%G,i8**%f,align 8
%H=call i8*@sml_alloc(i32 inreg 20)#0
%I=getelementptr inbounds i8,i8*%H,i64 -4
%J=bitcast i8*%I to i32*
store i32 1342177296,i32*%J,align 4
%K=load i8*,i8**%f,align 8
store i8*null,i8**%f,align 8
%L=bitcast i8*%H to i8**
store i8*%K,i8**%L,align 8
%M=load i8*,i8**%c,align 8
store i8*null,i8**%c,align 8
%N=getelementptr inbounds i8,i8*%H,i64 8
%O=bitcast i8*%N to i8**
store i8*%M,i8**%O,align 8
%P=getelementptr inbounds i8,i8*%H,i64 16
%Q=bitcast i8*%P to i32*
store i32 3,i32*%Q,align 4
%R=call fastcc i8*@_SMLLN12TypedCalcCon11instantiateE_245(i8*inreg%H)
store i8*%R,i8**%c,align 8
%S=call i8*@sml_alloc(i32 inreg 20)#0
%T=getelementptr inbounds i8,i8*%S,i64 -4
%U=bitcast i8*%T to i32*
store i32 1342177296,i32*%U,align 4
%V=load i8*,i8**%c,align 8
%W=bitcast i8*%S to i8**
store i8*%V,i8**%W,align 8
%X=load i8*,i8**%d,align 8
%Y=getelementptr inbounds i8,i8*%S,i64 8
%Z=bitcast i8*%Y to i8**
store i8*%X,i8**%Z,align 8
%aa=getelementptr inbounds i8,i8*%S,i64 16
%ab=bitcast i8*%aa to i32*
store i32 3,i32*%ab,align 4
%ac=icmp eq i8*%V,null
br i1%ac,label%ah,label%ad
ad:
%ae=bitcast i8*%V to i32*
%af=load i32,i32*%ae,align 4
%ag=icmp eq i32%af,6
br i1%ag,label%ak,label%ah
ah:
%ai=icmp eq i8*%X,null
br i1%ai,label%du,label%aj
aj:
store i8*null,i8**%e,align 8
store i8*null,i8**%g,align 8
br label%da
ak:
%al=getelementptr inbounds i8,i8*%V,i64 8
%am=bitcast i8*%al to i8**
%an=load i8*,i8**%am,align 8
%ao=bitcast i8*%an to i8**
%ap=load i8*,i8**%ao,align 8
%aq=icmp eq i8*%ap,null
br i1%aq,label%ar,label%au
ar:
%as=icmp eq i8*%X,null
br i1%as,label%du,label%at
at:
store i8*null,i8**%e,align 8
store i8*null,i8**%g,align 8
br label%da
au:
%av=bitcast i8*%ap to i8**
%aw=load i8*,i8**%av,align 8
store i8*%aw,i8**%c,align 8
%ax=getelementptr inbounds i8,i8*%ap,i64 8
%ay=bitcast i8*%ax to i8**
%az=load i8*,i8**%ay,align 8
%aA=icmp eq i8*%az,null
br i1%aA,label%aB,label%c6
aB:
%aC=getelementptr inbounds i8,i8*%an,i64 8
%aD=bitcast i8*%aC to i8**
%aE=load i8*,i8**%aD,align 8
store i8*%aE,i8**%d,align 8
%aF=icmp eq i8*%X,null
br i1%aF,label%aG,label%aH
aG:
store i8*null,i8**%d,align 8
store i8*%V,i8**%c,align 8
br label%du
aH:
%aI=bitcast i8*%X to i8**
%aJ=load i8*,i8**%aI,align 8
store i8*%aJ,i8**%f,align 8
%aK=call fastcc i8*@_SMLLN12TypedCalcCon17mustBeCONSTRUCTtyE_274(i8*inreg getelementptr inbounds(<{[4x i8],i32,[17x i8]}>,<{[4x i8],i32,[17x i8]}>*@aq,i64 0,i32 2,i64 0))
%aL=getelementptr inbounds i8,i8*%aK,i64 16
%aM=bitcast i8*%aL to i8*(i8*,i8*)**
%aN=load i8*(i8*,i8*)*,i8*(i8*,i8*)**%aM,align 8
%aO=bitcast i8*%aK to i8**
%aP=load i8*,i8**%aO,align 8
%aQ=load i8*,i8**%g,align 8
%aR=getelementptr inbounds i8,i8*%aQ,i64 16
%aS=bitcast i8*%aR to i8**
%aT=load i8*,i8**%aS,align 8
%aU=call fastcc i8*%aN(i8*inreg%aP,i8*inreg%aT)
%aV=getelementptr inbounds i8,i8*%aU,i64 16
%aW=bitcast i8*%aV to i8*(i8*,i8*)**
%aX=load i8*(i8*,i8*)*,i8*(i8*,i8*)**%aW,align 8
%aY=bitcast i8*%aU to i8**
%aZ=load i8*,i8**%aY,align 8
%a0=load i8*,i8**%d,align 8
%a1=call fastcc i8*%aX(i8*inreg%aZ,i8*inreg%a0)
%a2=call fastcc i8*@_SMLLN12TypedCalcCon4eqTyE_287(i8*inreg getelementptr inbounds(<{[4x i8],i32,[17x i8]}>,<{[4x i8],i32,[17x i8]}>*@aq,i64 0,i32 2,i64 0))
%a3=getelementptr inbounds i8,i8*%a2,i64 16
%a4=bitcast i8*%a3 to i8*(i8*,i8*)**
%a5=load i8*(i8*,i8*)*,i8*(i8*,i8*)**%a4,align 8
%a6=bitcast i8*%a2 to i8**
%a7=load i8*,i8**%a6,align 8
%a8=load i8*,i8**%g,align 8
%a9=getelementptr inbounds i8,i8*%a8,i64 16
%ba=bitcast i8*%a9 to i8**
%bb=load i8*,i8**%ba,align 8
%bc=call fastcc i8*%a5(i8*inreg%a7,i8*inreg%bb)
%bd=getelementptr inbounds i8,i8*%bc,i64 16
%be=bitcast i8*%bd to i8*(i8*,i8*)**
%bf=load i8*(i8*,i8*)*,i8*(i8*,i8*)**%be,align 8
%bg=bitcast i8*%bc to i8**
%bh=load i8*,i8**%bg,align 8
store i8*%bh,i8**%i,align 8
%bi=load i8*,i8**%f,align 8
%bj=getelementptr inbounds i8,i8*%bi,i64 16
%bk=bitcast i8*%bj to i8**
%bl=load i8*,i8**%bk,align 8
store i8*%bl,i8**%f,align 8
%bm=call i8*@sml_alloc(i32 inreg 20)#0
%bn=getelementptr inbounds i8,i8*%bm,i64 -4
%bo=bitcast i8*%bn to i32*
store i32 1342177296,i32*%bo,align 4
store i8*%bm,i8**%h,align 8
%bp=load i8*,i8**%c,align 8
store i8*null,i8**%c,align 8
%bq=bitcast i8*%bm to i8**
store i8*%bp,i8**%bq,align 8
%br=load i8*,i8**%f,align 8
store i8*null,i8**%f,align 8
%bs=getelementptr inbounds i8,i8*%bm,i64 8
%bt=bitcast i8*%bs to i8**
store i8*%br,i8**%bt,align 8
%bu=getelementptr inbounds i8,i8*%bm,i64 16
%bv=bitcast i8*%bu to i32*
store i32 3,i32*%bv,align 4
%bw=call i8*@sml_alloc(i32 inreg 20)#0
%bx=getelementptr inbounds i8,i8*%bw,i64 -4
%by=bitcast i8*%bx to i32*
store i32 1342177296,i32*%by,align 4
store i8*%bw,i8**%f,align 8
%bz=load i8*,i8**%d,align 8
store i8*null,i8**%d,align 8
%bA=bitcast i8*%bw to i8**
store i8*%bz,i8**%bA,align 8
%bB=getelementptr inbounds i8,i8*%bw,i64 8
%bC=bitcast i8*%bB to i8**
store i8*null,i8**%bC,align 8
%bD=getelementptr inbounds i8,i8*%bw,i64 16
%bE=bitcast i8*%bD to i32*
store i32 3,i32*%bE,align 4
%bF=call i8*@sml_alloc(i32 inreg 20)#0
%bG=getelementptr inbounds i8,i8*%bF,i64 -4
%bH=bitcast i8*%bG to i32*
store i32 1342177296,i32*%bH,align 4
store i8*%bF,i8**%c,align 8
%bI=load i8*,i8**%f,align 8
store i8*null,i8**%f,align 8
%bJ=bitcast i8*%bF to i8**
store i8*%bI,i8**%bJ,align 8
%bK=load i8*,i8**%e,align 8
store i8*null,i8**%e,align 8
%bL=getelementptr inbounds i8,i8*%bF,i64 8
%bM=bitcast i8*%bL to i8**
store i8*%bK,i8**%bM,align 8
%bN=getelementptr inbounds i8,i8*%bF,i64 16
%bO=bitcast i8*%bN to i32*
store i32 3,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**%e,align 8
%bS=getelementptr inbounds i8,i8*%bP,i64 4
%bT=bitcast i8*%bS to i32*
store i32 0,i32*%bT,align 1
%bU=bitcast i8*%bP to i32*
store i32 6,i32*%bU,align 4
%bV=load i8*,i8**%c,align 8
%bW=getelementptr inbounds i8,i8*%bP,i64 8
%bX=bitcast i8*%bW to i8**
store i8*%bV,i8**%bX,align 8
%bY=getelementptr inbounds i8,i8*%bP,i64 16
%bZ=bitcast i8*%bY to i32*
store i32 2,i32*%bZ,align 4
%b0=load i8*,i8**%g,align 8
%b1=getelementptr inbounds i8,i8*%b0,i64 8
%b2=bitcast i8*%b1 to i8**
%b3=load i8*,i8**%b2,align 8
store i8*%b3,i8**%c,align 8
%b4=call i8*@sml_alloc(i32 inreg 20)#0
%b5=getelementptr inbounds i8,i8*%b4,i64 -4
%b6=bitcast i8*%b5 to i32*
store i32 1342177296,i32*%b6,align 4
store i8*%b4,i8**%f,align 8
%b7=load i8*,i8**%c,align 8
%b8=bitcast i8*%b4 to i8**
store i8*%b7,i8**%b8,align 8
%b9=getelementptr inbounds i8,i8*%b4,i64 8
%ca=bitcast i8*%b9 to i8**
store i8*null,i8**%ca,align 8
%cb=getelementptr inbounds i8,i8*%b4,i64 16
%cc=bitcast i8*%cb to i32*
store i32 3,i32*%cc,align 4
%cd=bitcast i8**%g to i8***
%ce=load i8**,i8***%cd,align 8
store i8*null,i8**%g,align 8
%cf=load i8*,i8**%ce,align 8
store i8*%cf,i8**%c,align 8
%cg=call i8*@sml_alloc(i32 inreg 20)#0
%ch=getelementptr inbounds i8,i8*%cg,i64 -4
%ci=bitcast i8*%ch to i32*
store i32 1342177296,i32*%ci,align 4
store i8*%cg,i8**%d,align 8
%cj=load i8*,i8**%f,align 8
store i8*null,i8**%f,align 8
%ck=bitcast i8*%cg to i8**
store i8*%cj,i8**%ck,align 8
%cl=load i8*,i8**%c,align 8
store i8*null,i8**%c,align 8
%cm=getelementptr inbounds i8,i8*%cg,i64 8
%cn=bitcast i8*%cm to i8**
store i8*%cl,i8**%cn,align 8
%co=getelementptr inbounds i8,i8*%cg,i64 16
%cp=bitcast i8*%co to i32*
store i32 3,i32*%cp,align 4
%cq=call i8*@sml_alloc(i32 inreg 20)#0
%cr=getelementptr inbounds i8,i8*%cq,i64 -4
%cs=bitcast i8*%cr to i32*
store i32 1342177296,i32*%cs,align 4
store i8*%cq,i8**%f,align 8
%ct=getelementptr inbounds i8,i8*%cq,i64 4
%cu=bitcast i8*%ct to i32*
store i32 0,i32*%cu,align 1
%cv=bitcast i8*%cq to i32*
store i32 6,i32*%cv,align 4
%cw=load i8*,i8**%d,align 8
store i8*null,i8**%d,align 8
%cx=getelementptr inbounds i8,i8*%cq,i64 8
%cy=bitcast i8*%cx to i8**
store i8*%cw,i8**%cy,align 8
%cz=getelementptr inbounds i8,i8*%cq,i64 16
%cA=bitcast i8*%cz to i32*
store i32 2,i32*%cA,align 4
%cB=call i8*@sml_alloc(i32 inreg 20)#0
%cC=getelementptr inbounds i8,i8*%cB,i64 -4
%cD=bitcast i8*%cC to i32*
store i32 1342177296,i32*%cD,align 4
store i8*%cB,i8**%c,align 8
%cE=load i8*,i8**%e,align 8
store i8*null,i8**%e,align 8
%cF=bitcast i8*%cB to i8**
store i8*%cE,i8**%cF,align 8
%cG=load i8*,i8**%f,align 8
store i8*null,i8**%f,align 8
%cH=getelementptr inbounds i8,i8*%cB,i64 8
%cI=bitcast i8*%cH to i8**
store i8*%cG,i8**%cI,align 8
%cJ=getelementptr inbounds i8,i8*%cB,i64 16
%cK=bitcast i8*%cJ to i32*
store i32 3,i32*%cK,align 4
%cL=call i8*@sml_alloc(i32 inreg 20)#0
%cM=getelementptr inbounds i8,i8*%cL,i64 -4
%cN=bitcast i8*%cM to i32*
store i32 1342177296,i32*%cN,align 4
store i8*%cL,i8**%d,align 8
%cO=load i8*,i8**%c,align 8
store i8*null,i8**%c,align 8
%cP=bitcast i8*%cL to i8**
store i8*%cO,i8**%cP,align 8
%cQ=getelementptr inbounds i8,i8*%cL,i64 8
%cR=bitcast i8*%cQ to i8**
store i8*null,i8**%cR,align 8
%cS=getelementptr inbounds i8,i8*%cL,i64 16
%cT=bitcast i8*%cS to i32*
store i32 3,i32*%cT,align 4
%cU=call i8*@sml_alloc(i32 inreg 20)#0
%cV=getelementptr inbounds i8,i8*%cU,i64 -4
%cW=bitcast i8*%cV to i32*
store i32 1342177296,i32*%cW,align 4
%cX=load i8*,i8**%h,align 8
store i8*null,i8**%h,align 8
%cY=bitcast i8*%cU to i8**
store i8*%cX,i8**%cY,align 8
%cZ=load i8*,i8**%d,align 8
store i8*null,i8**%d,align 8
%c0=getelementptr inbounds i8,i8*%cU,i64 8
%c1=bitcast i8*%c0 to i8**
store i8*%cZ,i8**%c1,align 8
%c2=getelementptr inbounds i8,i8*%cU,i64 16
%c3=bitcast i8*%c2 to i32*
store i32 3,i32*%c3,align 4
%c4=load i8*,i8**%i,align 8
store i8*null,i8**%i,align 8
%c5=call fastcc i8*%bf(i8*inreg%c4,i8*inreg%cU)
ret void
c6:
%c7=icmp eq i8*%X,null
br i1%c7,label%c8,label%c9
c8:
store i8*%V,i8**%c,align 8
br label%du
c9:
store i8*null,i8**%e,align 8
store i8*null,i8**%g,align 8
br label%da
da:
%db=load i8*,i8**@_SMLZN3Bug3BugE,align 8
store i8*%db,i8**%c,align 8
%dc=call i8*@sml_alloc(i32 inreg 28)#0
%dd=getelementptr inbounds i8,i8*%dc,i64 -4
%de=bitcast i8*%dd to i32*
store i32 1342177304,i32*%de,align 4
store i8*%dc,i8**%d,align 8
%df=load i8*,i8**%c,align 8
store i8*null,i8**%c,align 8
%dg=bitcast i8*%dc to i8**
store i8*%df,i8**%dg,align 8
%dh=getelementptr inbounds i8,i8*%dc,i64 8
%di=bitcast i8*%dh to i8**
store i8*getelementptr inbounds(<{[4x i8],i32,[71x i8]}>,<{[4x i8],i32,[71x i8]}>*@ap,i64 0,i32 2,i64 0),i8**%di,align 8
%dj=getelementptr inbounds i8,i8*%dc,i64 16
%dk=bitcast i8*%dj to i8**
store i8*getelementptr inbounds(<{[4x i8],i32,[17x i8]}>,<{[4x i8],i32,[17x i8]}>*@aq,i64 0,i32 2,i64 0),i8**%dk,align 8
%dl=getelementptr inbounds i8,i8*%dc,i64 24
%dm=bitcast i8*%dl to i32*
store i32 7,i32*%dm,align 4
%dn=call i8*@sml_alloc(i32 inreg 60)#0
%do=getelementptr inbounds i8,i8*%dn,i64 -4
%dp=bitcast i8*%do to i32*
store i32 1342177336,i32*%dp,align 4
%dq=getelementptr inbounds i8,i8*%dn,i64 56
%dr=bitcast i8*%dq to i32*
store i32 1,i32*%dr,align 4
%ds=load i8*,i8**%d,align 8
%dt=bitcast i8*%dn to i8**
store i8*%ds,i8**%dt,align 8
call void@sml_raise(i8*inreg%dn)#1
unreachable
du:
%dv=call fastcc i8*@_SMLLN12TypedCalcCon17mustBeCONSTRUCTtyE_274(i8*inreg getelementptr inbounds(<{[4x i8],i32,[17x i8]}>,<{[4x i8],i32,[17x i8]}>*@aq,i64 0,i32 2,i64 0))
%dw=getelementptr inbounds i8,i8*%dv,i64 16
%dx=bitcast i8*%dw to i8*(i8*,i8*)**
%dy=load i8*(i8*,i8*)*,i8*(i8*,i8*)**%dx,align 8
%dz=bitcast i8*%dv to i8**
%dA=load i8*,i8**%dz,align 8
%dB=load i8*,i8**%g,align 8
%dC=getelementptr inbounds i8,i8*%dB,i64 16
%dD=bitcast i8*%dC to i8**
%dE=load i8*,i8**%dD,align 8
%dF=call fastcc i8*%dy(i8*inreg%dA,i8*inreg%dE)
%dG=getelementptr inbounds i8,i8*%dF,i64 16
%dH=bitcast i8*%dG to i8*(i8*,i8*)**
%dI=load i8*(i8*,i8*)*,i8*(i8*,i8*)**%dH,align 8
%dJ=bitcast i8*%dF to i8**
%dK=load i8*,i8**%dJ,align 8
%dL=load i8*,i8**%c,align 8
%dM=call fastcc i8*%dI(i8*inreg%dK,i8*inreg%dL)
%dN=call fastcc i8*@_SMLLN12TypedCalcCon4eqTyE_287(i8*inreg getelementptr inbounds(<{[4x i8],i32,[17x i8]}>,<{[4x i8],i32,[17x i8]}>*@aq,i64 0,i32 2,i64 0))
%dO=getelementptr inbounds i8,i8*%dN,i64 16
%dP=bitcast i8*%dO to i8*(i8*,i8*)**
%dQ=load i8*(i8*,i8*)*,i8*(i8*,i8*)**%dP,align 8
%dR=bitcast i8*%dN to i8**
%dS=load i8*,i8**%dR,align 8
%dT=load i8*,i8**%g,align 8
%dU=getelementptr inbounds i8,i8*%dT,i64 16
%dV=bitcast i8*%dU to i8**
%dW=load i8*,i8**%dV,align 8
%dX=call fastcc i8*%dQ(i8*inreg%dS,i8*inreg%dW)
%dY=getelementptr inbounds i8,i8*%dX,i64 16
%dZ=bitcast i8*%dY to i8*(i8*,i8*)**
%d0=load i8*(i8*,i8*)*,i8*(i8*,i8*)**%dZ,align 8
%d1=bitcast i8*%dX to i8**
%d2=load i8*,i8**%d1,align 8
store i8*%d2,i8**%f,align 8
%d3=call i8*@sml_alloc(i32 inreg 20)#0
%d4=getelementptr inbounds i8,i8*%d3,i64 -4
%d5=bitcast i8*%d4 to i32*
store i32 1342177296,i32*%d5,align 4
store i8*%d3,i8**%d,align 8
%d6=load i8*,i8**%c,align 8
store i8*null,i8**%c,align 8
%d7=bitcast i8*%d3 to i8**
store i8*%d6,i8**%d7,align 8
%d8=getelementptr inbounds i8,i8*%d3,i64 8
%d9=bitcast i8*%d8 to i8**
store i8*null,i8**%d9,align 8
%ea=getelementptr inbounds i8,i8*%d3,i64 16
%eb=bitcast i8*%ea to i32*
store i32 3,i32*%eb,align 4
%ec=call i8*@sml_alloc(i32 inreg 20)#0
%ed=getelementptr inbounds i8,i8*%ec,i64 -4
%ee=bitcast i8*%ed to i32*
store i32 1342177296,i32*%ee,align 4
store i8*%ec,i8**%c,align 8
%ef=load i8*,i8**%d,align 8
store i8*null,i8**%d,align 8
%eg=bitcast i8*%ec to i8**
store i8*%ef,i8**%eg,align 8
%eh=load i8*,i8**%e,align 8
store i8*null,i8**%e,align 8
%ei=getelementptr inbounds i8,i8*%ec,i64 8
%ej=bitcast i8*%ei to i8**
store i8*%eh,i8**%ej,align 8
%ek=getelementptr inbounds i8,i8*%ec,i64 16
%el=bitcast i8*%ek to i32*
store i32 3,i32*%el,align 4
%em=call i8*@sml_alloc(i32 inreg 20)#0
%en=getelementptr inbounds i8,i8*%em,i64 -4
%eo=bitcast i8*%en to i32*
store i32 1342177296,i32*%eo,align 4
store i8*%em,i8**%e,align 8
%ep=getelementptr inbounds i8,i8*%em,i64 4
%eq=bitcast i8*%ep to i32*
store i32 0,i32*%eq,align 1
%er=bitcast i8*%em to i32*
store i32 6,i32*%er,align 4
%es=load i8*,i8**%c,align 8
%et=getelementptr inbounds i8,i8*%em,i64 8
%eu=bitcast i8*%et to i8**
store i8*%es,i8**%eu,align 8
%ev=getelementptr inbounds i8,i8*%em,i64 16
%ew=bitcast i8*%ev to i32*
store i32 2,i32*%ew,align 4
%ex=load i8*,i8**%g,align 8
%ey=getelementptr inbounds i8,i8*%ex,i64 8
%ez=bitcast i8*%ey to i8**
%eA=load i8*,i8**%ez,align 8
store i8*%eA,i8**%c,align 8
%eB=call i8*@sml_alloc(i32 inreg 20)#0
%eC=getelementptr inbounds i8,i8*%eB,i64 -4
%eD=bitcast i8*%eC to i32*
store i32 1342177296,i32*%eD,align 4
store i8*%eB,i8**%h,align 8
%eE=load i8*,i8**%c,align 8
%eF=bitcast i8*%eB to i8**
store i8*%eE,i8**%eF,align 8
%eG=getelementptr inbounds i8,i8*%eB,i64 8
%eH=bitcast i8*%eG to i8**
store i8*null,i8**%eH,align 8
%eI=getelementptr inbounds i8,i8*%eB,i64 16
%eJ=bitcast i8*%eI to i32*
store i32 3,i32*%eJ,align 4
%eK=bitcast i8**%g to i8***
%eL=load i8**,i8***%eK,align 8
store i8*null,i8**%g,align 8
%eM=load i8*,i8**%eL,align 8
store i8*%eM,i8**%c,align 8
%eN=call i8*@sml_alloc(i32 inreg 20)#0
%eO=getelementptr inbounds i8,i8*%eN,i64 -4
%eP=bitcast i8*%eO to i32*
store i32 1342177296,i32*%eP,align 4
store i8*%eN,i8**%d,align 8
%eQ=load i8*,i8**%h,align 8
store i8*null,i8**%h,align 8
%eR=bitcast i8*%eN to i8**
store i8*%eQ,i8**%eR,align 8
%eS=load i8*,i8**%c,align 8
store i8*null,i8**%c,align 8
%eT=getelementptr inbounds i8,i8*%eN,i64 8
%eU=bitcast i8*%eT to i8**
store i8*%eS,i8**%eU,align 8
%eV=getelementptr inbounds i8,i8*%eN,i64 16
%eW=bitcast i8*%eV to i32*
store i32 3,i32*%eW,align 4
%eX=call i8*@sml_alloc(i32 inreg 20)#0
%eY=getelementptr inbounds i8,i8*%eX,i64 -4
%eZ=bitcast i8*%eY to i32*
store i32 1342177296,i32*%eZ,align 4
store i8*%eX,i8**%g,align 8
%e0=getelementptr inbounds i8,i8*%eX,i64 4
%e1=bitcast i8*%e0 to i32*
store i32 0,i32*%e1,align 1
%e2=bitcast i8*%eX to i32*
store i32 6,i32*%e2,align 4
%e3=load i8*,i8**%d,align 8
store i8*null,i8**%d,align 8
%e4=getelementptr inbounds i8,i8*%eX,i64 8
%e5=bitcast i8*%e4 to i8**
store i8*%e3,i8**%e5,align 8
%e6=getelementptr inbounds i8,i8*%eX,i64 16
%e7=bitcast i8*%e6 to i32*
store i32 2,i32*%e7,align 4
%e8=call i8*@sml_alloc(i32 inreg 20)#0
%e9=getelementptr inbounds i8,i8*%e8,i64 -4
%fa=bitcast i8*%e9 to i32*
store i32 1342177296,i32*%fa,align 4
store i8*%e8,i8**%c,align 8
%fb=load i8*,i8**%e,align 8
store i8*null,i8**%e,align 8
%fc=bitcast i8*%e8 to i8**
store i8*%fb,i8**%fc,align 8
%fd=load i8*,i8**%g,align 8
store i8*null,i8**%g,align 8
%fe=getelementptr inbounds i8,i8*%e8,i64 8
%ff=bitcast i8*%fe to i8**
store i8*%fd,i8**%ff,align 8
%fg=getelementptr inbounds i8,i8*%e8,i64 16
%fh=bitcast i8*%fg to i32*
store i32 3,i32*%fh,align 4
%fi=call i8*@sml_alloc(i32 inreg 20)#0
%fj=getelementptr inbounds i8,i8*%fi,i64 -4
%fk=bitcast i8*%fj to i32*
store i32 1342177296,i32*%fk,align 4
%fl=load i8*,i8**%c,align 8
store i8*null,i8**%c,align 8
%fm=bitcast i8*%fi to i8**
store i8*%fl,i8**%fm,align 8
%fn=getelementptr inbounds i8,i8*%fi,i64 8
%fo=bitcast i8*%fn to i8**
store i8*null,i8**%fo,align 8
%fp=getelementptr inbounds i8,i8*%fi,i64 16
%fq=bitcast i8*%fp to i32*
store i32 3,i32*%fq,align 4
%fr=load i8*,i8**%f,align 8
store i8*null,i8**%f,align 8
%fs=call fastcc i8*%d0(i8*inreg%fr,i8*inreg%fi)
ret void
}
define internal fastcc i8*@_SMLLN12TypedCalcCon16TPSWITCH__CONCASEE_407(i8*inreg%a)#4 gc"smlsharp"{
%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
%f=bitcast i8*%a to i8**
%g=load i8*,i8**%f,align 8
store i8*%g,i8**%b,align 8
%h=getelementptr inbounds i8,i8*%a,i64 8
%i=bitcast i8*%h to i8***
%j=load i8**,i8***%i,align 8
%k=load i8*,i8**%j,align 8
store i8*%k,i8**%c,align 8
%l=getelementptr inbounds i8,i8*%a,i64 16
%m=bitcast i8*%l to i8**
%n=load i8*,i8**%m,align 8
store i8*%n,i8**%d,align 8
%o=getelementptr inbounds i8,i8*%a,i64 24
%p=bitcast i8*%o to i8**
%q=load i8*,i8**%p,align 8
store i8*%q,i8**%e,align 8
%r=call i8*@sml_alloc(i32 inreg 36)#0
%s=getelementptr inbounds i8,i8*%r,i64 -4
%t=bitcast i8*%s to i32*
store i32 1342177312,i32*%t,align 4
%u=load i8*,i8**%b,align 8
%v=bitcast i8*%r to i8**
store i8*%u,i8**%v,align 8
%w=load i8*,i8**%c,align 8
%x=getelementptr inbounds i8,i8*%r,i64 8
%y=bitcast i8*%x to i8**
store i8*%w,i8**%y,align 8
%z=load i8*,i8**%d,align 8
%A=getelementptr inbounds i8,i8*%r,i64 16
%B=bitcast i8*%A to i8**
store i8*%z,i8**%B,align 8
%C=load i8*,i8**%e,align 8
%D=getelementptr inbounds i8,i8*%r,i64 24
%E=bitcast i8*%D to i8**
store i8*%C,i8**%E,align 8
%F=getelementptr inbounds i8,i8*%r,i64 32
%G=bitcast i8*%F to i32*
store i32 15,i32*%G,align 4
ret i8*%r
}
define fastcc i8*@_SMLFN12TypedCalcCon16TPSWITCH__CONCASEE(i8*inreg%a)#2 gc"smlsharp"{
%b=alloca i8*,align 8
%c=alloca i8*,align 8
%d=alloca i8*,align 8
%e=alloca i8*,align 8
%f=alloca i8*,align 8
%g=alloca i8*,align 8
%h=alloca i8*,align 8
%i=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
call void@llvm.gcroot(i8**%f,i8*null)#0
call void@llvm.gcroot(i8**%g,i8*null)#0
call void@llvm.gcroot(i8**%h,i8*null)#0
call void@llvm.gcroot(i8**%i,i8*null)#0
store i8*%a,i8**%b,align 8
%j=load atomic i32,i32*@sml_check_flag unordered,align 4
%k=icmp eq i32%j,0
br i1%k,label%l,label%n
l:
%m=bitcast i8*%a to i8***
br label%r
n:
call void@sml_check(i32 inreg%j)
%o=bitcast i8**%b to i8****
%p=load i8***,i8****%o,align 8
%q=bitcast i8***%p to i8*
br label%r
r:
%s=phi i8*[%q,%n],[%a,%l]
%t=phi i8***[%p,%n],[%m,%l]
%u=load i8**,i8***%t,align 8
%v=load i8*,i8**%u,align 8
store i8*%v,i8**%c,align 8
%w=bitcast i8***%t to i8**
%x=load i8*,i8**%w,align 8
%y=getelementptr inbounds i8,i8*%x,i64 8
%z=bitcast i8*%y to i8**
%A=load i8*,i8**%z,align 8
store i8*%A,i8**%d,align 8
%B=getelementptr inbounds i8,i8*%s,i64 8
%C=bitcast i8*%B to i8***
%D=load i8**,i8***%C,align 8
%E=load i8*,i8**%D,align 8
store i8*%E,i8**%e,align 8
%F=getelementptr inbounds i8*,i8**%D,i64 1
%G=load i8*,i8**%F,align 8
store i8*%G,i8**%f,align 8
%H=getelementptr inbounds i8,i8*%s,i64 16
%I=bitcast i8*%H to i8**
%J=load i8*,i8**%I,align 8
store i8*%J,i8**%g,align 8
%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
store i8*%K,i8**%h,align 8
%N=load i8*,i8**%d,align 8
%O=bitcast i8*%K to i8**
store i8*%N,i8**%O,align 8
%P=load i8*,i8**%f,align 8
%Q=getelementptr inbounds i8,i8*%K,i64 8
%R=bitcast i8*%Q to i8**
store i8*%P,i8**%R,align 8
%S=load i8*,i8**%g,align 8
%T=getelementptr inbounds i8,i8*%K,i64 16
%U=bitcast i8*%T to i8**
store i8*%S,i8**%U,align 8
%V=getelementptr inbounds i8,i8*%K,i64 24
%W=bitcast i8*%V to i32*
store i32 7,i32*%W,align 4
%X=call i8*@sml_alloc(i32 inreg 28)#0
%Y=getelementptr inbounds i8,i8*%X,i64 -4
%Z=bitcast i8*%Y to i32*
store i32 1342177304,i32*%Z,align 4
store i8*%X,i8**%i,align 8
%aa=load i8*,i8**%h,align 8
store i8*null,i8**%h,align 8
%ab=bitcast i8*%X to i8**
store i8*%aa,i8**%ab,align 8
%ac=getelementptr inbounds i8,i8*%X,i64 8
%ad=bitcast i8*%ac to void(...)**
store void(...)*bitcast(void(i8*,i8*)*@_SMLL9checkRule_406 to void(...)*),void(...)**%ad,align 8
%ae=getelementptr inbounds i8,i8*%X,i64 16
%af=bitcast i8*%ae to void(...)**
store void(...)*bitcast(i8*(i8*,i8*)*@_SMLL9checkRule_718 to void(...)*),void(...)**%af,align 8
%ag=getelementptr inbounds i8,i8*%X,i64 24
%ah=bitcast i8*%ag to i32*
store i32 -2147483647,i32*%ah,align 4
%ai=load i32*,i32**bitcast(i8**@_SMLZN7Control9checkTypeE to i32**),align 8
%aj=load i32,i32*%ai,align 4
%ak=icmp eq i32%aj,0
br i1%ak,label%aE,label%al
al:
%am=call fastcc i8*@_SMLFN4List3appE(i32 inreg 1,i32 inreg 8)
%an=getelementptr inbounds i8,i8*%am,i64 16
%ao=bitcast i8*%an to i8*(i8*,i8*)**
%ap=load i8*(i8*,i8*)*,i8*(i8*,i8*)**%ao,align 8
%aq=bitcast i8*%am to i8**
%ar=load i8*,i8**%aq,align 8
%as=load i8*,i8**%i,align 8
store i8*null,i8**%i,align 8
%at=call fastcc i8*%ap(i8*inreg%ar,i8*inreg%as)
%au=getelementptr inbounds i8,i8*%at,i64 16
%av=bitcast i8*%au to i8*(i8*,i8*)**
%aw=load i8*(i8*,i8*)*,i8*(i8*,i8*)**%av,align 8
%ax=bitcast i8*%at to i8**
%ay=load i8*,i8**%ax,align 8
%az=load i8*,i8**%b,align 8
%aA=getelementptr inbounds i8,i8*%az,i64 24
%aB=bitcast i8*%aA to i8**
%aC=load i8*,i8**%aB,align 8
%aD=call fastcc i8*%aw(i8*inreg%ay,i8*inreg%aC)
br label%aF
aE:
store i8*null,i8**%i,align 8
br label%aF
aF:
%aG=call fastcc i8*@_SMLFN4List3mapE(i32 inreg 1,i32 inreg 8,i32 inreg 1,i32 inreg 8)
%aH=getelementptr inbounds i8,i8*%aG,i64 16
%aI=bitcast i8*%aH to i8*(i8*,i8*)**
%aJ=load i8*(i8*,i8*)*,i8*(i8*,i8*)**%aI,align 8
%aK=bitcast i8*%aG to i8**
%aL=load i8*,i8**%aK,align 8
%aM=call fastcc i8*%aJ(i8*inreg%aL,i8*inreg bitcast(i8**getelementptr inbounds(<{[4x i8],i32,i8*,void(...)*,void(...)*,i32}>,<{[4x i8],i32,i8*,void(...)*,void(...)*,i32}>*@ar,i64 0,i32 2)to i8*))
%aN=getelementptr inbounds i8,i8*%aM,i64 16
%aO=bitcast i8*%aN to i8*(i8*,i8*)**
%aP=load i8*(i8*,i8*)*,i8*(i8*,i8*)**%aO,align 8
%aQ=bitcast i8*%aM to i8**
%aR=load i8*,i8**%aQ,align 8
%aS=load i8*,i8**%b,align 8
store i8*null,i8**%b,align 8
%aT=getelementptr inbounds i8,i8*%aS,i64 24
%aU=bitcast i8*%aT to i8**
%aV=load i8*,i8**%aU,align 8
%aW=call fastcc i8*%aP(i8*inreg%aR,i8*inreg%aV)
store i8*%aW,i8**%b,align 8
%aX=call i8*@sml_alloc(i32 inreg 20)#0
%aY=getelementptr inbounds i8,i8*%aX,i64 -4
%aZ=bitcast i8*%aY to i32*
store i32 1342177296,i32*%aZ,align 4
store i8*%aX,i8**%h,align 8
%a0=bitcast i8*%aX to i64*
store i64 0,i64*%a0,align 4
%a1=load i8*,i8**%b,align 8
store i8*null,i8**%b,align 8
%a2=getelementptr inbounds i8,i8*%aX,i64 8
%a3=bitcast i8*%a2 to i8**
store i8*%a1,i8**%a3,align 8
%a4=getelementptr inbounds i8,i8*%aX,i64 16
%a5=bitcast i8*%a4 to i32*
store i32 2,i32*%a5,align 4
%a6=call i8*@sml_alloc(i32 inreg 52)#0
%a7=getelementptr inbounds i8,i8*%a6,i64 -4
%a8=bitcast i8*%a7 to i32*
store i32 1342177328,i32*%a8,align 4
store i8*%a6,i8**%b,align 8
%a9=load i8*,i8**%c,align 8
store i8*null,i8**%c,align 8
%ba=bitcast i8*%a6 to i8**
store i8*%a9,i8**%ba,align 8
%bb=load i8*,i8**%e,align 8
store i8*null,i8**%e,align 8
%bc=getelementptr inbounds i8,i8*%a6,i64 8
%bd=bitcast i8*%bc to i8**
store i8*%bb,i8**%bd,align 8
%be=load i8*,i8**%f,align 8
store i8*null,i8**%f,align 8
%bf=getelementptr inbounds i8,i8*%a6,i64 16
%bg=bitcast i8*%bf to i8**
store i8*%be,i8**%bg,align 8
%bh=load i8*,i8**%g,align 8
store i8*null,i8**%g,align 8
%bi=getelementptr inbounds i8,i8*%a6,i64 24
%bj=bitcast i8*%bi to i8**
store i8*%bh,i8**%bj,align 8
%bk=load i8*,i8**%d,align 8
%bl=getelementptr inbounds i8,i8*%a6,i64 32
%bm=bitcast i8*%bl to i8**
store i8*%bk,i8**%bm,align 8
%bn=load i8*,i8**%h,align 8
store i8*null,i8**%h,align 8
%bo=getelementptr inbounds i8,i8*%a6,i64 40
%bp=bitcast i8*%bo to i8**
store i8*%bn,i8**%bp,align 8
%bq=getelementptr inbounds i8,i8*%a6,i64 48
%br=bitcast i8*%bq to i32*
store i32 63,i32*%br,align 4
%bs=call i8*@sml_alloc(i32 inreg 20)#0
%bt=getelementptr inbounds i8,i8*%bs,i64 -4
%bu=bitcast i8*%bt to i32*
store i32 1342177296,i32*%bu,align 4
store i8*%bs,i8**%c,align 8
%bv=getelementptr inbounds i8,i8*%bs,i64 4
%bw=bitcast i8*%bv to i32*
store i32 0,i32*%bw,align 1
%bx=bitcast i8*%bs to i32*
store i32 37,i32*%bx,align 4
%by=load i8*,i8**%b,align 8
store i8*null,i8**%b,align 8
%bz=getelementptr inbounds i8,i8*%bs,i64 8
%bA=bitcast i8*%bz to i8**
store i8*%by,i8**%bA,align 8
%bB=getelementptr inbounds i8,i8*%bs,i64 16
%bC=bitcast i8*%bB to i32*
store i32 2,i32*%bC,align 4
%bD=call i8*@sml_alloc(i32 inreg 20)#0
%bE=getelementptr inbounds i8,i8*%bD,i64 -4
%bF=bitcast i8*%bE to i32*
store i32 1342177296,i32*%bF,align 4
%bG=load i8*,i8**%c,align 8
%bH=bitcast i8*%bD to i8**
store i8*%bG,i8**%bH,align 8
%bI=load i8*,i8**%d,align 8
%bJ=getelementptr inbounds i8,i8*%bD,i64 8
%bK=bitcast i8*%bJ to i8**
store i8*%bI,i8**%bK,align 8
%bL=getelementptr inbounds i8,i8*%bD,i64 16
%bM=bitcast i8*%bL to i32*
store i32 3,i32*%bM,align 4
ret i8*%bD
}
define internal fastcc void@_SMLL9checkRule_416(i8*inreg%a,i8*inreg%b)#2 gc"smlsharp"{
q:
%c=alloca i8*,align 8
%d=alloca i8*,align 8
%e=alloca i8*,align 8
%f=alloca i8*,align 8
%g=alloca i8*,align 8
%h=alloca i8*,align 8
%i=alloca i8*,align 8
%j=alloca i8*,align 8
call void@llvm.gcroot(i8**%c,i8*null)#0
call void@llvm.gcroot(i8**%d,i8*null)#0
call void@llvm.gcroot(i8**%e,i8*null)#0
call void@llvm.gcroot(i8**%f,i8*null)#0
call void@llvm.gcroot(i8**%g,i8*null)#0
call void@llvm.gcroot(i8**%h,i8*null)#0
call void@llvm.gcroot(i8**%i,i8*null)#0
call void@llvm.gcroot(i8**%j,i8*null)#0
store i8*%a,i8**%g,align 8
store i8*%b,i8**%c,align 8
%k=load atomic i32,i32*@sml_check_flag unordered,align 4
%l=icmp eq i32%k,0
br i1%l,label%o,label%m
m:
call void@sml_check(i32 inreg%k)
%n=load i8*,i8**%c,align 8
br label%o
o:
%p=phi i8*[%n,%m],[%b,%q]
%r=bitcast i8*%p to i8**
%s=load i8*,i8**%r,align 8
store i8*%s,i8**%d,align 8
%t=getelementptr inbounds i8,i8*%p,i64 8
%u=bitcast i8*%t to i8**
%v=load i8*,i8**%u,align 8
%w=getelementptr inbounds i8,i8*%v,i64 8
%x=bitcast i8*%w to i8**
%y=load i8*,i8**%x,align 8
store i8*%y,i8**%e,align 8
%z=getelementptr inbounds i8,i8*%p,i64 16
%A=bitcast i8*%z to i8**
%B=load i8*,i8**%A,align 8
%C=bitcast i8*%B to i32*
%D=load i32,i32*%C,align 4
switch i32%D,label%E[
i32 0,label%W
i32 1,label%X
]
E:
store i8*null,i8**%d,align 8
store i8*null,i8**%e,align 8
store i8*null,i8**%g,align 8
call void@sml_matchcomp_bug()
%F=load i8*,i8**@_SMLZ5Match,align 8
store i8*%F,i8**%c,align 8
%G=call i8*@sml_alloc(i32 inreg 20)#0
%H=getelementptr inbounds i8,i8*%G,i64 -4
%I=bitcast i8*%H to i32*
store i32 1342177296,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 i8**
store i8*getelementptr inbounds(<{[4x i8],i32,[69x i8]}>,<{[4x i8],i32,[69x i8]}>*@a9,i64 0,i32 2,i64 0),i8**%M,align 8
%N=getelementptr inbounds i8,i8*%G,i64 16
%O=bitcast i8*%N to i32*
store i32 3,i32*%O,align 4
%P=call i8*@sml_alloc(i32 inreg 60)#0
%Q=getelementptr inbounds i8,i8*%P,i64 -4
%R=bitcast i8*%Q to i32*
store i32 1342177336,i32*%R,align 4
%S=getelementptr inbounds i8,i8*%P,i64 56
%T=bitcast i8*%S to i32*
store i32 1,i32*%T,align 4
%U=load i8*,i8**%d,align 8
%V=bitcast i8*%P to i8**
store i8*%U,i8**%V,align 8
call void@sml_raise(i8*inreg%P)#1
unreachable
W:
br label%X
X:
%Y=phi i64[8,%W],[16,%o]
%Z=getelementptr inbounds i8,i8*%B,i64 8
%aa=bitcast i8*%Z to i8**
%ab=load i8*,i8**%aa,align 8
%ac=getelementptr inbounds i8,i8*%ab,i64%Y
%ad=bitcast i8*%ac to i8**
%ae=load i8*,i8**%ad,align 8
%af=call fastcc i8*@_SMLFN11TypesBasics7derefTyE(i8*inreg%ae)
store i8*%af,i8**%c,align 8
%ag=call i8*@sml_alloc(i32 inreg 20)#0
%ah=getelementptr inbounds i8,i8*%ag,i64 -4
%ai=bitcast i8*%ah to i32*
store i32 1342177296,i32*%ai,align 4
%aj=load i8*,i8**%c,align 8
%ak=bitcast i8*%ag to i8**
store i8*%aj,i8**%ak,align 8
%al=load i8*,i8**%d,align 8
%am=getelementptr inbounds i8,i8*%ag,i64 8
%an=bitcast i8*%am to i8**
store i8*%al,i8**%an,align 8
%ao=getelementptr inbounds i8,i8*%ag,i64 16
%ap=bitcast i8*%ao to i32*
store i32 3,i32*%ap,align 4
%aq=icmp eq i8*%aj,null
br i1%aq,label%av,label%ar
ar:
%as=bitcast i8*%aj to i32*
%at=load i32,i32*%as,align 4
%au=icmp eq i32%at,6
br i1%au,label%ay,label%av
av:
%aw=icmp eq i8*%al,null
br i1%aw,label%dL,label%ax
ax:
store i8*null,i8**%e,align 8
store i8*null,i8**%g,align 8
br label%dr
ay:
%az=getelementptr inbounds i8,i8*%aj,i64 8
%aA=bitcast i8*%az to i8**
%aB=load i8*,i8**%aA,align 8
%aC=bitcast i8*%aB to i8**
%aD=load i8*,i8**%aC,align 8
%aE=icmp eq i8*%aD,null
br i1%aE,label%aF,label%aI
aF:
%aG=icmp eq i8*%al,null
br i1%aG,label%dL,label%aH
aH:
store i8*null,i8**%e,align 8
store i8*null,i8**%g,align 8
br label%dr
aI:
%aJ=bitcast i8*%aD to i8**
%aK=load i8*,i8**%aJ,align 8
store i8*%aK,i8**%c,align 8
%aL=getelementptr inbounds i8,i8*%aD,i64 8
%aM=bitcast i8*%aL to i8**
%aN=load i8*,i8**%aM,align 8
%aO=icmp eq i8*%aN,null
br i1%aO,label%aP,label%dn
aP:
%aQ=getelementptr inbounds i8,i8*%aB,i64 8
%aR=bitcast i8*%aQ to i8**
%aS=load i8*,i8**%aR,align 8
store i8*%aS,i8**%d,align 8
%aT=icmp eq i8*%al,null
br i1%aT,label%aU,label%aV
aU:
store i8*null,i8**%d,align 8
store i8*%aj,i8**%c,align 8
br label%dL
aV:
%aW=bitcast i8*%al to i8**
%aX=load i8*,i8**%aW,align 8
store i8*%aX,i8**%f,align 8
%aY=call fastcc i8*@_SMLLN12TypedCalcCon4eqTyE_287(i8*inreg getelementptr inbounds(<{[4x i8],i32,[17x i8]}>,<{[4x i8],i32,[17x i8]}>*@au,i64 0,i32 2,i64 0))
%aZ=getelementptr inbounds i8,i8*%aY,i64 16
%a0=bitcast i8*%aZ to i8*(i8*,i8*)**
%a1=load i8*(i8*,i8*)*,i8*(i8*,i8*)**%a0,align 8
%a2=bitcast i8*%aY to i8**
%a3=load i8*,i8**%a2,align 8
%a4=load i8*,i8**%g,align 8
%a5=getelementptr inbounds i8,i8*%a4,i64 16
%a6=bitcast i8*%a5 to i8**
%a7=load i8*,i8**%a6,align 8
%a8=call fastcc i8*%a1(i8*inreg%a3,i8*inreg%a7)
%a9=getelementptr inbounds i8,i8*%a8,i64 16
%ba=bitcast i8*%a9 to i8*(i8*,i8*)**
%bb=load i8*(i8*,i8*)*,i8*(i8*,i8*)**%ba,align 8
%bc=bitcast i8*%a8 to i8**
%bd=load i8*,i8**%bc,align 8
store i8*%bd,i8**%i,align 8
%be=load i8*,i8**%f,align 8
%bf=getelementptr inbounds i8,i8*%be,i64 16
%bg=bitcast i8*%bf to i8**
%bh=load i8*,i8**%bg,align 8
store i8*%bh,i8**%f,align 8
%bi=call i8*@sml_alloc(i32 inreg 20)#0
%bj=getelementptr inbounds i8,i8*%bi,i64 -4
%bk=bitcast i8*%bj to i32*
store i32 1342177296,i32*%bk,align 4
store i8*%bi,i8**%h,align 8
%bl=load i8*,i8**%c,align 8
%bm=bitcast i8*%bi to i8**
store i8*%bl,i8**%bm,align 8
%bn=load i8*,i8**%f,align 8
store i8*null,i8**%f,align 8
%bo=getelementptr inbounds i8,i8*%bi,i64 8
%bp=bitcast i8*%bo to i8**
store i8*%bn,i8**%bp,align 8
%bq=getelementptr inbounds i8,i8*%bi,i64 16
%br=bitcast i8*%bq to i32*
store i32 3,i32*%br,align 4
%bs=load i8*,i8**@_SMLZN12BuiltinTypes5exnTyE,align 8
store i8*%bs,i8**%c,align 8
%bt=call i8*@sml_alloc(i32 inreg 20)#0
%bu=getelementptr inbounds i8,i8*%bt,i64 -4
%bv=bitcast i8*%bu to i32*
store i32 1342177296,i32*%bv,align 4
store i8*%bt,i8**%f,align 8
%bw=load i8*,i8**%d,align 8
%bx=bitcast i8*%bt to i8**
store i8*%bw,i8**%bx,align 8
%by=load i8*,i8**%c,align 8
store i8*null,i8**%c,align 8
%bz=getelementptr inbounds i8,i8*%bt,i64 8
%bA=bitcast i8*%bz to i8**
store i8*%by,i8**%bA,align 8
%bB=getelementptr inbounds i8,i8*%bt,i64 16
%bC=bitcast i8*%bB to i32*
store i32 3,i32*%bC,align 4
%bD=call i8*@sml_alloc(i32 inreg 20)#0
%bE=getelementptr inbounds i8,i8*%bD,i64 -4
%bF=bitcast i8*%bE to i32*
store i32 1342177296,i32*%bF,align 4
store i8*%bD,i8**%j,align 8
%bG=load i8*,i8**%d,align 8
store i8*null,i8**%d,align 8
%bH=bitcast i8*%bD to i8**
store i8*%bG,i8**%bH,align 8
%bI=getelementptr inbounds i8,i8*%bD,i64 8
%bJ=bitcast i8*%bI to i8**
store i8*null,i8**%bJ,align 8
%bK=getelementptr inbounds i8,i8*%bD,i64 16
%bL=bitcast i8*%bK to i32*
store i32 3,i32*%bL,align 4
%bM=call i8*@sml_alloc(i32 inreg 20)#0
%bN=getelementptr inbounds i8,i8*%bM,i64 -4
%bO=bitcast i8*%bN to i32*
store i32 1342177296,i32*%bO,align 4
store i8*%bM,i8**%c,align 8
%bP=load i8*,i8**%j,align 8
store i8*null,i8**%j,align 8
%bQ=bitcast i8*%bM to i8**
store i8*%bP,i8**%bQ,align 8
%bR=load i8*,i8**%e,align 8
store i8*null,i8**%e,align 8
%bS=getelementptr inbounds i8,i8*%bM,i64 8
%bT=bitcast i8*%bS to i8**
store i8*%bR,i8**%bT,align 8
%bU=getelementptr inbounds i8,i8*%bM,i64 16
%bV=bitcast i8*%bU to i32*
store i32 3,i32*%bV,align 4
%bW=call i8*@sml_alloc(i32 inreg 20)#0
%bX=getelementptr inbounds i8,i8*%bW,i64 -4
%bY=bitcast i8*%bX to i32*
store i32 1342177296,i32*%bY,align 4
store i8*%bW,i8**%e,align 8
%bZ=getelementptr inbounds i8,i8*%bW,i64 4
%b0=bitcast i8*%bZ to i32*
store i32 0,i32*%b0,align 1
%b1=bitcast i8*%bW to i32*
store i32 6,i32*%b1,align 4
%b2=load i8*,i8**%c,align 8
%b3=getelementptr inbounds i8,i8*%bW,i64 8
%b4=bitcast i8*%b3 to i8**
store i8*%b2,i8**%b4,align 8
%b5=getelementptr inbounds i8,i8*%bW,i64 16
%b6=bitcast i8*%b5 to i32*
store i32 2,i32*%b6,align 4
%b7=load i8*,i8**%g,align 8
%b8=getelementptr inbounds i8,i8*%b7,i64 8
%b9=bitcast i8*%b8 to i8**
%ca=load i8*,i8**%b9,align 8
store i8*%ca,i8**%c,align 8
%cb=call i8*@sml_alloc(i32 inreg 20)#0
%cc=getelementptr inbounds i8,i8*%cb,i64 -4
%cd=bitcast i8*%cc to i32*
store i32 1342177296,i32*%cd,align 4
store i8*%cb,i8**%j,align 8
%ce=load i8*,i8**%c,align 8
%cf=bitcast i8*%cb to i8**
store i8*%ce,i8**%cf,align 8
%cg=getelementptr inbounds i8,i8*%cb,i64 8
%ch=bitcast i8*%cg to i8**
store i8*null,i8**%ch,align 8
%ci=getelementptr inbounds i8,i8*%cb,i64 16
%cj=bitcast i8*%ci to i32*
store i32 3,i32*%cj,align 4
%ck=bitcast i8**%g to i8***
%cl=load i8**,i8***%ck,align 8
store i8*null,i8**%g,align 8
%cm=load i8*,i8**%cl,align 8
store i8*%cm,i8**%c,align 8
%cn=call i8*@sml_alloc(i32 inreg 20)#0
%co=getelementptr inbounds i8,i8*%cn,i64 -4
%cp=bitcast i8*%co to i32*
store i32 1342177296,i32*%cp,align 4
store i8*%cn,i8**%d,align 8
%cq=load i8*,i8**%j,align 8
store i8*null,i8**%j,align 8
%cr=bitcast i8*%cn to i8**
store i8*%cq,i8**%cr,align 8
%cs=load i8*,i8**%c,align 8
store i8*null,i8**%c,align 8
%ct=getelementptr inbounds i8,i8*%cn,i64 8
%cu=bitcast i8*%ct to i8**
store i8*%cs,i8**%cu,align 8
%cv=getelementptr inbounds i8,i8*%cn,i64 16
%cw=bitcast i8*%cv to i32*
store i32 3,i32*%cw,align 4
%cx=call i8*@sml_alloc(i32 inreg 20)#0
%cy=getelementptr inbounds i8,i8*%cx,i64 -4
%cz=bitcast i8*%cy to i32*
store i32 1342177296,i32*%cz,align 4
store i8*%cx,i8**%g,align 8
%cA=getelementptr inbounds i8,i8*%cx,i64 4
%cB=bitcast i8*%cA to i32*
store i32 0,i32*%cB,align 1
%cC=bitcast i8*%cx to i32*
store i32 6,i32*%cC,align 4
%cD=load i8*,i8**%d,align 8
store i8*null,i8**%d,align 8
%cE=getelementptr inbounds i8,i8*%cx,i64 8
%cF=bitcast i8*%cE to i8**
store i8*%cD,i8**%cF,align 8
%cG=getelementptr inbounds i8,i8*%cx,i64 16
%cH=bitcast i8*%cG to i32*
store i32 2,i32*%cH,align 4
%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**%e,align 8
store i8*null,i8**%e,align 8
%cM=bitcast i8*%cI to i8**
store i8*%cL,i8**%cM,align 8
%cN=load i8*,i8**%g,align 8
store i8*null,i8**%g,align 8
%cO=getelementptr inbounds i8,i8*%cI,i64 8
%cP=bitcast i8*%cO to i8**
store i8*%cN,i8**%cP,align 8
%cQ=getelementptr inbounds i8,i8*%cI,i64 16
%cR=bitcast i8*%cQ to i32*
store i32 3,i32*%cR,align 4
%cS=call i8*@sml_alloc(i32 inreg 20)#0
%cT=getelementptr inbounds i8,i8*%cS,i64 -4
%cU=bitcast i8*%cT to i32*
store i32 1342177296,i32*%cU,align 4
store i8*%cS,i8**%d,align 8
%cV=load i8*,i8**%c,align 8
store i8*null,i8**%c,align 8
%cW=bitcast i8*%cS to i8**
store i8*%cV,i8**%cW,align 8
%cX=getelementptr inbounds i8,i8*%cS,i64 8
%cY=bitcast i8*%cX to i8**
store i8*null,i8**%cY,align 8
%cZ=getelementptr inbounds i8,i8*%cS,i64 16
%c0=bitcast i8*%cZ to i32*
store i32 3,i32*%c0,align 4
%c1=call i8*@sml_alloc(i32 inreg 20)#0
%c2=getelementptr inbounds i8,i8*%c1,i64 -4
%c3=bitcast i8*%c2 to i32*
store i32 1342177296,i32*%c3,align 4
store i8*%c1,i8**%c,align 8
%c4=load i8*,i8**%f,align 8
store i8*null,i8**%f,align 8
%c5=bitcast i8*%c1 to i8**
store i8*%c4,i8**%c5,align 8
%c6=load i8*,i8**%d,align 8
store i8*null,i8**%d,align 8
%c7=getelementptr inbounds i8,i8*%c1,i64 8
%c8=bitcast i8*%c7 to i8**
store i8*%c6,i8**%c8,align 8
%c9=getelementptr inbounds i8,i8*%c1,i64 16
%da=bitcast i8*%c9 to i32*
store i32 3,i32*%da,align 4
%db=call i8*@sml_alloc(i32 inreg 20)#0
%dc=getelementptr inbounds i8,i8*%db,i64 -4
%dd=bitcast i8*%dc to i32*
store i32 1342177296,i32*%dd,align 4
%de=load i8*,i8**%h,align 8
store i8*null,i8**%h,align 8
%df=bitcast i8*%db to i8**
store i8*%de,i8**%df,align 8
%dg=load i8*,i8**%c,align 8
store i8*null,i8**%c,align 8
%dh=getelementptr inbounds i8,i8*%db,i64 8
%di=bitcast i8*%dh to i8**
store i8*%dg,i8**%di,align 8
%dj=getelementptr inbounds i8,i8*%db,i64 16
%dk=bitcast i8*%dj to i32*
store i32 3,i32*%dk,align 4
%dl=load i8*,i8**%i,align 8
store i8*null,i8**%i,align 8
%dm=call fastcc i8*%bb(i8*inreg%dl,i8*inreg%db)
ret void
dn:
%do=icmp eq i8*%al,null
br i1%do,label%dp,label%dq
dp:
store i8*%aj,i8**%c,align 8
br label%dL
dq:
store i8*null,i8**%e,align 8
store i8*null,i8**%g,align 8
br label%dr
dr:
%ds=load i8*,i8**@_SMLZN3Bug3BugE,align 8
store i8*%ds,i8**%c,align 8
%dt=call i8*@sml_alloc(i32 inreg 28)#0
%du=getelementptr inbounds i8,i8*%dt,i64 -4
%dv=bitcast i8*%du to i32*
store i32 1342177304,i32*%dv,align 4
store i8*%dt,i8**%d,align 8
%dw=load i8*,i8**%c,align 8
store i8*null,i8**%c,align 8
%dx=bitcast i8*%dt to i8**
store i8*%dw,i8**%dx,align 8
%dy=getelementptr inbounds i8,i8*%dt,i64 8
%dz=bitcast i8*%dy to i8**
store i8*getelementptr inbounds(<{[4x i8],i32,[71x i8]}>,<{[4x i8],i32,[71x i8]}>*@at,i64 0,i32 2,i64 0),i8**%dz,align 8
%dA=getelementptr inbounds i8,i8*%dt,i64 16
%dB=bitcast i8*%dA to i8**
store i8*getelementptr inbounds(<{[4x i8],i32,[17x i8]}>,<{[4x i8],i32,[17x i8]}>*@au,i64 0,i32 2,i64 0),i8**%dB,align 8
%dC=getelementptr inbounds i8,i8*%dt,i64 24
%dD=bitcast i8*%dC to i32*
store i32 7,i32*%dD,align 4
%dE=call i8*@sml_alloc(i32 inreg 60)#0
%dF=getelementptr inbounds i8,i8*%dE,i64 -4
%dG=bitcast i8*%dF to i32*
store i32 1342177336,i32*%dG,align 4
%dH=getelementptr inbounds i8,i8*%dE,i64 56
%dI=bitcast i8*%dH to i32*
store i32 1,i32*%dI,align 4
%dJ=load i8*,i8**%d,align 8
%dK=bitcast i8*%dE to i8**
store i8*%dJ,i8**%dK,align 8
call void@sml_raise(i8*inreg%dE)#1
unreachable
dL:
%dM=call fastcc i8*@_SMLLN12TypedCalcCon4eqTyE_287(i8*inreg getelementptr inbounds(<{[4x i8],i32,[17x i8]}>,<{[4x i8],i32,[17x i8]}>*@au,i64 0,i32 2,i64 0))
%dN=getelementptr inbounds i8,i8*%dM,i64 16
%dO=bitcast i8*%dN to i8*(i8*,i8*)**
%dP=load i8*(i8*,i8*)*,i8*(i8*,i8*)**%dO,align 8
%dQ=bitcast i8*%dM to i8**
%dR=load i8*,i8**%dQ,align 8
%dS=load i8*,i8**%g,align 8
%dT=getelementptr inbounds i8,i8*%dS,i64 16
%dU=bitcast i8*%dT to i8**
%dV=load i8*,i8**%dU,align 8
%dW=call fastcc i8*%dP(i8*inreg%dR,i8*inreg%dV)
%dX=getelementptr inbounds i8,i8*%dW,i64 16
%dY=bitcast i8*%dX to i8*(i8*,i8*)**
%dZ=load i8*(i8*,i8*)*,i8*(i8*,i8*)**%dY,align 8
%d0=bitcast i8*%dW to i8**
%d1=load i8*,i8**%d0,align 8
store i8*%d1,i8**%h,align 8
%d2=load i8*,i8**@_SMLZN12BuiltinTypes5exnTyE,align 8
store i8*%d2,i8**%d,align 8
%d3=call i8*@sml_alloc(i32 inreg 20)#0
%d4=getelementptr inbounds i8,i8*%d3,i64 -4
%d5=bitcast i8*%d4 to i32*
store i32 1342177296,i32*%d5,align 4
store i8*%d3,i8**%f,align 8
%d6=load i8*,i8**%c,align 8
%d7=bitcast i8*%d3 to i8**
store i8*%d6,i8**%d7,align 8
%d8=load i8*,i8**%d,align 8
store i8*null,i8**%d,align 8
%d9=getelementptr inbounds i8,i8*%d3,i64 8
%ea=bitcast i8*%d9 to i8**
store i8*%d8,i8**%ea,align 8
%eb=getelementptr inbounds i8,i8*%d3,i64 16
%ec=bitcast i8*%eb to i32*
store i32 3,i32*%ec,align 4
%ed=call i8*@sml_alloc(i32 inreg 20)#0
%ee=getelementptr inbounds i8,i8*%ed,i64 -4
%ef=bitcast i8*%ee to i32*
store i32 1342177296,i32*%ef,align 4
store i8*%ed,i8**%d,align 8
%eg=load i8*,i8**%c,align 8
store i8*null,i8**%c,align 8
%eh=bitcast i8*%ed to i8**
store i8*%eg,i8**%eh,align 8
%ei=getelementptr inbounds i8,i8*%ed,i64 8
%ej=bitcast i8*%ei to i8**
store i8*null,i8**%ej,align 8
%ek=getelementptr inbounds i8,i8*%ed,i64 16
%el=bitcast i8*%ek to i32*
store i32 3,i32*%el,align 4
%em=call i8*@sml_alloc(i32 inreg 20)#0
%en=getelementptr inbounds i8,i8*%em,i64 -4
%eo=bitcast i8*%en to i32*
store i32 1342177296,i32*%eo,align 4
store i8*%em,i8**%c,align 8
%ep=load i8*,i8**%d,align 8
store i8*null,i8**%d,align 8
%eq=bitcast i8*%em to i8**
store i8*%ep,i8**%eq,align 8
%er=load i8*,i8**%e,align 8
store i8*null,i8**%e,align 8
%es=getelementptr inbounds i8,i8*%em,i64 8
%et=bitcast i8*%es to i8**
store i8*%er,i8**%et,align 8
%eu=getelementptr inbounds i8,i8*%em,i64 16
%ev=bitcast i8*%eu to i32*
store i32 3,i32*%ev,align 4
%ew=call i8*@sml_alloc(i32 inreg 20)#0
%ex=getelementptr inbounds i8,i8*%ew,i64 -4
%ey=bitcast i8*%ex to i32*
store i32 1342177296,i32*%ey,align 4
store i8*%ew,i8**%e,align 8
%ez=getelementptr inbounds i8,i8*%ew,i64 4
%eA=bitcast i8*%ez to i32*
store i32 0,i32*%eA,align 1
%eB=bitcast i8*%ew to i32*
store i32 6,i32*%eB,align 4
%eC=load i8*,i8**%c,align 8
%eD=getelementptr inbounds i8,i8*%ew,i64 8
%eE=bitcast i8*%eD to i8**
store i8*%eC,i8**%eE,align 8
%eF=getelementptr inbounds i8,i8*%ew,i64 16
%eG=bitcast i8*%eF to i32*
store i32 2,i32*%eG,align 4
%eH=load i8*,i8**%g,align 8
%eI=getelementptr inbounds i8,i8*%eH,i64 8
%eJ=bitcast i8*%eI to i8**
%eK=load i8*,i8**%eJ,align 8
store i8*%eK,i8**%c,align 8
%eL=call i8*@sml_alloc(i32 inreg 20)#0
%eM=getelementptr inbounds i8,i8*%eL,i64 -4
%eN=bitcast i8*%eM to i32*
store i32 1342177296,i32*%eN,align 4
store i8*%eL,i8**%i,align 8
%eO=load i8*,i8**%c,align 8
%eP=bitcast i8*%eL to i8**
store i8*%eO,i8**%eP,align 8
%eQ=getelementptr inbounds i8,i8*%eL,i64 8
%eR=bitcast i8*%eQ to i8**
store i8*null,i8**%eR,align 8
%eS=getelementptr inbounds i8,i8*%eL,i64 16
%eT=bitcast i8*%eS to i32*
store i32 3,i32*%eT,align 4
%eU=bitcast i8**%g to i8***
%eV=load i8**,i8***%eU,align 8
store i8*null,i8**%g,align 8
%eW=load i8*,i8**%eV,align 8
store i8*%eW,i8**%c,align 8
%eX=call i8*@sml_alloc(i32 inreg 20)#0
%eY=getelementptr inbounds i8,i8*%eX,i64 -4
%eZ=bitcast i8*%eY to i32*
store i32 1342177296,i32*%eZ,align 4
store i8*%eX,i8**%d,align 8
%e0=load i8*,i8**%i,align 8
store i8*null,i8**%i,align 8
%e1=bitcast i8*%eX to i8**
store i8*%e0,i8**%e1,align 8
%e2=load i8*,i8**%c,align 8
store i8*null,i8**%c,align 8
%e3=getelementptr inbounds i8,i8*%eX,i64 8
%e4=bitcast i8*%e3 to i8**
store i8*%e2,i8**%e4,align 8
%e5=getelementptr inbounds i8,i8*%eX,i64 16
%e6=bitcast i8*%e5 to i32*
store i32 3,i32*%e6,align 4
%e7=call i8*@sml_alloc(i32 inreg 20)#0
%e8=getelementptr inbounds i8,i8*%e7,i64 -4
%e9=bitcast i8*%e8 to i32*
store i32 1342177296,i32*%e9,align 4
store i8*%e7,i8**%g,align 8
%fa=getelementptr inbounds i8,i8*%e7,i64 4
%fb=bitcast i8*%fa to i32*
store i32 0,i32*%fb,align 1
%fc=bitcast i8*%e7 to i32*
store i32 6,i32*%fc,align 4
%fd=load i8*,i8**%d,align 8
store i8*null,i8**%d,align 8
%fe=getelementptr inbounds i8,i8*%e7,i64 8
%ff=bitcast i8*%fe to i8**
store i8*%fd,i8**%ff,align 8
%fg=getelementptr inbounds i8,i8*%e7,i64 16
%fh=bitcast i8*%fg to i32*
store i32 2,i32*%fh,align 4
%fi=call i8*@sml_alloc(i32 inreg 20)#0
%fj=getelementptr inbounds i8,i8*%fi,i64 -4
%fk=bitcast i8*%fj to i32*
store i32 1342177296,i32*%fk,align 4
store i8*%fi,i8**%c,align 8
%fl=load i8*,i8**%e,align 8
store i8*null,i8**%e,align 8
%fm=bitcast i8*%fi to i8**
store i8*%fl,i8**%fm,align 8
%fn=load i8*,i8**%g,align 8
store i8*null,i8**%g,align 8
%fo=getelementptr inbounds i8,i8*%fi,i64 8
%fp=bitcast i8*%fo to i8**
store i8*%fn,i8**%fp,align 8
%fq=getelementptr inbounds i8,i8*%fi,i64 16
%fr=bitcast i8*%fq to i32*
store i32 3,i32*%fr,align 4
%fs=call i8*@sml_alloc(i32 inreg 20)#0
%ft=getelementptr inbounds i8,i8*%fs,i64 -4
%fu=bitcast i8*%ft to i32*
store i32 1342177296,i32*%fu,align 4
store i8*%fs,i8**%d,align 8
%fv=load i8*,i8**%c,align 8
store i8*null,i8**%c,align 8
%fw=bitcast i8*%fs to i8**
store i8*%fv,i8**%fw,align 8
%fx=getelementptr inbounds i8,i8*%fs,i64 8
%fy=bitcast i8*%fx to i8**
store i8*null,i8**%fy,align 8
%fz=getelementptr inbounds i8,i8*%fs,i64 16
%fA=bitcast i8*%fz to i32*
store i32 3,i32*%fA,align 4
%fB=call i8*@sml_alloc(i32 inreg 20)#0
%fC=getelementptr inbounds i8,i8*%fB,i64 -4
%fD=bitcast i8*%fC to i32*
store i32 1342177296,i32*%fD,align 4
%fE=load i8*,i8**%f,align 8
store i8*null,i8**%f,align 8
%fF=bitcast i8*%fB to i8**
store i8*%fE,i8**%fF,align 8
%fG=load i8*,i8**%d,align 8
store i8*null,i8**%d,align 8
%fH=getelementptr inbounds i8,i8*%fB,i64 8
%fI=bitcast i8*%fH to i8**
store i8*%fG,i8**%fI,align 8
%fJ=getelementptr inbounds i8,i8*%fB,i64 16
%fK=bitcast i8*%fJ to i32*
store i32 3,i32*%fK,align 4
%fL=load i8*,i8**%h,align 8
store i8*null,i8**%h,align 8
%fM=call fastcc i8*%dZ(i8*inreg%fL,i8*inreg%fB)
ret void
}
define internal fastcc i8*@_SMLLN12TypedCalcCon16TPSWITCH__EXNCASEE_417(i8*inreg%a)#4 gc"smlsharp"{
%b=alloca i8*,align 8
%c=alloca i8*,align 8
%d=alloca i8*,align 8
call void@llvm.gcroot(i8**%b,i8*null)#0
call void@llvm.gcroot(i8**%c,i8*null)#0
call void@llvm.gcroot(i8**%d,i8*null)#0
%e=bitcast i8*%a to i8**
%f=load i8*,i8**%e,align 8
store i8*%f,i8**%b,align 8
%g=getelementptr inbounds i8,i8*%a,i64 8
%h=bitcast i8*%g to i8***
%i=load i8**,i8***%h,align 8
%j=load i8*,i8**%i,align 8
store i8*%j,i8**%c,align 8
%k=getelementptr inbounds i8,i8*%a,i64 16
%l=bitcast i8*%k to i8**
%m=load i8*,i8**%l,align 8
store i8*%m,i8**%d,align 8
%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**%b,align 8
%r=bitcast i8*%n to i8**
store i8*%q,i8**%r,align 8
%s=load i8*,i8**%c,align 8
%t=getelementptr inbounds i8,i8*%n,i64 8
%u=bitcast i8*%t to i8**
store i8*%s,i8**%u,align 8
%v=load i8*,i8**%d,align 8
%w=getelementptr inbounds i8,i8*%n,i64 16
%x=bitcast i8*%w to i8**
store i8*%v,i8**%x,align 8
%y=getelementptr inbounds i8,i8*%n,i64 24
%z=bitcast i8*%y to i32*
store i32 7,i32*%z,align 4
ret i8*%n
}
define fastcc i8*@_SMLFN12TypedCalcCon16TPSWITCH__EXNCASEE(i8*inreg%a)#2 gc"smlsharp"{
%b=alloca i8*,align 8
%c=alloca i8*,align 8
%d=alloca i8*,align 8
%e=alloca i8*,align 8
%f=alloca i8*,align 8
%g=alloca i8*,align 8
%h=alloca i8*,align 8
%i=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
call void@llvm.gcroot(i8**%f,i8*null)#0
call void@llvm.gcroot(i8**%g,i8*null)#0
call void@llvm.gcroot(i8**%h,i8*null)#0
call void@llvm.gcroot(i8**%i,i8*null)#0
store i8*%a,i8**%b,align 8
%j=load atomic i32,i32*@sml_check_flag unordered,align 4
%k=icmp eq i32%j,0
br i1%k,label%l,label%n
l:
%m=bitcast i8*%a to i8***
br label%r
n:
call void@sml_check(i32 inreg%j)
%o=bitcast i8**%b to i8****
%p=load i8***,i8****%o,align 8
%q=bitcast i8***%p to i8*
br label%r
r:
%s=phi i8*[%q,%n],[%a,%l]
%t=phi i8***[%p,%n],[%m,%l]
%u=load i8**,i8***%t,align 8
%v=load i8*,i8**%u,align 8
store i8*%v,i8**%c,align 8
%w=bitcast i8***%t to i8**
%x=load i8*,i8**%w,align 8
%y=getelementptr inbounds i8,i8*%x,i64 8
%z=bitcast i8*%y to i8**
%A=load i8*,i8**%z,align 8
store i8*%A,i8**%d,align 8
%B=getelementptr inbounds i8,i8*%s,i64 8
%C=bitcast i8*%B to i8***
%D=load i8**,i8***%C,align 8
%E=load i8*,i8**%D,align 8
store i8*%E,i8**%e,align 8
%F=getelementptr inbounds i8*,i8**%D,i64 1
%G=load i8*,i8**%F,align 8
store i8*%G,i8**%f,align 8
%H=getelementptr inbounds i8,i8*%s,i64 16
%I=bitcast i8*%H to i8**
%J=load i8*,i8**%I,align 8
store i8*%J,i8**%g,align 8
%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
store i8*%K,i8**%h,align 8
%N=load i8*,i8**%d,align 8
%O=bitcast i8*%K to i8**
store i8*%N,i8**%O,align 8
%P=load i8*,i8**%f,align 8
%Q=getelementptr inbounds i8,i8*%K,i64 8
%R=bitcast i8*%Q to i8**
store i8*%P,i8**%R,align 8
%S=load i8*,i8**%g,align 8
%T=getelementptr inbounds i8,i8*%K,i64 16
%U=bitcast i8*%T to i8**
store i8*%S,i8**%U,align 8
%V=getelementptr inbounds i8,i8*%K,i64 24
%W=bitcast i8*%V to i32*
store i32 7,i32*%W,align 4
%X=call i8*@sml_alloc(i32 inreg 28)#0
%Y=getelementptr inbounds i8,i8*%X,i64 -4
%Z=bitcast i8*%Y to i32*
store i32 1342177304,i32*%Z,align 4
store i8*%X,i8**%i,align 8
%aa=load i8*,i8**%h,align 8
store i8*null,i8**%h,align 8
%ab=bitcast i8*%X to i8**
store i8*%aa,i8**%ab,align 8
%ac=getelementptr inbounds i8,i8*%X,i64 8
%ad=bitcast i8*%ac to void(...)**
store void(...)*bitcast(void(i8*,i8*)*@_SMLL9checkRule_416 to void(...)*),void(...)**%ad,align 8
%ae=getelementptr inbounds i8,i8*%X,i64 16
%af=bitcast i8*%ae to void(...)**
store void(...)*bitcast(i8*(i8*,i8*)*@_SMLL9checkRule_721 to void(...)*),void(...)**%af,align 8
%ag=getelementptr inbounds i8,i8*%X,i64 24
%ah=bitcast i8*%ag to i32*
store i32 -2147483647,i32*%ah,align 4
%ai=load i32*,i32**bitcast(i8**@_SMLZN7Control9checkTypeE to i32**),align 8
%aj=load i32,i32*%ai,align 4
%ak=icmp eq i32%aj,0
br i1%ak,label%aE,label%al
al:
%am=call fastcc i8*@_SMLFN4List3appE(i32 inreg 1,i32 inreg 8)
%an=getelementptr inbounds i8,i8*%am,i64 16
%ao=bitcast i8*%an to i8*(i8*,i8*)**
%ap=load i8*(i8*,i8*)*,i8*(i8*,i8*)**%ao,align 8
%aq=bitcast i8*%am to i8**
%ar=load i8*,i8**%aq,align 8
%as=load i8*,i8**%i,align 8
store i8*null,i8**%i,align 8
%at=call fastcc i8*%ap(i8*inreg%ar,i8*inreg%as)
%au=getelementptr inbounds i8,i8*%at,i64 16
%av=bitcast i8*%au to i8*(i8*,i8*)**
%aw=load i8*(i8*,i8*)*,i8*(i8*,i8*)**%av,align 8
%ax=bitcast i8*%at to i8**
%ay=load i8*,i8**%ax,align 8
%az=load i8*,i8**%b,align 8
%aA=getelementptr inbounds i8,i8*%az,i64 24
%aB=bitcast i8*%aA to i8**
%aC=load i8*,i8**%aB,align 8
%aD=call fastcc i8*%aw(i8*inreg%ay,i8*inreg%aC)
br label%aF
aE:
store i8*null,i8**%i,align 8
br label%aF
aF:
%aG=call fastcc i8*@_SMLFN4List3mapE(i32 inreg 1,i32 inreg 8,i32 inreg 1,i32 inreg 8)
%aH=getelementptr inbounds i8,i8*%aG,i64 16
%aI=bitcast i8*%aH to i8*(i8*,i8*)**
%aJ=load i8*(i8*,i8*)*,i8*(i8*,i8*)**%aI,align 8
%aK=bitcast i8*%aG to i8**
%aL=load i8*,i8**%aK,align 8
%aM=call fastcc i8*%aJ(i8*inreg%aL,i8*inreg bitcast(i8**getelementptr inbounds(<{[4x i8],i32,i8*,void(...)*,void(...)*,i32}>,<{[4x i8],i32,i8*,void(...)*,void(...)*,i32}>*@av,i64 0,i32 2)to i8*))
%aN=getelementptr inbounds i8,i8*%aM,i64 16
%aO=bitcast i8*%aN to i8*(i8*,i8*)**
%aP=load i8*(i8*,i8*)*,i8*(i8*,i8*)**%aO,align 8
%aQ=bitcast i8*%aM to i8**
%aR=load i8*,i8**%aQ,align 8
%aS=load i8*,i8**%b,align 8
store i8*null,i8**%b,align 8
%aT=getelementptr inbounds i8,i8*%aS,i64 24
%aU=bitcast i8*%aT to i8**
%aV=load i8*,i8**%aU,align 8
%aW=call fastcc i8*%aP(i8*inreg%aR,i8*inreg%aV)
store i8*%aW,i8**%b,align 8
%aX=call i8*@sml_alloc(i32 inreg 20)#0
%aY=getelementptr inbounds i8,i8*%aX,i64 -4
%aZ=bitcast i8*%aY to i32*
store i32 1342177296,i32*%aZ,align 4
store i8*%aX,i8**%h,align 8
%a0=getelementptr inbounds i8,i8*%aX,i64 4
%a1=bitcast i8*%a0 to i32*
store i32 0,i32*%a1,align 1
%a2=bitcast i8*%aX to i32*
store i32 2,i32*%a2,align 4
%a3=load i8*,i8**%b,align 8
store i8*null,i8**%b,align 8
%a4=getelementptr inbounds i8,i8*%aX,i64 8
%a5=bitcast i8*%a4 to i8**
store i8*%a3,i8**%a5,align 8
%a6=getelementptr inbounds i8,i8*%aX,i64 16
%a7=bitcast i8*%a6 to i32*
store i32 2,i32*%a7,align 4
%a8=call i8*@sml_alloc(i32 inreg 52)#0
%a9=getelementptr inbounds i8,i8*%a8,i64 -4
%ba=bitcast i8*%a9 to i32*
store i32 1342177328,i32*%ba,align 4
store i8*%a8,i8**%b,align 8
%bb=load i8*,i8**%c,align 8
store i8*null,i8**%c,align 8
%bc=bitcast i8*%a8 to i8**
store i8*%bb,i8**%bc,align 8
%bd=load i8*,i8**%e,align 8
store i8*null,i8**%e,align 8
%be=getelementptr inbounds i8,i8*%a8,i64 8
%bf=bitcast i8*%be to i8**
store i8*%bd,i8**%bf,align 8
%bg=load i8*,i8**%f,align 8
store i8*null,i8**%f,align 8
%bh=getelementptr inbounds i8,i8*%a8,i64 16
%bi=bitcast i8*%bh to i8**
store i8*%bg,i8**%bi,align 8
%bj=load i8*,i8**%g,align 8
store i8*null,i8**%g,align 8
%bk=getelementptr inbounds i8,i8*%a8,i64 24
%bl=bitcast i8*%bk to i8**
store i8*%bj,i8**%bl,align 8
%bm=load i8*,i8**%d,align 8
%bn=getelementptr inbounds i8,i8*%a8,i64 32
%bo=bitcast i8*%bn to i8**
store i8*%bm,i8**%bo,align 8
%bp=load i8*,i8**%h,align 8
store i8*null,i8**%h,align 8
%bq=getelementptr inbounds i8,i8*%a8,i64 40
%br=bitcast i8*%bq to i8**
store i8*%bp,i8**%br,align 8
%bs=getelementptr inbounds i8,i8*%a8,i64 48
%bt=bitcast i8*%bs to i32*
store i32 63,i32*%bt,align 4
%bu=call i8*@sml_alloc(i32 inreg 20)#0
%bv=getelementptr inbounds i8,i8*%bu,i64 -4
%bw=bitcast i8*%bv to i32*
store i32 1342177296,i32*%bw,align 4
store i8*%bu,i8**%c,align 8
%bx=getelementptr inbounds i8,i8*%bu,i64 4
%by=bitcast i8*%bx to i32*
store i32 0,i32*%by,align 1
%bz=bitcast i8*%bu to i32*
store i32 37,i32*%bz,align 4
%bA=load i8*,i8**%b,align 8
store i8*null,i8**%b,align 8
%bB=getelementptr inbounds i8,i8*%bu,i64 8
%bC=bitcast i8*%bB to i8**
store i8*%bA,i8**%bC,align 8
%bD=getelementptr inbounds i8,i8*%bu,i64 16
%bE=bitcast i8*%bD to i32*
store i32 2,i32*%bE,align 4
%bF=call i8*@sml_alloc(i32 inreg 20)#0
%bG=getelementptr inbounds i8,i8*%bF,i64 -4
%bH=bitcast i8*%bG to i32*
store i32 1342177296,i32*%bH,align 4
%bI=load i8*,i8**%c,align 8
%bJ=bitcast i8*%bF to i8**
store i8*%bI,i8**%bJ,align 8
%bK=load i8*,i8**%d,align 8
%bL=getelementptr inbounds i8,i8*%bF,i64 8
%bM=bitcast i8*%bL to i8**
store i8*%bK,i8**%bM,align 8
%bN=getelementptr inbounds i8,i8*%bF,i64 16
%bO=bitcast i8*%bN to i32*
store i32 3,i32*%bO,align 4
ret i8*%bF
}
define internal fastcc i8*@_SMLLN12TypedCalcCon7TPTHROWE_421(i8*inreg%a)#4 gc"smlsharp"{
%b=bitcast i8*%a to i8**
%c=load i8*,i8**%b,align 8
ret i8*%c
}
define fastcc i8*@_SMLFN12TypedCalcCon7TPTHROWE(i8*inreg%a)#2 gc"smlsharp"{
m:
%b=alloca i8*,align 8
%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**%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
call void@llvm.gcroot(i8**%f,i8*null)#0
store i8*%a,i8**%b,align 8
%g=load atomic i32,i32*@sml_check_flag unordered,align 4
%h=icmp eq i32%g,0
br i1%h,label%k,label%i
i:
call void@sml_check(i32 inreg%g)
%j=load i8*,i8**%b,align 8
br label%k
k:
%l=phi i8*[%j,%i],[%a,%m]
%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**%c,align 8
%q=getelementptr inbounds i8,i8*%l,i64 16
%r=bitcast i8*%q to i8**
%s=load i8*,i8**%r,align 8
store i8*%s,i8**%d,align 8
%t=getelementptr inbounds i8,i8*%l,i64 24
%u=bitcast i8*%t to i8**
%v=load i8*,i8**%u,align 8
store i8*%v,i8**%e,align 8
%w=call fastcc i8*@_SMLFN4List3mapE(i32 inreg 1,i32 inreg 8,i32 inreg 1,i32 inreg 8)
%x=getelementptr inbounds i8,i8*%w,i64 16
%y=bitcast i8*%x to i8*(i8*,i8*)**
%z=load i8*(i8*,i8*)*,i8*(i8*,i8*)**%y,align 8
%A=bitcast i8*%w to i8**
%B=load i8*,i8**%A,align 8
%C=call fastcc i8*%z(i8*inreg%B,i8*inreg bitcast(i8**getelementptr inbounds(<{[4x i8],i32,i8*,void(...)*,void(...)*,i32}>,<{[4x i8],i32,i8*,void(...)*,void(...)*,i32}>*@ax,i64 0,i32 2)to i8*))
%D=getelementptr inbounds i8,i8*%C,i64 16
%E=bitcast i8*%D to i8*(i8*,i8*)**
%F=load i8*(i8*,i8*)*,i8*(i8*,i8*)**%E,align 8
%G=bitcast i8*%C to i8**
%H=load i8*,i8**%G,align 8
%I=bitcast i8**%b to i8***
%J=load i8**,i8***%I,align 8
store i8*null,i8**%b,align 8
%K=load i8*,i8**%J,align 8
%L=call fastcc i8*%F(i8*inreg%H,i8*inreg%K)
store i8*%L,i8**%b,align 8
%M=call i8*@sml_alloc(i32 inreg 36)#0
%N=getelementptr inbounds i8,i8*%M,i64 -4
%O=bitcast i8*%N to i32*
store i32 1342177312,i32*%O,align 4
store i8*%M,i8**%f,align 8
%P=load i8*,i8**%b,align 8
store i8*null,i8**%b,align 8
%Q=bitcast i8*%M to i8**
store i8*%P,i8**%Q,align 8
%R=load i8*,i8**%c,align 8
store i8*null,i8**%c,align 8
%S=getelementptr inbounds i8,i8*%M,i64 8
%T=bitcast i8*%S to i8**
store i8*%R,i8**%T,align 8
%U=load i8*,i8**%d,align 8
store i8*null,i8**%d,align 8
%V=getelementptr inbounds i8,i8*%M,i64 16
%W=bitcast i8*%V to i8**
store i8*%U,i8**%W,align 8
%X=load i8*,i8**%e,align 8
%Y=getelementptr inbounds i8,i8*%M,i64 24
%Z=bitcast i8*%Y to i8**
store i8*%X,i8**%Z,align 8
%aa=getelementptr inbounds i8,i8*%M,i64 32
%ab=bitcast i8*%aa to i32*
store i32 15,i32*%ab,align 4
%ac=call i8*@sml_alloc(i32 inreg 20)#0
%ad=getelementptr inbounds i8,i8*%ac,i64 -4
%ae=bitcast i8*%ad to i32*
store i32 1342177296,i32*%ae,align 4
store i8*%ac,i8**%b,align 8
%af=getelementptr inbounds i8,i8*%ac,i64 4
%ag=bitcast i8*%af to i32*
store i32 0,i32*%ag,align 1
%ah=bitcast i8*%ac to i32*
store i32 39,i32*%ah,align 4
%ai=load i8*,i8**%f,align 8
store i8*null,i8**%f,align 8
%aj=getelementptr inbounds i8,i8*%ac,i64 8
%ak=bitcast i8*%aj to i8**
store i8*%ai,i8**%ak,align 8
%al=getelementptr inbounds i8,i8*%ac,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
%aq=load i8*,i8**%b,align 8
%ar=bitcast i8*%an to i8**
store i8*%aq,i8**%ar,align 8
%as=load i8*,i8**%e,align 8
%at=getelementptr inbounds i8,i8*%an,i64 8
%au=bitcast i8*%at to i8**
store i8*%as,i8**%au,align 8
%av=getelementptr inbounds i8,i8*%an,i64 16
%aw=bitcast i8*%av to i32*
store i32 3,i32*%aw,align 4
ret i8*%an
}
define internal fastcc void@_SMLL1f_426(i8*inreg%a,i32 inreg%b)#2 gc"smlsharp"{
%c=alloca i8*,align 8
%d=alloca i8*,align 8
%e=alloca i8*,align 8
%f=alloca i8*,align 8
call void@llvm.gcroot(i8**%c,i8*null)#0
call void@llvm.gcroot(i8**%d,i8*null)#0
call void@llvm.gcroot(i8**%e,i8*null)#0
call void@llvm.gcroot(i8**%f,i8*null)#0
store i8*%a,i8**%c,align 8
%g=load atomic i32,i32*@sml_check_flag unordered,align 4
%h=icmp eq i32%g,0
br i1%h,label%j,label%i
i:
call void@sml_check(i32 inreg%g)
br label%j
j:
%k=call fastcc i8*@_SMLLN12TypedCalcCon4eqTyE_287(i8*inreg getelementptr inbounds(<{[4x i8],i32,[8x i8]}>,<{[4x i8],i32,[8x i8]}>*@az,i64 0,i32 2,i64 0))
%l=getelementptr inbounds i8,i8*%k,i64 16
%m=bitcast i8*%l to i8*(i8*,i8*)**
%n=load i8*(i8*,i8*)*,i8*(i8*,i8*)**%m,align 8
%o=bitcast i8*%k to i8**
%p=load i8*,i8**%o,align 8
%q=load i8*,i8**%c,align 8
%r=getelementptr inbounds i8,i8*%q,i64 8
%s=bitcast i8*%r to i8**
%t=load i8*,i8**%s,align 8
%u=call fastcc i8*%n(i8*inreg%p,i8*inreg%t)
%v=getelementptr inbounds i8,i8*%u,i64 16
%w=bitcast i8*%v to i8*(i8*,i8*)**
%x=load i8*(i8*,i8*)*,i8*(i8*,i8*)**%w,align 8
%y=bitcast i8*%u to i8**
%z=load i8*,i8**%y,align 8
store i8*%z,i8**%f,align 8
%A=load i8*,i8**%c,align 8
%B=getelementptr inbounds i8,i8*%A,i64 16
%C=bitcast i8*%B to i8**
%D=load i8*,i8**%C,align 8
store i8*%D,i8**%d,align 8
%E=bitcast i8*%A to i8**
store i8*null,i8**%c,align 8
%F=load i8*,i8**%E,align 8
store i8*%F,i8**%e,align 8
%G=call i8*@sml_alloc(i32 inreg 20)#0
%H=getelementptr inbounds i8,i8*%G,i64 -4
%I=bitcast i8*%H to i32*
store i32 1342177296,i32*%I,align 4
store i8*%G,i8**%c,align 8
%J=load i8*,i8**%d,align 8
store i8*null,i8**%d,align 8
%K=bitcast i8*%G to i8**
store i8*%J,i8**%K,align 8
%L=load i8*,i8**%e,align 8
store i8*null,i8**%e,align 8
%M=getelementptr inbounds i8,i8*%G,i64 8
%N=bitcast i8*%M to i8**
store i8*%L,i8**%N,align 8
%O=getelementptr inbounds i8,i8*%G,i64 16
%P=bitcast i8*%O to i32*
store i32 3,i32*%P,align 4
%Q=call i8*@sml_alloc(i32 inreg 20)#0
%R=getelementptr inbounds i8,i8*%Q,i64 -4
%S=bitcast i8*%R to i32*
store i32 1342177296,i32*%S,align 4
%T=load i8*,i8**%c,align 8
store i8*null,i8**%c,align 8
%U=bitcast i8*%Q to i8**
store i8*%T,i8**%U,align 8
%V=getelementptr inbounds i8,i8*%Q,i64 8
%W=bitcast i8*%V to i8**
store i8*null,i8**%W,align 8
%X=getelementptr inbounds i8,i8*%Q,i64 16
%Y=bitcast i8*%X to i32*
store i32 3,i32*%Y,align 4
%Z=load i8*,i8**%f,align 8
store i8*null,i8**%f,align 8
%aa=call fastcc i8*%x(i8*inreg%Z,i8*inreg%Q)
ret void
}
define fastcc i8*@_SMLFN12TypedCalcCon7TPCATCHE(i8*inreg%a)#2 gc"smlsharp"{
p:
%b=alloca i8*,align 8
%c=alloca i8*,align 8
%d=alloca i8*,align 8
%e=alloca i8*,align 8
%f=alloca i8*,align 8
%g=alloca i8*,align 8
%h=alloca i8*,align 8
%i=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
call void@llvm.gcroot(i8**%f,i8*null)#0
call void@llvm.gcroot(i8**%g,i8*null)#0
call void@llvm.gcroot(i8**%h,i8*null)#0
call void@llvm.gcroot(i8**%i,i8*null)#0
store i8*%a,i8**%b,align 8
%j=load atomic i32,i32*@sml_check_flag unordered,align 4
%k=icmp eq i32%j,0
br i1%k,label%n,label%l
l:
call void@sml_check(i32 inreg%j)
%m=load i8*,i8**%b,align 8
br label%n
n:
%o=phi i8*[%m,%l],[%a,%p]
%q=bitcast i8*%o to i8**
%r=load i8*,i8**%q,align 8
store i8*%r,i8**%b,align 8
%s=getelementptr inbounds i8,i8*%o,i64 8
%t=bitcast i8*%s to i8***
%u=load i8**,i8***%t,align 8
%v=load i8*,i8**%u,align 8
store i8*%v,i8**%c,align 8
%w=getelementptr inbounds i8*,i8**%u,i64 1
%x=load i8*,i8**%w,align 8
store i8*%x,i8**%d,align 8
%y=getelementptr inbounds i8,i8*%o,i64 16
%z=bitcast i8*%y to i8**
%A=load i8*,i8**%z,align 8
store i8*%A,i8**%e,align 8
%B=getelementptr inbounds i8,i8*%o,i64 24
%C=bitcast i8*%B to i8**
%D=load i8*,i8**%C,align 8
store i8*%D,i8**%f,align 8
%E=getelementptr inbounds i8,i8*%o,i64 32
%F=bitcast i8*%E to i8***
%G=load i8**,i8***%F,align 8
%H=load i8*,i8**%G,align 8
store i8*%H,i8**%g,align 8
%I=getelementptr inbounds i8*,i8**%G,i64 1
%J=load i8*,i8**%I,align 8
store i8*%J,i8**%h,align 8
%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
store i8*%K,i8**%i,align 8
%N=load i8*,i8**%d,align 8
store i8*null,i8**%d,align 8
%O=bitcast i8*%K to i8**
store i8*%N,i8**%O,align 8
%P=load i8*,i8**%f,align 8
%Q=getelementptr inbounds i8,i8*%K,i64 8
%R=bitcast i8*%Q to i8**
store i8*%P,i8**%R,align 8
%S=load i8*,i8**%h,align 8
%T=getelementptr inbounds i8,i8*%K,i64 16
%U=bitcast i8*%T to i8**
store i8*%S,i8**%U,align 8
%V=getelementptr inbounds i8,i8*%K,i64 24
%W=bitcast i8*%V to i32*
store i32 7,i32*%W,align 4
%X=call i8*@sml_alloc(i32 inreg 28)#0
%Y=getelementptr inbounds i8,i8*%X,i64 -4
%Z=bitcast i8*%Y to i32*
store i32 1342177304,i32*%Z,align 4
%aa=load i8*,i8**%i,align 8
%ab=bitcast i8*%X to i8**
store i8*%aa,i8**%ab,align 8
%ac=getelementptr inbounds i8,i8*%X,i64 8
%ad=bitcast i8*%ac to void(...)**
store void(...)*bitcast(void(i8*,i32)*@_SMLL1f_426 to void(...)*),void(...)**%ad,align 8
%ae=getelementptr inbounds i8,i8*%X,i64 16
%af=bitcast i8*%ae to void(...)**
store void(...)*bitcast(i8*(i8*,i8*)*@_SMLL1f_726 to void(...)*),void(...)**%af,align 8
%ag=getelementptr inbounds i8,i8*%X,i64 24
%ah=bitcast i8*%ag to i32*
store i32 -2147483647,i32*%ah,align 4
%ai=load i32*,i32**bitcast(i8**@_SMLZN7Control9checkTypeE to i32**),align 8
%aj=load i32,i32*%ai,align 4
%ak=icmp eq i32%aj,0
store i8*null,i8**%i,align 8
br i1%ak,label%am,label%al
al:
call fastcc void@_SMLL1f_426(i8*inreg%aa,i32 inreg 0)
br label%am
am:
%an=call i8*@sml_alloc(i32 inreg 52)#0
%ao=getelementptr inbounds i8,i8*%an,i64 -4
%ap=bitcast i8*%ao to i32*
store i32 1342177328,i32*%ap,align 4
store i8*%an,i8**%d,align 8
%aq=load i8*,i8**%b,align 8
store i8*null,i8**%b,align 8
%ar=bitcast i8*%an to i8**
store i8*%aq,i8**%ar,align 8
%as=load i8*,i8**%c,align 8
store i8*null,i8**%c,align 8
%at=getelementptr inbounds i8,i8*%an,i64 8
%au=bitcast i8*%at to i8**
store i8*%as,i8**%au,align 8
%av=load i8*,i8**%e,align 8
store i8*null,i8**%e,align 8
%aw=getelementptr inbounds i8,i8*%an,i64 16
%ax=bitcast i8*%aw to i8**
store i8*%av,i8**%ax,align 8
%ay=load i8*,i8**%f,align 8
store i8*null,i8**%f,align 8
%az=getelementptr inbounds i8,i8*%an,i64 24
%aA=bitcast i8*%az to i8**
store i8*%ay,i8**%aA,align 8
%aB=load i8*,i8**%h,align 8
%aC=getelementptr inbounds i8,i8*%an,i64 32
%aD=bitcast i8*%aC to i8**
store i8*%aB,i8**%aD,align 8
%aE=load i8*,i8**%g,align 8
store i8*null,i8**%g,align 8
%aF=getelementptr inbounds i8,i8*%an,i64 40
%aG=bitcast i8*%aF to i8**
store i8*%aE,i8**%aG,align 8
%aH=getelementptr inbounds i8,i8*%an,i64 48
%aI=bitcast i8*%aH to i32*
store i32 63,i32*%aI,align 4
%aJ=call i8*@sml_alloc(i32 inreg 20)#0
%aK=getelementptr inbounds i8,i8*%aJ,i64 -4
%aL=bitcast i8*%aK to i32*
store i32 1342177296,i32*%aL,align 4
store i8*%aJ,i8**%b,align 8
%aM=getelementptr inbounds i8,i8*%aJ,i64 4
%aN=bitcast i8*%aM to i32*
store i32 0,i32*%aN,align 1
%aO=bitcast i8*%aJ to i32*
store i32 4,i32*%aO,align 4
%aP=load i8*,i8**%d,align 8
store i8*null,i8**%d,align 8
%aQ=getelementptr inbounds i8,i8*%aJ,i64 8
%aR=bitcast i8*%aQ to i8**
store i8*%aP,i8**%aR,align 8
%aS=getelementptr inbounds i8,i8*%aJ,i64 16
%aT=bitcast i8*%aS to i32*
store i32 2,i32*%aT,align 4
%aU=call i8*@sml_alloc(i32 inreg 20)#0
%aV=getelementptr inbounds i8,i8*%aU,i64 -4
%aW=bitcast i8*%aV to i32*
store i32 1342177296,i32*%aW,align 4
%aX=load i8*,i8**%b,align 8
%aY=bitcast i8*%aU to i8**
store i8*%aX,i8**%aY,align 8
%aZ=load i8*,i8**%h,align 8
%a0=getelementptr inbounds i8,i8*%aU,i64 8
%a1=bitcast i8*%a0 to i8**
store i8*%aZ,i8**%a1,align 8
%a2=getelementptr inbounds i8,i8*%aU,i64 16
%a3=bitcast i8*%a2 to i32*
store i32 3,i32*%a3,align 4
ret i8*%aU
}
define internal fastcc i8*@_SMLLN12TypedCalcCon9TPMONOLETE_429(i8*inreg%a)#4 gc"smlsharp"{
%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
%f=bitcast i8*%a to i8**
%g=load i8*,i8**%f,align 8
%h=bitcast i8*%g to i32*
%i=load i32,i32*%h,align 4
%j=getelementptr inbounds i8,i8*%g,i64 4
%k=bitcast i8*%j to i32*
%l=load i32,i32*%k,align 4
%m=getelementptr inbounds i8,i8*%g,i64 8
%n=bitcast i8*%m to i8**
%o=load i8*,i8**%n,align 8
store i8*%o,i8**%b,align 8
%p=getelementptr inbounds i8,i8*%a,i64 8
%q=bitcast i8*%p to i8***
%r=load i8**,i8***%q,align 8
%s=load i8*,i8**%r,align 8
store i8*%s,i8**%c,align 8
%t=getelementptr inbounds i8*,i8**%r,i64 1
%u=load i8*,i8**%t,align 8
store i8*%u,i8**%d,align 8
%v=call i8*@sml_alloc(i32 inreg 28)#0
%w=bitcast i8*%v to i32*
%x=getelementptr inbounds i8,i8*%v,i64 -4
%y=bitcast i8*%x to i32*
store i32 1342177304,i32*%y,align 4
store i8*%v,i8**%e,align 8
store i32%i,i32*%w,align 4
%z=getelementptr inbounds i8,i8*%v,i64 4
%A=bitcast i8*%z to i32*
store i32%l,i32*%A,align 4
%B=load i8*,i8**%b,align 8
store i8*null,i8**%b,align 8
%C=getelementptr inbounds i8,i8*%v,i64 8
%D=bitcast i8*%C to i8**
store i8*%B,i8**%D,align 8
%E=load i8*,i8**%d,align 8
store i8*null,i8**%d,align 8
%F=getelementptr inbounds i8,i8*%v,i64 16
%G=bitcast i8*%F to i8**
store i8*%E,i8**%G,align 8
%H=getelementptr inbounds i8,i8*%v,i64 24
%I=bitcast i8*%H to i32*
store i32 6,i32*%I,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
%M=load i8*,i8**%e,align 8
%N=bitcast i8*%J to i8**
store i8*%M,i8**%N,align 8
%O=load i8*,i8**%c,align 8
%P=getelementptr inbounds i8,i8*%J,i64 8
%Q=bitcast i8*%P to i8**
store i8*%O,i8**%Q,align 8
%R=getelementptr inbounds i8,i8*%J,i64 16
%S=bitcast i8*%R to i32*
store i32 3,i32*%S,align 4
ret i8*%J
}
define fastcc i8*@_SMLFN12TypedCalcCon9TPMONOLETE(i8*inreg%a)#2 gc"smlsharp"{
m:
%b=alloca i8*,align 8
%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**%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
call void@llvm.gcroot(i8**%f,i8*null)#0
store i8*%a,i8**%b,align 8
%g=load atomic i32,i32*@sml_check_flag unordered,align 4
%h=icmp eq i32%g,0
br i1%h,label%k,label%i
i:
call void@sml_check(i32 inreg%g)
%j=load i8*,i8**%b,align 8
br label%k
k:
%l=phi i8*[%j,%i],[%a,%m]
%n=bitcast i8*%l to i8**
%o=load i8*,i8**%n,align 8
%p=icmp eq i8*%o,null
%q=getelementptr inbounds i8,i8*%l,i64 8
%r=bitcast i8*%q to i8**
%s=load i8*,i8**%r,align 8
br i1%p,label%t,label%u
t:
ret i8*%s
u:
%v=bitcast i8*%s to i8**
%w=load i8*,i8**%v,align 8
store i8*%w,i8**%c,align 8
%x=getelementptr inbounds i8,i8*%s,i64 8
%y=bitcast i8*%x to i8**
%z=load i8*,i8**%y,align 8
store i8*%z,i8**%d,align 8
%A=getelementptr inbounds i8,i8*%l,i64 16
%B=bitcast i8*%A to i8**
%C=load i8*,i8**%B,align 8
store i8*%C,i8**%e,align 8
%D=call fastcc i8*@_SMLFN4List3mapE(i32 inreg 1,i32 inreg 8,i32 inreg 1,i32 inreg 8)
%E=getelementptr inbounds i8,i8*%D,i64 16
%F=bitcast i8*%E to i8*(i8*,i8*)**
%G=load i8*(i8*,i8*)*,i8*(i8*,i8*)**%F,align 8
%H=bitcast i8*%D to i8**
%I=load i8*,i8**%H,align 8
%J=call fastcc i8*%G(i8*inreg%I,i8*inreg bitcast(i8**getelementptr inbounds(<{[4x i8],i32,i8*,void(...)*,void(...)*,i32}>,<{[4x i8],i32,i8*,void(...)*,void(...)*,i32}>*@aB,i64 0,i32 2)to i8*))
%K=getelementptr inbounds i8,i8*%J,i64 16
%L=bitcast i8*%K to i8*(i8*,i8*)**
%M=load i8*(i8*,i8*)*,i8*(i8*,i8*)**%L,align 8
%N=bitcast i8*%J to i8**
%O=load i8*,i8**%N,align 8
%P=bitcast i8**%b to i8***
%Q=load i8**,i8***%P,align 8
store i8*null,i8**%b,align 8
%R=load i8*,i8**%Q,align 8
%S=call fastcc i8*%M(i8*inreg%O,i8*inreg%R)
store i8*%S,i8**%b,align 8
%T=call i8*@sml_alloc(i32 inreg 28)#0
%U=getelementptr inbounds i8,i8*%T,i64 -4
%V=bitcast i8*%U to i32*
store i32 1342177304,i32*%V,align 4
store i8*%T,i8**%f,align 8
%W=load i8*,i8**%b,align 8
store i8*null,i8**%b,align 8
%X=bitcast i8*%T to i8**
store i8*%W,i8**%X,align 8
%Y=load i8*,i8**%c,align 8
store i8*null,i8**%c,align 8
%Z=getelementptr inbounds i8,i8*%T,i64 8
%aa=bitcast i8*%Z to i8**
store i8*%Y,i8**%aa,align 8
%ab=load i8*,i8**%e,align 8
store i8*null,i8**%e,align 8
%ac=getelementptr inbounds i8,i8*%T,i64 16
%ad=bitcast i8*%ac to i8**
store i8*%ab,i8**%ad,align 8
%ae=getelementptr inbounds i8,i8*%T,i64 24
%af=bitcast i8*%ae to i32*
store i32 7,i32*%af,align 4
%ag=call i8*@sml_alloc(i32 inreg 20)#0
%ah=getelementptr inbounds i8,i8*%ag,i64 -4
%ai=bitcast i8*%ah to i32*
store i32 1342177296,i32*%ai,align 4
store i8*%ag,i8**%b,align 8
%aj=getelementptr inbounds i8,i8*%ag,i64 4
%ak=bitcast i8*%aj to i32*
store i32 0,i32*%ak,align 1
%al=bitcast i8*%ag to i32*
store i32 27,i32*%al,align 4
%am=load i8*,i8**%f,align 8
store i8*null,i8**%f,align 8
%an=getelementptr inbounds i8,i8*%ag,i64 8
%ao=bitcast i8*%an to i8**
store i8*%am,i8**%ao,align 8
%ap=getelementptr inbounds i8,i8*%ag,i64 16
%aq=bitcast i8*%ap to i32*
store i32 2,i32*%aq,align 4
%ar=call i8*@sml_alloc(i32 inreg 20)#0
%as=getelementptr inbounds i8,i8*%ar,i64 -4
%at=bitcast i8*%as to i32*
store i32 1342177296,i32*%at,align 4
%au=load i8*,i8**%b,align 8
%av=bitcast i8*%ar to i8**
store i8*%au,i8**%av,align 8
%aw=load i8*,i8**%d,align 8
%ax=getelementptr inbounds i8,i8*%ar,i64 8
%ay=bitcast i8*%ax to i8**
store i8*%aw,i8**%ay,align 8
%az=getelementptr inbounds i8,i8*%ar,i64 16
%aA=bitcast i8*%az to i32*
store i32 3,i32*%aA,align 4
ret i8*%ar
}
define internal fastcc void@_SMLL1f_434(i8*inreg%a,i32 inreg%b)#2 gc"smlsharp"{
%c=alloca i8*,align 8
%d=alloca i8*,align 8
%e=alloca i8*,align 8
%f=alloca i8*,align 8
call void@llvm.gcroot(i8**%c,i8*null)#0
call void@llvm.gcroot(i8**%d,i8*null)#0
call void@llvm.gcroot(i8**%e,i8*null)#0
call void@llvm.gcroot(i8**%f,i8*null)#0
store i8*%a,i8**%c,align 8
%g=load atomic i32,i32*@sml_check_flag unordered,align 4
%h=icmp eq i32%g,0
br i1%h,label%j,label%i
i:
call void@sml_check(i32 inreg%g)
br label%j
j:
%k=call fastcc i8*@_SMLLN12TypedCalcCon4eqTyE_287(i8*inreg getelementptr inbounds(<{[4x i8],i32,[8x i8]}>,<{[4x i8],i32,[8x i8]}>*@aD,i64 0,i32 2,i64 0))
%l=getelementptr inbounds i8,i8*%k,i64 16
%m=bitcast i8*%l to i8*(i8*,i8*)**
%n=load i8*(i8*,i8*)*,i8*(i8*,i8*)**%m,align 8
%o=bitcast i8*%k to i8**
%p=load i8*,i8**%o,align 8
%q=load i8*,i8**%c,align 8
%r=getelementptr inbounds i8,i8*%q,i64 8
%s=bitcast i8*%r to i8**
%t=load i8*,i8**%s,align 8
%u=call fastcc i8*%n(i8*inreg%p,i8*inreg%t)
%v=getelementptr inbounds i8,i8*%u,i64 16
%w=bitcast i8*%v to i8*(i8*,i8*)**
%x=load i8*(i8*,i8*)*,i8*(i8*,i8*)**%w,align 8
%y=bitcast i8*%u to i8**
%z=load i8*,i8**%y,align 8
store i8*%z,i8**%f,align 8
%A=bitcast i8**%c to i8***
%B=load i8**,i8***%A,align 8
store i8*null,i8**%c,align 8
%C=load i8*,i8**%B,align 8
store i8*%C,i8**%d,align 8
%D=load i8*,i8**@_SMLZN12BuiltinTypes5exnTyE,align 8
store i8*%D,i8**%e,align 8
%E=call i8*@sml_alloc(i32 inreg 20)#0
%F=getelementptr inbounds i8,i8*%E,i64 -4
%G=bitcast i8*%F to i32*
store i32 1342177296,i32*%G,align 4
store i8*%E,i8**%c,align 8
%H=load i8*,i8**%d,align 8
store i8*null,i8**%d,align 8
%I=bitcast i8*%E to i8**
store i8*%H,i8**%I,align 8
%J=load i8*,i8**%e,align 8
store i8*null,i8**%e,align 8
%K=getelementptr inbounds i8,i8*%E,i64 8
%L=bitcast i8*%K to i8**
store i8*%J,i8**%L,align 8
%M=getelementptr inbounds i8,i8*%E,i64 16
%N=bitcast i8*%M to i32*
store i32 3,i32*%N,align 4
%O=call i8*@sml_alloc(i32 inreg 20)#0
%P=getelementptr inbounds i8,i8*%O,i64 -4
%Q=bitcast i8*%P to i32*
store i32 1342177296,i32*%Q,align 4
%R=load i8*,i8**%c,align 8
store i8*null,i8**%c,align 8
%S=bitcast i8*%O to i8**
store i8*%R,i8**%S,align 8
%T=getelementptr inbounds i8,i8*%O,i64 8
%U=bitcast i8*%T to i8**
store i8*null,i8**%U,align 8
%V=getelementptr inbounds i8,i8*%O,i64 16
%W=bitcast i8*%V to i32*
store i32 3,i32*%W,align 4
%X=load i8*,i8**%f,align 8
store i8*null,i8**%f,align 8
%Y=call fastcc i8*%x(i8*inreg%X,i8*inreg%O)
ret void
}
define fastcc i8*@_SMLFN12TypedCalcCon7TPRAISEE(i8*inreg%a)#2 gc"smlsharp"{
m:
%b=alloca i8*,align 8
%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**%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
call void@llvm.gcroot(i8**%f,i8*null)#0
store i8*%a,i8**%b,align 8
%g=load atomic i32,i32*@sml_check_flag unordered,align 4
%h=icmp eq i32%g,0
br i1%h,label%k,label%i
i:
call void@sml_check(i32 inreg%g)
%j=load i8*,i8**%b,align 8
br label%k
k:
%l=phi i8*[%j,%i],[%a,%m]
%n=bitcast i8*%l to i8**
%o=bitcast i8*%l to i8***
%p=load i8**,i8***%o,align 8
%q=load i8*,i8**%p,align 8
store i8*%q,i8**%b,align 8
%r=load i8*,i8**%n,align 8
%s=getelementptr inbounds i8,i8*%r,i64 8
%t=bitcast i8*%s to i8**
%u=load i8*,i8**%t,align 8
store i8*%u,i8**%c,align 8
%v=getelementptr inbounds i8,i8*%l,i64 8
%w=bitcast i8*%v to i8**
%x=load i8*,i8**%w,align 8
store i8*%x,i8**%d,align 8
%y=getelementptr inbounds i8,i8*%l,i64 16
%z=bitcast i8*%y to i8**
%A=load i8*,i8**%z,align 8
store i8*%A,i8**%e,align 8
%B=call i8*@sml_alloc(i32 inreg 20)#0
%C=getelementptr inbounds i8,i8*%B,i64 -4
%D=bitcast i8*%C to i32*
store i32 1342177296,i32*%D,align 4
store i8*%B,i8**%f,align 8
%E=load i8*,i8**%c,align 8
store i8*null,i8**%c,align 8
%F=bitcast i8*%B to i8**
store i8*%E,i8**%F,align 8
%G=load i8*,i8**%d,align 8
%H=getelementptr inbounds i8,i8*%B,i64 8
%I=bitcast i8*%H to i8**
store i8*%G,i8**%I,align 8
%J=getelementptr inbounds i8,i8*%B,i64 16
%K=bitcast i8*%J to i32*
store i32 3,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**%f,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(void(i8*,i32)*@_SMLL1f_434 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*)*@_SMLL1f_730 to void(...)*),void(...)**%T,align 8
%U=getelementptr inbounds i8,i8*%L,i64 24
%V=bitcast i8*%U to i32*
store i32 -2147483647,i32*%V,align 4
%W=load i32*,i32**bitcast(i8**@_SMLZN7Control9checkTypeE to i32**),align 8
%X=load i32,i32*%W,align 4
%Y=icmp eq i32%X,0
store i8*null,i8**%f,align 8
br i1%Y,label%aa,label%Z
Z:
call fastcc void@_SMLL1f_434(i8*inreg%O,i32 inreg 0)
br label%aa
aa:
%ab=call i8*@sml_alloc(i32 inreg 28)#0
%ac=getelementptr inbounds i8,i8*%ab,i64 -4
%ad=bitcast i8*%ac to i32*
store i32 1342177304,i32*%ad,align 4
store i8*%ab,i8**%c,align 8
%ae=load i8*,i8**%b,align 8
store i8*null,i8**%b,align 8
%af=bitcast i8*%ab to i8**
store i8*%ae,i8**%af,align 8
%ag=load i8*,i8**%d,align 8
store i8*null,i8**%d,align 8
%ah=getelementptr inbounds i8,i8*%ab,i64 8
%ai=bitcast i8*%ah to i8**
store i8*%ag,i8**%ai,align 8
%aj=load i8*,i8**%e,align 8
%ak=getelementptr inbounds i8,i8*%ab,i64 16
%al=bitcast i8*%ak to i8**
store i8*%aj,i8**%al,align 8
%am=getelementptr inbounds i8,i8*%ab,i64 24
%an=bitcast i8*%am to i32*
store i32 7,i32*%an,align 4
%ao=call i8*@sml_alloc(i32 inreg 20)#0
%ap=getelementptr inbounds i8,i8*%ao,i64 -4
%aq=bitcast i8*%ap to i32*
store i32 1342177296,i32*%aq,align 4
store i8*%ao,i8**%b,align 8
%ar=getelementptr inbounds i8,i8*%ao,i64 4
%as=bitcast i8*%ar to i32*
store i32 0,i32*%as,align 1
%at=bitcast i8*%ao to i32*
store i32 31,i32*%at,align 4
%au=load i8*,i8**%c,align 8
store i8*null,i8**%c,align 8
%av=getelementptr inbounds i8,i8*%ao,i64 8
%aw=bitcast i8*%av to i8**
store i8*%au,i8**%aw,align 8
%ax=getelementptr inbounds i8,i8*%ao,i64 16
%ay=bitcast i8*%ax to i32*
store i32 2,i32*%ay,align 4
%az=call i8*@sml_alloc(i32 inreg 20)#0
%aA=getelementptr inbounds i8,i8*%az,i64 -4
%aB=bitcast i8*%aA to i32*
store i32 1342177296,i32*%aB,align 4
%aC=load i8*,i8**%b,align 8
%aD=bitcast i8*%az to i8**
store i8*%aC,i8**%aD,align 8
%aE=load i8*,i8**%e,align 8
%aF=getelementptr inbounds i8,i8*%az,i64 8
%aG=bitcast i8*%aF to i8**
store i8*%aE,i8**%aG,align 8
%aH=getelementptr inbounds i8,i8*%az,i64 16
%aI=bitcast i8*%aH to i32*
store i32 3,i32*%aI,align 4
ret i8*%az
}
define internal fastcc void@_SMLL1f_438(i8*inreg%a,i32 inreg%b)#2 gc"smlsharp"{
%c=alloca i8*,align 8
%d=alloca i8*,align 8
%e=alloca i8*,align 8
%f=alloca i8*,align 8
%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**%c,align 8
%h=load atomic i32,i32*@sml_check_flag unordered,align 4
%i=icmp eq i32%h,0
br i1%i,label%k,label%j
j:
call void@sml_check(i32 inreg%h)
br label%k
k:
%l=call fastcc i8*@_SMLLN12TypedCalcCon4eqTyE_287(i8*inreg getelementptr inbounds(<{[4x i8],i32,[9x i8]}>,<{[4x i8],i32,[9x i8]}>*@aF,i64 0,i32 2,i64 0))
%m=getelementptr inbounds i8,i8*%l,i64 16
%n=bitcast i8*%m to i8*(i8*,i8*)**
%o=load i8*(i8*,i8*)*,i8*(i8*,i8*)**%n,align 8
%p=bitcast i8*%l to i8**
%q=load i8*,i8**%p,align 8
%r=load i8*,i8**%c,align 8
%s=getelementptr inbounds i8,i8*%r,i64 24
%t=bitcast i8*%s to i8**
%u=load i8*,i8**%t,align 8
%v=call fastcc i8*%o(i8*inreg%q,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**
%A=load i8*,i8**%z,align 8
store i8*%A,i8**%g,align 8
%B=load i8*,i8**%c,align 8
%C=getelementptr inbounds i8,i8*%B,i64 8
%D=bitcast i8*%C to i8**
%E=load i8*,i8**%D,align 8
store i8*%E,i8**%d,align 8
%F=getelementptr inbounds i8,i8*%B,i64 16
%G=bitcast i8*%F to i8**
%H=load i8*,i8**%G,align 8
store i8*%H,i8**%e,align 8
%I=call i8*@sml_alloc(i32 inreg 20)#0
%J=getelementptr inbounds i8,i8*%I,i64 -4
%K=bitcast i8*%J to i32*
store i32 1342177296,i32*%K,align 4
store i8*%I,i8**%f,align 8
%L=load i8*,i8**%d,align 8
%M=bitcast i8*%I to i8**
store i8*%L,i8**%M,align 8
%N=load i8*,i8**%e,align 8
%O=getelementptr inbounds i8,i8*%I,i64 8
%P=bitcast i8*%O to i8**
store i8*%N,i8**%P,align 8
%Q=getelementptr inbounds i8,i8*%I,i64 16
%R=bitcast i8*%Q to i32*
store i32 3,i32*%R,align 4
%S=bitcast i8**%c to i8***
%T=load i8**,i8***%S,align 8
store i8*null,i8**%c,align 8
%U=load i8*,i8**%T,align 8
%V=getelementptr inbounds i8,i8*%U,i64 16
%W=bitcast i8*%V to i8**
%X=load i8*,i8**%W,align 8
store i8*%X,i8**%d,align 8
%Y=load i8*,i8**@_SMLZN12BuiltinTypes5exnTyE,align 8
store i8*%Y,i8**%e,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**%d,align 8
store i8*null,i8**%d,align 8
%ad=bitcast i8*%Z to i8**
store i8*%ac,i8**%ad,align 8
%ae=load i8*,i8**%e,align 8
store i8*null,i8**%e,align 8
%af=getelementptr inbounds i8,i8*%Z,i64 8
%ag=bitcast i8*%af to i8**
store i8*%ae,i8**%ag,align 8
%ah=getelementptr inbounds i8,i8*%Z,i64 16
%ai=bitcast i8*%ah to i32*
store i32 3,i32*%ai,align 4
%aj=call i8*@sml_alloc(i32 inreg 20)#0
%ak=getelementptr inbounds i8,i8*%aj,i64 -4
%al=bitcast i8*%ak to i32*
store i32 1342177296,i32*%al,align 4
store i8*%aj,i8**%d,align 8
%am=load i8*,i8**%c,align 8
store i8*null,i8**%c,align 8
%an=bitcast i8*%aj to i8**
store i8*%am,i8**%an,align 8
%ao=getelementptr inbounds i8,i8*%aj,i64 8
%ap=bitcast i8*%ao to i8**
store i8*null,i8**%ap,align 8
%aq=getelementptr inbounds i8,i8*%aj,i64 16
%ar=bitcast i8*%aq to i32*
store i32 3,i32*%ar,align 4
%as=call i8*@sml_alloc(i32 inreg 20)#0
%at=getelementptr inbounds i8,i8*%as,i64 -4
%au=bitcast i8*%at to i32*
store i32 1342177296,i32*%au,align 4
%av=load i8*,i8**%f,align 8
store i8*null,i8**%f,align 8
%aw=bitcast i8*%as to i8**
store i8*%av,i8**%aw,align 8
%ax=load i8*,i8**%d,align 8
store i8*null,i8**%d,align 8
%ay=getelementptr inbounds i8,i8*%as,i64 8
%az=bitcast i8*%ay to i8**
store i8*%ax,i8**%az,align 8
%aA=getelementptr inbounds i8,i8*%as,i64 16
%aB=bitcast i8*%aA to i32*
store i32 3,i32*%aB,align 4
%aC=load i8*,i8**%g,align 8
store i8*null,i8**%g,align 8
%aD=call fastcc i8*%y(i8*inreg%aC,i8*inreg%as)
ret void
}
define fastcc i8*@_SMLFN12TypedCalcCon8TPHANDLEE(i8*inreg%a)#2 gc"smlsharp"{
o:
%b=alloca i8*,align 8
%c=alloca i8*,align 8
%d=alloca i8*,align 8
%e=alloca i8*,align 8
%f=alloca i8*,align 8
%g=alloca i8*,align 8
%h=alloca i8*,align 8
call void@llvm.gcroot(i8**%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
call void@llvm.gcroot(i8**%f,i8*null)#0
call void@llvm.gcroot(i8**%g,i8*null)#0
call void@llvm.gcroot(i8**%h,i8*null)#0
store i8*%a,i8**%b,align 8
%i=load atomic i32,i32*@sml_check_flag unordered,align 4
%j=icmp eq i32%i,0
br i1%j,label%m,label%k
k:
call void@sml_check(i32 inreg%i)
%l=load i8*,i8**%b,align 8
br label%m
m:
%n=phi i8*[%l,%k],[%a,%o]
%p=bitcast i8*%n to i8**
%q=load i8*,i8**%p,align 8
store i8*%q,i8**%b,align 8
%r=getelementptr inbounds i8,i8*%n,i64 8
%s=bitcast i8*%r to i8***
%t=load i8**,i8***%s,align 8
%u=load i8*,i8**%t,align 8
store i8*%u,i8**%c,align 8
%v=getelementptr inbounds i8*,i8**%t,i64 1
%w=load i8*,i8**%v,align 8
store i8*%w,i8**%d,align 8
%x=getelementptr inbounds i8,i8*%n,i64 16
%y=bitcast i8*%x to i8***
%z=load i8**,i8***%y,align 8
%A=load i8*,i8**%z,align 8
store i8*%A,i8**%e,align 8
%B=getelementptr inbounds i8*,i8**%z,i64 1
%C=load i8*,i8**%B,align 8
store i8*%C,i8**%f,align 8
%D=getelementptr inbounds i8,i8*%n,i64 24
%E=bitcast i8*%D to i8**
%F=load i8*,i8**%E,align 8
store i8*%F,i8**%g,align 8
%G=call i8*@sml_alloc(i32 inreg 36)#0
%H=getelementptr inbounds i8,i8*%G,i64 -4
%I=bitcast i8*%H to i32*
store i32 1342177312,i32*%I,align 4
store i8*%G,i8**%h,align 8
%J=load i8*,i8**%b,align 8
%K=bitcast i8*%G to i8**
store i8*%J,i8**%K,align 8
%L=load i8*,i8**%d,align 8
%M=getelementptr inbounds i8,i8*%G,i64 8
%N=bitcast i8*%M to i8**
store i8*%L,i8**%N,align 8
%O=load i8*,i8**%f,align 8
store i8*null,i8**%f,align 8
%P=getelementptr inbounds i8,i8*%G,i64 16
%Q=bitcast i8*%P to i8**
store i8*%O,i8**%Q,align 8
%R=load i8*,i8**%g,align 8
%S=getelementptr inbounds i8,i8*%G,i64 24
%T=bitcast i8*%S to i8**
store i8*%R,i8**%T,align 8
%U=getelementptr inbounds i8,i8*%G,i64 32
%V=bitcast i8*%U to i32*
store i32 15,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**%h,align 8
%aa=bitcast i8*%W to i8**
store i8*%Z,i8**%aa,align 8
%ab=getelementptr inbounds i8,i8*%W,i64 8
%ac=bitcast i8*%ab to void(...)**
store void(...)*bitcast(void(i8*,i32)*@_SMLL1f_438 to void(...)*),void(...)**%ac,align 8
%ad=getelementptr inbounds i8,i8*%W,i64 16
%ae=bitcast i8*%ad to void(...)**
store void(...)*bitcast(i8*(i8*,i8*)*@_SMLL1f_732 to void(...)*),void(...)**%ae,align 8
%af=getelementptr inbounds i8,i8*%W,i64 24
%ag=bitcast i8*%af to i32*
store i32 -2147483647,i32*%ag,align 4
%ah=load i32*,i32**bitcast(i8**@_SMLZN7Control9checkTypeE to i32**),align 8
%ai=load i32,i32*%ah,align 4
%aj=icmp eq i32%ai,0
store i8*null,i8**%h,align 8
br i1%aj,label%al,label%ak
ak:
call fastcc void@_SMLL1f_438(i8*inreg%Z,i32 inreg 0)
br label%al
al:
%am=call i8*@sml_alloc(i32 inreg 44)#0
%an=getelementptr inbounds i8,i8*%am,i64 -4
%ao=bitcast i8*%an to i32*
store i32 1342177320,i32*%ao,align 4
store i8*%am,i8**%f,align 8
%ap=load i8*,i8**%b,align 8
store i8*null,i8**%b,align 8
%aq=bitcast i8*%am to i8**
store i8*%ap,i8**%aq,align 8
%ar=load i8*,i8**%c,align 8
store i8*null,i8**%c,align 8
%as=getelementptr inbounds i8,i8*%am,i64 8
%at=bitcast i8*%as to i8**
store i8*%ar,i8**%at,align 8
%au=load i8*,i8**%e,align 8
store i8*null,i8**%e,align 8
%av=getelementptr inbounds i8,i8*%am,i64 16
%aw=bitcast i8*%av to i8**
store i8*%au,i8**%aw,align 8
%ax=load i8*,i8**%g,align 8
store i8*null,i8**%g,align 8
%ay=getelementptr inbounds i8,i8*%am,i64 24
%az=bitcast i8*%ay to i8**
store i8*%ax,i8**%az,align 8
%aA=load i8*,i8**%d,align 8
%aB=getelementptr inbounds i8,i8*%am,i64 32
%aC=bitcast i8*%aB to i8**
store i8*%aA,i8**%aC,align 8
%aD=getelementptr inbounds i8,i8*%am,i64 40
%aE=bitcast i8*%aD to i32*
store i32 31,i32*%aE,align 4
%aF=call i8*@sml_alloc(i32 inreg 20)#0
%aG=getelementptr inbounds i8,i8*%aF,i64 -4
%aH=bitcast i8*%aG to i32*
store i32 1342177296,i32*%aH,align 4
store i8*%aF,i8**%b,align 8
%aI=getelementptr inbounds i8,i8*%aF,i64 4
%aJ=bitcast i8*%aI to i32*
store i32 0,i32*%aJ,align 1
%aK=bitcast i8*%aF to i32*
store i32 23,i32*%aK,align 4
%aL=load i8*,i8**%f,align 8
store i8*null,i8**%f,align 8
%aM=getelementptr inbounds i8,i8*%aF,i64 8
%aN=bitcast i8*%aM to i8**
store i8*%aL,i8**%aN,align 8
%aO=getelementptr inbounds i8,i8*%aF,i64 16
%aP=bitcast i8*%aO to i32*
store i32 2,i32*%aP,align 4
%aQ=call i8*@sml_alloc(i32 inreg 20)#0
%aR=getelementptr inbounds i8,i8*%aQ,i64 -4
%aS=bitcast i8*%aR to i32*
store i32 1342177296,i32*%aS,align 4
%aT=load i8*,i8**%b,align 8
%aU=bitcast i8*%aQ to i8**
store i8*%aT,i8**%aU,align 8
%aV=load i8*,i8**%d,align 8
%aW=getelementptr inbounds i8,i8*%aQ,i64 8
%aX=bitcast i8*%aW to i8**
store i8*%aV,i8**%aX,align 8
%aY=getelementptr inbounds i8,i8*%aQ,i64 16
%aZ=bitcast i8*%aY to i32*
store i32 3,i32*%aZ,align 4
ret i8*%aQ
}
define internal fastcc i8*@_SMLL4exps_441(i8*inreg%a)#4 gc"smlsharp"{
%b=bitcast i8*%a to i8**
%c=load i8*,i8**%b,align 8
ret i8*%c
}
define internal fastcc i8*@_SMLL3tys_443(i8*inreg%a)#4 gc"smlsharp"{
%b=getelementptr inbounds i8,i8*%a,i64 8
%c=bitcast i8*%b to i8**
%d=load i8*,i8**%c,align 8
ret i8*%d
}
define fastcc i8*@_SMLFN12TypedCalcCon8TPRECORDE(i8*inreg%a)#2 gc"smlsharp"{
l:
%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=load atomic i32,i32*@sml_check_flag unordered,align 4
%g=icmp eq i32%f,0
br i1%g,label%j,label%h
h:
call void@sml_check(i32 inreg%f)
%i=load i8*,i8**%b,align 8
br label%j
j:
%k=phi i8*[%i,%h],[%a,%l]
store i8*null,i8**%b,align 8
store i8*%k,i8**%c,align 8
%m=getelementptr inbounds i8,i8*%k,i64 8
%n=bitcast i8*%m to i8**
%o=load i8*,i8**%n,align 8
store i8*%o,i8**%d,align 8
%p=call fastcc i8*@_SMLFN11RecordLabel3Map3mapE(i32 inreg 1,i32 inreg 8,i32 inreg 1,i32 inreg 8)
%q=getelementptr inbounds i8,i8*%p,i64 16
%r=bitcast i8*%q to i8*(i8*,i8*)**
%s=load i8*(i8*,i8*)*,i8*(i8*,i8*)**%r,align 8
%t=bitcast i8*%p to i8**
%u=load i8*,i8**%t,align 8
%v=call fastcc i8*%s(i8*inreg%u,i8*inreg bitcast(i8**getelementptr inbounds(<{[4x i8],i32,i8*,void(...)*,void(...)*,i32}>,<{[4x i8],i32,i8*,void(...)*,void(...)*,i32}>*@aH,i64 0,i32 2)to i8*))
%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**
%A=load i8*,i8**%z,align 8
%B=bitcast i8**%c to i8***
%C=load i8**,i8***%B,align 8
%D=load i8*,i8**%C,align 8
%E=call fastcc i8*%y(i8*inreg%A,i8*inreg%D)
store i8*%E,i8**%b,align 8
%F=call fastcc i8*@_SMLFN11RecordLabel3Map3mapE(i32 inreg 1,i32 inreg 8,i32 inreg 1,i32 inreg 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
%L=call fastcc i8*%I(i8*inreg%K,i8*inreg bitcast(i8**getelementptr inbounds(<{[4x i8],i32,i8*,void(...)*,void(...)*,i32}>,<{[4x i8],i32,i8*,void(...)*,void(...)*,i32}>*@aI,i64 0,i32 2)to i8*))
%M=getelementptr inbounds i8,i8*%L,i64 16
%N=bitcast i8*%M to i8*(i8*,i8*)**
%O=load i8*(i8*,i8*)*,i8*(i8*,i8*)**%N,align 8
%P=bitcast i8*%L to i8**
%Q=load i8*,i8**%P,align 8
%R=load i8**,i8***%B,align 8
store i8*null,i8**%c,align 8
%S=load i8*,i8**%R,align 8
%T=call fastcc i8*%O(i8*inreg%Q,i8*inreg%S)
store i8*%T,i8**%c,align 8
%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
store i8*%U,i8**%e,align 8
%X=load i8*,i8**%b,align 8
store i8*null,i8**%b,align 8
%Y=bitcast i8*%U to i8**
store i8*%X,i8**%Y,align 8
%Z=load i8*,i8**%d,align 8
store i8*null,i8**%d,align 8
%aa=getelementptr inbounds i8,i8*%U,i64 8
%ab=bitcast i8*%aa to i8**
store i8*%Z,i8**%ab,align 8
%ac=load i8*,i8**%c,align 8
%ad=getelementptr inbounds i8,i8*%U,i64 16
%ae=bitcast i8*%ad to i8**
store i8*%ac,i8**%ae,align 8
%af=getelementptr inbounds i8,i8*%U,i64 24
%ag=bitcast i8*%af to i32*
store i32 7,i32*%ag,align 4
%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
store i8*%ah,i8**%b,align 8
%ak=getelementptr inbounds i8,i8*%ah,i64 4
%al=bitcast i8*%ak to i32*
store i32 0,i32*%al,align 1
%am=bitcast i8*%ah to i32*
store i32 33,i32*%am,align 4
%an=load i8*,i8**%e,align 8
store i8*null,i8**%e,align 8
%ao=getelementptr inbounds i8,i8*%ah,i64 8
%ap=bitcast i8*%ao to i8**
store i8*%an,i8**%ap,align 8
%aq=getelementptr inbounds i8,i8*%ah,i64 16
%ar=bitcast i8*%aq to i32*
store i32 2,i32*%ar,align 4
%as=call i8*@sml_alloc(i32 inreg 20)#0
%at=getelementptr inbounds i8,i8*%as,i64 -4
%au=bitcast i8*%at to i32*
store i32 1342177296,i32*%au,align 4
store i8*%as,i8**%d,align 8
%av=getelementptr inbounds i8,i8*%as,i64 4
%aw=bitcast i8*%av to i32*
store i32 0,i32*%aw,align 1
%ax=bitcast i8*%as to i32*
store i32 8,i32*%ax,align 4
%ay=load i8*,i8**%c,align 8
store i8*null,i8**%c,align 8
%az=getelementptr inbounds i8,i8*%as,i64 8
%aA=bitcast i8*%az to i8**
store i8*%ay,i8**%aA,align 8
%aB=getelementptr inbounds i8,i8*%as,i64 16
%aC=bitcast i8*%aB to i32*
store i32 2,i32*%aC,align 4
%aD=call i8*@sml_alloc(i32 inreg 20)#0
%aE=getelementptr inbounds i8,i8*%aD,i64 -4
%aF=bitcast i8*%aE to i32*
store i32 1342177296,i32*%aF,align 4
%aG=load i8*,i8**%b,align 8
%aH=bitcast i8*%aD to i8**
store i8*%aG,i8**%aH,align 8
%aI=load i8*,i8**%d,align 8
%aJ=getelementptr inbounds i8,i8*%aD,i64 8
%aK=bitcast i8*%aJ to i8**
store i8*%aI,i8**%aK,align 8
%aL=getelementptr inbounds i8,i8*%aD,i64 16
%aM=bitcast i8*%aL to i32*
store i32 3,i32*%aM,align 4
ret i8*%aD
}
define internal fastcc i8*@_SMLLN12TypedCalcCon8selectTyE_451(i8*inreg%a,i8*inreg%b)#2 gc"smlsharp"{
l:
%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%j,label%h
h:
call void@sml_check(i32 inreg%f)
%i=load i8*,i8**%c,align 8
br label%j
j:
%k=phi i8*[%i,%h],[%b,%l]
%m=bitcast i8*%k to i8**
%n=load i8*,i8**%m,align 8
store i8*%n,i8**%c,align 8
%o=getelementptr inbounds i8,i8*%k,i64 8
%p=bitcast i8*%o to i8**
%q=load i8*,i8**%p,align 8
%r=call fastcc i8*@_SMLFN11TypesBasics7derefTyE(i8*inreg%q)
%s=icmp eq i8*%r,null
br i1%s,label%a3,label%t
t:
%u=bitcast i8*%r to i32*
%v=load i32,i32*%u,align 4
switch i32%v,label%a3[
i32 3,label%aA
i32 1,label%D
i32 8,label%w
]
w:
%x=getelementptr inbounds i8,i8*%r,i64 8
%y=bitcast i8*%x to i8**
%z=load i8*,i8**%y,align 8
store i8*%z,i8**%d,align 8
%A=call i8*@sml_alloc(i32 inreg 12)#0
%B=getelementptr inbounds i8,i8*%A,i64 -4
%C=bitcast i8*%B to i32*
store i32 1342177288,i32*%C,align 4
br label%aW
D:
%E=bitcast i8**%d to i8***
%F=load i8**,i8***%E,align 8
%G=load i8*,i8**%F,align 8
%H=icmp eq i8*%G,null
br i1%H,label%a3,label%I
I:
%J=getelementptr inbounds i8,i8*%r,i64 4
%K=bitcast i8*%J to i32*
%L=load i32,i32*%K,align 4
%M=bitcast i8*%G to i8**
%N=load i8*,i8**%M,align 8
store i8*%N,i8**%d,align 8
%O=call fastcc i8*@_SMLFN14BoundTypeVarID3Map4findE(i32 inreg 1,i32 inreg 8)
%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**%e,align 8
%U=call i8*@sml_alloc(i32 inreg 20)#0
%V=getelementptr inbounds i8,i8*%U,i64 -4
%W=bitcast i8*%V to i32*
store i32 1342177296,i32*%W,align 4
%X=getelementptr inbounds i8,i8*%U,i64 12
%Y=bitcast i8*%X to i32*
store i32 0,i32*%Y,align 1
%Z=load i8*,i8**%d,align 8
store i8*null,i8**%d,align 8
%aa=bitcast i8*%U to i8**
store i8*%Z,i8**%aa,align 8
%ab=getelementptr inbounds i8,i8*%U,i64 8
%ac=bitcast i8*%ab to i32*
store i32%L,i32*%ac,align 4
%ad=getelementptr inbounds i8,i8*%U,i64 16
%ae=bitcast i8*%ad to i32*
store i32 1,i32*%ae,align 4
%af=load i8*,i8**%e,align 8
store i8*null,i8**%e,align 8
%ag=call fastcc i8*%R(i8*inreg%af,i8*inreg%U)
%ah=icmp eq i8*%ag,null
br i1%ah,label%a3,label%ai
ai:
%aj=bitcast i8*%ag to i8**
%ak=load i8*,i8**%aj,align 8
%al=getelementptr inbounds i8,i8*%ak,i64 16
%am=bitcast i8*%al to i8**
%an=load i8*,i8**%am,align 8
%ao=icmp eq i8*%an,null
br i1%ao,label%a3,label%ap
ap:
%aq=bitcast i8*%an to i32*
%ar=load i32,i32*%aq,align 4
%as=icmp eq i32%ar,2
br i1%as,label%at,label%a3
at:
%au=getelementptr inbounds i8,i8*%an,i64 8
%av=bitcast i8*%au to i8**
%aw=load i8*,i8**%av,align 8
store i8*%aw,i8**%d,align 8
%ax=call i8*@sml_alloc(i32 inreg 12)#0
%ay=getelementptr inbounds i8,i8*%ax,i64 -4
%az=bitcast i8*%ay to i32*
store i32 1342177288,i32*%az,align 4
br label%aW
aA:
%aB=getelementptr inbounds i8,i8*%r,i64 8
%aC=bitcast i8*%aB to i8**
%aD=load i8*,i8**%aC,align 8
%aE=getelementptr inbounds i8,i8*%aD,i64 8
%aF=bitcast i8*%aE to i8**
%aG=load i8*,i8**%aF,align 8
%aH=getelementptr inbounds i8,i8*%aG,i64 16
%aI=bitcast i8*%aH to i8**
%aJ=load i8*,i8**%aI,align 8
%aK=icmp eq i8*%aJ,null
br i1%aK,label%a3,label%aL
aL:
%aM=bitcast i8*%aJ to i32*
%aN=load i32,i32*%aM,align 4
%aO=icmp eq i32%aN,2
br i1%aO,label%aP,label%a3
aP:
%aQ=getelementptr inbounds i8,i8*%aJ,i64 8
%aR=bitcast i8*%aQ to i8**
%aS=load i8*,i8**%aR,align 8
store i8*%aS,i8**%d,align 8
%aT=call i8*@sml_alloc(i32 inreg 12)#0
%aU=getelementptr inbounds i8,i8*%aT,i64 -4
%aV=bitcast i8*%aU to i32*
store i32 1342177288,i32*%aV,align 4
br label%aW
aW:
%aX=phi i8*[%A,%w],[%aT,%aP],[%ax,%at]
%aY=load i8*,i8**%d,align 8
%aZ=bitcast i8*%aX to i8**
store i8*%aY,i8**%aZ,align 8
%a0=getelementptr inbounds i8,i8*%aX,i64 8
%a1=bitcast i8*%a0 to i32*
store i32 1,i32*%a1,align 4
%a2=icmp eq i8*%aX,null
br i1%a2,label%a3,label%bn
a3:
%a4=load i8*,i8**@_SMLZN3Bug3BugE,align 8
store i8*%a4,i8**%c,align 8
%a5=call i8*@sml_alloc(i32 inreg 28)#0
%a6=getelementptr inbounds i8,i8*%a5,i64 -4
%a7=bitcast i8*%a6 to i32*
store i32 1342177304,i32*%a7,align 4
store i8*%a5,i8**%d,align 8
%a8=load i8*,i8**%c,align 8
store i8*null,i8**%c,align 8
%a9=bitcast i8*%a5 to i8**
store i8*%a8,i8**%a9,align 8
%ba=getelementptr inbounds i8,i8*%a5,i64 8
%bb=bitcast i8*%ba to i8**
store i8*getelementptr inbounds(<{[4x i8],i32,[71x i8]}>,<{[4x i8],i32,[71x i8]}>*@aL,i64 0,i32 2,i64 0),i8**%bb,align 8
%bc=getelementptr inbounds i8,i8*%a5,i64 16
%bd=bitcast i8*%bc to i8**
store i8*getelementptr inbounds(<{[4x i8],i32,[9x i8]}>,<{[4x i8],i32,[9x i8]}>*@aM,i64 0,i32 2,i64 0),i8**%bd,align 8
%be=getelementptr inbounds i8,i8*%a5,i64 24
%bf=bitcast i8*%be to i32*
store i32 7,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**%d,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:
store i8*%aY,i8**%d,align 8
%bo=call fastcc i8*@_SMLFN11RecordLabel3Map4findE(i32 inreg 1,i32 inreg 8)
%bp=getelementptr inbounds i8,i8*%bo,i64 16
%bq=bitcast i8*%bp to i8*(i8*,i8*)**
%br=load i8*(i8*,i8*)*,i8*(i8*,i8*)**%bq,align 8
%bs=bitcast i8*%bo to i8**
%bt=load i8*,i8**%bs,align 8
store i8*%bt,i8**%e,align 8
%bu=call i8*@sml_alloc(i32 inreg 20)#0
%bv=getelementptr inbounds i8,i8*%bu,i64 -4
%bw=bitcast i8*%bv to i32*
store i32 1342177296,i32*%bw,align 4
%bx=load i8*,i8**%d,align 8
store i8*null,i8**%d,align 8
%by=bitcast i8*%bu to i8**
store i8*%bx,i8**%by,align 8
%bz=load i8*,i8**%c,align 8
store i8*null,i8**%c,align 8
%bA=getelementptr inbounds i8,i8*%bu,i64 8
%bB=bitcast i8*%bA to i8**
store i8*%bz,i8**%bB,align 8
%bC=getelementptr inbounds i8,i8*%bu,i64 16
%bD=bitcast i8*%bC to i32*
store i32 3,i32*%bD,align 4
%bE=load i8*,i8**%e,align 8
store i8*null,i8**%e,align 8
%bF=call fastcc i8*%br(i8*inreg%bE,i8*inreg%bu)
%bG=icmp eq i8*%bF,null
br i1%bG,label%bH,label%b1
bH:
%bI=load i8*,i8**@_SMLZN3Bug3BugE,align 8
store i8*%bI,i8**%c,align 8
%bJ=call i8*@sml_alloc(i32 inreg 28)#0
%bK=getelementptr inbounds i8,i8*%bJ,i64 -4
%bL=bitcast i8*%bK to i32*
store i32 1342177304,i32*%bL,align 4
store i8*%bJ,i8**%d,align 8
%bM=load i8*,i8**%c,align 8
store i8*null,i8**%c,align 8
%bN=bitcast i8*%bJ to i8**
store i8*%bM,i8**%bN,align 8
%bO=getelementptr inbounds i8,i8*%bJ,i64 8
%bP=bitcast i8*%bO to i8**
store i8*getelementptr inbounds(<{[4x i8],i32,[71x i8]}>,<{[4x i8],i32,[71x i8]}>*@aK,i64 0,i32 2,i64 0),i8**%bP,align 8
%bQ=getelementptr inbounds i8,i8*%bJ,i64 16
%bR=bitcast i8*%bQ to i8**
store i8*getelementptr inbounds(<{[4x i8],i32,[9x i8]}>,<{[4x i8],i32,[9x i8]}>*@aM,i64 0,i32 2,i64 0),i8**%bR,align 8
%bS=getelementptr inbounds i8,i8*%bJ,i64 24
%bT=bitcast i8*%bS to i32*
store i32 7,i32*%bT,align 4
%bU=call i8*@sml_alloc(i32 inreg 60)#0
%bV=getelementptr inbounds i8,i8*%bU,i64 -4
%bW=bitcast i8*%bV to i32*
store i32 1342177336,i32*%bW,align 4
%bX=getelementptr inbounds i8,i8*%bU,i64 56
%bY=bitcast i8*%bX to i32*
store i32 1,i32*%bY,align 4
%bZ=load i8*,i8**%d,align 8
%b0=bitcast i8*%bU to i8**
store i8*%bZ,i8**%b0,align 8
call void@sml_raise(i8*inreg%bU)#1
unreachable
b1:
%b2=bitcast i8*%bF to i8**
%b3=load i8*,i8**%b2,align 8
ret i8*%b3
}
define internal fastcc i8*@_SMLLN12TypedCalcCon8selectTyE_452(i8*inreg%a)unnamed_addr#4 gc"smlsharp"{
%b=alloca i8*,align 8
%c=alloca i8*,align 8
call void@llvm.gcroot(i8**%b,i8*null)#0
call void@llvm.gcroot(i8**%c,i8*null)#0
store i8*%a,i8**%b,align 8
%d=call i8*@sml_alloc(i32 inreg 12)#0
%e=getelementptr inbounds i8,i8*%d,i64 -4
%f=bitcast i8*%e to i32*
store i32 1342177288,i32*%f,align 4
store i8*%d,i8**%c,align 8
%g=load i8*,i8**%b,align 8
store i8*null,i8**%b,align 8
%h=bitcast i8*%d to i8**
store i8*%g,i8**%h,align 8
%i=getelementptr inbounds i8,i8*%d,i64 8
%j=bitcast i8*%i to i32*
store i32 1,i32*%j,align 4
%k=call i8*@sml_alloc(i32 inreg 28)#0
%l=getelementptr inbounds i8,i8*%k,i64 -4
%m=bitcast i8*%l to i32*
store i32 1342177304,i32*%m,align 4
%n=load i8*,i8**%c,align 8
%o=bitcast i8*%k to i8**
store i8*%n,i8**%o,align 8
%p=getelementptr inbounds i8,i8*%k,i64 8
%q=bitcast i8*%p to void(...)**
store void(...)*bitcast(i8*(i8*,i8*)*@_SMLLN12TypedCalcCon8selectTyE_451 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*)*@_SMLLN12TypedCalcCon8selectTyE_451 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*@_SMLLN12TypedCalcCon8TPSELECTE_454(i8*inreg%a,i8*inreg%b)#2 gc"smlsharp"{
%c=alloca i8*,align 8
%d=alloca i8*,align 8
%e=alloca i8*,align 8
%f=alloca i8*,align 8
%g=alloca i8*,align 8
%h=alloca i8*,align 8
call void@llvm.gcroot(i8**%c,i8*null)#0
call void@llvm.gcroot(i8**%d,i8*null)#0
call void@llvm.gcroot(i8**%e,i8*null)#0
call void@llvm.gcroot(i8**%f,i8*null)#0
call void@llvm.gcroot(i8**%g,i8*null)#0
call void@llvm.gcroot(i8**%h,i8*null)#0
store i8*%a,i8**%c,align 8
store i8*%b,i8**%d,align 8
%i=load atomic i32,i32*@sml_check_flag unordered,align 4
%j=icmp eq i32%i,0
br i1%j,label%k,label%m
k:
%l=bitcast i8*%a to i8**
br label%q
m:
call void@sml_check(i32 inreg%i)
%n=load i8*,i8**%d,align 8
%o=bitcast i8**%c to i8***
%p=load i8**,i8***%o,align 8
br label%q
q:
%r=phi i8**[%p,%m],[%l,%k]
%s=phi i8*[%n,%m],[%b,%k]
%t=bitcast i8*%s to i8**
%u=bitcast i8*%s to i8***
%v=load i8**,i8***%u,align 8
%w=load i8*,i8**%v,align 8
store i8*%w,i8**%d,align 8
%x=load i8*,i8**%t,align 8
%y=getelementptr inbounds i8,i8*%x,i64 8
%z=bitcast i8*%y to i8**
%A=load i8*,i8**%z,align 8
store i8*%A,i8**%e,align 8
%B=getelementptr inbounds i8,i8*%s,i64 8
%C=bitcast i8*%B to i8**
%D=load i8*,i8**%C,align 8
store i8*%D,i8**%f,align 8
%E=getelementptr inbounds i8,i8*%s,i64 16
%F=bitcast i8*%E to i8**
%G=load i8*,i8**%F,align 8
store i8*%G,i8**%g,align 8
store i8*null,i8**%c,align 8
%H=load i8*,i8**%r,align 8
%I=call fastcc i8*@_SMLLN12TypedCalcCon8selectTyE_452(i8*inreg%H)
%J=getelementptr inbounds i8,i8*%I,i64 16
%K=bitcast i8*%J to i8*(i8*,i8*)**
%L=load i8*(i8*,i8*)*,i8*(i8*,i8*)**%K,align 8
%M=bitcast i8*%I to i8**
%N=load i8*,i8**%M,align 8
store i8*%N,i8**%c,align 8
%O=call i8*@sml_alloc(i32 inreg 20)#0
%P=getelementptr inbounds i8,i8*%O,i64 -4
%Q=bitcast i8*%P to i32*
store i32 1342177296,i32*%Q,align 4
%R=load i8*,i8**%f,align 8
%S=bitcast i8*%O to i8**
store i8*%R,i8**%S,align 8
%T=load i8*,i8**%e,align 8
%U=getelementptr inbounds i8,i8*%O,i64 8
%V=bitcast i8*%U to i8**
store i8*%T,i8**%V,align 8
%W=getelementptr inbounds i8,i8*%O,i64 16
%X=bitcast i8*%W to i32*
store i32 3,i32*%X,align 4
%Y=load i8*,i8**%c,align 8
store i8*null,i8**%c,align 8
%Z=call fastcc i8*%L(i8*inreg%Y,i8*inreg%O)
store i8*%Z,i8**%c,align 8
%aa=call i8*@sml_alloc(i32 inreg 44)#0
%ab=getelementptr inbounds i8,i8*%aa,i64 -4
%ac=bitcast i8*%ab to i32*
store i32 1342177320,i32*%ac,align 4
store i8*%aa,i8**%h,align 8
%ad=load i8*,i8**%d,align 8
store i8*null,i8**%d,align 8
%ae=bitcast i8*%aa to i8**
store i8*%ad,i8**%ae,align 8
%af=load i8*,i8**%e,align 8
store i8*null,i8**%e,align 8
%ag=getelementptr inbounds i8,i8*%aa,i64 8
%ah=bitcast i8*%ag to i8**
store i8*%af,i8**%ah,align 8
%ai=load i8*,i8**%f,align 8
store i8*null,i8**%f,align 8
%aj=getelementptr inbounds i8,i8*%aa,i64 16
%ak=bitcast i8*%aj to i8**
store i8*%ai,i8**%ak,align 8
%al=load i8*,i8**%g,align 8
store i8*null,i8**%g,align 8
%am=getelementptr inbounds i8,i8*%aa,i64 24
%an=bitcast i8*%am to i8**
store i8*%al,i8**%an,align 8
%ao=load i8*,i8**%c,align 8
%ap=getelementptr inbounds i8,i8*%aa,i64 32
%aq=bitcast i8*%ap to i8**
store i8*%ao,i8**%aq,align 8
%ar=getelementptr inbounds i8,i8*%aa,i64 40
%as=bitcast i8*%ar to i32*
store i32 31,i32*%as,align 4
%at=call i8*@sml_alloc(i32 inreg 20)#0
%au=getelementptr inbounds i8,i8*%at,i64 -4
%av=bitcast i8*%au to i32*
store i32 1342177296,i32*%av,align 4
store i8*%at,i8**%d,align 8
%aw=getelementptr inbounds i8,i8*%at,i64 4
%ax=bitcast i8*%aw to i32*
store i32 0,i32*%ax,align 1
%ay=bitcast i8*%at to i32*
store i32 35,i32*%ay,align 4
%az=load i8*,i8**%h,align 8
store i8*null,i8**%h,align 8
%aA=getelementptr inbounds i8,i8*%at,i64 8
%aB=bitcast i8*%aA to i8**
store i8*%az,i8**%aB,align 8
%aC=getelementptr inbounds i8,i8*%at,i64 16
%aD=bitcast i8*%aC to i32*
store i32 2,i32*%aD,align 4
%aE=call i8*@sml_alloc(i32 inreg 20)#0
%aF=getelementptr inbounds i8,i8*%aE,i64 -4
%aG=bitcast i8*%aF to i32*
store i32 1342177296,i32*%aG,align 4
%aH=load i8*,i8**%d,align 8
%aI=bitcast i8*%aE to i8**
store i8*%aH,i8**%aI,align 8
%aJ=load i8*,i8**%c,align 8
%aK=getelementptr inbounds i8,i8*%aE,i64 8
%aL=bitcast i8*%aK to i8**
store i8*%aJ,i8**%aL,align 8
%aM=getelementptr inbounds i8,i8*%aE,i64 16
%aN=bitcast i8*%aM to i32*
store i32 3,i32*%aN,align 4
ret i8*%aE
}
define fastcc i8*@_SMLFN12TypedCalcCon8TPSELECTE(i8*inreg%a)#4 gc"smlsharp"{
%b=alloca i8*,align 8
%c=alloca i8*,align 8
call void@llvm.gcroot(i8**%b,i8*null)#0
call void@llvm.gcroot(i8**%c,i8*null)#0
store i8*%a,i8**%b,align 8
%d=call i8*@sml_alloc(i32 inreg 12)#0
%e=getelementptr inbounds i8,i8*%d,i64 -4
%f=bitcast i8*%e to i32*
store i32 1342177288,i32*%f,align 4
store i8*%d,i8**%c,align 8
%g=load i8*,i8**%b,align 8
store i8*null,i8**%b,align 8
%h=bitcast i8*%d to i8**
store i8*%g,i8**%h,align 8
%i=getelementptr inbounds i8,i8*%d,i64 8
%j=bitcast i8*%i to i32*
store i32 1,i32*%j,align 4
%k=call i8*@sml_alloc(i32 inreg 28)#0
%l=getelementptr inbounds i8,i8*%k,i64 -4
%m=bitcast i8*%l to i32*
store i32 1342177304,i32*%m,align 4
%n=load i8*,i8**%c,align 8
%o=bitcast i8*%k to i8**
store i8*%n,i8**%o,align 8
%p=getelementptr inbounds i8,i8*%k,i64 8
%q=bitcast i8*%p to void(...)**
store void(...)*bitcast(i8*(i8*,i8*)*@_SMLLN12TypedCalcCon8TPSELECTE_454 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*)*@_SMLLN12TypedCalcCon8TPSELECTE_454 to void(...)*),void(...)**%s,align 8
%t=getelementptr inbounds i8,i8*%k,i64 24
%u=bitcast i8*%t to i32*
store i32 -2147483647,i32*%u,align 4
ret i8*%k
}
define internal fastcc void@_SMLL1f_458(i8*inreg%a,i32 inreg%b)#2 gc"smlsharp"{
%c=alloca i8*,align 8
%d=alloca i8*,align 8
%e=alloca i8*,align 8
%f=alloca i8*,align 8
%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**%d,align 8
%h=load atomic i32,i32*@sml_check_flag unordered,align 4
%i=icmp eq i32%h,0
br i1%i,label%k,label%j
j:
call void@sml_check(i32 inreg%h)
br label%k
k:
%l=call fastcc i8*@_SMLLN12TypedCalcCon4eqTyE_287(i8*inreg getelementptr inbounds(<{[4x i8],i32,[9x i8]}>,<{[4x i8],i32,[9x i8]}>*@aO,i64 0,i32 2,i64 0))
%m=getelementptr inbounds i8,i8*%l,i64 16
%n=bitcast i8*%m to i8*(i8*,i8*)**
%o=load i8*(i8*,i8*)*,i8*(i8*,i8*)**%n,align 8
%p=bitcast i8*%l to i8**
%q=load i8*,i8**%p,align 8
%r=load i8*,i8**%d,align 8
%s=getelementptr inbounds i8,i8*%r,i64 24
%t=bitcast i8*%s to i8**
%u=load i8*,i8**%t,align 8
%v=call fastcc i8*%o(i8*inreg%q,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**
%A=load i8*,i8**%z,align 8
store i8*%A,i8**%g,align 8
%B=bitcast i8**%d to i8***
%C=load i8**,i8***%B,align 8
%D=load i8*,i8**%C,align 8
%E=call fastcc i8*@_SMLLN12TypedCalcCon8selectTyE_452(i8*inreg%D)
%F=getelementptr inbounds i8,i8*%E,i64 16
%G=bitcast i8*%F to i8*(i8*,i8*)**
%H=load i8*(i8*,i8*)*,i8*(i8*,i8*)**%G,align 8
%I=bitcast i8*%E to i8**
%J=load i8*,i8**%I,align 8
store i8*%J,i8**%f,align 8
%K=load i8*,i8**%d,align 8
%L=getelementptr inbounds i8,i8*%K,i64 16
%M=bitcast i8*%L to i8**
%N=load i8*,i8**%M,align 8
store i8*%N,i8**%c,align 8
%O=getelementptr inbounds i8,i8*%K,i64 32
%P=bitcast i8*%O to i8**
%Q=load i8*,i8**%P,align 8
store i8*%Q,i8**%e,align 8
%R=call i8*@sml_alloc(i32 inreg 20)#0
%S=getelementptr inbounds i8,i8*%R,i64 -4
%T=bitcast i8*%S to i32*
store i32 1342177296,i32*%T,align 4
%U=load i8*,i8**%c,align 8
store i8*null,i8**%c,align 8
%V=bitcast i8*%R to i8**
store i8*%U,i8**%V,align 8
%W=load i8*,i8**%e,align 8
store i8*null,i8**%e,align 8
%X=getelementptr inbounds i8,i8*%R,i64 8
%Y=bitcast i8*%X to i8**
store i8*%W,i8**%Y,align 8
%Z=getelementptr inbounds i8,i8*%R,i64 16
%aa=bitcast i8*%Z to i32*
store i32 3,i32*%aa,align 4
%ab=load i8*,i8**%f,align 8
store i8*null,i8**%f,align 8
%ac=call fastcc i8*%H(i8*inreg%ab,i8*inreg%R)
store i8*%ac,i8**%c,align 8
%ad=load i8*,i8**%d,align 8
store i8*null,i8**%d,align 8
%ae=getelementptr inbounds i8,i8*%ad,i64 8
%af=bitcast i8*%ae to i8**
%ag=load i8*,i8**%af,align 8
store i8*%ag,i8**%e,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
store i8*%ah,i8**%d,align 8
%ak=load i8*,i8**%e,align 8
store i8*null,i8**%e,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
%an=getelementptr inbounds i8,i8*%ah,i64 8
%ao=bitcast i8*%an to i8**
store i8*%am,i8**%ao,align 8
%ap=getelementptr inbounds i8,i8*%ah,i64 16
%aq=bitcast i8*%ap to i32*
store i32 3,i32*%aq,align 4
%ar=call i8*@sml_alloc(i32 inreg 20)#0
%as=getelementptr inbounds i8,i8*%ar,i64 -4
%at=bitcast i8*%as to i32*
store i32 1342177296,i32*%at,align 4
%au=load i8*,i8**%d,align 8
%av=bitcast i8*%ar to i8**
store i8*%au,i8**%av,align 8
%aw=getelementptr inbounds i8,i8*%ar,i64 8
%ax=bitcast i8*%aw to i8**
store i8*null,i8**%ax,align 8
%ay=getelementptr inbounds i8,i8*%ar,i64 16
%az=bitcast i8*%ay to i32*
store i32 3,i32*%az,align 4
store i8*%au,i8**%c,align 8
store i8*null,i8**%d,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
%aD=load i8*,i8**%c,align 8
store i8*null,i8**%c,align 8
%aE=bitcast i8*%aA to i8**
store i8*%aD,i8**%aE,align 8
%aF=load i8*,i8**%d,align 8
store i8*null,i8**%d,align 8
%aG=getelementptr inbounds i8,i8*%aA,i64 8
%aH=bitcast i8*%aG to i8**
store i8*%aF,i8**%aH,align 8
%aI=getelementptr inbounds i8,i8*%aA,i64 16
%aJ=bitcast i8*%aI to i32*
store i32 3,i32*%aJ,align 4
%aK=load i8*,i8**%g,align 8
store i8*null,i8**%g,align 8
%aL=call fastcc i8*%y(i8*inreg%aK,i8*inreg%aA)
ret void
}
define internal fastcc i8*@_SMLLN12TypedCalcCon8TPMODIFYE_459(i8*inreg%a,i8*inreg%b)#2 gc"smlsharp"{
%c=alloca i8*,align 8
%d=alloca i8*,align 8
%e=alloca i8*,align 8
%f=alloca i8*,align 8
%g=alloca i8*,align 8
%h=alloca i8*,align 8
%i=alloca i8*,align 8
%j=alloca i8*,align 8
call void@llvm.gcroot(i8**%c,i8*null)#0
call void@llvm.gcroot(i8**%d,i8*null)#0
call void@llvm.gcroot(i8**%e,i8*null)#0
call void@llvm.gcroot(i8**%f,i8*null)#0
call void@llvm.gcroot(i8**%g,i8*null)#0
call void@llvm.gcroot(i8**%h,i8*null)#0
call void@llvm.gcroot(i8**%i,i8*null)#0
call void@llvm.gcroot(i8**%j,i8*null)#0
store i8*%a,i8**%i,align 8
store i8*%b,i8**%c,align 8
%k=load atomic i32,i32*@sml_check_flag unordered,align 4
%l=icmp eq i32%k,0
br i1%l,label%m,label%o
m:
%n=bitcast i8*%a to i8**
br label%s
o:
call void@sml_check(i32 inreg%k)
%p=load i8*,i8**%c,align 8
%q=bitcast i8**%i to i8***
%r=load i8**,i8***%q,align 8
br label%s
s:
%t=phi i8**[%r,%o],[%n,%m]
%u=phi i8*[%p,%o],[%b,%m]
%v=bitcast i8*%u to i8**
%w=bitcast i8*%u to i8***
%x=load i8**,i8***%w,align 8
%y=load i8*,i8**%x,align 8
store i8*%y,i8**%c,align 8
%z=load i8*,i8**%v,align 8
%A=getelementptr inbounds i8,i8*%z,i64 8
%B=bitcast i8*%A to i8**
%C=load i8*,i8**%B,align 8
store i8*%C,i8**%d,align 8
%D=getelementptr inbounds i8,i8*%u,i64 8
%E=bitcast i8*%D to i8**
%F=load i8*,i8**%E,align 8
store i8*%F,i8**%e,align 8
%G=getelementptr inbounds i8,i8*%u,i64 16
%H=bitcast i8*%G to i8**
%I=load i8*,i8**%H,align 8
store i8*%I,i8**%f,align 8
%J=getelementptr inbounds i8,i8*%u,i64 24
%K=bitcast i8*%J to i8***
%L=load i8**,i8***%K,align 8
%M=load i8*,i8**%L,align 8
store i8*%M,i8**%g,align 8
%N=getelementptr inbounds i8*,i8**%L,i64 1
%O=load i8*,i8**%N,align 8
store i8*%O,i8**%h,align 8
%P=load i8*,i8**%t,align 8
store i8*%P,i8**%i,align 8
%Q=call i8*@sml_alloc(i32 inreg 44)#0
%R=getelementptr inbounds i8,i8*%Q,i64 -4
%S=bitcast i8*%R to i32*
store i32 1342177320,i32*%S,align 4
store i8*%Q,i8**%j,align 8
%T=load i8*,i8**%i,align 8
store i8*null,i8**%i,align 8
%U=bitcast i8*%Q to i8**
store i8*%T,i8**%U,align 8
%V=load i8*,i8**%d,align 8
%W=getelementptr inbounds i8,i8*%Q,i64 8
%X=bitcast i8*%W to i8**
store i8*%V,i8**%X,align 8
%Y=load i8*,i8**%e,align 8
%Z=getelementptr inbounds i8,i8*%Q,i64 16
%aa=bitcast i8*%Z to i8**
store i8*%Y,i8**%aa,align 8
%ab=load i8*,i8**%f,align 8
%ac=getelementptr inbounds i8,i8*%Q,i64 24
%ad=bitcast i8*%ac to i8**
store i8*%ab,i8**%ad,align 8
%ae=load i8*,i8**%h,align 8
%af=getelementptr inbounds i8,i8*%Q,i64 32
%ag=bitcast i8*%af to i8**
store i8*%ae,i8**%ag,align 8
%ah=getelementptr inbounds i8,i8*%Q,i64 40
%ai=bitcast i8*%ah to i32*
store i32 31,i32*%ai,align 4
%aj=call i8*@sml_alloc(i32 inreg 28)#0
%ak=getelementptr inbounds i8,i8*%aj,i64 -4
%al=bitcast i8*%ak to i32*
store i32 1342177304,i32*%al,align 4
%am=load i8*,i8**%j,align 8
%an=bitcast i8*%aj to i8**
store i8*%am,i8**%an,align 8
%ao=getelementptr inbounds i8,i8*%aj,i64 8
%ap=bitcast i8*%ao to void(...)**
store void(...)*bitcast(void(i8*,i32)*@_SMLL1f_458 to void(...)*),void(...)**%ap,align 8
%aq=getelementptr inbounds i8,i8*%aj,i64 16
%ar=bitcast i8*%aq to void(...)**
store void(...)*bitcast(i8*(i8*,i8*)*@_SMLL1f_739 to void(...)*),void(...)**%ar,align 8
%as=getelementptr inbounds i8,i8*%aj,i64 24
%at=bitcast i8*%as to i32*
store i32 -2147483647,i32*%at,align 4
%au=load i32*,i32**bitcast(i8**@_SMLZN7Control9checkTypeE to i32**),align 8
%av=load i32,i32*%au,align 4
%aw=icmp eq i32%av,0
store i8*null,i8**%j,align 8
br i1%aw,label%ay,label%ax
ax:
call fastcc void@_SMLL1f_458(i8*inreg%am,i32 inreg 0)
br label%ay
ay:
%az=call i8*@sml_alloc(i32 inreg 52)#0
%aA=getelementptr inbounds i8,i8*%az,i64 -4
%aB=bitcast i8*%aA to i32*
store i32 1342177328,i32*%aB,align 4
store i8*%az,i8**%i,align 8
%aC=load i8*,i8**%c,align 8
store i8*null,i8**%c,align 8
%aD=bitcast i8*%az to i8**
store i8*%aC,i8**%aD,align 8
%aE=load i8*,i8**%d,align 8
store i8*null,i8**%d,align 8
%aF=getelementptr inbounds i8,i8*%az,i64 8
%aG=bitcast i8*%aF to i8**
store i8*%aE,i8**%aG,align 8
%aH=load i8*,i8**%e,align 8
store i8*null,i8**%e,align 8
%aI=getelementptr inbounds i8,i8*%az,i64 16
%aJ=bitcast i8*%aI to i8**
store i8*%aH,i8**%aJ,align 8
%aK=load i8*,i8**%f,align 8
store i8*null,i8**%f,align 8
%aL=getelementptr inbounds i8,i8*%az,i64 24
%aM=bitcast i8*%aL to i8**
store i8*%aK,i8**%aM,align 8
%aN=load i8*,i8**%g,align 8
store i8*null,i8**%g,align 8
%aO=getelementptr inbounds i8,i8*%az,i64 32
%aP=bitcast i8*%aO to i8**
store i8*%aN,i8**%aP,align 8
%aQ=load i8*,i8**%h,align 8
%aR=getelementptr inbounds i8,i8*%az,i64 40
%aS=bitcast i8*%aR to i8**
store i8*%aQ,i8**%aS,align 8
%aT=getelementptr inbounds i8,i8*%az,i64 48
%aU=bitcast i8*%aT to i32*
store i32 63,i32*%aU,align 4
%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
store i8*%aV,i8**%c,align 8
%aY=getelementptr inbounds i8,i8*%aV,i64 4
%aZ=bitcast i8*%aY to i32*
store i32 0,i32*%aZ,align 1
%a0=bitcast i8*%aV to i32*
store i32 26,i32*%a0,align 4
%a1=load i8*,i8**%i,align 8
store i8*null,i8**%i,align 8
%a2=getelementptr inbounds i8,i8*%aV,i64 8
%a3=bitcast i8*%a2 to i8**
store i8*%a1,i8**%a3,align 8
%a4=getelementptr inbounds i8,i8*%aV,i64 16
%a5=bitcast i8*%a4 to i32*
store i32 2,i32*%a5,align 4
%a6=call i8*@sml_alloc(i32 inreg 20)#0
%a7=getelementptr inbounds i8,i8*%a6,i64 -4
%a8=bitcast i8*%a7 to i32*
store i32 1342177296,i32*%a8,align 4
%a9=load i8*,i8**%c,align 8
%ba=bitcast i8*%a6 to i8**
store i8*%a9,i8**%ba,align 8
%bb=load i8*,i8**%h,align 8
%bc=getelementptr inbounds i8,i8*%a6,i64 8
%bd=bitcast i8*%bc to i8**
store i8*%bb,i8**%bd,align 8
%be=getelementptr inbounds i8,i8*%a6,i64 16
%bf=bitcast i8*%be to i32*
store i32 3,i32*%bf,align 4
ret i8*%a6
}
define fastcc i8*@_SMLFN12TypedCalcCon8TPMODIFYE(i8*inreg%a)#4 gc"smlsharp"{
%b=alloca i8*,align 8
%c=alloca i8*,align 8
call void@llvm.gcroot(i8**%b,i8*null)#0
call void@llvm.gcroot(i8**%c,i8*null)#0
store i8*%a,i8**%b,align 8
%d=call i8*@sml_alloc(i32 inreg 12)#0
%e=getelementptr inbounds i8,i8*%d,i64 -4
%f=bitcast i8*%e to i32*
store i32 1342177288,i32*%f,align 4
store i8*%d,i8**%c,align 8
%g=load i8*,i8**%b,align 8
store i8*null,i8**%b,align 8
%h=bitcast i8*%d to i8**
store i8*%g,i8**%h,align 8
%i=getelementptr inbounds i8,i8*%d,i64 8
%j=bitcast i8*%i to i32*
store i32 1,i32*%j,align 4
%k=call i8*@sml_alloc(i32 inreg 28)#0
%l=getelementptr inbounds i8,i8*%k,i64 -4
%m=bitcast i8*%l to i32*
store i32 1342177304,i32*%m,align 4
%n=load i8*,i8**%c,align 8
%o=bitcast i8*%k to i8**
store i8*%n,i8**%o,align 8
%p=getelementptr inbounds i8,i8*%k,i64 8
%q=bitcast i8*%p to void(...)**
store void(...)*bitcast(i8*(i8*,i8*)*@_SMLLN12TypedCalcCon8TPMODIFYE_459 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*)*@_SMLLN12TypedCalcCon8TPMODIFYE_459 to void(...)*),void(...)**%s,align 8
%t=getelementptr inbounds i8,i8*%k,i64 24
%u=bitcast i8*%t to i32*
store i32 -2147483647,i32*%u,align 4
ret i8*%k
}
define internal fastcc void@_SMLL1f_465(i8*inreg%a,i32 inreg%b)#2 gc"smlsharp"{
%c=alloca i8*,align 8
%d=alloca i8*,align 8
%e=alloca i8*,align 8
%f=alloca i8*,align 8
call void@llvm.gcroot(i8**%c,i8*null)#0
call void@llvm.gcroot(i8**%d,i8*null)#0
call void@llvm.gcroot(i8**%e,i8*null)#0
call void@llvm.gcroot(i8**%f,i8*null)#0
store i8*%a,i8**%c,align 8
%g=load atomic i32,i32*@sml_check_flag unordered,align 4
%h=icmp eq i32%g,0
br i1%h,label%j,label%i
i:
call void@sml_check(i32 inreg%g)
br label%j
j:
%k=call fastcc i8*@_SMLLN12TypedCalcCon4eqTyE_287(i8*inreg getelementptr inbounds(<{[4x i8],i32,[12x i8]}>,<{[4x i8],i32,[12x i8]}>*@aR,i64 0,i32 2,i64 0))
%l=getelementptr inbounds i8,i8*%k,i64 16
%m=bitcast i8*%l to i8*(i8*,i8*)**
%n=load i8*(i8*,i8*)*,i8*(i8*,i8*)**%m,align 8
%o=bitcast i8*%k to i8**
%p=load i8*,i8**%o,align 8
%q=load i8*,i8**%c,align 8
%r=getelementptr inbounds i8,i8*%q,i64 8
%s=bitcast i8*%r to i8**
%t=load i8*,i8**%s,align 8
%u=call fastcc i8*%n(i8*inreg%p,i8*inreg%t)
%v=getelementptr inbounds i8,i8*%u,i64 16
%w=bitcast i8*%v to i8*(i8*,i8*)**
%x=load i8*(i8*,i8*)*,i8*(i8*,i8*)**%w,align 8
%y=bitcast i8*%u to i8**
%z=load i8*,i8**%y,align 8
store i8*%z,i8**%f,align 8
%A=load i8*,i8**%c,align 8
%B=getelementptr inbounds i8,i8*%A,i64 16
%C=bitcast i8*%B to i8**
%D=load i8*,i8**%C,align 8
store i8*%D,i8**%d,align 8
%E=bitcast i8*%A to i8**
store i8*null,i8**%c,align 8
%F=load i8*,i8**%E,align 8
store i8*%F,i8**%e,align 8
%G=call i8*@sml_alloc(i32 inreg 20)#0
%H=getelementptr inbounds i8,i8*%G,i64 -4
%I=bitcast i8*%H to i32*
store i32 1342177296,i32*%I,align 4
store i8*%G,i8**%c,align 8
%J=load i8*,i8**%d,align 8
store i8*null,i8**%d,align 8
%K=bitcast i8*%G to i8**
store i8*%J,i8**%K,align 8
%L=load i8*,i8**%e,align 8
store i8*null,i8**%e,align 8
%M=getelementptr inbounds i8,i8*%G,i64 8
%N=bitcast i8*%M to i8**
store i8*%L,i8**%N,align 8
%O=getelementptr inbounds i8,i8*%G,i64 16
%P=bitcast i8*%O to i32*
store i32 3,i32*%P,align 4
%Q=call i8*@sml_alloc(i32 inreg 20)#0
%R=getelementptr inbounds i8,i8*%Q,i64 -4
%S=bitcast i8*%R to i32*
store i32 1342177296,i32*%S,align 4
%T=load i8*,i8**%c,align 8
store i8*null,i8**%c,align 8
%U=bitcast i8*%Q to i8**
store i8*%T,i8**%U,align 8
%V=getelementptr inbounds i8,i8*%Q,i64 8
%W=bitcast i8*%V to i8**
store i8*null,i8**%W,align 8
%X=getelementptr inbounds i8,i8*%Q,i64 16
%Y=bitcast i8*%X to i32*
store i32 3,i32*%Y,align 4
%Z=load i8*,i8**%f,align 8
store i8*null,i8**%f,align 8
%aa=call fastcc i8*%x(i8*inreg%Z,i8*inreg%Q)
ret void
}
define fastcc i8*@_SMLFN12TypedCalcCon11TPPRIMAPPLYE(i8*inreg%a)#2 gc"smlsharp"{
p:
%b=alloca i8*,align 8
%c=alloca i8*,align 8
%d=alloca i8*,align 8
%e=alloca i8*,align 8
%f=alloca i8*,align 8
%g=alloca i8*,align 8
%h=alloca i8*,align 8
%i=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
call void@llvm.gcroot(i8**%f,i8*null)#0
call void@llvm.gcroot(i8**%g,i8*null)#0
call void@llvm.gcroot(i8**%h,i8*null)#0
call void@llvm.gcroot(i8**%i,i8*null)#0
store i8*%a,i8**%b,align 8
%j=load atomic i32,i32*@sml_check_flag unordered,align 4
%k=icmp eq i32%j,0
br i1%k,label%n,label%l
l:
call void@sml_check(i32 inreg%j)
%m=load i8*,i8**%b,align 8
br label%n
n:
%o=phi i8*[%m,%l],[%a,%p]
%q=bitcast i8*%o to i8**
%r=bitcast i8*%o to i8***
%s=load i8**,i8***%r,align 8
%t=load i8*,i8**%s,align 8
store i8*%t,i8**%c,align 8
%u=load i8*,i8**%q,align 8
%v=getelementptr inbounds i8,i8*%u,i64 8
%w=bitcast i8*%v to i8**
%x=load i8*,i8**%w,align 8
store i8*%x,i8**%b,align 8
%y=getelementptr inbounds i8,i8*%o,i64 8
%z=bitcast i8*%y to i8**
%A=load i8*,i8**%z,align 8
store i8*%A,i8**%d,align 8
%B=getelementptr inbounds i8,i8*%o,i64 16
%C=bitcast i8*%B to i8**
%D=load i8*,i8**%C,align 8
store i8*%D,i8**%e,align 8
%E=getelementptr inbounds i8,i8*%o,i64 24
%F=bitcast i8*%E to i8**
%G=load i8*,i8**%F,align 8
store i8*%G,i8**%f,align 8
%H=getelementptr inbounds i8,i8*%G,i64 8
%I=bitcast i8*%H to i8**
%J=load i8*,i8**%I,align 8
store i8*%J,i8**%g,align 8
%K=call i8*@sml_alloc(i32 inreg 20)#0
%L=getelementptr inbounds i8,i8*%K,i64 -4
%M=bitcast i8*%L to i32*
store i32 1342177296,i32*%M,align 4
%N=load i8*,i8**%g,align 8
store i8*null,i8**%g,align 8
%O=bitcast i8*%K to i8**
store i8*%N,i8**%O,align 8
%P=load i8*,i8**%d,align 8
%Q=getelementptr inbounds i8,i8*%K,i64 8
%R=bitcast i8*%Q to i8**
store i8*%P,i8**%R,align 8
%S=getelementptr inbounds i8,i8*%K,i64 16
%T=bitcast i8*%S to i32*
store i32 3,i32*%T,align 4
%U=call fastcc i8*@_SMLLN12TypedCalcCon11instantiateE_245(i8*inreg%K)
%V=icmp eq i8*%U,null
br i1%V,label%aa,label%W
W:
%X=bitcast i8*%U to i32*
%Y=load i32,i32*%X,align 4
%Z=icmp eq i32%Y,6
br i1%Z,label%ab,label%aa
aa:
store i8*null,i8**%c,align 8
store i8*null,i8**%d,align 8
store i8*null,i8**%e,align 8
store i8*null,i8**%f,align 8
br label%bA
ab:
%ac=getelementptr inbounds i8,i8*%U,i64 8
%ad=bitcast i8*%ac to i8**
%ae=load i8*,i8**%ad,align 8
store i8*%ae,i8**%g,align 8
%af=bitcast i8*%ae to i8**
%ag=load i8*,i8**%af,align 8
%ah=icmp eq i8*%ag,null
br i1%ah,label%ai,label%aj
ai:
store i8*null,i8**%c,align 8
store i8*null,i8**%d,align 8
store i8*null,i8**%e,align 8
store i8*null,i8**%f,align 8
store i8*null,i8**%g,align 8
br label%bA
aj:
%ak=bitcast i8*%ag to i8**
%al=load i8*,i8**%ak,align 8
store i8*%al,i8**%h,align 8
%am=getelementptr inbounds i8,i8*%ag,i64 8
%an=bitcast i8*%am to i8**
%ao=load i8*,i8**%an,align 8
%ap=icmp eq i8*%ao,null
br i1%ap,label%aq,label%bz
aq:
%ar=call i8*@sml_alloc(i32 inreg 28)#0
%as=getelementptr inbounds i8,i8*%ar,i64 -4
%at=bitcast i8*%as to i32*
store i32 1342177304,i32*%at,align 4
store i8*%ar,i8**%i,align 8
%au=load i8*,i8**%b,align 8
store i8*null,i8**%b,align 8
%av=bitcast i8*%ar to i8**
store i8*%au,i8**%av,align 8
%aw=load i8*,i8**%e,align 8
%ax=getelementptr inbounds i8,i8*%ar,i64 8
%ay=bitcast i8*%ax to i8**
store i8*%aw,i8**%ay,align 8
%az=load i8*,i8**%h,align 8
store i8*null,i8**%h,align 8
%aA=getelementptr inbounds i8,i8*%ar,i64 16
%aB=bitcast i8*%aA to i8**
store i8*%az,i8**%aB,align 8
%aC=getelementptr inbounds i8,i8*%ar,i64 24
%aD=bitcast i8*%aC to i32*
store i32 7,i32*%aD,align 4
%aE=call i8*@sml_alloc(i32 inreg 28)#0
%aF=getelementptr inbounds i8,i8*%aE,i64 -4
%aG=bitcast i8*%aF to i32*
store i32 1342177304,i32*%aG,align 4
%aH=load i8*,i8**%i,align 8
%aI=bitcast i8*%aE to i8**
store i8*%aH,i8**%aI,align 8
%aJ=getelementptr inbounds i8,i8*%aE,i64 8
%aK=bitcast i8*%aJ to void(...)**
store void(...)*bitcast(void(i8*,i32)*@_SMLL1f_465 to void(...)*),void(...)**%aK,align 8
%aL=getelementptr inbounds i8,i8*%aE,i64 16
%aM=bitcast i8*%aL to void(...)**
store void(...)*bitcast(i8*(i8*,i8*)*@_SMLL1f_741 to void(...)*),void(...)**%aM,align 8
%aN=getelementptr inbounds i8,i8*%aE,i64 24
%aO=bitcast i8*%aN to i32*
store i32 -2147483647,i32*%aO,align 4
%aP=load i32*,i32**bitcast(i8**@_SMLZN7Control9checkTypeE to i32**),align 8
%aQ=load i32,i32*%aP,align 4
%aR=icmp eq i32%aQ,0
store i8*null,i8**%i,align 8
br i1%aR,label%aT,label%aS
aS:
call fastcc void@_SMLL1f_465(i8*inreg%aH,i32 inreg 0)
br label%aT
aT:
%aU=load i8*,i8**%g,align 8
store i8*null,i8**%g,align 8
%aV=getelementptr inbounds i8,i8*%aU,i64 8
%aW=bitcast i8*%aV to i8**
%aX=load i8*,i8**%aW,align 8
store i8*%aX,i8**%b,align 8
%aY=call i8*@sml_alloc(i32 inreg 36)#0
%aZ=getelementptr inbounds i8,i8*%aY,i64 -4
%a0=bitcast i8*%aZ to i32*
store i32 1342177312,i32*%a0,align 4
store i8*%aY,i8**%g,align 8
%a1=load i8*,i8**%c,align 8
store i8*null,i8**%c,align 8
%a2=bitcast i8*%aY to i8**
store i8*%a1,i8**%a2,align 8
%a3=load i8*,i8**%d,align 8
store i8*null,i8**%d,align 8
%a4=getelementptr inbounds i8,i8*%aY,i64 8
%a5=bitcast i8*%a4 to i8**
store i8*%a3,i8**%a5,align 8
%a6=load i8*,i8**%e,align 8
store i8*null,i8**%e,align 8
%a7=getelementptr inbounds i8,i8*%aY,i64 16
%a8=bitcast i8*%a7 to i8**
store i8*%a6,i8**%a8,align 8
%a9=load i8*,i8**%f,align 8
store i8*null,i8**%f,align 8
%ba=getelementptr inbounds i8,i8*%aY,i64 24
%bb=bitcast i8*%ba to i8**
store i8*%a9,i8**%bb,align 8
%bc=getelementptr inbounds i8,i8*%aY,i64 32
%bd=bitcast i8*%bc to i32*
store i32 15,i32*%bd,align 4
%be=call i8*@sml_alloc(i32 inreg 20)#0
%bf=getelementptr inbounds i8,i8*%be,i64 -4
%bg=bitcast i8*%bf to i32*
store i32 1342177296,i32*%bg,align 4
store i8*%be,i8**%c,align 8
%bh=getelementptr inbounds i8,i8*%be,i64 4
%bi=bitcast i8*%bh to i32*
store i32 0,i32*%bi,align 1
%bj=bitcast i8*%be to i32*
store i32 30,i32*%bj,align 4
%bk=load i8*,i8**%g,align 8
store i8*null,i8**%g,align 8
%bl=getelementptr inbounds i8,i8*%be,i64 8
%bm=bitcast i8*%bl to i8**
store i8*%bk,i8**%bm,align 8
%bn=getelementptr inbounds i8,i8*%be,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
%bs=load i8*,i8**%c,align 8
%bt=bitcast i8*%bp to i8**
store i8*%bs,i8**%bt,align 8
%bu=load i8*,i8**%b,align 8
%bv=getelementptr inbounds i8,i8*%bp,i64 8
%bw=bitcast i8*%bv to i8**
store i8*%bu,i8**%bw,align 8
%bx=getelementptr inbounds i8,i8*%bp,i64 16
%by=bitcast i8*%bx to i32*
store i32 3,i32*%by,align 4
ret i8*%bp
bz:
store i8*null,i8**%c,align 8
store i8*null,i8**%d,align 8
store i8*null,i8**%e,align 8
store i8*null,i8**%f,align 8
store i8*null,i8**%g,align 8
store i8*null,i8**%h,align 8
br label%bA
bA:
%bB=load i8*,i8**@_SMLZN3Bug3BugE,align 8
store i8*%bB,i8**%b,align 8
%bC=call i8*@sml_alloc(i32 inreg 28)#0
%bD=getelementptr inbounds i8,i8*%bC,i64 -4
%bE=bitcast i8*%bD to i32*
store i32 1342177304,i32*%bE,align 4
store i8*%bC,i8**%c,align 8
%bF=load i8*,i8**%b,align 8
store i8*null,i8**%b,align 8
%bG=bitcast i8*%bC to i8**
store i8*%bF,i8**%bG,align 8
%bH=getelementptr inbounds i8,i8*%bC,i64 8
%bI=bitcast i8*%bH to i8**
store i8*getelementptr inbounds(<{[4x i8],i32,[71x i8]}>,<{[4x i8],i32,[71x i8]}>*@aQ,i64 0,i32 2,i64 0),i8**%bI,align 8
%bJ=getelementptr inbounds i8,i8*%bC,i64 16
%bK=bitcast i8*%bJ to i8**
store i8*getelementptr inbounds(<{[4x i8],i32,[12x i8]}>,<{[4x i8],i32,[12x i8]}>*@aR,i64 0,i32 2,i64 0),i8**%bK,align 8
%bL=getelementptr inbounds i8,i8*%bC,i64 24
%bM=bitcast i8*%bL to i32*
store i32 7,i32*%bM,align 4
%bN=call i8*@sml_alloc(i32 inreg 60)#0
%bO=getelementptr inbounds i8,i8*%bN,i64 -4
%bP=bitcast i8*%bO to i32*
store i32 1342177336,i32*%bP,align 4
%bQ=getelementptr inbounds i8,i8*%bN,i64 56
%bR=bitcast i8*%bQ to i32*
store i32 1,i32*%bR,align 4
%bS=load i8*,i8**%c,align 8
%bT=bitcast i8*%bN to i8**
store i8*%bS,i8**%bT,align 8
call void@sml_raise(i8*inreg%bN)#1
unreachable
}
define internal fastcc void@_SMLL1f_471(i8*inreg%a,i32 inreg%b)#2 gc"smlsharp"{
%c=alloca i8*,align 8
%d=alloca i8*,align 8
%e=alloca i8*,align 8
%f=alloca i8*,align 8
call void@llvm.gcroot(i8**%c,i8*null)#0
call void@llvm.gcroot(i8**%d,i8*null)#0
call void@llvm.gcroot(i8**%e,i8*null)#0
call void@llvm.gcroot(i8**%f,i8*null)#0
store i8*%a,i8**%c,align 8
%g=load atomic i32,i32*@sml_check_flag unordered,align 4
%h=icmp eq i32%g,0
br i1%h,label%j,label%i
i:
call void@sml_check(i32 inreg%g)
br label%j
j:
%k=call fastcc i8*@_SMLLN12TypedCalcCon4eqTyE_287(i8*inreg getelementptr inbounds(<{[4x i8],i32,[13x i8]}>,<{[4x i8],i32,[13x i8]}>*@aU,i64 0,i32 2,i64 0))
%l=getelementptr inbounds i8,i8*%k,i64 16
%m=bitcast i8*%l to i8*(i8*,i8*)**
%n=load i8*(i8*,i8*)*,i8*(i8*,i8*)**%m,align 8
%o=bitcast i8*%k to i8**
%p=load i8*,i8**%o,align 8
%q=load i8*,i8**%c,align 8
%r=getelementptr inbounds i8,i8*%q,i64 8
%s=bitcast i8*%r to i8**
%t=load i8*,i8**%s,align 8
%u=call fastcc i8*%n(i8*inreg%p,i8*inreg%t)
%v=getelementptr inbounds i8,i8*%u,i64 16
%w=bitcast i8*%v to i8*(i8*,i8*)**
%x=load i8*(i8*,i8*)*,i8*(i8*,i8*)**%w,align 8
%y=bitcast i8*%u to i8**
%z=load i8*,i8**%y,align 8
store i8*%z,i8**%f,align 8
%A=load i8*,i8**%c,align 8
%B=getelementptr inbounds i8,i8*%A,i64 16
%C=bitcast i8*%B to i8**
%D=load i8*,i8**%C,align 8
store i8*%D,i8**%d,align 8
%E=bitcast i8*%A to i8**
store i8*null,i8**%c,align 8
%F=load i8*,i8**%E,align 8
store i8*%F,i8**%e,align 8
%G=call i8*@sml_alloc(i32 inreg 20)#0
%H=getelementptr inbounds i8,i8*%G,i64 -4
%I=bitcast i8*%H to i32*
store i32 1342177296,i32*%I,align 4
store i8*%G,i8**%c,align 8
%J=load i8*,i8**%d,align 8
store i8*null,i8**%d,align 8
%K=bitcast i8*%G to i8**
store i8*%J,i8**%K,align 8
%L=load i8*,i8**%e,align 8
store i8*null,i8**%e,align 8
%M=getelementptr inbounds i8,i8*%G,i64 8
%N=bitcast i8*%M to i8**
store i8*%L,i8**%N,align 8
%O=getelementptr inbounds i8,i8*%G,i64 16
%P=bitcast i8*%O to i32*
store i32 3,i32*%P,align 4
%Q=call i8*@sml_alloc(i32 inreg 20)#0
%R=getelementptr inbounds i8,i8*%Q,i64 -4
%S=bitcast i8*%R to i32*
store i32 1342177296,i32*%S,align 4
%T=load i8*,i8**%c,align 8
store i8*null,i8**%c,align 8
%U=bitcast i8*%Q to i8**
store i8*%T,i8**%U,align 8
%V=getelementptr inbounds i8,i8*%Q,i64 8
%W=bitcast i8*%V to i8**
store i8*null,i8**%W,align 8
%X=getelementptr inbounds i8,i8*%Q,i64 16
%Y=bitcast i8*%X to i32*
store i32 3,i32*%Y,align 4
%Z=load i8*,i8**%f,align 8
store i8*null,i8**%f,align 8
%aa=call fastcc i8*%x(i8*inreg%Z,i8*inreg%Q)
ret void
}
define fastcc i8*@_SMLFN12TypedCalcCon12TPOPRIMAPPLYE(i8*inreg%a)#2 gc"smlsharp"{
p:
%b=alloca i8*,align 8
%c=alloca i8*,align 8
%d=alloca i8*,align 8
%e=alloca i8*,align 8
%f=alloca i8*,align 8
%g=alloca i8*,align 8
%h=alloca i8*,align 8
%i=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
call void@llvm.gcroot(i8**%f,i8*null)#0
call void@llvm.gcroot(i8**%g,i8*null)#0
call void@llvm.gcroot(i8**%h,i8*null)#0
call void@llvm.gcroot(i8**%i,i8*null)#0
store i8*%a,i8**%b,align 8
%j=load atomic i32,i32*@sml_check_flag unordered,align 4
%k=icmp eq i32%j,0
br i1%k,label%n,label%l
l:
call void@sml_check(i32 inreg%j)
%m=load i8*,i8**%b,align 8
br label%n
n:
%o=phi i8*[%m,%l],[%a,%p]
%q=bitcast i8*%o to i8**
%r=bitcast i8*%o to i8***
%s=load i8**,i8***%r,align 8
%t=load i8*,i8**%s,align 8
store i8*%t,i8**%c,align 8
%u=load i8*,i8**%q,align 8
%v=getelementptr inbounds i8,i8*%u,i64 8
%w=bitcast i8*%v to i8**
%x=load i8*,i8**%w,align 8
store i8*%x,i8**%b,align 8
%y=getelementptr inbounds i8,i8*%o,i64 8
%z=bitcast i8*%y to i8**
%A=load i8*,i8**%z,align 8
store i8*%A,i8**%d,align 8
%B=getelementptr inbounds i8,i8*%o,i64 16
%C=bitcast i8*%B to i8**
%D=load i8*,i8**%C,align 8
store i8*%D,i8**%e,align 8
%E=getelementptr inbounds i8,i8*%o,i64 24
%F=bitcast i8*%E to i8**
%G=load i8*,i8**%F,align 8
store i8*%G,i8**%f,align 8
%H=getelementptr inbounds i8,i8*%G,i64 16
%I=bitcast i8*%H to i8**
%J=load i8*,i8**%I,align 8
store i8*%J,i8**%g,align 8
%K=call i8*@sml_alloc(i32 inreg 20)#0
%L=getelementptr inbounds i8,i8*%K,i64 -4
%M=bitcast i8*%L to i32*
store i32 1342177296,i32*%M,align 4
%N=load i8*,i8**%g,align 8
store i8*null,i8**%g,align 8
%O=bitcast i8*%K to i8**
store i8*%N,i8**%O,align 8
%P=load i8*,i8**%d,align 8
%Q=getelementptr inbounds i8,i8*%K,i64 8
%R=bitcast i8*%Q to i8**
store i8*%P,i8**%R,align 8
%S=getelementptr inbounds i8,i8*%K,i64 16
%T=bitcast i8*%S to i32*
store i32 3,i32*%T,align 4
%U=call fastcc i8*@_SMLFN11TypesBasics7tpappTyE(i8*inreg%K)
%V=icmp eq i8*%U,null
br i1%V,label%aa,label%W
W:
%X=bitcast i8*%U to i32*
%Y=load i32,i32*%X,align 4
%Z=icmp eq i32%Y,6
br i1%Z,label%ab,label%aa
aa:
store i8*null,i8**%c,align 8
store i8*null,i8**%d,align 8
store i8*null,i8**%e,align 8
store i8*null,i8**%f,align 8
br label%bA
ab:
%ac=getelementptr inbounds i8,i8*%U,i64 8
%ad=bitcast i8*%ac to i8**
%ae=load i8*,i8**%ad,align 8
store i8*%ae,i8**%g,align 8
%af=bitcast i8*%ae to i8**
%ag=load i8*,i8**%af,align 8
%ah=icmp eq i8*%ag,null
br i1%ah,label%ai,label%aj
ai:
store i8*null,i8**%c,align 8
store i8*null,i8**%d,align 8
store i8*null,i8**%e,align 8
store i8*null,i8**%f,align 8
store i8*null,i8**%g,align 8
br label%bA
aj:
%ak=bitcast i8*%ag to i8**
%al=load i8*,i8**%ak,align 8
store i8*%al,i8**%h,align 8
%am=getelementptr inbounds i8,i8*%ag,i64 8
%an=bitcast i8*%am to i8**
%ao=load i8*,i8**%an,align 8
%ap=icmp eq i8*%ao,null
br i1%ap,label%aq,label%bz
aq:
%ar=call i8*@sml_alloc(i32 inreg 28)#0
%as=getelementptr inbounds i8,i8*%ar,i64 -4
%at=bitcast i8*%as to i32*
store i32 1342177304,i32*%at,align 4
store i8*%ar,i8**%i,align 8
%au=load i8*,i8**%b,align 8
store i8*null,i8**%b,align 8
%av=bitcast i8*%ar to i8**
store i8*%au,i8**%av,align 8
%aw=load i8*,i8**%e,align 8
%ax=getelementptr inbounds i8,i8*%ar,i64 8
%ay=bitcast i8*%ax to i8**
store i8*%aw,i8**%ay,align 8
%az=load i8*,i8**%h,align 8
store i8*null,i8**%h,align 8
%aA=getelementptr inbounds i8,i8*%ar,i64 16
%aB=bitcast i8*%aA to i8**
store i8*%az,i8**%aB,align 8
%aC=getelementptr inbounds i8,i8*%ar,i64 24
%aD=bitcast i8*%aC to i32*
store i32 7,i32*%aD,align 4
%aE=call i8*@sml_alloc(i32 inreg 28)#0
%aF=getelementptr inbounds i8,i8*%aE,i64 -4
%aG=bitcast i8*%aF to i32*
store i32 1342177304,i32*%aG,align 4
%aH=load i8*,i8**%i,align 8
%aI=bitcast i8*%aE to i8**
store i8*%aH,i8**%aI,align 8
%aJ=getelementptr inbounds i8,i8*%aE,i64 8
%aK=bitcast i8*%aJ to void(...)**
store void(...)*bitcast(void(i8*,i32)*@_SMLL1f_471 to void(...)*),void(...)**%aK,align 8
%aL=getelementptr inbounds i8,i8*%aE,i64 16
%aM=bitcast i8*%aL to void(...)**
store void(...)*bitcast(i8*(i8*,i8*)*@_SMLL1f_743 to void(...)*),void(...)**%aM,align 8
%aN=getelementptr inbounds i8,i8*%aE,i64 24
%aO=bitcast i8*%aN to i32*
store i32 -2147483647,i32*%aO,align 4
%aP=load i32*,i32**bitcast(i8**@_SMLZN7Control9checkTypeE to i32**),align 8
%aQ=load i32,i32*%aP,align 4
%aR=icmp eq i32%aQ,0
store i8*null,i8**%i,align 8
br i1%aR,label%aT,label%aS
aS:
call fastcc void@_SMLL1f_471(i8*inreg%aH,i32 inreg 0)
br label%aT
aT:
%aU=load i8*,i8**%g,align 8
store i8*null,i8**%g,align 8
%aV=getelementptr inbounds i8,i8*%aU,i64 8
%aW=bitcast i8*%aV to i8**
%aX=load i8*,i8**%aW,align 8
store i8*%aX,i8**%b,align 8
%aY=call i8*@sml_alloc(i32 inreg 36)#0
%aZ=getelementptr inbounds i8,i8*%aY,i64 -4
%a0=bitcast i8*%aZ to i32*
store i32 1342177312,i32*%a0,align 4
store i8*%aY,i8**%g,align 8
%a1=load i8*,i8**%c,align 8
store i8*null,i8**%c,align 8
%a2=bitcast i8*%aY to i8**
store i8*%a1,i8**%a2,align 8
%a3=load i8*,i8**%d,align 8
store i8*null,i8**%d,align 8
%a4=getelementptr inbounds i8,i8*%aY,i64 8
%a5=bitcast i8*%a4 to i8**
store i8*%a3,i8**%a5,align 8
%a6=load i8*,i8**%e,align 8
store i8*null,i8**%e,align 8
%a7=getelementptr inbounds i8,i8*%aY,i64 16
%a8=bitcast i8*%a7 to i8**
store i8*%a6,i8**%a8,align 8
%a9=load i8*,i8**%f,align 8
store i8*null,i8**%f,align 8
%ba=getelementptr inbounds i8,i8*%aY,i64 24
%bb=bitcast i8*%ba to i8**
store i8*%a9,i8**%bb,align 8
%bc=getelementptr inbounds i8,i8*%aY,i64 32
%bd=bitcast i8*%bc to i32*
store i32 15,i32*%bd,align 4
%be=call i8*@sml_alloc(i32 inreg 20)#0
%bf=getelementptr inbounds i8,i8*%be,i64 -4
%bg=bitcast i8*%bf to i32*
store i32 1342177296,i32*%bg,align 4
store i8*%be,i8**%c,align 8
%bh=getelementptr inbounds i8,i8*%be,i64 4
%bi=bitcast i8*%bh to i32*
store i32 0,i32*%bi,align 1
%bj=bitcast i8*%be to i32*
store i32 28,i32*%bj,align 4
%bk=load i8*,i8**%g,align 8
store i8*null,i8**%g,align 8
%bl=getelementptr inbounds i8,i8*%be,i64 8
%bm=bitcast i8*%bl to i8**
store i8*%bk,i8**%bm,align 8
%bn=getelementptr inbounds i8,i8*%be,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
%bs=load i8*,i8**%c,align 8
%bt=bitcast i8*%bp to i8**
store i8*%bs,i8**%bt,align 8
%bu=load i8*,i8**%b,align 8
%bv=getelementptr inbounds i8,i8*%bp,i64 8
%bw=bitcast i8*%bv to i8**
store i8*%bu,i8**%bw,align 8
%bx=getelementptr inbounds i8,i8*%bp,i64 16
%by=bitcast i8*%bx to i32*
store i32 3,i32*%by,align 4
ret i8*%bp
bz:
store i8*null,i8**%c,align 8
store i8*null,i8**%d,align 8
store i8*null,i8**%e,align 8
store i8*null,i8**%f,align 8
store i8*null,i8**%g,align 8
store i8*null,i8**%h,align 8
br label%bA
bA:
%bB=load i8*,i8**@_SMLZN3Bug3BugE,align 8
store i8*%bB,i8**%b,align 8
%bC=call i8*@sml_alloc(i32 inreg 28)#0
%bD=getelementptr inbounds i8,i8*%bC,i64 -4
%bE=bitcast i8*%bD to i32*
store i32 1342177304,i32*%bE,align 4
store i8*%bC,i8**%c,align 8
%bF=load i8*,i8**%b,align 8
store i8*null,i8**%b,align 8
%bG=bitcast i8*%bC to i8**
store i8*%bF,i8**%bG,align 8
%bH=getelementptr inbounds i8,i8*%bC,i64 8
%bI=bitcast i8*%bH to i8**
store i8*getelementptr inbounds(<{[4x i8],i32,[71x i8]}>,<{[4x i8],i32,[71x i8]}>*@aT,i64 0,i32 2,i64 0),i8**%bI,align 8
%bJ=getelementptr inbounds i8,i8*%bC,i64 16
%bK=bitcast i8*%bJ to i8**
store i8*getelementptr inbounds(<{[4x i8],i32,[13x i8]}>,<{[4x i8],i32,[13x i8]}>*@aU,i64 0,i32 2,i64 0),i8**%bK,align 8
%bL=getelementptr inbounds i8,i8*%bC,i64 24
%bM=bitcast i8*%bL to i32*
store i32 7,i32*%bM,align 4
%bN=call i8*@sml_alloc(i32 inreg 60)#0
%bO=getelementptr inbounds i8,i8*%bN,i64 -4
%bP=bitcast i8*%bO to i32*
store i32 1342177336,i32*%bP,align 4
%bQ=getelementptr inbounds i8,i8*%bN,i64 56
%bR=bitcast i8*%bQ to i32*
store i32 1,i32*%bR,align 4
%bS=load i8*,i8**%c,align 8
%bT=bitcast i8*%bN to i8**
store i8*%bS,i8**%bT,align 8
call void@sml_raise(i8*inreg%bN)#1
unreachable
}
define fastcc i8*@_SMLFN12TypedCalcCon6TPJOINE(i8*inreg%a)#4 gc"smlsharp"{
%b=alloca i8*,align 8
%c=alloca i8*,align 8
%d=alloca i8*,align 8
%e=alloca i8*,align 8
%f=alloca i8*,align 8
%g=alloca i8*,align 8
%h=alloca i8*,align 8
call void@llvm.gcroot(i8**%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
call void@llvm.gcroot(i8**%f,i8*null)#0
call void@llvm.gcroot(i8**%g,i8*null)#0
call void@llvm.gcroot(i8**%h,i8*null)#0
%i=bitcast i8*%a to i8****
%j=load i8***,i8****%i,align 8
%k=load i8**,i8***%j,align 8
%l=load i8*,i8**%k,align 8
store i8*%l,i8**%b,align 8
%m=bitcast i8***%j to i8**
%n=load i8*,i8**%m,align 8
%o=getelementptr inbounds i8,i8*%n,i64 8
%p=bitcast i8*%o to i8**
%q=load i8*,i8**%p,align 8
store i8*%q,i8**%c,align 8
%r=getelementptr inbounds i8**,i8***%j,i64 1
%s=load i8**,i8***%r,align 8
%t=load i8*,i8**%s,align 8
store i8*%t,i8**%d,align 8
%u=getelementptr inbounds i8*,i8**%s,i64 1
%v=load i8*,i8**%u,align 8
store i8*%v,i8**%e,align 8
%w=getelementptr inbounds i8,i8*%a,i64 8
%x=bitcast i8*%w to i32*
%y=load i32,i32*%x,align 4
%z=getelementptr inbounds i8,i8*%a,i64 16
%A=bitcast i8*%z to i8**
%B=load i8*,i8**%A,align 8
store i8*%B,i8**%f,align 8
%C=getelementptr inbounds i8,i8*%a,i64 24
%D=bitcast i8*%C to i8**
%E=load i8*,i8**%D,align 8
store i8*%E,i8**%g,align 8
%F=call i8*@sml_alloc(i32 inreg 20)#0
%G=getelementptr inbounds i8,i8*%F,i64 -4
%H=bitcast i8*%G to i32*
store i32 1342177296,i32*%H,align 4
store i8*%F,i8**%h,align 8
%I=load i8*,i8**%b,align 8
store i8*null,i8**%b,align 8
%J=bitcast i8*%F to i8**
store i8*%I,i8**%J,align 8
%K=load i8*,i8**%d,align 8
store i8*null,i8**%d,align 8
%L=getelementptr inbounds i8,i8*%F,i64 8
%M=bitcast i8*%L to i8**
store i8*%K,i8**%M,align 8
%N=getelementptr inbounds i8,i8*%F,i64 16
%O=bitcast i8*%N to i32*
store i32 3,i32*%O,align 4
%P=call i8*@sml_alloc(i32 inreg 20)#0
%Q=getelementptr inbounds i8,i8*%P,i64 -4
%R=bitcast i8*%Q to i32*
store i32 1342177296,i32*%R,align 4
store i8*%P,i8**%b,align 8
%S=load i8*,i8**%c,align 8
store i8*null,i8**%c,align 8
%T=bitcast i8*%P to i8**
store i8*%S,i8**%T,align 8
%U=load i8*,i8**%e,align 8
store i8*null,i8**%e,align 8
%V=getelementptr inbounds i8,i8*%P,i64 8
%W=bitcast i8*%V to i8**
store i8*%U,i8**%W,align 8
%X=getelementptr inbounds i8,i8*%P,i64 16
%Y=bitcast i8*%X to i32*
store i32 3,i32*%Y,align 4
%Z=call i8*@sml_alloc(i32 inreg 44)#0
%aa=getelementptr inbounds i8,i8*%Z,i64 -4
%ab=bitcast i8*%aa to i32*
store i32 1342177320,i32*%ab,align 4
store i8*%Z,i8**%c,align 8
%ac=getelementptr inbounds i8,i8*%Z,i64 20
%ad=bitcast i8*%ac to i32*
store i32 0,i32*%ad,align 1
%ae=load i8*,i8**%h,align 8
%af=bitcast i8*%Z to i8**
store i8*null,i8**%h,align 8
store i8*%ae,i8**%af,align 8
%ag=load i8*,i8**%b,align 8
store i8*null,i8**%b,align 8
%ah=getelementptr inbounds i8,i8*%Z,i64 8
%ai=bitcast i8*%ah to i8**
store i8*%ag,i8**%ai,align 8
%aj=getelementptr inbounds i8,i8*%Z,i64 16
%ak=bitcast i8*%aj to i32*
store i32%y,i32*%ak,align 4
%al=load i8*,i8**%f,align 8
store i8*null,i8**%f,align 8
%am=getelementptr inbounds i8,i8*%Z,i64 24
%an=bitcast i8*%am to i8**
store i8*%al,i8**%an,align 8
%ao=load i8*,i8**%g,align 8
%ap=getelementptr inbounds i8,i8*%Z,i64 32
%aq=bitcast i8*%ap to i8**
store i8*%ao,i8**%aq,align 8
%ar=getelementptr inbounds i8,i8*%Z,i64 40
%as=bitcast i8*%ar to i32*
store i32 27,i32*%as,align 4
%at=call i8*@sml_alloc(i32 inreg 20)#0
%au=getelementptr inbounds i8,i8*%at,i64 -4
%av=bitcast i8*%au to i32*
store i32 1342177296,i32*%av,align 4
store i8*%at,i8**%b,align 8
%aw=getelementptr inbounds i8,i8*%at,i64 4
%ax=bitcast i8*%aw to i32*
store i32 0,i32*%ax,align 1
%ay=bitcast i8*%at to i32*
store i32 24,i32*%ay,align 4
%az=load i8*,i8**%c,align 8
store i8*null,i8**%c,align 8
%aA=getelementptr inbounds i8,i8*%at,i64 8
%aB=bitcast i8*%aA to i8**
store i8*%az,i8**%aB,align 8
%aC=getelementptr inbounds i8,i8*%at,i64 16
%aD=bitcast i8*%aC to i32*
store i32 2,i32*%aD,align 4
%aE=call i8*@sml_alloc(i32 inreg 20)#0
%aF=getelementptr inbounds i8,i8*%aE,i64 -4
%aG=bitcast i8*%aF to i32*
store i32 1342177296,i32*%aG,align 4
%aH=load i8*,i8**%b,align 8
%aI=bitcast i8*%aE to i8**
store i8*%aH,i8**%aI,align 8
%aJ=load i8*,i8**%g,align 8
%aK=getelementptr inbounds i8,i8*%aE,i64 8
%aL=bitcast i8*%aK to i8**
store i8*%aJ,i8**%aL,align 8
%aM=getelementptr inbounds i8,i8*%aE,i64 16
%aN=bitcast i8*%aM to i32*
store i32 3,i32*%aN,align 4
ret i8*%aE
}
define fastcc i8*@_SMLFN12TypedCalcCon9TPDYNAMICE(i8*inreg%a)#4 gc"smlsharp"{
%b=alloca i8*,align 8
%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**%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
call void@llvm.gcroot(i8**%f,i8*null)#0
call void@llvm.gcroot(i8**%g,i8*null)#0
%h=bitcast i8*%a to i8**
%i=load i8*,i8**%h,align 8
store i8*%i,i8**%b,align 8
%j=getelementptr inbounds i8,i8*%a,i64 8
%k=bitcast i8*%j to i8**
%l=load i8*,i8**%k,align 8
store i8*%l,i8**%c,align 8
%m=getelementptr inbounds i8,i8*%a,i64 16
%n=bitcast i8*%m to i8***
%o=load i8**,i8***%n,align 8
%p=load i8*,i8**%o,align 8
store i8*%p,i8**%d,align 8
%q=getelementptr inbounds i8*,i8**%o,i64 1
%r=load i8*,i8**%q,align 8
store i8*%r,i8**%e,align 8
%s=getelementptr inbounds i8,i8*%a,i64 24
%t=bitcast i8*%s to i8**
%u=load i8*,i8**%t,align 8
store i8*%u,i8**%f,align 8
%v=call i8*@sml_alloc(i32 inreg 44)#0
%w=getelementptr inbounds i8,i8*%v,i64 -4
%x=bitcast i8*%w to i32*
store i32 1342177320,i32*%x,align 4
store i8*%v,i8**%g,align 8
%y=load i8*,i8**%b,align 8
%z=bitcast i8*%v to i8**
store i8*%y,i8**%z,align 8
%A=load i8*,i8**%c,align 8
store i8*null,i8**%c,align 8
%B=getelementptr inbounds i8,i8*%v,i64 8
%C=bitcast i8*%B to i8**
store i8*%A,i8**%C,align 8
%D=load i8*,i8**%d,align 8
store i8*null,i8**%d,align 8
%E=getelementptr inbounds i8,i8*%v,i64 16
%F=bitcast i8*%E to i8**
store i8*%D,i8**%F,align 8
%G=load i8*,i8**%f,align 8
store i8*null,i8**%f,align 8
%H=getelementptr inbounds i8,i8*%v,i64 24
%I=bitcast i8*%H to i8**
store i8*%G,i8**%I,align 8
%J=load i8*,i8**%e,align 8
store i8*null,i8**%e,align 8
%K=getelementptr inbounds i8,i8*%v,i64 32
%L=bitcast i8*%K to i8**
store i8*%J,i8**%L,align 8
%M=getelementptr inbounds i8,i8*%v,i64 40
%N=bitcast i8*%M to i32*
store i32 31,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
store i8*%O,i8**%c,align 8
%R=getelementptr inbounds i8,i8*%O,i64 4
%S=bitcast i8*%R to i32*
store i32 0,i32*%S,align 1
%T=bitcast i8*%O to i32*
store i32 7,i32*%T,align 4
%U=load i8*,i8**%g,align 8
store i8*null,i8**%g,align 8
%V=getelementptr inbounds i8,i8*%O,i64 8
%W=bitcast i8*%V to i8**
store i8*%U,i8**%W,align 8
%X=getelementptr inbounds i8,i8*%O,i64 16
%Y=bitcast i8*%X to i32*
store i32 2,i32*%Y,align 4
%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
%ac=load i8*,i8**%c,align 8
%ad=bitcast i8*%Z to i8**
store i8*%ac,i8**%ad,align 8
%ae=load i8*,i8**%b,align 8
%af=getelementptr inbounds i8,i8*%Z,i64 8
%ag=bitcast i8*%af to i8**
store i8*%ae,i8**%ag,align 8
%ah=getelementptr inbounds i8,i8*%Z,i64 16
%ai=bitcast i8*%ah to i32*
store i32 3,i32*%ai,align 4
ret i8*%Z
}
define fastcc i8*@_SMLFN12TypedCalcCon11TPDYNAMICISE(i8*inreg%a)#4 gc"smlsharp"{
%b=alloca i8*,align 8
%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**%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
call void@llvm.gcroot(i8**%f,i8*null)#0
call void@llvm.gcroot(i8**%g,i8*null)#0
%h=bitcast i8*%a to i8**
%i=load i8*,i8**%h,align 8
store i8*%i,i8**%b,align 8
%j=getelementptr inbounds i8,i8*%a,i64 8
%k=bitcast i8*%j to i8**
%l=load i8*,i8**%k,align 8
store i8*%l,i8**%c,align 8
%m=getelementptr inbounds i8,i8*%a,i64 16
%n=bitcast i8*%m to i8***
%o=load i8**,i8***%n,align 8
%p=load i8*,i8**%o,align 8
store i8*%p,i8**%d,align 8
%q=getelementptr inbounds i8*,i8**%o,i64 1
%r=load i8*,i8**%q,align 8
store i8*%r,i8**%e,align 8
%s=getelementptr inbounds i8,i8*%a,i64 24
%t=bitcast i8*%s to i8**
%u=load i8*,i8**%t,align 8
store i8*%u,i8**%f,align 8
%v=call i8*@sml_alloc(i32 inreg 44)#0
%w=getelementptr inbounds i8,i8*%v,i64 -4
%x=bitcast i8*%w to i32*
store i32 1342177320,i32*%x,align 4
store i8*%v,i8**%g,align 8
%y=load i8*,i8**%b,align 8
%z=bitcast i8*%v to i8**
store i8*%y,i8**%z,align 8
%A=load i8*,i8**%c,align 8
store i8*null,i8**%c,align 8
%B=getelementptr inbounds i8,i8*%v,i64 8
%C=bitcast i8*%B to i8**
store i8*%A,i8**%C,align 8
%D=load i8*,i8**%d,align 8
store i8*null,i8**%d,align 8
%E=getelementptr inbounds i8,i8*%v,i64 16
%F=bitcast i8*%E to i8**
store i8*%D,i8**%F,align 8
%G=load i8*,i8**%f,align 8
store i8*null,i8**%f,align 8
%H=getelementptr inbounds i8,i8*%v,i64 24
%I=bitcast i8*%H to i8**
store i8*%G,i8**%I,align 8
%J=load i8*,i8**%e,align 8
store i8*null,i8**%e,align 8
%K=getelementptr inbounds i8,i8*%v,i64 32
%L=bitcast i8*%K to i8**
store i8*%J,i8**%L,align 8
%M=getelementptr inbounds i8,i8*%v,i64 40
%N=bitcast i8*%M to i32*
store i32 31,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
store i8*%O,i8**%c,align 8
%R=getelementptr inbounds i8,i8*%O,i64 4
%S=bitcast i8*%R to i32*
store i32 0,i32*%S,align 1
%T=bitcast i8*%O to i32*
store i32 10,i32*%T,align 4
%U=load i8*,i8**%g,align 8
store i8*null,i8**%g,align 8
%V=getelementptr inbounds i8,i8*%O,i64 8
%W=bitcast i8*%V to i8**
store i8*%U,i8**%W,align 8
%X=getelementptr inbounds i8,i8*%O,i64 16
%Y=bitcast i8*%X to i32*
store i32 2,i32*%Y,align 4
%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
%ac=load i8*,i8**%c,align 8
%ad=bitcast i8*%Z to i8**
store i8*%ac,i8**%ad,align 8
%ae=load i8*,i8**%b,align 8
%af=getelementptr inbounds i8,i8*%Z,i64 8
%ag=bitcast i8*%af to i8**
store i8*%ae,i8**%ag,align 8
%ah=getelementptr inbounds i8,i8*%Z,i64 16
%ai=bitcast i8*%ah to i32*
store i32 3,i32*%ai,align 4
ret i8*%Z
}
define fastcc i8*@_SMLFN12TypedCalcCon13TPDYNAMICNULLE(i8*inreg%a)#4 gc"smlsharp"{
%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
%f=bitcast i8*%a to i8**
%g=load i8*,i8**%f,align 8
store i8*%g,i8**%b,align 8
%h=getelementptr inbounds i8,i8*%a,i64 8
%i=bitcast i8*%h to i8**
%j=load i8*,i8**%i,align 8
store i8*%j,i8**%c,align 8
%k=getelementptr inbounds i8,i8*%a,i64 16
%l=bitcast i8*%k to i8**
%m=load i8*,i8**%l,align 8
store i8*%m,i8**%d,align 8
%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
store i8*%n,i8**%e,align 8
%q=load i8*,i8**%b,align 8
%r=bitcast i8*%n to i8**
store i8*%q,i8**%r,align 8
%s=load i8*,i8**%c,align 8
store i8*null,i8**%c,align 8
%t=getelementptr inbounds i8,i8*%n,i64 8
%u=bitcast i8*%t to i8**
store i8*%s,i8**%u,align 8
%v=load i8*,i8**%d,align 8
store i8*null,i8**%d,align 8
%w=getelementptr inbounds i8,i8*%n,i64 16
%x=bitcast i8*%w to i8**
store i8*%v,i8**%x,align 8
%y=getelementptr inbounds i8,i8*%n,i64 24
%z=bitcast i8*%y to i32*
store i32 7,i32*%z,align 4
%A=call i8*@sml_alloc(i32 inreg 20)#0
%B=getelementptr inbounds i8,i8*%A,i64 -4
%C=bitcast i8*%B to i32*
store i32 1342177296,i32*%C,align 4
store i8*%A,i8**%c,align 8
%D=getelementptr inbounds i8,i8*%A,i64 4
%E=bitcast i8*%D to i32*
store i32 0,i32*%E,align 1
%F=bitcast i8*%A to i32*
store i32 11,i32*%F,align 4
%G=load i8*,i8**%e,align 8
store i8*null,i8**%e,align 8
%H=getelementptr inbounds i8,i8*%A,i64 8
%I=bitcast i8*%H to i8**
store i8*%G,i8**%I,align 8
%J=getelementptr inbounds i8,i8*%A,i64 16
%K=bitcast i8*%J to i32*
store i32 2,i32*%K,align 4
%L=call i8*@sml_alloc(i32 inreg 20)#0
%M=getelementptr inbounds i8,i8*%L,i64 -4
%N=bitcast i8*%M to i32*
store i32 1342177296,i32*%N,align 4
%O=load i8*,i8**%c,align 8
%P=bitcast i8*%L to i8**
store i8*%O,i8**%P,align 8
%Q=load i8*,i8**%b,align 8
%R=getelementptr inbounds i8,i8*%L,i64 8
%S=bitcast i8*%R to i8**
store i8*%Q,i8**%S,align 8
%T=getelementptr inbounds i8,i8*%L,i64 16
%U=bitcast i8*%T to i32*
store i32 3,i32*%U,align 4
ret i8*%L
}
define fastcc i8*@_SMLFN12TypedCalcCon12TPDYNAMICTOPE(i8*inreg%a)#4 gc"smlsharp"{
%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
%f=bitcast i8*%a to i8**
%g=load i8*,i8**%f,align 8
store i8*%g,i8**%b,align 8
%h=getelementptr inbounds i8,i8*%a,i64 8
%i=bitcast i8*%h to i8**
%j=load i8*,i8**%i,align 8
store i8*%j,i8**%c,align 8
%k=getelementptr inbounds i8,i8*%a,i64 16
%l=bitcast i8*%k to i8**
%m=load i8*,i8**%l,align 8
store i8*%m,i8**%d,align 8
%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
store i8*%n,i8**%e,align 8
%q=load i8*,i8**%b,align 8
%r=bitcast i8*%n to i8**
store i8*%q,i8**%r,align 8
%s=load i8*,i8**%c,align 8
store i8*null,i8**%c,align 8
%t=getelementptr inbounds i8,i8*%n,i64 8
%u=bitcast i8*%t to i8**
store i8*%s,i8**%u,align 8
%v=load i8*,i8**%d,align 8
store i8*null,i8**%d,align 8
%w=getelementptr inbounds i8,i8*%n,i64 16
%x=bitcast i8*%w to i8**
store i8*%v,i8**%x,align 8
%y=getelementptr inbounds i8,i8*%n,i64 24
%z=bitcast i8*%y to i32*
store i32 7,i32*%z,align 4
%A=call i8*@sml_alloc(i32 inreg 20)#0
%B=getelementptr inbounds i8,i8*%A,i64 -4
%C=bitcast i8*%B to i32*
store i32 1342177296,i32*%C,align 4
store i8*%A,i8**%c,align 8
%D=getelementptr inbounds i8,i8*%A,i64 4
%E=bitcast i8*%D to i32*
store i32 0,i32*%E,align 1
%F=bitcast i8*%A to i32*
store i32 12,i32*%F,align 4
%G=load i8*,i8**%e,align 8
store i8*null,i8**%e,align 8
%H=getelementptr inbounds i8,i8*%A,i64 8
%I=bitcast i8*%H to i8**
store i8*%G,i8**%I,align 8
%J=getelementptr inbounds i8,i8*%A,i64 16
%K=bitcast i8*%J to i32*
store i32 2,i32*%K,align 4
%L=call i8*@sml_alloc(i32 inreg 20)#0
%M=getelementptr inbounds i8,i8*%L,i64 -4
%N=bitcast i8*%M to i32*
store i32 1342177296,i32*%N,align 4
%O=load i8*,i8**%c,align 8
%P=bitcast i8*%L to i8**
store i8*%O,i8**%P,align 8
%Q=load i8*,i8**%b,align 8
%R=getelementptr inbounds i8,i8*%L,i64 8
%S=bitcast i8*%R to i8**
store i8*%Q,i8**%S,align 8
%T=getelementptr inbounds i8,i8*%L,i64 16
%U=bitcast i8*%T to i32*
store i32 3,i32*%U,align 4
ret i8*%L
}
define fastcc i8*@_SMLFN12TypedCalcCon13TPDYNAMICVIEWE(i8*inreg%a)#4 gc"smlsharp"{
%b=alloca i8*,align 8
%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**%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
call void@llvm.gcroot(i8**%f,i8*null)#0
call void@llvm.gcroot(i8**%g,i8*null)#0
%h=bitcast i8*%a to i8**
%i=load i8*,i8**%h,align 8
store i8*%i,i8**%b,align 8
%j=getelementptr inbounds i8,i8*%a,i64 8
%k=bitcast i8*%j to i8**
%l=load i8*,i8**%k,align 8
store i8*%l,i8**%c,align 8
%m=getelementptr inbounds i8,i8*%a,i64 16
%n=bitcast i8*%m to i8***
%o=load i8**,i8***%n,align 8
%p=load i8*,i8**%o,align 8
store i8*%p,i8**%d,align 8
%q=getelementptr inbounds i8*,i8**%o,i64 1
%r=load i8*,i8**%q,align 8
store i8*%r,i8**%e,align 8
%s=getelementptr inbounds i8,i8*%a,i64 24
%t=bitcast i8*%s to i8**
%u=load i8*,i8**%t,align 8
store i8*%u,i8**%f,align 8
%v=call i8*@sml_alloc(i32 inreg 44)#0
%w=getelementptr inbounds i8,i8*%v,i64 -4
%x=bitcast i8*%w to i32*
store i32 1342177320,i32*%x,align 4
store i8*%v,i8**%g,align 8
%y=load i8*,i8**%b,align 8
%z=bitcast i8*%v to i8**
store i8*%y,i8**%z,align 8
%A=load i8*,i8**%c,align 8
store i8*null,i8**%c,align 8
%B=getelementptr inbounds i8,i8*%v,i64 8
%C=bitcast i8*%B to i8**
store i8*%A,i8**%C,align 8
%D=load i8*,i8**%d,align 8
store i8*null,i8**%d,align 8
%E=getelementptr inbounds i8,i8*%v,i64 16
%F=bitcast i8*%E to i8**
store i8*%D,i8**%F,align 8
%G=load i8*,i8**%f,align 8
store i8*null,i8**%f,align 8
%H=getelementptr inbounds i8,i8*%v,i64 24
%I=bitcast i8*%H to i8**
store i8*%G,i8**%I,align 8
%J=load i8*,i8**%e,align 8
store i8*null,i8**%e,align 8
%K=getelementptr inbounds i8,i8*%v,i64 32
%L=bitcast i8*%K to i8**
store i8*%J,i8**%L,align 8
%M=getelementptr inbounds i8,i8*%v,i64 40
%N=bitcast i8*%M to i32*
store i32 31,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
store i8*%O,i8**%c,align 8
%R=getelementptr inbounds i8,i8*%O,i64 4
%S=bitcast i8*%R to i32*
store i32 0,i32*%S,align 1
%T=bitcast i8*%O to i32*
store i32 13,i32*%T,align 4
%U=load i8*,i8**%g,align 8
store i8*null,i8**%g,align 8
%V=getelementptr inbounds i8,i8*%O,i64 8
%W=bitcast i8*%V to i8**
store i8*%U,i8**%W,align 8
%X=getelementptr inbounds i8,i8*%O,i64 16
%Y=bitcast i8*%X to i32*
store i32 2,i32*%Y,align 4
%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
%ac=load i8*,i8**%c,align 8
%ad=bitcast i8*%Z to i8**
store i8*%ac,i8**%ad,align 8
%ae=load i8*,i8**%b,align 8
%af=getelementptr inbounds i8,i8*%Z,i64 8
%ag=bitcast i8*%af to i8**
store i8*%ae,i8**%ag,align 8
%ah=getelementptr inbounds i8,i8*%Z,i64 16
%ai=bitcast i8*%ah to i32*
store i32 3,i32*%ai,align 4
ret i8*%Z
}
define fastcc i8*@_SMLFN12TypedCalcCon13TPDYNAMICCASEE(i8*inreg%a)#4 gc"smlsharp"{
%b=alloca i8*,align 8
%c=alloca i8*,align 8
%d=alloca i8*,align 8
%e=alloca i8*,align 8
%f=alloca i8*,align 8
%g=alloca i8*,align 8
%h=alloca i8*,align 8
%i=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
call void@llvm.gcroot(i8**%f,i8*null)#0
call void@llvm.gcroot(i8**%g,i8*null)#0
call void@llvm.gcroot(i8**%h,i8*null)#0
call void@llvm.gcroot(i8**%i,i8*null)#0
%j=bitcast i8*%a to i8***
%k=load i8**,i8***%j,align 8
%l=load i8*,i8**%k,align 8
store i8*%l,i8**%b,align 8
%m=getelementptr inbounds i8,i8*%a,i64 8
%n=bitcast i8*%m to i8**
%o=load i8*,i8**%n,align 8
store i8*%o,i8**%c,align 8
%p=getelementptr inbounds i8,i8*%a,i64 16
%q=bitcast i8*%p to i8**
%r=load i8*,i8**%q,align 8
store i8*%r,i8**%d,align 8
%s=getelementptr inbounds i8,i8*%a,i64 24
%t=bitcast i8*%s to i8***
%u=load i8**,i8***%t,align 8
%v=load i8*,i8**%u,align 8
store i8*%v,i8**%e,align 8
%w=getelementptr inbounds i8,i8*%a,i64 32
%x=bitcast i8*%w to i8**
%y=load i8*,i8**%x,align 8
store i8*%y,i8**%f,align 8
%z=getelementptr inbounds i8,i8*%a,i64 40
%A=bitcast i8*%z to i8**
%B=load i8*,i8**%A,align 8
store i8*%B,i8**%g,align 8
%C=getelementptr inbounds i8,i8*%a,i64 48
%D=bitcast i8*%C to i8**
%E=load i8*,i8**%D,align 8
store i8*%E,i8**%h,align 8
%F=call i8*@sml_alloc(i32 inreg 60)#0
%G=getelementptr inbounds i8,i8*%F,i64 -4
%H=bitcast i8*%G to i32*
store i32 1342177336,i32*%H,align 4
store i8*%F,i8**%i,align 8
%I=load i8*,i8**%b,align 8
store i8*null,i8**%b,align 8
%J=bitcast i8*%F to i8**
store i8*%I,i8**%J,align 8
%K=load i8*,i8**%c,align 8
store i8*null,i8**%c,align 8
%L=getelementptr inbounds i8,i8*%F,i64 8
%M=bitcast i8*%L to i8**
store i8*%K,i8**%M,align 8
%N=load i8*,i8**%d,align 8
store i8*null,i8**%d,align 8
%O=getelementptr inbounds i8,i8*%F,i64 16
%P=bitcast i8*%O to i8**
store i8*%N,i8**%P,align 8
%Q=load i8*,i8**%e,align 8
store i8*null,i8**%e,align 8
%R=getelementptr inbounds i8,i8*%F,i64 24
%S=bitcast i8*%R to i8**
store i8*%Q,i8**%S,align 8
%T=load i8*,i8**%f,align 8
store i8*null,i8**%f,align 8
%U=getelementptr inbounds i8,i8*%F,i64 32
%V=bitcast i8*%U to i8**
store i8*%T,i8**%V,align 8
%W=load i8*,i8**%g,align 8
store i8*null,i8**%g,align 8
%X=getelementptr inbounds i8,i8*%F,i64 40
%Y=bitcast i8*%X to i8**
store i8*%W,i8**%Y,align 8
%Z=load i8*,i8**%h,align 8
%aa=getelementptr inbounds i8,i8*%F,i64 48
%ab=bitcast i8*%aa to i8**
store i8*%Z,i8**%ab,align 8
%ac=getelementptr inbounds i8,i8*%F,i64 56
%ad=bitcast i8*%ac to i32*
store i32 127,i32*%ad,align 4
%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**%b,align 8
%ah=getelementptr inbounds i8,i8*%ae,i64 4
%ai=bitcast i8*%ah to i32*
store i32 0,i32*%ai,align 1
%aj=bitcast i8*%ae to i32*
store i32 8,i32*%aj,align 4
%ak=load i8*,i8**%i,align 8
store i8*null,i8**%i,align 8
%al=getelementptr inbounds i8,i8*%ae,i64 8
%am=bitcast i8*%al to i8**
store i8*%ak,i8**%am,align 8
%an=getelementptr inbounds i8,i8*%ae,i64 16
%ao=bitcast i8*%an to i32*
store i32 2,i32*%ao,align 4
%ap=call i8*@sml_alloc(i32 inreg 20)#0
%aq=getelementptr inbounds i8,i8*%ap,i64 -4
%ar=bitcast i8*%aq to i32*
store i32 1342177296,i32*%ar,align 4
%as=load i8*,i8**%b,align 8
%at=bitcast i8*%ap to i8**
store i8*%as,i8**%at,align 8
%au=load i8*,i8**%h,align 8
%av=getelementptr inbounds i8,i8*%ap,i64 8
%aw=bitcast i8*%av to i8**
store i8*%au,i8**%aw,align 8
%ax=getelementptr inbounds i8,i8*%ap,i64 16
%ay=bitcast i8*%ax to i32*
store i32 3,i32*%ay,align 4
ret i8*%ap
}
define fastcc i8*@_SMLFN12TypedCalcCon18TPDYNAMICEXISTTAPPE(i8*inreg%a)#2 gc"smlsharp"{
o:
%b=alloca i8*,align 8
%c=alloca i8*,align 8
%d=alloca i8*,align 8
%e=alloca i8*,align 8
%f=alloca i8*,align 8
%g=alloca i8*,align 8
%h=alloca i8*,align 8
call void@llvm.gcroot(i8**%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
call void@llvm.gcroot(i8**%f,i8*null)#0
call void@llvm.gcroot(i8**%g,i8*null)#0
call void@llvm.gcroot(i8**%h,i8*null)#0
store i8*%a,i8**%b,align 8
%i=load atomic i32,i32*@sml_check_flag unordered,align 4
%j=icmp eq i32%i,0
br i1%j,label%m,label%k
k:
call void@sml_check(i32 inreg%i)
%l=load i8*,i8**%b,align 8
br label%m
m:
%n=phi i8*[%l,%k],[%a,%o]
store i8*null,i8**%b,align 8
%p=bitcast i8*%n to i8***
%q=load i8**,i8***%p,align 8
%r=load i8*,i8**%q,align 8
store i8*%r,i8**%c,align 8
%s=getelementptr inbounds i8,i8*%n,i64 8
%t=bitcast i8*%s to i8***
%u=load i8**,i8***%t,align 8
%v=load i8*,i8**%u,align 8
store i8*%v,i8**%d,align 8
%w=getelementptr inbounds i8*,i8**%u,i64 1
%x=load i8*,i8**%w,align 8
store i8*%x,i8**%e,align 8
%y=getelementptr inbounds i8,i8*%n,i64 16
%z=bitcast i8*%y to i8**
%A=load i8*,i8**%z,align 8
store i8*%A,i8**%f,align 8
%B=getelementptr inbounds i8,i8*%n,i64 24
%C=bitcast i8*%B to i8**
%D=load i8*,i8**%C,align 8
store i8*%D,i8**%g,align 8
%E=call i8*@sml_alloc(i32 inreg 20)#0
%F=getelementptr inbounds i8,i8*%E,i64 -4
%G=bitcast i8*%F to i32*
store i32 1342177296,i32*%G,align 4
%H=load i8*,i8**%e,align 8
%I=bitcast i8*%E to i8**
store i8*%H,i8**%I,align 8
%J=load i8*,i8**%f,align 8
%K=getelementptr inbounds i8,i8*%E,i64 8
%L=bitcast i8*%K to i8**
store i8*%J,i8**%L,align 8
%M=getelementptr inbounds i8,i8*%E,i64 16
%N=bitcast i8*%M to i32*
store i32 3,i32*%N,align 4
%O=call fastcc i8*@_SMLFN11TypesBasics7tpappTyE(i8*inreg%E)
store i8*%O,i8**%b,align 8
%P=call i8*@sml_alloc(i32 inreg 44)#0
%Q=getelementptr inbounds i8,i8*%P,i64 -4
%R=bitcast i8*%Q to i32*
store i32 1342177320,i32*%R,align 4
store i8*%P,i8**%h,align 8
%S=load i8*,i8**%c,align 8
store i8*null,i8**%c,align 8
%T=bitcast i8*%P to i8**
store i8*%S,i8**%T,align 8
%U=load i8*,i8**%d,align 8
store i8*null,i8**%d,align 8
%V=getelementptr inbounds i8,i8*%P,i64 8
%W=bitcast i8*%V to i8**
store i8*%U,i8**%W,align 8
%X=load i8*,i8**%e,align 8
store i8*null,i8**%e,align 8
%Y=getelementptr inbounds i8,i8*%P,i64 16
%Z=bitcast i8*%Y to i8**
store i8*%X,i8**%Z,align 8
%aa=load i8*,i8**%f,align 8
store i8*null,i8**%f,align 8
%ab=getelementptr inbounds i8,i8*%P,i64 24
%ac=bitcast i8*%ab to i8**
store i8*%aa,i8**%ac,align 8
%ad=load i8*,i8**%g,align 8
store i8*null,i8**%g,align 8
%ae=getelementptr inbounds i8,i8*%P,i64 32
%af=bitcast i8*%ae to i8**
store i8*%ad,i8**%af,align 8
%ag=getelementptr inbounds i8,i8*%P,i64 40
%ah=bitcast i8*%ag to i32*
store i32 31,i32*%ah,align 4
%ai=call i8*@sml_alloc(i32 inreg 20)#0
%aj=getelementptr inbounds i8,i8*%ai,i64 -4
%ak=bitcast i8*%aj to i32*
store i32 1342177296,i32*%ak,align 4
store i8*%ai,i8**%c,align 8
%al=getelementptr inbounds i8,i8*%ai,i64 4
%am=bitcast i8*%al to i32*
store i32 0,i32*%am,align 1
%an=bitcast i8*%ai to i32*
store i32 9,i32*%an,align 4
%ao=load i8*,i8**%h,align 8
store i8*null,i8**%h,align 8
%ap=getelementptr inbounds i8,i8*%ai,i64 8
%aq=bitcast i8*%ap to i8**
store i8*%ao,i8**%aq,align 8
%ar=getelementptr inbounds i8,i8*%ai,i64 16
%as=bitcast i8*%ar to i32*
store i32 2,i32*%as,align 4
%at=call i8*@sml_alloc(i32 inreg 20)#0
%au=getelementptr inbounds i8,i8*%at,i64 -4
%av=bitcast i8*%au to i32*
store i32 1342177296,i32*%av,align 4
%aw=load i8*,i8**%c,align 8
%ax=bitcast i8*%at to i8**
store i8*%aw,i8**%ax,align 8
%ay=load i8*,i8**%b,align 8
%az=getelementptr inbounds i8,i8*%at,i64 8
%aA=bitcast i8*%az to i8**
store i8*%ay,i8**%aA,align 8
%aB=getelementptr inbounds i8,i8*%at,i64 16
%aC=bitcast i8*%aB to i32*
store i32 3,i32*%aC,align 4
ret i8*%at
}
define fastcc i8*@_SMLFN12TypedCalcCon8TPPATVARE(i8*inreg%a)#2 gc"smlsharp"{
l:
%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=load atomic i32,i32*@sml_check_flag unordered,align 4
%g=icmp eq i32%f,0
br i1%g,label%j,label%h
h:
call void@sml_check(i32 inreg%f)
%i=load i8*,i8**%b,align 8
br label%j
j:
%k=phi i8*[%i,%h],[%a,%l]
%m=bitcast i8*%k to i32*
%n=load i32,i32*%m,align 4
%o=getelementptr inbounds i8,i8*%k,i64 16
%p=bitcast i8*%o to i8**
%q=load i8*,i8**%p,align 8
store i8*%q,i8**%d,align 8
%r=call fastcc i8*@_SMLFN5VarID3Map9singletonE(i32 inreg 1,i32 inreg 8)
%s=getelementptr inbounds i8,i8*%r,i64 16
%t=bitcast i8*%s to i8*(i8*,i8*)**
%u=load i8*(i8*,i8*)*,i8*(i8*,i8*)**%t,align 8
%v=bitcast i8*%r to i8**
%w=load i8*,i8**%v,align 8
store i8*%w,i8**%c,align 8
%x=call i8*@sml_alloc(i32 inreg 20)#0
%y=bitcast i8*%x to i32*
%z=getelementptr inbounds i8,i8*%x,i64 -4
%A=bitcast i8*%z to i32*
store i32 1342177296,i32*%A,align 4
%B=getelementptr inbounds i8,i8*%x,i64 4
%C=bitcast i8*%B to i32*
store i32 0,i32*%C,align 1
store i32%n,i32*%y,align 4
%D=load i8*,i8**%b,align 8
%E=getelementptr inbounds i8,i8*%x,i64 8
%F=bitcast i8*%E to i8**
store i8*%D,i8**%F,align 8
%G=getelementptr inbounds i8,i8*%x,i64 16
%H=bitcast i8*%G to i32*
store i32 2,i32*%H,align 4
%I=load i8*,i8**%c,align 8
store i8*null,i8**%c,align 8
%J=call fastcc i8*%u(i8*inreg%I,i8*inreg%x)
store i8*%J,i8**%c,align 8
%K=call i8*@sml_alloc(i32 inreg 20)#0
%L=getelementptr inbounds i8,i8*%K,i64 -4
%M=bitcast i8*%L to i32*
store i32 1342177296,i32*%M,align 4
store i8*%K,i8**%e,align 8
%N=getelementptr inbounds i8,i8*%K,i64 4
%O=bitcast i8*%N to i32*
store i32 0,i32*%O,align 1
%P=bitcast i8*%K to i32*
store i32 6,i32*%P,align 4
%Q=load i8*,i8**%b,align 8
store i8*null,i8**%b,align 8
%R=getelementptr inbounds i8,i8*%K,i64 8
%S=bitcast i8*%R to i8**
store i8*%Q,i8**%S,align 8
%T=getelementptr inbounds i8,i8*%K,i64 16
%U=bitcast i8*%T to i32*
store i32 2,i32*%U,align 4
%V=call i8*@sml_alloc(i32 inreg 28)#0
%W=getelementptr inbounds i8,i8*%V,i64 -4
%X=bitcast i8*%W to i32*
store i32 1342177304,i32*%X,align 4
%Y=load i8*,i8**%e,align 8
%Z=bitcast i8*%V to i8**
store i8*%Y,i8**%Z,align 8
%aa=load i8*,i8**%d,align 8
%ab=getelementptr inbounds i8,i8*%V,i64 8
%ac=bitcast i8*%ab to i8**
store i8*%aa,i8**%ac,align 8
%ad=load i8*,i8**%c,align 8
%ae=getelementptr inbounds i8,i8*%V,i64 16
%af=bitcast i8*%ae to i8**
store i8*%ad,i8**%af,align 8
%ag=getelementptr inbounds i8,i8*%V,i64 24
%ah=bitcast i8*%ag to i32*
store i32 7,i32*%ah,align 4
ret i8*%V
}
define internal fastcc void@_SMLL1f_496(i8*inreg%a,i32 inreg%b)#2 gc"smlsharp"{
%c=alloca i8*,align 8
%d=alloca i8*,align 8
%e=alloca i8*,align 8
%f=alloca i8*,align 8
%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**%d,align 8
%h=load atomic i32,i32*@sml_check_flag unordered,align 4
%i=icmp eq i32%h,0
br i1%i,label%k,label%j
j:
call void@sml_check(i32 inreg%h)
br label%k
k:
%l=call fastcc i8*@_SMLLN12TypedCalcCon4eqTyE_287(i8*inreg getelementptr inbounds(<{[4x i8],i32,[19x i8]}>,<{[4x i8],i32,[19x i8]}>*@a8,i64 0,i32 2,i64 0))
%m=getelementptr inbounds i8,i8*%l,i64 16
%n=bitcast i8*%m to i8*(i8*,i8*)**
%o=load i8*(i8*,i8*)*,i8*(i8*,i8*)**%n,align 8
%p=bitcast i8*%l to i8**
%q=load i8*,i8**%p,align 8
%r=load i8*,i8**%d,align 8
%s=getelementptr inbounds i8,i8*%r,i64 8
%t=bitcast i8*%s to i8**
%u=load i8*,i8**%t,align 8
%v=call fastcc i8*%o(i8*inreg%q,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**
%A=load i8*,i8**%z,align 8
store i8*%A,i8**%g,align 8
%B=load i8*,i8**%d,align 8
%C=getelementptr inbounds i8,i8*%B,i64 24
%D=bitcast i8*%C to i8**
%E=load i8*,i8**%D,align 8
store i8*%E,i8**%e,align 8
%F=bitcast i8*%B to i8**
%G=load i8*,i8**%F,align 8
store i8*%G,i8**%f,align 8
%H=call i8*@sml_alloc(i32 inreg 20)#0
%I=getelementptr inbounds i8,i8*%H,i64 -4
%J=bitcast i8*%I to i32*
store i32 1342177296,i32*%J,align 4
store i8*%H,i8**%c,align 8
%K=load i8*,i8**%e,align 8
store i8*null,i8**%e,align 8
%L=bitcast i8*%H to i8**
store i8*%K,i8**%L,align 8
%M=load i8*,i8**%f,align 8
store i8*null,i8**%f,align 8
%N=getelementptr inbounds i8,i8*%H,i64 8
%O=bitcast i8*%N to i8**
store i8*%M,i8**%O,align 8
%P=getelementptr inbounds i8,i8*%H,i64 16
%Q=bitcast i8*%P to i32*
store i32 3,i32*%Q,align 4
%R=call i8*@sml_alloc(i32 inreg 20)#0
%S=getelementptr inbounds i8,i8*%R,i64 -4
%T=bitcast i8*%S to i32*
store i32 1342177296,i32*%T,align 4
%U=load i8*,i8**%c,align 8
store i8*null,i8**%c,align 8
%V=bitcast i8*%R to i8**
store i8*%U,i8**%V,align 8
%W=getelementptr inbounds i8,i8*%R,i64 8
%X=bitcast i8*%W to i8**
store i8*null,i8**%X,align 8
%Y=getelementptr inbounds i8,i8*%R,i64 16
%Z=bitcast i8*%Y to i32*
store i32 3,i32*%Z,align 4
%aa=load i8*,i8**%g,align 8
store i8*null,i8**%g,align 8
%ab=call fastcc i8*%y(i8*inreg%aa,i8*inreg%R)
%ac=call fastcc i8*@_SMLLN12TypedCalcCon17mustBeCONSTRUCTtyE_274(i8*inreg getelementptr inbounds(<{[4x i8],i32,[19x i8]}>,<{[4x i8],i32,[19x i8]}>*@a8,i64 0,i32 2,i64 0))
%ad=getelementptr inbounds i8,i8*%ac,i64 16
%ae=bitcast i8*%ad to i8*(i8*,i8*)**
%af=load i8*(i8*,i8*)*,i8*(i8*,i8*)**%ae,align 8
%ag=bitcast i8*%ac to i8**
%ah=load i8*,i8**%ag,align 8
%ai=load i8*,i8**%d,align 8
%aj=getelementptr inbounds i8,i8*%ai,i64 8
%ak=bitcast i8*%aj to i8**
%al=load i8*,i8**%ak,align 8
%am=call fastcc i8*%af(i8*inreg%ah,i8*inreg%al)
%an=getelementptr inbounds i8,i8*%am,i64 16
%ao=bitcast i8*%an to i8*(i8*,i8*)**
%ap=load i8*(i8*,i8*)*,i8*(i8*,i8*)**%ao,align 8
%aq=bitcast i8*%am to i8**
%ar=load i8*,i8**%aq,align 8
%as=load i8*,i8**%d,align 8
store i8*null,i8**%d,align 8
%at=getelementptr inbounds i8,i8*%as,i64 16
%au=bitcast i8*%at to i8**
%av=load i8*,i8**%au,align 8
%aw=getelementptr inbounds i8,i8*%av,i64 8
%ax=bitcast i8*%aw to i8**
%ay=load i8*,i8**%ax,align 8
%az=call fastcc i8*%ap(i8*inreg%ar,i8*inreg%ay)
ret void
}
define fastcc i8*@_SMLFN12TypedCalcCon18TPPATDATACONSTRUCTE(i8*inreg%a)#2 gc"smlsharp"{
q:
%b=alloca i8*,align 8
%c=alloca i8*,align 8
%d=alloca i8*,align 8
%e=alloca i8*,align 8
%f=alloca i8*,align 8
%g=alloca i8*,align 8
%h=alloca i8*,align 8
%i=alloca i8*,align 8
%j=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
call void@llvm.gcroot(i8**%f,i8*null)#0
call void@llvm.gcroot(i8**%g,i8*null)#0
call void@llvm.gcroot(i8**%h,i8*null)#0
call void@llvm.gcroot(i8**%i,i8*null)#0
call void@llvm.gcroot(i8**%j,i8*null)#0
store i8*%a,i8**%b,align 8
%k=load atomic i32,i32*@sml_check_flag unordered,align 4
%l=icmp eq i32%k,0
br i1%l,label%o,label%m
m:
call void@sml_check(i32 inreg%k)
%n=load i8*,i8**%b,align 8
br label%o
o:
%p=phi i8*[%n,%m],[%a,%q]
%r=bitcast i8*%p to i8**
%s=load i8*,i8**%r,align 8
%t=icmp eq i8*%s,null
br i1%t,label%u,label%bw
u:
%v=getelementptr inbounds i8,i8*%p,i64 8
%w=bitcast i8*%v to i8**
%x=load i8*,i8**%w,align 8
store i8*%x,i8**%c,align 8
%y=getelementptr inbounds i8,i8*%p,i64 16
%z=bitcast i8*%y to i8**
%A=load i8*,i8**%z,align 8
store i8*%A,i8**%d,align 8
%B=getelementptr inbounds i8,i8*%p,i64 24
%C=bitcast i8*%B to i8**
%D=load i8*,i8**%C,align 8
store i8*%D,i8**%e,align 8
%E=getelementptr inbounds i8,i8*%x,i64 16
%F=bitcast i8*%E to i8**
%G=load i8*,i8**%F,align 8
store i8*%G,i8**%b,align 8
%H=call i8*@sml_alloc(i32 inreg 20)#0
%I=getelementptr inbounds i8,i8*%H,i64 -4
%J=bitcast i8*%I to i32*
store i32 1342177296,i32*%J,align 4
%K=load i8*,i8**%b,align 8
store i8*null,i8**%b,align 8
%L=bitcast i8*%H to i8**
store i8*%K,i8**%L,align 8
%M=load i8*,i8**%d,align 8
%N=getelementptr inbounds i8,i8*%H,i64 8
%O=bitcast i8*%N to i8**
store i8*%M,i8**%O,align 8
%P=getelementptr inbounds i8,i8*%H,i64 16
%Q=bitcast i8*%P to i32*
store i32 3,i32*%Q,align 4
%R=call fastcc i8*@_SMLLN12TypedCalcCon11instantiateE_245(i8*inreg%H)
store i8*%R,i8**%b,align 8
%S=load i32*,i32**bitcast(i8**@_SMLZN7Control9checkTypeE to i32**),align 8
%T=load i32,i32*%S,align 4
%U=icmp eq i32%T,0
br i1%U,label%al,label%V
V:
%W=call fastcc i8*@_SMLLN12TypedCalcCon17mustBeCONSTRUCTtyE_274(i8*inreg getelementptr inbounds(<{[4x i8],i32,[19x i8]}>,<{[4x i8],i32,[19x i8]}>*@a8,i64 0,i32 2,i64 0))
%X=getelementptr inbounds i8,i8*%W,i64 16
%Y=bitcast i8*%X to i8*(i8*,i8*)**
%Z=load i8*(i8*,i8*)*,i8*(i8*,i8*)**%Y,align 8
%aa=bitcast i8*%W to i8**
%ab=load i8*,i8**%aa,align 8
%ac=load i8*,i8**%e,align 8
%ad=call fastcc i8*%Z(i8*inreg%ab,i8*inreg%ac)
%ae=getelementptr inbounds i8,i8*%ad,i64 16
%af=bitcast i8*%ae to i8*(i8*,i8*)**
%ag=load i8*(i8*,i8*)*,i8*(i8*,i8*)**%af,align 8
%ah=bitcast i8*%ad to i8**
%ai=load i8*,i8**%ah,align 8
%aj=load i8*,i8**%b,align 8
%ak=call fastcc i8*%ag(i8*inreg%ai,i8*inreg%aj)
br label%al
al:
%am=call i8*@sml_alloc(i32 inreg 44)#0
%an=getelementptr inbounds i8,i8*%am,i64 -4
%ao=bitcast i8*%an to i32*
store i32 1342177320,i32*%ao,align 4
store i8*%am,i8**%f,align 8
%ap=bitcast i8*%am to i8**
store i8*null,i8**%ap,align 8
%aq=load i8*,i8**%c,align 8
store i8*null,i8**%c,align 8
%ar=getelementptr inbounds i8,i8*%am,i64 8
%as=bitcast i8*%ar to i8**
store i8*%aq,i8**%as,align 8
%at=load i8*,i8**%d,align 8
store i8*null,i8**%d,align 8
%au=getelementptr inbounds i8,i8*%am,i64 16
%av=bitcast i8*%au to i8**
store i8*%at,i8**%av,align 8
%aw=load i8*,i8**%e,align 8
store i8*null,i8**%e,align 8
%ax=getelementptr inbounds i8,i8*%am,i64 24
%ay=bitcast i8*%ax to i8**
store i8*%aw,i8**%ay,align 8
%az=load i8*,i8**%b,align 8
%aA=getelementptr inbounds i8,i8*%am,i64 32
%aB=bitcast i8*%aA to i8**
store i8*%az,i8**%aB,align 8
%aC=getelementptr inbounds i8,i8*%am,i64 40
%aD=bitcast i8*%aC to i32*
store i32 31,i32*%aD,align 4
%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**%d,align 8
%aH=getelementptr inbounds i8,i8*%aE,i64 4
%aI=bitcast i8*%aH to i32*
store i32 0,i32*%aI,align 1
%aJ=bitcast i8*%aE to i32*
store i32 1,i32*%aJ,align 4
%aK=load i8*,i8**%f,align 8
store i8*null,i8**%f,align 8
%aL=getelementptr inbounds i8,i8*%aE,i64 8
%aM=bitcast i8*%aL to i8**
store i8*%aK,i8**%aM,align 8
%aN=getelementptr inbounds i8,i8*%aE,i64 16
%aO=bitcast i8*%aN to i32*
store i32 2,i32*%aO,align 4
%aP=load i8*,i8**@_SMLZN5VarID3Map5emptyE,align 8
store i8*%aP,i8**%c,align 8
%aQ=call i8*@sml_alloc(i32 inreg 28)#0
%aR=getelementptr inbounds i8,i8*%aQ,i64 -4
%aS=bitcast i8*%aR to i32*
store i32 1342177304,i32*%aS,align 4
%aT=load i8*,i8**%d,align 8
%aU=bitcast i8*%aQ to i8**
store i8*%aT,i8**%aU,align 8
%aV=load i8*,i8**%b,align 8
%aW=getelementptr inbounds i8,i8*%aQ,i64 8
%aX=bitcast i8*%aW to i8**
store i8*%aV,i8**%aX,align 8
%aY=load i8*,i8**%c,align 8
%aZ=getelementptr inbounds i8,i8*%aQ,i64 16
%a0=bitcast i8*%aZ to i8**
store i8*%aY,i8**%a0,align 8
%a1=getelementptr inbounds i8,i8*%aQ,i64 24
%a2=bitcast i8*%a1 to i32*
store i32 7,i32*%a2,align 4
store i8*%aT,i8**%b,align 8
store i8*%aV,i8**%c,align 8
%a3=getelementptr inbounds i8,i8*%aY,i64 16
%a4=bitcast i8*%a3 to i8*(i8*,i8*,i8*)**
%a5=load i8*(i8*,i8*,i8*)*,i8*(i8*,i8*,i8*)**%a4,align 8
%a6=bitcast i8*%aY to i8**
%a7=load i8*,i8**%a6,align 8
store i8*%a7,i8**%d,align 8
%a8=call i8*@sml_alloc(i32 inreg 4)#0
%a9=bitcast i8*%a8 to i32*
%ba=getelementptr inbounds i8,i8*%a8,i64 -4
%bb=bitcast i8*%ba to i32*
store i32 4,i32*%bb,align 4
store i8*%a8,i8**%e,align 8
store i32 1,i32*%a9,align 4
%bc=call i8*@sml_alloc(i32 inreg 4)#0
%bd=bitcast i8*%bc to i32*
%be=getelementptr inbounds i8,i8*%bc,i64 -4
%bf=bitcast i8*%be to i32*
store i32 4,i32*%bf,align 4
store i32 8,i32*%bd,align 4
%bg=load i8*,i8**%d,align 8
%bh=load i8*,i8**%e,align 8
store i8*null,i8**%d,align 8
store i8*null,i8**%e,align 8
%bi=call fastcc i8*%a5(i8*inreg%bg,i8*inreg%bh,i8*inreg%bc)
store i8*%bi,i8**%d,align 8
%bj=call i8*@sml_alloc(i32 inreg 28)#0
%bk=getelementptr inbounds i8,i8*%bj,i64 -4
%bl=bitcast i8*%bk to i32*
store i32 1342177304,i32*%bl,align 4
%bm=load i8*,i8**%b,align 8
%bn=bitcast i8*%bj to i8**
store i8*%bm,i8**%bn,align 8
%bo=load i8*,i8**%c,align 8
%bp=getelementptr inbounds i8,i8*%bj,i64 8
%bq=bitcast i8*%bp to i8**
store i8*%bo,i8**%bq,align 8
%br=load i8*,i8**%d,align 8
%bs=getelementptr inbounds i8,i8*%bj,i64 16
%bt=bitcast i8*%bs to i8**
store i8*%br,i8**%bt,align 8
%bu=getelementptr inbounds i8,i8*%bj,i64 24
%bv=bitcast i8*%bu to i32*
store i32 7,i32*%bv,align 4
ret i8*%bj
bw:
%bx=bitcast i8*%s to i8**
%by=load i8*,i8**%bx,align 8
store i8*%by,i8**%c,align 8
%bz=getelementptr inbounds i8,i8*%by,i64 8
%bA=bitcast i8*%bz to i8**
%bB=load i8*,i8**%bA,align 8
store i8*%bB,i8**%b,align 8
%bC=getelementptr inbounds i8,i8*%by,i64 16
%bD=bitcast i8*%bC to i8**
%bE=load i8*,i8**%bD,align 8
store i8*%bE,i8**%d,align 8
%bF=getelementptr inbounds i8,i8*%p,i64 8
%bG=bitcast i8*%bF to i8**
%bH=load i8*,i8**%bG,align 8
store i8*%bH,i8**%e,align 8
%bI=getelementptr inbounds i8,i8*%p,i64 16
%bJ=bitcast i8*%bI to i8**
%bK=load i8*,i8**%bJ,align 8
store i8*%bK,i8**%f,align 8
%bL=getelementptr inbounds i8,i8*%p,i64 24
%bM=bitcast i8*%bL to i8**
%bN=load i8*,i8**%bM,align 8
store i8*%bN,i8**%g,align 8
%bO=getelementptr inbounds i8,i8*%bH,i64 16
%bP=bitcast i8*%bO to i8**
%bQ=load i8*,i8**%bP,align 8
store i8*%bQ,i8**%h,align 8
%bR=call i8*@sml_alloc(i32 inreg 20)#0
%bS=getelementptr inbounds i8,i8*%bR,i64 -4
%bT=bitcast i8*%bS to i32*
store i32 1342177296,i32*%bT,align 4
%bU=load i8*,i8**%h,align 8
store i8*null,i8**%h,align 8
%bV=bitcast i8*%bR to i8**
store i8*%bU,i8**%bV,align 8
%bW=load i8*,i8**%f,align 8
%bX=getelementptr inbounds i8,i8*%bR,i64 8
%bY=bitcast i8*%bX to i8**
store i8*%bW,i8**%bY,align 8
%bZ=getelementptr inbounds i8,i8*%bR,i64 16
%b0=bitcast i8*%bZ to i32*
store i32 3,i32*%b0,align 4
%b1=call fastcc i8*@_SMLLN12TypedCalcCon11instantiateE_245(i8*inreg%bR)
%b2=icmp eq i8*%b1,null
br i1%b2,label%b7,label%b3
b3:
%b4=bitcast i8*%b1 to i32*
%b5=load i32,i32*%b4,align 4
%b6=icmp eq i32%b5,6
br i1%b6,label%b8,label%b7
b7:
store i8*null,i8**%c,align 8
store i8*null,i8**%d,align 8
store i8*null,i8**%e,align 8
store i8*null,i8**%f,align 8
store i8*null,i8**%g,align 8
br label%dQ
b8:
%b9=getelementptr inbounds i8,i8*%b1,i64 8
%ca=bitcast i8*%b9 to i8**
%cb=load i8*,i8**%ca,align 8
store i8*%cb,i8**%h,align 8
%cc=bitcast i8*%cb to i8**
%cd=load i8*,i8**%cc,align 8
%ce=icmp eq i8*%cd,null
br i1%ce,label%cf,label%cg
cf:
store i8*null,i8**%c,align 8
store i8*null,i8**%d,align 8
store i8*null,i8**%e,align 8
store i8*null,i8**%f,align 8
store i8*null,i8**%g,align 8
store i8*null,i8**%h,align 8
br label%dQ
cg:
%ch=bitcast i8*%cd to i8**
%ci=load i8*,i8**%ch,align 8
store i8*%ci,i8**%i,align 8
%cj=getelementptr inbounds i8,i8*%cd,i64 8
%ck=bitcast i8*%cj to i8**
%cl=load i8*,i8**%ck,align 8
%cm=icmp eq i8*%cl,null
br i1%cm,label%cn,label%dP
cn:
%co=call i8*@sml_alloc(i32 inreg 36)#0
%cp=getelementptr inbounds i8,i8*%co,i64 -4
%cq=bitcast i8*%cp to i32*
store i32 1342177312,i32*%cq,align 4
store i8*%co,i8**%j,align 8
%cr=load i8*,i8**%b,align 8
store i8*null,i8**%b,align 8
%cs=bitcast i8*%co to i8**
store i8*%cr,i8**%cs,align 8
%ct=load i8*,i8**%g,align 8
%cu=getelementptr inbounds i8,i8*%co,i64 8
%cv=bitcast i8*%cu to i8**
store i8*%ct,i8**%cv,align 8
%cw=load i8*,i8**%h,align 8
%cx=getelementptr inbounds i8,i8*%co,i64 16
%cy=bitcast i8*%cx to i8**
store i8*%cw,i8**%cy,align 8
%cz=load i8*,i8**%i,align 8
store i8*null,i8**%i,align 8
%cA=getelementptr inbounds i8,i8*%co,i64 24
%cB=bitcast i8*%cA to i8**
store i8*%cz,i8**%cB,align 8
%cC=getelementptr inbounds i8,i8*%co,i64 32
%cD=bitcast i8*%cC to i32*
store i32 15,i32*%cD,align 4
%cE=call i8*@sml_alloc(i32 inreg 28)#0
%cF=getelementptr inbounds i8,i8*%cE,i64 -4
%cG=bitcast i8*%cF to i32*
store i32 1342177304,i32*%cG,align 4
%cH=load i8*,i8**%j,align 8
%cI=bitcast i8*%cE to i8**
store i8*%cH,i8**%cI,align 8
%cJ=getelementptr inbounds i8,i8*%cE,i64 8
%cK=bitcast i8*%cJ to void(...)**
store void(...)*bitcast(void(i8*,i32)*@_SMLL1f_496 to void(...)*),void(...)**%cK,align 8
%cL=getelementptr inbounds i8,i8*%cE,i64 16
%cM=bitcast i8*%cL to void(...)**
store void(...)*bitcast(i8*(i8*,i8*)*@_SMLL1f_754 to void(...)*),void(...)**%cM,align 8
%cN=getelementptr inbounds i8,i8*%cE,i64 24
%cO=bitcast i8*%cN to i32*
store i32 -2147483647,i32*%cO,align 4
%cP=load i32*,i32**bitcast(i8**@_SMLZN7Control9checkTypeE to i32**),align 8
%cQ=load i32,i32*%cP,align 4
%cR=icmp eq i32%cQ,0
store i8*null,i8**%j,align 8
br i1%cR,label%cT,label%cS
cS:
call fastcc void@_SMLL1f_496(i8*inreg%cH,i32 inreg 0)
br label%cT
cT:
%cU=load i8*,i8**%h,align 8
store i8*null,i8**%h,align 8
%cV=getelementptr inbounds i8,i8*%cU,i64 8
%cW=bitcast i8*%cV to i8**
%cX=load i8*,i8**%cW,align 8
store i8*%cX,i8**%b,align 8
%cY=bitcast i8**%c to i8***
%cZ=load i8**,i8***%cY,align 8
%c0=load i8*,i8**%cZ,align 8
store i8*%c0,i8**%c,align 8
%c1=call i8*@sml_alloc(i32 inreg 12)#0
%c2=getelementptr inbounds i8,i8*%c1,i64 -4
%c3=bitcast i8*%c2 to i32*
store i32 1342177288,i32*%c3,align 4
store i8*%c1,i8**%h,align 8
%c4=load i8*,i8**%c,align 8
store i8*null,i8**%c,align 8
%c5=bitcast i8*%c1 to i8**
store i8*%c4,i8**%c5,align 8
%c6=getelementptr inbounds i8,i8*%c1,i64 8
%c7=bitcast i8*%c6 to i32*
store i32 1,i32*%c7,align 4
%c8=call i8*@sml_alloc(i32 inreg 44)#0
%c9=getelementptr inbounds i8,i8*%c8,i64 -4
%da=bitcast i8*%c9 to i32*
store i32 1342177320,i32*%da,align 4
store i8*%c8,i8**%c,align 8
%db=load i8*,i8**%h,align 8
store i8*null,i8**%h,align 8
%dc=bitcast i8*%c8 to i8**
store i8*%db,i8**%dc,align 8
%dd=load i8*,i8**%e,align 8
store i8*null,i8**%e,align 8
%de=getelementptr inbounds i8,i8*%c8,i64 8
%df=bitcast i8*%de to i8**
store i8*%dd,i8**%df,align 8
%dg=load i8*,i8**%f,align 8
store i8*null,i8**%f,align 8
%dh=getelementptr inbounds i8,i8*%c8,i64 16
%di=bitcast i8*%dh to i8**
store i8*%dg,i8**%di,align 8
%dj=load i8*,i8**%g,align 8
store i8*null,i8**%g,align 8
%dk=getelementptr inbounds i8,i8*%c8,i64 24
%dl=bitcast i8*%dk to i8**
store i8*%dj,i8**%dl,align 8
%dm=load i8*,i8**%b,align 8
%dn=getelementptr inbounds i8,i8*%c8,i64 32
%do=bitcast i8*%dn to i8**
store i8*%dm,i8**%do,align 8
%dp=getelementptr inbounds i8,i8*%c8,i64 40
%dq=bitcast i8*%dp to i32*
store i32 31,i32*%dq,align 4
%dr=call i8*@sml_alloc(i32 inreg 20)#0
%ds=getelementptr inbounds i8,i8*%dr,i64 -4
%dt=bitcast i8*%ds to i32*
store i32 1342177296,i32*%dt,align 4
store i8*%dr,i8**%e,align 8
%du=getelementptr inbounds i8,i8*%dr,i64 4
%dv=bitcast i8*%du to i32*
store i32 0,i32*%dv,align 1
%dw=bitcast i8*%dr to i32*
store i32 1,i32*%dw,align 4
%dx=load i8*,i8**%c,align 8
store i8*null,i8**%c,align 8
%dy=getelementptr inbounds i8,i8*%dr,i64 8
%dz=bitcast i8*%dy to i8**
store i8*%dx,i8**%dz,align 8
%dA=getelementptr inbounds i8,i8*%dr,i64 16
%dB=bitcast i8*%dA to i32*
store i32 2,i32*%dB,align 4
%dC=call i8*@sml_alloc(i32 inreg 28)#0
%dD=getelementptr inbounds i8,i8*%dC,i64 -4
%dE=bitcast i8*%dD to i32*
store i32 1342177304,i32*%dE,align 4
%dF=load i8*,i8**%e,align 8
%dG=bitcast i8*%dC to i8**
store i8*%dF,i8**%dG,align 8
%dH=load i8*,i8**%b,align 8
%dI=getelementptr inbounds i8,i8*%dC,i64 8
%dJ=bitcast i8*%dI to i8**
store i8*%dH,i8**%dJ,align 8
%dK=load i8*,i8**%d,align 8
%dL=getelementptr inbounds i8,i8*%dC,i64 16
%dM=bitcast i8*%dL to i8**
store i8*%dK,i8**%dM,align 8
%dN=getelementptr inbounds i8,i8*%dC,i64 24
%dO=bitcast i8*%dN to i32*
store i32 7,i32*%dO,align 4
ret i8*%dC
dP:
store i8*null,i8**%c,align 8
store i8*null,i8**%d,align 8
store i8*null,i8**%e,align 8
store i8*null,i8**%f,align 8
store i8*null,i8**%g,align 8
store i8*null,i8**%h,align 8
store i8*null,i8**%i,align 8
br label%dQ
dQ:
%dR=load i8*,i8**@_SMLZN3Bug3BugE,align 8
store i8*%dR,i8**%b,align 8
%dS=call i8*@sml_alloc(i32 inreg 28)#0
%dT=getelementptr inbounds i8,i8*%dS,i64 -4
%dU=bitcast i8*%dT to i32*
store i32 1342177304,i32*%dU,align 4
store i8*%dS,i8**%c,align 8
%dV=load i8*,i8**%b,align 8
store i8*null,i8**%b,align 8
%dW=bitcast i8*%dS to i8**
store i8*%dV,i8**%dW,align 8
%dX=getelementptr inbounds i8,i8*%dS,i64 8
%dY=bitcast i8*%dX to i8**
store i8*getelementptr inbounds(<{[4x i8],i32,[71x i8]}>,<{[4x i8],i32,[71x i8]}>*@a5,i64 0,i32 2,i64 0),i8**%dY,align 8
%dZ=getelementptr inbounds i8,i8*%dS,i64 16
%d0=bitcast i8*%dZ to i8**
store i8*getelementptr inbounds(<{[4x i8],i32,[19x i8]}>,<{[4x i8],i32,[19x i8]}>*@a8,i64 0,i32 2,i64 0),i8**%d0,align 8
%d1=getelementptr inbounds i8,i8*%dS,i64 24
%d2=bitcast i8*%d1 to i32*
store i32 7,i32*%d2,align 4
%d3=call i8*@sml_alloc(i32 inreg 60)#0
%d4=getelementptr inbounds i8,i8*%d3,i64 -4
%d5=bitcast i8*%d4 to i32*
store i32 1342177336,i32*%d5,align 4
%d6=getelementptr inbounds i8,i8*%d3,i64 56
%d7=bitcast i8*%d6 to i32*
store i32 1,i32*%d7,align 4
%d8=load i8*,i8**%c,align 8
%d9=bitcast i8*%d3 to i8**
store i8*%d8,i8**%d9,align 8
call void@sml_raise(i8*inreg%d3)#1
unreachable
}
define internal fastcc void@_SMLL1f_505(i8*inreg%a,i32 inreg%b)#2 gc"smlsharp"{
%c=alloca i8*,align 8
%d=alloca i8*,align 8
%e=alloca i8*,align 8
%f=alloca i8*,align 8
%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**%d,align 8
%h=load atomic i32,i32*@sml_check_flag unordered,align 4
%i=icmp eq i32%h,0
br i1%i,label%k,label%j
j:
call void@sml_check(i32 inreg%h)
br label%k
k:
%l=call fastcc i8*@_SMLLN12TypedCalcCon4eqTyE_287(i8*inreg getelementptr inbounds(<{[4x i8],i32,[18x i8]}>,<{[4x i8],i32,[18x i8]}>*@ba,i64 0,i32 2,i64 0))
%m=getelementptr inbounds i8,i8*%l,i64 16
%n=bitcast i8*%m to i8*(i8*,i8*)**
%o=load i8*(i8*,i8*)*,i8*(i8*,i8*)**%n,align 8
%p=bitcast i8*%l to i8**
%q=load i8*,i8**%p,align 8
%r=load i8*,i8**%d,align 8
%s=getelementptr inbounds i8,i8*%r,i64 8
%t=bitcast i8*%s to i8**
%u=load i8*,i8**%t,align 8
%v=call fastcc i8*%o(i8*inreg%q,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**
%A=load i8*,i8**%z,align 8
store i8*%A,i8**%g,align 8
%B=load i8*,i8**%d,align 8
%C=getelementptr inbounds i8,i8*%B,i64 24
%D=bitcast i8*%C to i8**
%E=load i8*,i8**%D,align 8
store i8*%E,i8**%e,align 8
%F=bitcast i8*%B to i8**
%G=load i8*,i8**%F,align 8
store i8*%G,i8**%f,align 8
%H=call i8*@sml_alloc(i32 inreg 20)#0
%I=getelementptr inbounds i8,i8*%H,i64 -4
%J=bitcast i8*%I to i32*
store i32 1342177296,i32*%J,align 4
store i8*%H,i8**%c,align 8
%K=load i8*,i8**%e,align 8
store i8*null,i8**%e,align 8
%L=bitcast i8*%H to i8**
store i8*%K,i8**%L,align 8
%M=load i8*,i8**%f,align 8
store i8*null,i8**%f,align 8
%N=getelementptr inbounds i8,i8*%H,i64 8
%O=bitcast i8*%N to i8**
store i8*%M,i8**%O,align 8
%P=getelementptr inbounds i8,i8*%H,i64 16
%Q=bitcast i8*%P to i32*
store i32 3,i32*%Q,align 4
%R=call i8*@sml_alloc(i32 inreg 20)#0
%S=getelementptr inbounds i8,i8*%R,i64 -4
%T=bitcast i8*%S to i32*
store i32 1342177296,i32*%T,align 4
%U=load i8*,i8**%c,align 8
store i8*null,i8**%c,align 8
%V=bitcast i8*%R to i8**
store i8*%U,i8**%V,align 8
%W=getelementptr inbounds i8,i8*%R,i64 8
%X=bitcast i8*%W to i8**
store i8*null,i8**%X,align 8
%Y=getelementptr inbounds i8,i8*%R,i64 16
%Z=bitcast i8*%Y to i32*
store i32 3,i32*%Z,align 4
%aa=load i8*,i8**%g,align 8
store i8*null,i8**%g,align 8
%ab=call fastcc i8*%y(i8*inreg%aa,i8*inreg%R)
%ac=call fastcc i8*@_SMLLN12TypedCalcCon17mustBeCONSTRUCTtyE_274(i8*inreg getelementptr inbounds(<{[4x i8],i32,[18x i8]}>,<{[4x i8],i32,[18x i8]}>*@ba,i64 0,i32 2,i64 0))
%ad=getelementptr inbounds i8,i8*%ac,i64 16
%ae=bitcast i8*%ad to i8*(i8*,i8*)**
%af=load i8*(i8*,i8*)*,i8*(i8*,i8*)**%ae,align 8
%ag=bitcast i8*%ac to i8**
%ah=load i8*,i8**%ag,align 8
%ai=load i8*,i8**%d,align 8
%aj=getelementptr inbounds i8,i8*%ai,i64 8
%ak=bitcast i8*%aj to i8**
%al=load i8*,i8**%ak,align 8
%am=call fastcc i8*%af(i8*inreg%ah,i8*inreg%al)
%an=getelementptr inbounds i8,i8*%am,i64 16
%ao=bitcast i8*%an to i8*(i8*,i8*)**
%ap=load i8*(i8*,i8*)*,i8*(i8*,i8*)**%ao,align 8
%aq=bitcast i8*%am to i8**
%ar=load i8*,i8**%aq,align 8
%as=load i8*,i8**%d,align 8
store i8*null,i8**%d,align 8
%at=getelementptr inbounds i8,i8*%as,i64 16
%au=bitcast i8*%at to i8**
%av=load i8*,i8**%au,align 8
%aw=getelementptr inbounds i8,i8*%av,i64 8
%ax=bitcast i8*%aw to i8**
%ay=load i8*,i8**%ax,align 8
%az=call fastcc i8*%ap(i8*inreg%ar,i8*inreg%ay)
ret void
}
define fastcc i8*@_SMLFN12TypedCalcCon17TPPATEXNCONSTRUCTE(i8*inreg%a)#2 gc"smlsharp"{
p:
%b=alloca i8*,align 8
%c=alloca i8*,align 8
%d=alloca i8*,align 8
%e=alloca i8*,align 8
%f=alloca i8*,align 8
%g=alloca i8*,align 8
%h=alloca i8*,align 8
%i=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
call void@llvm.gcroot(i8**%f,i8*null)#0
call void@llvm.gcroot(i8**%g,i8*null)#0
call void@llvm.gcroot(i8**%h,i8*null)#0
call void@llvm.gcroot(i8**%i,i8*null)#0
store i8*%a,i8**%b,align 8
%j=load atomic i32,i32*@sml_check_flag unordered,align 4
%k=icmp eq i32%j,0
br i1%k,label%n,label%l
l:
call void@sml_check(i32 inreg%j)
%m=load i8*,i8**%b,align 8
br label%n
n:
%o=phi i8*[%m,%l],[%a,%p]
%q=bitcast i8*%o to i8**
%r=load i8*,i8**%q,align 8
%s=icmp eq i8*%r,null
br i1%s,label%t,label%bE
t:
%u=getelementptr inbounds i8,i8*%o,i64 8
%v=bitcast i8*%u to i8**
%w=load i8*,i8**%v,align 8
store i8*%w,i8**%c,align 8
%x=getelementptr inbounds i8,i8*%o,i64 16
%y=bitcast i8*%x to i8**
%z=load i8*,i8**%y,align 8
store i8*%z,i8**%d,align 8
%A=bitcast i8*%w to i32*
%B=load i32,i32*%A,align 4
switch i32%B,label%C[
i32 0,label%U
i32 1,label%V
]
C:
store i8*null,i8**%c,align 8
store i8*null,i8**%d,align 8
call void@sml_matchcomp_bug()
%D=load i8*,i8**@_SMLZ5Match,align 8
store i8*%D,i8**%b,align 8
%E=call i8*@sml_alloc(i32 inreg 20)#0
%F=getelementptr inbounds i8,i8*%E,i64 -4
%G=bitcast i8*%F to i32*
store i32 1342177296,i32*%G,align 4
store i8*%E,i8**%c,align 8
%H=load i8*,i8**%b,align 8
store i8*null,i8**%b,align 8
%I=bitcast i8*%E to i8**
store i8*%H,i8**%I,align 8
%J=getelementptr inbounds i8,i8*%E,i64 8
%K=bitcast i8*%J to i8**
store i8*getelementptr inbounds(<{[4x i8],i32,[69x i8]}>,<{[4x i8],i32,[69x i8]}>*@a9,i64 0,i32 2,i64 0),i8**%K,align 8
%L=getelementptr inbounds i8,i8*%E,i64 16
%M=bitcast i8*%L to i32*
store i32 3,i32*%M,align 4
%N=call i8*@sml_alloc(i32 inreg 60)#0
%O=getelementptr inbounds i8,i8*%N,i64 -4
%P=bitcast i8*%O to i32*
store i32 1342177336,i32*%P,align 4
%Q=getelementptr inbounds i8,i8*%N,i64 56
%R=bitcast i8*%Q to i32*
store i32 1,i32*%R,align 4
%S=load i8*,i8**%c,align 8
%T=bitcast i8*%N to i8**
store i8*%S,i8**%T,align 8
call void@sml_raise(i8*inreg%N)#1
unreachable
U:
br label%V
V:
%W=phi i64[8,%U],[16,%t]
%X=getelementptr inbounds i8,i8*%w,i64 8
%Y=bitcast i8*%X to i8**
%Z=load i8*,i8**%Y,align 8
%aa=getelementptr inbounds i8,i8*%Z,i64%W
%ab=bitcast i8*%aa to i8**
%ac=load i8*,i8**%ab,align 8
store i8*%ac,i8**%b,align 8
%ad=load i32*,i32**bitcast(i8**@_SMLZN7Control9checkTypeE to i32**),align 8
%ae=load i32,i32*%ad,align 4
%af=icmp eq i32%ae,0
br i1%af,label%aw,label%ag
ag:
%ah=call fastcc i8*@_SMLLN12TypedCalcCon17mustBeCONSTRUCTtyE_274(i8*inreg getelementptr inbounds(<{[4x i8],i32,[18x i8]}>,<{[4x i8],i32,[18x i8]}>*@ba,i64 0,i32 2,i64 0))
%ai=getelementptr inbounds i8,i8*%ah,i64 16
%aj=bitcast i8*%ai to i8*(i8*,i8*)**
%ak=load i8*(i8*,i8*)*,i8*(i8*,i8*)**%aj,align 8
%al=bitcast i8*%ah to i8**
%am=load i8*,i8**%al,align 8
%an=load i8*,i8**%d,align 8
%ao=call fastcc i8*%ak(i8*inreg%am,i8*inreg%an)
%ap=getelementptr inbounds i8,i8*%ao,i64 16
%aq=bitcast i8*%ap to i8*(i8*,i8*)**
%ar=load i8*(i8*,i8*)*,i8*(i8*,i8*)**%aq,align 8
%as=bitcast i8*%ao to i8**
%at=load i8*,i8**%as,align 8
%au=load i8*,i8**%b,align 8
%av=call fastcc i8*%ar(i8*inreg%at,i8*inreg%au)
br label%aw
aw:
%ax=call i8*@sml_alloc(i32 inreg 36)#0
%ay=getelementptr inbounds i8,i8*%ax,i64 -4
%az=bitcast i8*%ay to i32*
store i32 1342177312,i32*%az,align 4
store i8*%ax,i8**%e,align 8
%aA=bitcast i8*%ax to i8**
store i8*null,i8**%aA,align 8
%aB=load i8*,i8**%c,align 8
store i8*null,i8**%c,align 8
%aC=getelementptr inbounds i8,i8*%ax,i64 8
%aD=bitcast i8*%aC to i8**
store i8*%aB,i8**%aD,align 8
%aE=load i8*,i8**%d,align 8
store i8*null,i8**%d,align 8
%aF=getelementptr inbounds i8,i8*%ax,i64 16
%aG=bitcast i8*%aF to i8**
store i8*%aE,i8**%aG,align 8
%aH=load i8*,i8**%b,align 8
%aI=getelementptr inbounds i8,i8*%ax,i64 24
%aJ=bitcast i8*%aI to i8**
store i8*%aH,i8**%aJ,align 8
%aK=getelementptr inbounds i8,i8*%ax,i64 32
%aL=bitcast i8*%aK to i32*
store i32 15,i32*%aL,align 4
%aM=call i8*@sml_alloc(i32 inreg 20)#0
%aN=getelementptr inbounds i8,i8*%aM,i64 -4
%aO=bitcast i8*%aN to i32*
store i32 1342177296,i32*%aO,align 4
store i8*%aM,i8**%d,align 8
%aP=getelementptr inbounds i8,i8*%aM,i64 4
%aQ=bitcast i8*%aP to i32*
store i32 0,i32*%aQ,align 1
%aR=bitcast i8*%aM to i32*
store i32 3,i32*%aR,align 4
%aS=load i8*,i8**%e,align 8
store i8*null,i8**%e,align 8
%aT=getelementptr inbounds i8,i8*%aM,i64 8
%aU=bitcast i8*%aT to i8**
store i8*%aS,i8**%aU,align 8
%aV=getelementptr inbounds i8,i8*%aM,i64 16
%aW=bitcast i8*%aV to i32*
store i32 2,i32*%aW,align 4
%aX=load i8*,i8**@_SMLZN5VarID3Map5emptyE,align 8
store i8*%aX,i8**%c,align 8
%aY=call i8*@sml_alloc(i32 inreg 28)#0
%aZ=getelementptr inbounds i8,i8*%aY,i64 -4
%a0=bitcast i8*%aZ to i32*
store i32 1342177304,i32*%a0,align 4
%a1=load i8*,i8**%d,align 8
%a2=bitcast i8*%aY to i8**
store i8*%a1,i8**%a2,align 8
%a3=load i8*,i8**%b,align 8
%a4=getelementptr inbounds i8,i8*%aY,i64 8
%a5=bitcast i8*%a4 to i8**
store i8*%a3,i8**%a5,align 8
%a6=load i8*,i8**%c,align 8
%a7=getelementptr inbounds i8,i8*%aY,i64 16
%a8=bitcast i8*%a7 to i8**
store i8*%a6,i8**%a8,align 8
%a9=getelementptr inbounds i8,i8*%aY,i64 24
%ba=bitcast i8*%a9 to i32*
store i32 7,i32*%ba,align 4
store i8*%a1,i8**%b,align 8
store i8*%a3,i8**%c,align 8
%bb=getelementptr inbounds i8,i8*%a6,i64 16
%bc=bitcast i8*%bb to i8*(i8*,i8*,i8*)**
%bd=load i8*(i8*,i8*,i8*)*,i8*(i8*,i8*,i8*)**%bc,align 8
%be=bitcast i8*%a6 to i8**
%bf=load i8*,i8**%be,align 8
store i8*%bf,i8**%d,align 8
%bg=call i8*@sml_alloc(i32 inreg 4)#0
%bh=bitcast i8*%bg to i32*
%bi=getelementptr inbounds i8,i8*%bg,i64 -4
%bj=bitcast i8*%bi to i32*
store i32 4,i32*%bj,align 4
store i8*%bg,i8**%e,align 8
store i32 1,i32*%bh,align 4
%bk=call i8*@sml_alloc(i32 inreg 4)#0
%bl=bitcast i8*%bk to i32*
%bm=getelementptr inbounds i8,i8*%bk,i64 -4
%bn=bitcast i8*%bm to i32*
store i32 4,i32*%bn,align 4
store i32 8,i32*%bl,align 4
%bo=load i8*,i8**%d,align 8
%bp=load i8*,i8**%e,align 8
store i8*null,i8**%d,align 8
store i8*null,i8**%e,align 8
%bq=call fastcc i8*%bd(i8*inreg%bo,i8*inreg%bp,i8*inreg%bk)
store i8*%bq,i8**%d,align 8
%br=call i8*@sml_alloc(i32 inreg 28)#0
%bs=getelementptr inbounds i8,i8*%br,i64 -4
%bt=bitcast i8*%bs to i32*
store i32 1342177304,i32*%bt,align 4
%bu=load i8*,i8**%b,align 8
%bv=bitcast i8*%br to i8**
store i8*%bu,i8**%bv,align 8
%bw=load i8*,i8**%c,align 8
%bx=getelementptr inbounds i8,i8*%br,i64 8
%by=bitcast i8*%bx to i8**
store i8*%bw,i8**%by,align 8
%bz=load i8*,i8**%d,align 8
%bA=getelementptr inbounds i8,i8*%br,i64 16
%bB=bitcast i8*%bA to i8**
store i8*%bz,i8**%bB,align 8
%bC=getelementptr inbounds i8,i8*%br,i64 24
%bD=bitcast i8*%bC to i32*
store i32 7,i32*%bD,align 4
ret i8*%br
bE:
%bF=bitcast i8*%r to i8**
%bG=load i8*,i8**%bF,align 8
store i8*%bG,i8**%c,align 8
%bH=getelementptr inbounds i8,i8*%bG,i64 8
%bI=bitcast i8*%bH to i8**
%bJ=load i8*,i8**%bI,align 8
store i8*%bJ,i8**%b,align 8
%bK=getelementptr inbounds i8,i8*%bG,i64 16
%bL=bitcast i8*%bK to i8**
%bM=load i8*,i8**%bL,align 8
store i8*%bM,i8**%d,align 8
%bN=getelementptr inbounds i8,i8*%o,i64 8
%bO=bitcast i8*%bN to i8**
%bP=load i8*,i8**%bO,align 8
store i8*%bP,i8**%e,align 8
%bQ=getelementptr inbounds i8,i8*%o,i64 16
%bR=bitcast i8*%bQ to i8**
%bS=load i8*,i8**%bR,align 8
store i8*%bS,i8**%f,align 8
%bT=bitcast i8*%bP to i32*
%bU=load i32,i32*%bT,align 4
switch i32%bU,label%bV[
i32 0,label%cd
i32 1,label%ce
]
bV:
store i8*null,i8**%c,align 8
store i8*null,i8**%d,align 8
store i8*null,i8**%e,align 8
store i8*null,i8**%f,align 8
call void@sml_matchcomp_bug()
%bW=load i8*,i8**@_SMLZ5Match,align 8
store i8*%bW,i8**%b,align 8
%bX=call i8*@sml_alloc(i32 inreg 20)#0
%bY=getelementptr inbounds i8,i8*%bX,i64 -4
%bZ=bitcast i8*%bY to i32*
store i32 1342177296,i32*%bZ,align 4
store i8*%bX,i8**%c,align 8
%b0=load i8*,i8**%b,align 8
store i8*null,i8**%b,align 8
%b1=bitcast i8*%bX to i8**
store i8*%b0,i8**%b1,align 8
%b2=getelementptr inbounds i8,i8*%bX,i64 8
%b3=bitcast i8*%b2 to i8**
store i8*getelementptr inbounds(<{[4x i8],i32,[69x i8]}>,<{[4x i8],i32,[69x i8]}>*@a9,i64 0,i32 2,i64 0),i8**%b3,align 8
%b4=getelementptr inbounds i8,i8*%bX,i64 16
%b5=bitcast i8*%b4 to i32*
store i32 3,i32*%b5,align 4
%b6=call i8*@sml_alloc(i32 inreg 60)#0
%b7=getelementptr inbounds i8,i8*%b6,i64 -4
%b8=bitcast i8*%b7 to i32*
store i32 1342177336,i32*%b8,align 4
%b9=getelementptr inbounds i8,i8*%b6,i64 56
%ca=bitcast i8*%b9 to i32*
store i32 1,i32*%ca,align 4
%cb=load i8*,i8**%c,align 8
%cc=bitcast i8*%b6 to i8**
store i8*%cb,i8**%cc,align 8
call void@sml_raise(i8*inreg%b6)#1
unreachable
cd:
br label%ce
ce:
%cf=phi i64[8,%cd],[16,%bE]
%cg=getelementptr inbounds i8,i8*%bP,i64 8
%ch=bitcast i8*%cg to i8**
%ci=load i8*,i8**%ch,align 8
%cj=getelementptr inbounds i8,i8*%ci,i64%cf
%ck=bitcast i8*%cj to i8**
%cl=load i8*,i8**%ck,align 8
%cm=call fastcc i8*@_SMLFN11TypesBasics7derefTyE(i8*inreg%cl)
%cn=icmp eq i8*%cm,null
br i1%cn,label%cs,label%co
co:
%cp=bitcast i8*%cm to i32*
%cq=load i32,i32*%cp,align 4
%cr=icmp eq i32%cq,6
br i1%cr,label%ct,label%cs
cs:
store i8*null,i8**%c,align 8
store i8*null,i8**%d,align 8
store i8*null,i8**%e,align 8
store i8*null,i8**%f,align 8
br label%d8
ct:
%cu=getelementptr inbounds i8,i8*%cm,i64 8
%cv=bitcast i8*%cu to i8**
%cw=load i8*,i8**%cv,align 8
store i8*%cw,i8**%g,align 8
%cx=bitcast i8*%cw to i8**
%cy=load i8*,i8**%cx,align 8
%cz=icmp eq i8*%cy,null
br i1%cz,label%cA,label%cB
cA:
store i8*null,i8**%c,align 8
store i8*null,i8**%d,align 8
store i8*null,i8**%e,align 8
store i8*null,i8**%f,align 8
store i8*null,i8**%g,align 8
br label%d8
cB:
%cC=bitcast i8*%cy to i8**
%cD=load i8*,i8**%cC,align 8
store i8*%cD,i8**%h,align 8
%cE=getelementptr inbounds i8,i8*%cy,i64 8
%cF=bitcast i8*%cE to i8**
%cG=load i8*,i8**%cF,align 8
%cH=icmp eq i8*%cG,null
br i1%cH,label%cI,label%d7
cI:
%cJ=call i8*@sml_alloc(i32 inreg 36)#0
%cK=getelementptr inbounds i8,i8*%cJ,i64 -4
%cL=bitcast i8*%cK to i32*
store i32 1342177312,i32*%cL,align 4
store i8*%cJ,i8**%i,align 8
%cM=load i8*,i8**%b,align 8
store i8*null,i8**%b,align 8
%cN=bitcast i8*%cJ to i8**
store i8*%cM,i8**%cN,align 8
%cO=load i8*,i8**%f,align 8
%cP=getelementptr inbounds i8,i8*%cJ,i64 8
%cQ=bitcast i8*%cP to i8**
store i8*%cO,i8**%cQ,align 8
%cR=load i8*,i8**%g,align 8
%cS=getelementptr inbounds i8,i8*%cJ,i64 16
%cT=bitcast i8*%cS to i8**
store i8*%cR,i8**%cT,align 8
%cU=load i8*,i8**%h,align 8
store i8*null,i8**%h,align 8
%cV=getelementptr inbounds i8,i8*%cJ,i64 24
%cW=bitcast i8*%cV to i8**
store i8*%cU,i8**%cW,align 8
%cX=getelementptr inbounds i8,i8*%cJ,i64 32
%cY=bitcast i8*%cX to i32*
store i32 15,i32*%cY,align 4
%cZ=call i8*@sml_alloc(i32 inreg 28)#0
%c0=getelementptr inbounds i8,i8*%cZ,i64 -4
%c1=bitcast i8*%c0 to i32*
store i32 1342177304,i32*%c1,align 4
%c2=load i8*,i8**%i,align 8
%c3=bitcast i8*%cZ to i8**
store i8*%c2,i8**%c3,align 8
%c4=getelementptr inbounds i8,i8*%cZ,i64 8
%c5=bitcast i8*%c4 to void(...)**
store void(...)*bitcast(void(i8*,i32)*@_SMLL1f_505 to void(...)*),void(...)**%c5,align 8
%c6=getelementptr inbounds i8,i8*%cZ,i64 16
%c7=bitcast i8*%c6 to void(...)**
store void(...)*bitcast(i8*(i8*,i8*)*@_SMLL1f_756 to void(...)*),void(...)**%c7,align 8
%c8=getelementptr inbounds i8,i8*%cZ,i64 24
%c9=bitcast i8*%c8 to i32*
store i32 -2147483647,i32*%c9,align 4
%da=load i32*,i32**bitcast(i8**@_SMLZN7Control9checkTypeE to i32**),align 8
%db=load i32,i32*%da,align 4
%dc=icmp eq i32%db,0
store i8*null,i8**%i,align 8
br i1%dc,label%de,label%dd
dd:
call fastcc void@_SMLL1f_505(i8*inreg%c2,i32 inreg 0)
br label%de
de:
%df=load i8*,i8**%g,align 8
store i8*null,i8**%g,align 8
%dg=getelementptr inbounds i8,i8*%df,i64 8
%dh=bitcast i8*%dg to i8**
%di=load i8*,i8**%dh,align 8
store i8*%di,i8**%b,align 8
%dj=bitcast i8**%c to i8***
%dk=load i8**,i8***%dj,align 8
%dl=load i8*,i8**%dk,align 8
store i8*%dl,i8**%c,align 8
%dm=call i8*@sml_alloc(i32 inreg 12)#0
%dn=getelementptr inbounds i8,i8*%dm,i64 -4
%do=bitcast i8*%dn to i32*
store i32 1342177288,i32*%do,align 4
store i8*%dm,i8**%g,align 8
%dp=load i8*,i8**%c,align 8
store i8*null,i8**%c,align 8
%dq=bitcast i8*%dm to i8**
store i8*%dp,i8**%dq,align 8
%dr=getelementptr inbounds i8,i8*%dm,i64 8
%ds=bitcast i8*%dr to i32*
store i32 1,i32*%ds,align 4
%dt=call i8*@sml_alloc(i32 inreg 36)#0
%du=getelementptr inbounds i8,i8*%dt,i64 -4
%dv=bitcast i8*%du to i32*
store i32 1342177312,i32*%dv,align 4
store i8*%dt,i8**%c,align 8
%dw=load i8*,i8**%g,align 8
store i8*null,i8**%g,align 8
%dx=bitcast i8*%dt to i8**
store i8*%dw,i8**%dx,align 8
%dy=load i8*,i8**%e,align 8
store i8*null,i8**%e,align 8
%dz=getelementptr inbounds i8,i8*%dt,i64 8
%dA=bitcast i8*%dz to i8**
store i8*%dy,i8**%dA,align 8
%dB=load i8*,i8**%f,align 8
store i8*null,i8**%f,align 8
%dC=getelementptr inbounds i8,i8*%dt,i64 16
%dD=bitcast i8*%dC to i8**
store i8*%dB,i8**%dD,align 8
%dE=load i8*,i8**%b,align 8
%dF=getelementptr inbounds i8,i8*%dt,i64 24
%dG=bitcast i8*%dF to i8**
store i8*%dE,i8**%dG,align 8
%dH=getelementptr inbounds i8,i8*%dt,i64 32
%dI=bitcast i8*%dH to i32*
store i32 15,i32*%dI,align 4
%dJ=call i8*@sml_alloc(i32 inreg 20)#0
%dK=getelementptr inbounds i8,i8*%dJ,i64 -4
%dL=bitcast i8*%dK to i32*
store i32 1342177296,i32*%dL,align 4
store i8*%dJ,i8**%e,align 8
%dM=getelementptr inbounds i8,i8*%dJ,i64 4
%dN=bitcast i8*%dM to i32*
store i32 0,i32*%dN,align 1
%dO=bitcast i8*%dJ to i32*
store i32 3,i32*%dO,align 4
%dP=load i8*,i8**%c,align 8
store i8*null,i8**%c,align 8
%dQ=getelementptr inbounds i8,i8*%dJ,i64 8
%dR=bitcast i8*%dQ to i8**
store i8*%dP,i8**%dR,align 8
%dS=getelementptr inbounds i8,i8*%dJ,i64 16
%dT=bitcast i8*%dS to i32*
store i32 2,i32*%dT,align 4
%dU=call i8*@sml_alloc(i32 inreg 28)#0
%dV=getelementptr inbounds i8,i8*%dU,i64 -4
%dW=bitcast i8*%dV to i32*
store i32 1342177304,i32*%dW,align 4
%dX=load i8*,i8**%e,align 8
%dY=bitcast i8*%dU to i8**
store i8*%dX,i8**%dY,align 8
%dZ=load i8*,i8**%b,align 8
%d0=getelementptr inbounds i8,i8*%dU,i64 8
%d1=bitcast i8*%d0 to i8**
store i8*%dZ,i8**%d1,align 8
%d2=load i8*,i8**%d,align 8
%d3=getelementptr inbounds i8,i8*%dU,i64 16
%d4=bitcast i8*%d3 to i8**
store i8*%d2,i8**%d4,align 8
%d5=getelementptr inbounds i8,i8*%dU,i64 24
%d6=bitcast i8*%d5 to i32*
store i32 7,i32*%d6,align 4
ret i8*%dU
d7:
store i8*null,i8**%c,align 8
store i8*null,i8**%d,align 8
store i8*null,i8**%e,align 8
store i8*null,i8**%f,align 8
store i8*null,i8**%g,align 8
store i8*null,i8**%h,align 8
br label%d8
d8:
%d9=load i8*,i8**@_SMLZN3Bug3BugE,align 8
store i8*%d9,i8**%b,align 8
%ea=call i8*@sml_alloc(i32 inreg 28)#0
%eb=getelementptr inbounds i8,i8*%ea,i64 -4
%ec=bitcast i8*%eb to i32*
store i32 1342177304,i32*%ec,align 4
store i8*%ea,i8**%c,align 8
%ed=load i8*,i8**%b,align 8
store i8*null,i8**%b,align 8
%ee=bitcast i8*%ea to i8**
store i8*%ed,i8**%ee,align 8
%ef=getelementptr inbounds i8,i8*%ea,i64 8
%eg=bitcast i8*%ef to i8**
store i8*getelementptr inbounds(<{[4x i8],i32,[71x i8]}>,<{[4x i8],i32,[71x i8]}>*@a7,i64 0,i32 2,i64 0),i8**%eg,align 8
%eh=getelementptr inbounds i8,i8*%ea,i64 16
%ei=bitcast i8*%eh to i8**
store i8*getelementptr inbounds(<{[4x i8],i32,[19x i8]}>,<{[4x i8],i32,[19x i8]}>*@a8,i64 0,i32 2,i64 0),i8**%ei,align 8
%ej=getelementptr inbounds i8,i8*%ea,i64 24
%ek=bitcast i8*%ej to i32*
store i32 7,i32*%ek,align 4
%el=call i8*@sml_alloc(i32 inreg 60)#0
%em=getelementptr inbounds i8,i8*%el,i64 -4
%en=bitcast i8*%em to i32*
store i32 1342177336,i32*%en,align 4
%eo=getelementptr inbounds i8,i8*%el,i64 56
%ep=bitcast i8*%eo to i32*
store i32 1,i32*%ep,align 4
%eq=load i8*,i8**%c,align 8
%er=bitcast i8*%el to i8**
store i8*%eq,i8**%er,align 8
call void@sml_raise(i8*inreg%el)#1
unreachable
}
define internal fastcc void@_SMLL1f_511(i8*inreg%a,i32 inreg%b)#2 gc"smlsharp"{
%c=alloca i8*,align 8
%d=alloca i8*,align 8
%e=alloca i8*,align 8
%f=alloca i8*,align 8
call void@llvm.gcroot(i8**%c,i8*null)#0
call void@llvm.gcroot(i8**%d,i8*null)#0
call void@llvm.gcroot(i8**%e,i8*null)#0
call void@llvm.gcroot(i8**%f,i8*null)#0
store i8*%a,i8**%c,align 8
%g=load atomic i32,i32*@sml_check_flag unordered,align 4
%h=icmp eq i32%g,0
br i1%h,label%j,label%i
i:
call void@sml_check(i32 inreg%g)
br label%j
j:
%k=call fastcc i8*@_SMLLN12TypedCalcCon4eqTyE_287(i8*inreg getelementptr inbounds(<{[4x i8],i32,[13x i8]}>,<{[4x i8],i32,[13x i8]}>*@bd,i64 0,i32 2,i64 0))
%l=getelementptr inbounds i8,i8*%k,i64 16
%m=bitcast i8*%l to i8*(i8*,i8*)**
%n=load i8*(i8*,i8*)*,i8*(i8*,i8*)**%m,align 8
%o=bitcast i8*%k to i8**
%p=load i8*,i8**%o,align 8
%q=load i8*,i8**%c,align 8
%r=getelementptr inbounds i8,i8*%q,i64 8
%s=bitcast i8*%r to i8**
%t=load i8*,i8**%s,align 8
%u=call fastcc i8*%n(i8*inreg%p,i8*inreg%t)
%v=getelementptr inbounds i8,i8*%u,i64 16
%w=bitcast i8*%v to i8*(i8*,i8*)**
%x=load i8*(i8*,i8*)*,i8*(i8*,i8*)**%w,align 8
%y=bitcast i8*%u to i8**
%z=load i8*,i8**%y,align 8
store i8*%z,i8**%f,align 8
%A=load i8*,i8**%c,align 8
%B=getelementptr inbounds i8,i8*%A,i64 16
%C=bitcast i8*%B to i8**
%D=load i8*,i8**%C,align 8
store i8*%D,i8**%d,align 8
%E=bitcast i8*%A to i8**
store i8*null,i8**%c,align 8
%F=load i8*,i8**%E,align 8
store i8*%F,i8**%e,align 8
%G=call i8*@sml_alloc(i32 inreg 20)#0
%H=getelementptr inbounds i8,i8*%G,i64 -4
%I=bitcast i8*%H to i32*
store i32 1342177296,i32*%I,align 4
store i8*%G,i8**%c,align 8
%J=load i8*,i8**%d,align 8
store i8*null,i8**%d,align 8
%K=bitcast i8*%G to i8**
store i8*%J,i8**%K,align 8
%L=load i8*,i8**%e,align 8
store i8*null,i8**%e,align 8
%M=getelementptr inbounds i8,i8*%G,i64 8
%N=bitcast i8*%M to i8**
store i8*%L,i8**%N,align 8
%O=getelementptr inbounds i8,i8*%G,i64 16
%P=bitcast i8*%O to i32*
store i32 3,i32*%P,align 4
%Q=call i8*@sml_alloc(i32 inreg 20)#0
%R=getelementptr inbounds i8,i8*%Q,i64 -4
%S=bitcast i8*%R to i32*
store i32 1342177296,i32*%S,align 4
%T=load i8*,i8**%c,align 8
store i8*null,i8**%c,align 8
%U=bitcast i8*%Q to i8**
store i8*%T,i8**%U,align 8
%V=getelementptr inbounds i8,i8*%Q,i64 8
%W=bitcast i8*%V to i8**
store i8*null,i8**%W,align 8
%X=getelementptr inbounds i8,i8*%Q,i64 16
%Y=bitcast i8*%X to i32*
store i32 3,i32*%Y,align 4
%Z=load i8*,i8**%f,align 8
store i8*null,i8**%f,align 8
%aa=call fastcc i8*%x(i8*inreg%Z,i8*inreg%Q)
ret void
}
define internal fastcc i8*@_SMLLN12TypedCalcCon12TPPATLAYEREDE_514(i8*inreg%a)#5 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 i8*,i8**@_SMLZN3Bug3BugE,align 8
store i8*%d,i8**%b,align 8
%e=call i8*@sml_alloc(i32 inreg 28)#0
%f=getelementptr inbounds i8,i8*%e,i64 -4
%g=bitcast i8*%f to i32*
store i32 1342177304,i32*%g,align 4
store i8*%e,i8**%c,align 8
%h=load i8*,i8**%b,align 8
store i8*null,i8**%b,align 8
%i=bitcast i8*%e to i8**
store i8*%h,i8**%i,align 8
%j=getelementptr inbounds i8,i8*%e,i64 8
%k=bitcast i8*%j to i8**
store i8*getelementptr inbounds(<{[4x i8],i32,[71x i8]}>,<{[4x i8],i32,[71x i8]}>*@bc,i64 0,i32 2,i64 0),i8**%k,align 8
%l=getelementptr inbounds i8,i8*%e,i64 16
%m=bitcast i8*%l to i8**
store i8*getelementptr inbounds(<{[4x i8],i32,[13x i8]}>,<{[4x i8],i32,[13x i8]}>*@bd,i64 0,i32 2,i64 0),i8**%m,align 8
%n=getelementptr inbounds i8,i8*%e,i64 24
%o=bitcast i8*%n to i32*
store i32 7,i32*%o,align 4
%p=call i8*@sml_alloc(i32 inreg 60)#0
%q=getelementptr inbounds i8,i8*%p,i64 -4
%r=bitcast i8*%q to i32*
store i32 1342177336,i32*%r,align 4
%s=getelementptr inbounds i8,i8*%p,i64 56
%t=bitcast i8*%s to i32*
store i32 1,i32*%t,align 4
%u=load i8*,i8**%c,align 8
%v=bitcast i8*%p to i8**
store i8*%u,i8**%v,align 8
call void@sml_raise(i8*inreg%p)#1
unreachable
}
define fastcc i8*@_SMLFN12TypedCalcCon12TPPATLAYEREDE(i8*inreg%a)#2 gc"smlsharp"{
p:
%b=alloca i8*,align 8
%c=alloca i8*,align 8
%d=alloca i8*,align 8
%e=alloca i8*,align 8
%f=alloca i8*,align 8
%g=alloca i8*,align 8
%h=alloca i8*,align 8
%i=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
call void@llvm.gcroot(i8**%f,i8*null)#0
call void@llvm.gcroot(i8**%g,i8*null)#0
call void@llvm.gcroot(i8**%h,i8*null)#0
call void@llvm.gcroot(i8**%i,i8*null)#0
store i8*%a,i8**%b,align 8
%j=load atomic i32,i32*@sml_check_flag unordered,align 4
%k=icmp eq i32%j,0
br i1%k,label%n,label%l
l:
call void@sml_check(i32 inreg%j)
%m=load i8*,i8**%b,align 8
br label%n
n:
%o=phi i8*[%m,%l],[%a,%p]
%q=bitcast i8*%o to i8**
%r=bitcast i8*%o to i8***
%s=load i8**,i8***%r,align 8
%t=load i8*,i8**%s,align 8
store i8*%t,i8**%c,align 8
%u=load i8*,i8**%q,align 8
%v=getelementptr inbounds i8,i8*%u,i64 8
%w=bitcast i8*%v to i8**
%x=load i8*,i8**%w,align 8
store i8*%x,i8**%b,align 8
%y=load i8*,i8**%q,align 8
%z=getelementptr inbounds i8,i8*%y,i64 16
%A=bitcast i8*%z to i8**
%B=load i8*,i8**%A,align 8
store i8*%B,i8**%d,align 8
%C=getelementptr inbounds i8,i8*%o,i64 8
%D=bitcast i8*%C to i8**
%E=load i8*,i8**%D,align 8
store i8*%E,i8**%e,align 8
%F=getelementptr inbounds i8,i8*%o,i64 16
%G=bitcast i8*%F to i8***
%H=load i8**,i8***%G,align 8
%I=load i8*,i8**%H,align 8
store i8*%I,i8**%f,align 8
%J=getelementptr inbounds i8*,i8**%H,i64 1
%K=load i8*,i8**%J,align 8
store i8*%K,i8**%g,align 8
%L=getelementptr inbounds i8*,i8**%H,i64 2
%M=load i8*,i8**%L,align 8
store i8*%M,i8**%h,align 8
%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
store i8*%N,i8**%i,align 8
%Q=load i8*,i8**%b,align 8
store i8*null,i8**%b,align 8
%R=bitcast i8*%N to i8**
store i8*%Q,i8**%R,align 8
%S=load i8*,i8**%e,align 8
%T=getelementptr inbounds i8,i8*%N,i64 8
%U=bitcast i8*%T to i8**
store i8*%S,i8**%U,align 8
%V=load i8*,i8**%g,align 8
%W=getelementptr inbounds i8,i8*%N,i64 16
%X=bitcast i8*%W to i8**
store i8*%V,i8**%X,align 8
%Y=getelementptr inbounds i8,i8*%N,i64 24
%Z=bitcast i8*%Y to i32*
store i32 7,i32*%Z,align 4
%aa=call i8*@sml_alloc(i32 inreg 28)#0
%ab=getelementptr inbounds i8,i8*%aa,i64 -4
%ac=bitcast i8*%ab to i32*
store i32 1342177304,i32*%ac,align 4
%ad=load i8*,i8**%i,align 8
%ae=bitcast i8*%aa to i8**
store i8*%ad,i8**%ae,align 8
%af=getelementptr inbounds i8,i8*%aa,i64 8
%ag=bitcast i8*%af to void(...)**
store void(...)*bitcast(void(i8*,i32)*@_SMLL1f_511 to void(...)*),void(...)**%ag,align 8
%ah=getelementptr inbounds i8,i8*%aa,i64 16
%ai=bitcast i8*%ah to void(...)**
store void(...)*bitcast(i8*(i8*,i8*)*@_SMLL1f_758 to void(...)*),void(...)**%ai,align 8
%aj=getelementptr inbounds i8,i8*%aa,i64 24
%ak=bitcast i8*%aj to i32*
store i32 -2147483647,i32*%ak,align 4
%al=load i32*,i32**bitcast(i8**@_SMLZN7Control9checkTypeE to i32**),align 8
%am=load i32,i32*%al,align 4
%an=icmp eq i32%am,0
store i8*null,i8**%i,align 8
br i1%an,label%ap,label%ao
ao:
call fastcc void@_SMLL1f_511(i8*inreg%ad,i32 inreg 0)
br label%ap
ap:
%aq=call fastcc i8*@_SMLFN5VarID3Map9unionWithE(i32 inreg 1,i32 inreg 8)
%ar=getelementptr inbounds i8,i8*%aq,i64 16
%as=bitcast i8*%ar to i8*(i8*,i8*)**
%at=load i8*(i8*,i8*)*,i8*(i8*,i8*)**%as,align 8
%au=bitcast i8*%aq to i8**
%av=load i8*,i8**%au,align 8
%aw=call fastcc i8*%at(i8*inreg%av,i8*inreg bitcast(i8**getelementptr inbounds(<{[4x i8],i32,i8*,void(...)*,void(...)*,i32}>,<{[4x i8],i32,i8*,void(...)*,void(...)*,i32}>*@be,i64 0,i32 2)to i8*))
%ax=getelementptr inbounds i8,i8*%aw,i64 16
%ay=bitcast i8*%ax to i8*(i8*,i8*)**
%az=load i8*(i8*,i8*)*,i8*(i8*,i8*)**%ay,align 8
%aA=bitcast i8*%aw to i8**
%aB=load i8*,i8**%aA,align 8
store i8*%aB,i8**%b,align 8
%aC=call i8*@sml_alloc(i32 inreg 20)#0
%aD=getelementptr inbounds i8,i8*%aC,i64 -4
%aE=bitcast i8*%aD to i32*
store i32 1342177296,i32*%aE,align 4
%aF=load i8*,i8**%h,align 8
store i8*null,i8**%h,align 8
%aG=bitcast i8*%aC to i8**
store i8*%aF,i8**%aG,align 8
%aH=load i8*,i8**%d,align 8
store i8*null,i8**%d,align 8
%aI=getelementptr inbounds i8,i8*%aC,i64 8
%aJ=bitcast i8*%aI to i8**
store i8*%aH,i8**%aJ,align 8
%aK=getelementptr inbounds i8,i8*%aC,i64 16
%aL=bitcast i8*%aK to i32*
store i32 3,i32*%aL,align 4
%aM=load i8*,i8**%b,align 8
store i8*null,i8**%b,align 8
%aN=call fastcc i8*%az(i8*inreg%aM,i8*inreg%aC)
store i8*%aN,i8**%b,align 8
%aO=call i8*@sml_alloc(i32 inreg 28)#0
%aP=getelementptr inbounds i8,i8*%aO,i64 -4
%aQ=bitcast i8*%aP to i32*
store i32 1342177304,i32*%aQ,align 4
store i8*%aO,i8**%d,align 8
%aR=load i8*,i8**%c,align 8
store i8*null,i8**%c,align 8
%aS=bitcast i8*%aO to i8**
store i8*%aR,i8**%aS,align 8
%aT=load i8*,i8**%e,align 8
store i8*null,i8**%e,align 8
%aU=getelementptr inbounds i8,i8*%aO,i64 8
%aV=bitcast i8*%aU to i8**
store i8*%aT,i8**%aV,align 8
%aW=load i8*,i8**%f,align 8
store i8*null,i8**%f,align 8
%aX=getelementptr inbounds i8,i8*%aO,i64 16
%aY=bitcast i8*%aX to i8**
store i8*%aW,i8**%aY,align 8
%aZ=getelementptr inbounds i8,i8*%aO,i64 24
%a0=bitcast i8*%aZ to i32*
store i32 7,i32*%a0,align 4
%a1=call i8*@sml_alloc(i32 inreg 20)#0
%a2=getelementptr inbounds i8,i8*%a1,i64 -4
%a3=bitcast i8*%a2 to i32*
store i32 1342177296,i32*%a3,align 4
store i8*%a1,i8**%c,align 8
%a4=getelementptr inbounds i8,i8*%a1,i64 4
%a5=bitcast i8*%a4 to i32*
store i32 0,i32*%a5,align 1
%a6=bitcast i8*%a1 to i32*
store i32 4,i32*%a6,align 4
%a7=load i8*,i8**%d,align 8
store i8*null,i8**%d,align 8
%a8=getelementptr inbounds i8,i8*%a1,i64 8
%a9=bitcast i8*%a8 to i8**
store i8*%a7,i8**%a9,align 8
%ba=getelementptr inbounds i8,i8*%a1,i64 16
%bb=bitcast i8*%ba to i32*
store i32 2,i32*%bb,align 4
%bc=call i8*@sml_alloc(i32 inreg 28)#0
%bd=getelementptr inbounds i8,i8*%bc,i64 -4
%be=bitcast i8*%bd to i32*
store i32 1342177304,i32*%be,align 4
%bf=load i8*,i8**%c,align 8
%bg=bitcast i8*%bc to i8**
store i8*%bf,i8**%bg,align 8
%bh=load i8*,i8**%g,align 8
%bi=getelementptr inbounds i8,i8*%bc,i64 8
%bj=bitcast i8*%bi to i8**
store i8*%bh,i8**%bj,align 8
%bk=load i8*,i8**%b,align 8
%bl=getelementptr inbounds i8,i8*%bc,i64 16
%bm=bitcast i8*%bl to i8**
store i8*%bk,i8**%bm,align 8
%bn=getelementptr inbounds i8,i8*%bc,i64 24
%bo=bitcast i8*%bn to i32*
store i32 7,i32*%bo,align 4
ret i8*%bc
}
define internal fastcc i8*@_SMLL4pats_518(i8*inreg%a)#4 gc"smlsharp"{
%b=bitcast i8*%a to i8**
%c=load i8*,i8**%b,align 8
ret i8*%c
}
define internal fastcc i8*@_SMLL3tys_520(i8*inreg%a)#4 gc"smlsharp"{
%b=getelementptr inbounds i8,i8*%a,i64 8
%c=bitcast i8*%b to i8**
%d=load i8*,i8**%c,align 8
ret i8*%d
}
define internal fastcc i8*@_SMLL1f_523(i8*inreg%a,i8*inreg%b)#2 gc"smlsharp"{
%c=alloca i8*,align 8
%d=alloca i8*,align 8
%e=alloca i8*,align 8
%f=alloca i8*,align 8
call void@llvm.gcroot(i8**%c,i8*null)#0
call void@llvm.gcroot(i8**%d,i8*null)#0
call void@llvm.gcroot(i8**%e,i8*null)#0
call void@llvm.gcroot(i8**%f,i8*null)#0
store i8*%a,i8**%e,align 8
store i8*%b,i8**%c,align 8
%g=load atomic i32,i32*@sml_check_flag unordered,align 4
%h=icmp eq i32%g,0
br i1%h,label%i,label%k
i:
%j=bitcast i8*%a to i8**
br label%o
k:
call void@sml_check(i32 inreg%g)
%l=load i8*,i8**%c,align 8
%m=bitcast i8**%e to i8***
%n=load i8**,i8***%m,align 8
br label%o
o:
%p=phi i8**[%n,%k],[%j,%i]
%q=phi i8*[%l,%k],[%b,%i]
%r=bitcast i8*%q to i8**
%s=load i8*,i8**%r,align 8
store i8*%s,i8**%c,align 8
%t=getelementptr inbounds i8,i8*%q,i64 8
%u=bitcast i8*%t to i8**
%v=load i8*,i8**%u,align 8
store i8*%v,i8**%d,align 8
%w=load i8*,i8**%p,align 8
%x=call fastcc i8*@_SMLLN12TypedCalcCon8selectTyE_452(i8*inreg%w)
%y=getelementptr inbounds i8,i8*%x,i64 16
%z=bitcast i8*%y to i8*(i8*,i8*)**
%A=load i8*(i8*,i8*)*,i8*(i8*,i8*)**%z,align 8
%B=bitcast i8*%x to i8**
%C=load i8*,i8**%B,align 8
store i8*%C,i8**%f,align 8
%D=load i8*,i8**%e,align 8
%E=getelementptr inbounds i8,i8*%D,i64 8
%F=bitcast i8*%E to i8**
%G=load i8*,i8**%F,align 8
store i8*%G,i8**%e,align 8
%H=call i8*@sml_alloc(i32 inreg 20)#0
%I=getelementptr inbounds i8,i8*%H,i64 -4
%J=bitcast i8*%I to i32*
store i32 1342177296,i32*%J,align 4
%K=load i8*,i8**%c,align 8
store i8*null,i8**%c,align 8
%L=bitcast i8*%H to i8**
store i8*%K,i8**%L,align 8
%M=load i8*,i8**%e,align 8
store i8*null,i8**%e,align 8
%N=getelementptr inbounds i8,i8*%H,i64 8
%O=bitcast i8*%N to i8**
store i8*%M,i8**%O,align 8
%P=getelementptr inbounds i8,i8*%H,i64 16
%Q=bitcast i8*%P to i32*
store i32 3,i32*%Q,align 4
%R=load i8*,i8**%f,align 8
store i8*null,i8**%f,align 8
%S=call fastcc i8*%A(i8*inreg%R,i8*inreg%H)
store i8*%S,i8**%c,align 8
%T=call i8*@sml_alloc(i32 inreg 20)#0
%U=getelementptr inbounds i8,i8*%T,i64 -4
%V=bitcast i8*%U to i32*
store i32 1342177296,i32*%V,align 4
%W=load i8*,i8**%d,align 8
%X=bitcast i8*%T to i8**
store i8*%W,i8**%X,align 8
%Y=load i8*,i8**%c,align 8
%Z=getelementptr inbounds i8,i8*%T,i64 8
%aa=bitcast i8*%Z to i8**
store i8*%Y,i8**%aa,align 8
%ab=getelementptr inbounds i8,i8*%T,i64 16
%ac=bitcast i8*%ab to i32*
store i32 3,i32*%ac,align 4
ret i8*%T
}
define internal fastcc void@_SMLL1f_524(i8*inreg%a,i32 inreg%b)#2 gc"smlsharp"{
%c=alloca i8*,align 8
%d=alloca i8*,align 8
%e=alloca i8*,align 8
%f=alloca i8*,align 8
%g=alloca i8*,align 8
%h=alloca i8*,align 8
%i=alloca i8*,align 8
call void@llvm.gcroot(i8**%c,i8*null)#0
call void@llvm.gcroot(i8**%d,i8*null)#0
call void@llvm.gcroot(i8**%e,i8*null)#0
call void@llvm.gcroot(i8**%f,i8*null)#0
call void@llvm.gcroot(i8**%g,i8*null)#0
call void@llvm.gcroot(i8**%h,i8*null)#0
call void@llvm.gcroot(i8**%i,i8*null)#0
store i8*%a,i8**%c,align 8
%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:
call void@sml_check(i32 inreg%j)
br label%m
m:
%n=call fastcc i8*@_SMLLN12TypedCalcCon4eqTyE_287(i8*inreg getelementptr inbounds(<{[4x i8],i32,[12x i8]}>,<{[4x i8],i32,[12x i8]}>*@bj,i64 0,i32 2,i64 0))
%o=getelementptr inbounds i8,i8*%n,i64 16
%p=bitcast i8*%o to i8*(i8*,i8*)**
%q=load i8*(i8*,i8*)*,i8*(i8*,i8*)**%p,align 8
%r=bitcast i8*%n to i8**
%s=load i8*,i8**%r,align 8
%t=load i8*,i8**%c,align 8
%u=getelementptr inbounds i8,i8*%t,i64 16
%v=bitcast i8*%u to i8**
%w=load i8*,i8**%v,align 8
%x=call fastcc i8*%q(i8*inreg%s,i8*inreg%w)
%y=getelementptr inbounds i8,i8*%x,i64 16
%z=bitcast i8*%y to i8*(i8*,i8*)**
%A=load i8*(i8*,i8*)*,i8*(i8*,i8*)**%z,align 8
%B=bitcast i8*%x to i8**
%C=load i8*,i8**%B,align 8
store i8*%C,i8**%h,align 8
%D=call fastcc i8*@_SMLFN11RecordLabel3Map9listItemsE(i32 inreg 1,i32 inreg 8)
%E=getelementptr inbounds i8,i8*%D,i64 16
%F=bitcast i8*%E to i8*(i8*,i8*)**
%G=load i8*(i8*,i8*)*,i8*(i8*,i8*)**%F,align 8
%H=bitcast i8*%D to i8**
%I=load i8*,i8**%H,align 8
store i8*%I,i8**%g,align 8
%J=call fastcc i8*@_SMLFN11RecordLabel3Map4mapiE(i32 inreg 1,i32 inreg 8,i32 inreg 1,i32 inreg 8)
%K=getelementptr inbounds i8,i8*%J,i64 16
%L=bitcast i8*%K to i8*(i8*,i8*)**
%M=load i8*(i8*,i8*)*,i8*(i8*,i8*)**%L,align 8
%N=bitcast i8*%J to i8**
%O=load i8*,i8**%N,align 8
store i8*%O,i8**%f,align 8
%P=load i8*,i8**%c,align 8
%Q=getelementptr inbounds i8,i8*%P,i64 8
%R=bitcast i8*%Q to i8**
%S=load i8*,i8**%R,align 8
store i8*%S,i8**%d,align 8
%T=getelementptr inbounds i8,i8*%P,i64 24
%U=bitcast i8*%T to i8**
%V=load i8*,i8**%U,align 8
store i8*%V,i8**%e,align 8
%W=call i8*@sml_alloc(i32 inreg 20)#0
%X=getelementptr inbounds i8,i8*%W,i64 -4
%Y=bitcast i8*%X to i32*
store i32 1342177296,i32*%Y,align 4
store i8*%W,i8**%i,align 8
%Z=load i8*,i8**%d,align 8
store i8*null,i8**%d,align 8
%aa=bitcast i8*%W to i8**
store i8*%Z,i8**%aa,align 8
%ab=load i8*,i8**%e,align 8
store i8*null,i8**%e,align 8
%ac=getelementptr inbounds i8,i8*%W,i64 8
%ad=bitcast i8*%ac to i8**
store i8*%ab,i8**%ad,align 8
%ae=getelementptr inbounds i8,i8*%W,i64 16
%af=bitcast i8*%ae to i32*
store i32 3,i32*%af,align 4
%ag=call i8*@sml_alloc(i32 inreg 28)#0
%ah=getelementptr inbounds i8,i8*%ag,i64 -4
%ai=bitcast i8*%ah to i32*
store i32 1342177304,i32*%ai,align 4
%aj=load i8*,i8**%i,align 8
store i8*null,i8**%i,align 8
%ak=bitcast i8*%ag to i8**
store i8*%aj,i8**%ak,align 8
%al=getelementptr inbounds i8,i8*%ag,i64 8
%am=bitcast i8*%al to void(...)**
store void(...)*bitcast(i8*(i8*,i8*)*@_SMLL1f_523 to void(...)*),void(...)**%am,align 8
%an=getelementptr inbounds i8,i8*%ag,i64 16
%ao=bitcast i8*%an to void(...)**
store void(...)*bitcast(i8*(i8*,i8*)*@_SMLL1f_523 to void(...)*),void(...)**%ao,align 8
%ap=getelementptr inbounds i8,i8*%ag,i64 24
%aq=bitcast i8*%ap to i32*
store i32 -2147483647,i32*%aq,align 4
%ar=load i8*,i8**%f,align 8
store i8*null,i8**%f,align 8
%as=call fastcc i8*%M(i8*inreg%ar,i8*inreg%ag)
%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
%ay=bitcast i8**%c to i8***
%az=load i8**,i8***%ay,align 8
store i8*null,i8**%c,align 8
%aA=load i8*,i8**%az,align 8
%aB=call fastcc i8*%av(i8*inreg%ax,i8*inreg%aA)
%aC=load i8*,i8**%g,align 8
store i8*null,i8**%g,align 8
%aD=call fastcc i8*%G(i8*inreg%aC,i8*inreg%aB)
%aE=load i8*,i8**%h,align 8
store i8*null,i8**%h,align 8
%aF=call fastcc i8*%A(i8*inreg%aE,i8*inreg%aD)
ret void
}
define internal fastcc i8*@_SMLLN12TypedCalcCon11TPPATRECORDE_527(i8*inreg%a)#5 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 i8*,i8**@_SMLZN3Bug3BugE,align 8
store i8*%d,i8**%b,align 8
%e=call i8*@sml_alloc(i32 inreg 28)#0
%f=getelementptr inbounds i8,i8*%e,i64 -4
%g=bitcast i8*%f to i32*
store i32 1342177304,i32*%g,align 4
store i8*%e,i8**%c,align 8
%h=load i8*,i8**%b,align 8
store i8*null,i8**%b,align 8
%i=bitcast i8*%e to i8**
store i8*%h,i8**%i,align 8
%j=getelementptr inbounds i8,i8*%e,i64 8
%k=bitcast i8*%j to i8**
store i8*getelementptr inbounds(<{[4x i8],i32,[71x i8]}>,<{[4x i8],i32,[71x i8]}>*@bi,i64 0,i32 2,i64 0),i8**%k,align 8
%l=getelementptr inbounds i8,i8*%e,i64 16
%m=bitcast i8*%l to i8**
store i8*getelementptr inbounds(<{[4x i8],i32,[12x i8]}>,<{[4x i8],i32,[12x i8]}>*@bj,i64 0,i32 2,i64 0),i8**%m,align 8
%n=getelementptr inbounds i8,i8*%e,i64 24
%o=bitcast i8*%n to i32*
store i32 7,i32*%o,align 4
%p=call i8*@sml_alloc(i32 inreg 60)#0
%q=getelementptr inbounds i8,i8*%p,i64 -4
%r=bitcast i8*%q to i32*
store i32 1342177336,i32*%r,align 4
%s=getelementptr inbounds i8,i8*%p,i64 56
%t=bitcast i8*%s to i32*
store i32 1,i32*%t,align 4
%u=load i8*,i8**%c,align 8
%v=bitcast i8*%p to i8**
store i8*%u,i8**%v,align 8
call void@sml_raise(i8*inreg%p)#1
unreachable
}
define internal fastcc i8*@_SMLLN12TypedCalcCon11TPPATRECORDE_529(i8*inreg%a)#2 gc"smlsharp"{
k:
%b=alloca i8*,align 8
%c=alloca i8*,align 8
%d=alloca i8*,align 8
call void@llvm.gcroot(i8**%b,i8*null)#0
call void@llvm.gcroot(i8**%c,i8*null)#0
call void@llvm.gcroot(i8**%d,i8*null)#0
store i8*%a,i8**%b,align 8
%e=load atomic i32,i32*@sml_check_flag unordered,align 4
%f=icmp eq i32%e,0
br i1%f,label%i,label%g
g:
call void@sml_check(i32 inreg%e)
%h=load i8*,i8**%b,align 8
br label%i
i:
%j=phi i8*[%h,%g],[%a,%k]
%l=bitcast i8*%j to i8**
%m=load i8*,i8**%l,align 8
%n=getelementptr inbounds i8,i8*%m,i64 16
%o=bitcast i8*%n to i8**
%p=load i8*,i8**%o,align 8
store i8*%p,i8**%b,align 8
%q=getelementptr inbounds i8,i8*%j,i64 8
%r=bitcast i8*%q to i8**
%s=load i8*,i8**%r,align 8
store i8*%s,i8**%c,align 8
%t=call fastcc i8*@_SMLFN5VarID3Map9unionWithE(i32 inreg 1,i32 inreg 8)
%u=getelementptr inbounds i8,i8*%t,i64 16
%v=bitcast i8*%u to i8*(i8*,i8*)**
%w=load i8*(i8*,i8*)*,i8*(i8*,i8*)**%v,align 8
%x=bitcast i8*%t to i8**
%y=load i8*,i8**%x,align 8
%z=call fastcc i8*%w(i8*inreg%y,i8*inreg bitcast(i8**getelementptr inbounds(<{[4x i8],i32,i8*,void(...)*,void(...)*,i32}>,<{[4x i8],i32,i8*,void(...)*,void(...)*,i32}>*@bk,i64 0,i32 2)to i8*))
%A=getelementptr inbounds i8,i8*%z,i64 16
%B=bitcast i8*%A to i8*(i8*,i8*)**
%C=load i8*(i8*,i8*)*,i8*(i8*,i8*)**%B,align 8
%D=bitcast i8*%z to i8**
%E=load i8*,i8**%D,align 8
store i8*%E,i8**%d,align 8
%F=call i8*@sml_alloc(i32 inreg 20)#0
%G=getelementptr inbounds i8,i8*%F,i64 -4
%H=bitcast i8*%G to i32*
store i32 1342177296,i32*%H,align 4
%I=load i8*,i8**%b,align 8
%J=bitcast i8*%F to i8**
store i8*%I,i8**%J,align 8
%K=load i8*,i8**%c,align 8
%L=getelementptr inbounds i8,i8*%F,i64 8
%M=bitcast i8*%L to i8**
store i8*%K,i8**%M,align 8
%N=getelementptr inbounds i8,i8*%F,i64 16
%O=bitcast i8*%N to i32*
store i32 3,i32*%O,align 4
%P=load i8*,i8**%d,align 8
%Q=tail call fastcc i8*%C(i8*inreg%P,i8*inreg%F)
ret i8*%Q
}
define internal fastcc i8*@_SMLLN12TypedCalcCon11TPPATRECORDE_531(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
%h=alloca i8*,align 8
%i=alloca i8*,align 8
call void@llvm.gcroot(i8**%c,i8*null)#0
call void@llvm.gcroot(i8**%d,i8*null)#0
call void@llvm.gcroot(i8**%e,i8*null)#0
call void@llvm.gcroot(i8**%f,i8*null)#0
call void@llvm.gcroot(i8**%g,i8*null)#0
call void@llvm.gcroot(i8**%h,i8*null)#0
call void@llvm.gcroot(i8**%i,i8*null)#0
store i8*%a,i8**%h,align 8
store i8*%b,i8**%c,align 8
%j=load atomic i32,i32*@sml_check_flag unordered,align 4
%k=icmp eq i32%j,0
br i1%k,label%n,label%l
l:
call void@sml_check(i32 inreg%j)
%m=load i8*,i8**%c,align 8
br label%n
n:
%o=phi i8*[%m,%l],[%b,%p]
store i8*null,i8**%c,align 8
store i8*%o,i8**%e,align 8
%q=getelementptr inbounds i8,i8*%o,i64 8
%r=bitcast i8*%q to i8**
%s=load i8*,i8**%r,align 8
store i8*%s,i8**%f,align 8
%t=call fastcc i8*@_SMLFN11RecordLabel3Map3mapE(i32 inreg 1,i32 inreg 8,i32 inreg 1,i32 inreg 8)
%u=getelementptr inbounds i8,i8*%t,i64 16
%v=bitcast i8*%u to i8*(i8*,i8*)**
%w=load i8*(i8*,i8*)*,i8*(i8*,i8*)**%v,align 8
%x=bitcast i8*%t to i8**
%y=load i8*,i8**%x,align 8
%z=call fastcc i8*%w(i8*inreg%y,i8*inreg bitcast(i8**getelementptr inbounds(<{[4x i8],i32,i8*,void(...)*,void(...)*,i32}>,<{[4x i8],i32,i8*,void(...)*,void(...)*,i32}>*@bg,i64 0,i32 2)to i8*))
%A=getelementptr inbounds i8,i8*%z,i64 16
%B=bitcast i8*%A to i8*(i8*,i8*)**
%C=load i8*(i8*,i8*)*,i8*(i8*,i8*)**%B,align 8
%D=bitcast i8*%z to i8**
%E=load i8*,i8**%D,align 8
%F=bitcast i8**%e to i8***
%G=load i8**,i8***%F,align 8
%H=load i8*,i8**%G,align 8
%I=call fastcc i8*%C(i8*inreg%E,i8*inreg%H)
store i8*%I,i8**%c,align 8
%J=call fastcc i8*@_SMLFN11RecordLabel3Map3mapE(i32 inreg 1,i32 inreg 8,i32 inreg 1,i32 inreg 8)
%K=getelementptr inbounds i8,i8*%J,i64 16
%L=bitcast i8*%K to i8*(i8*,i8*)**
%M=load i8*(i8*,i8*)*,i8*(i8*,i8*)**%L,align 8
%N=bitcast i8*%J to i8**
%O=load i8*,i8**%N,align 8
%P=call fastcc i8*%M(i8*inreg%O,i8*inreg bitcast(i8**getelementptr inbounds(<{[4x i8],i32,i8*,void(...)*,void(...)*,i32}>,<{[4x i8],i32,i8*,void(...)*,void(...)*,i32}>*@bh,i64 0,i32 2)to i8*))
%Q=getelementptr inbounds i8,i8*%P,i64 16
%R=bitcast i8*%Q to i8*(i8*,i8*)**
%S=load i8*(i8*,i8*)*,i8*(i8*,i8*)**%R,align 8
%T=bitcast i8*%P to i8**
%U=load i8*,i8**%T,align 8
%V=load i8**,i8***%F,align 8
%W=load i8*,i8**%V,align 8
%X=call fastcc i8*%S(i8*inreg%U,i8*inreg%W)
store i8*%X,i8**%d,align 8
%Y=load i8*,i8**%e,align 8
%Z=getelementptr inbounds i8,i8*%Y,i64 16
%aa=bitcast i8*%Z to i8**
%ab=load i8*,i8**%aa,align 8
%ac=icmp eq i8*%ab,null
br i1%ac,label%ad,label%ap
ad:
store i8*null,i8**%h,align 8
%ae=call i8*@sml_alloc(i32 inreg 20)#0
%af=bitcast i8*%ae to i32*
%ag=getelementptr inbounds i8,i8*%ae,i64 -4
%ah=bitcast i8*%ag to i32*
store i32 1342177296,i32*%ah,align 4
%ai=getelementptr inbounds i8,i8*%ae,i64 4
%aj=bitcast i8*%ai to i32*
store i32 0,i32*%aj,align 1
store i32 8,i32*%af,align 4
%ak=load i8*,i8**%d,align 8
store i8*null,i8**%d,align 8
%al=getelementptr inbounds i8,i8*%ae,i64 8
%am=bitcast i8*%al to i8**
store i8*%ak,i8**%am,align 8
%an=getelementptr inbounds i8,i8*%ae,i64 16
%ao=bitcast i8*%an to i32*
store i32 2,i32*%ao,align 4
br label%a2
ap:
%aq=bitcast i8*%ab to i8**
%ar=load i8*,i8**%aq,align 8
store i8*%ar,i8**%g,align 8
%as=bitcast i8**%h to i8***
%at=load i8**,i8***%as,align 8
%au=load i8*,i8**%at,align 8
store i8*%au,i8**%h,align 8
%av=call i8*@sml_alloc(i32 inreg 36)#0
%aw=getelementptr inbounds i8,i8*%av,i64 -4
%ax=bitcast i8*%aw to i32*
store i32 1342177312,i32*%ax,align 4
store i8*%av,i8**%i,align 8
%ay=load i8*,i8**%d,align 8
store i8*null,i8**%d,align 8
%az=bitcast i8*%av to i8**
store i8*%ay,i8**%az,align 8
%aA=load i8*,i8**%h,align 8
store i8*null,i8**%h,align 8
%aB=getelementptr inbounds i8,i8*%av,i64 8
%aC=bitcast i8*%aB to i8**
store i8*%aA,i8**%aC,align 8
%aD=load i8*,i8**%f,align 8
%aE=getelementptr inbounds i8,i8*%av,i64 16
%aF=bitcast i8*%aE to i8**
store i8*%aD,i8**%aF,align 8
%aG=load i8*,i8**%g,align 8
%aH=getelementptr inbounds i8,i8*%av,i64 24
%aI=bitcast i8*%aH to i8**
store i8*%aG,i8**%aI,align 8
%aJ=getelementptr inbounds i8,i8*%av,i64 32
%aK=bitcast i8*%aJ to i32*
store i32 15,i32*%aK,align 4
%aL=call i8*@sml_alloc(i32 inreg 28)#0
%aM=getelementptr inbounds i8,i8*%aL,i64 -4
%aN=bitcast i8*%aM to i32*
store i32 1342177304,i32*%aN,align 4
%aO=load i8*,i8**%i,align 8
%aP=bitcast i8*%aL to i8**
store i8*%aO,i8**%aP,align 8
%aQ=getelementptr inbounds i8,i8*%aL,i64 8
%aR=bitcast i8*%aQ to void(...)**
store void(...)*bitcast(void(i8*,i32)*@_SMLL1f_524 to void(...)*),void(...)**%aR,align 8
%aS=getelementptr inbounds i8,i8*%aL,i64 16
%aT=bitcast i8*%aS to void(...)**
store void(...)*bitcast(i8*(i8*,i8*)*@_SMLL1f_763 to void(...)*),void(...)**%aT,align 8
%aU=getelementptr inbounds i8,i8*%aL,i64 24
%aV=bitcast i8*%aU to i32*
store i32 -2147483647,i32*%aV,align 4
%aW=load i32*,i32**bitcast(i8**@_SMLZN7Control9checkTypeE to i32**),align 8
%aX=load i32,i32*%aW,align 4
%aY=icmp eq i32%aX,0
store i8*null,i8**%i,align 8
br i1%aY,label%a0,label%aZ
aZ:
call fastcc void@_SMLL1f_524(i8*inreg%aO,i32 inreg 0)
br label%a0
a0:
%a1=load i8*,i8**%g,align 8
store i8*null,i8**%g,align 8
br label%a2
a2:
%a3=phi i8*[%a1,%a0],[%ae,%ad]
store i8*%a3,i8**%d,align 8
%a4=call fastcc i8*@_SMLFN11RecordLabel3Map5foldlE(i32 inreg 1,i32 inreg 8,i32 inreg 1,i32 inreg 8)
%a5=getelementptr inbounds i8,i8*%a4,i64 16
%a6=bitcast i8*%a5 to i8*(i8*,i8*)**
%a7=load i8*(i8*,i8*)*,i8*(i8*,i8*)**%a6,align 8
%a8=bitcast i8*%a4 to i8**
%a9=load i8*,i8**%a8,align 8
%ba=call fastcc i8*%a7(i8*inreg%a9,i8*inreg bitcast(i8**getelementptr inbounds(<{[4x i8],i32,i8*,void(...)*,void(...)*,i32}>,<{[4x i8],i32,i8*,void(...)*,void(...)*,i32}>*@bl,i64 0,i32 2)to i8*))
%bb=getelementptr inbounds i8,i8*%ba,i64 16
%bc=bitcast i8*%bb to i8*(i8*,i8*)**
%bd=load i8*(i8*,i8*)*,i8*(i8*,i8*)**%bc,align 8
%be=bitcast i8*%ba to i8**
%bf=load i8*,i8**%be,align 8
store i8*%bf,i8**%g,align 8
%bg=call fastcc i8*@_SMLFN5VarID3Map5emptyE(i32 inreg 1,i32 inreg 8)
%bh=load i8*,i8**%g,align 8
store i8*null,i8**%g,align 8
%bi=call fastcc i8*%bd(i8*inreg%bh,i8*inreg%bg)
%bj=getelementptr inbounds i8,i8*%bi,i64 16
%bk=bitcast i8*%bj to i8*(i8*,i8*)**
%bl=load i8*(i8*,i8*)*,i8*(i8*,i8*)**%bk,align 8
%bm=bitcast i8*%bi to i8**
%bn=load i8*,i8**%bm,align 8
%bo=load i8**,i8***%F,align 8
store i8*null,i8**%e,align 8
%bp=load i8*,i8**%bo,align 8
%bq=call fastcc i8*%bl(i8*inreg%bn,i8*inreg%bp)
store i8*%bq,i8**%e,align 8
%br=call i8*@sml_alloc(i32 inreg 28)#0
%bs=getelementptr inbounds i8,i8*%br,i64 -4
%bt=bitcast i8*%bs to i32*
store i32 1342177304,i32*%bt,align 4
store i8*%br,i8**%g,align 8
%bu=load i8*,i8**%c,align 8
store i8*null,i8**%c,align 8
%bv=bitcast i8*%br to i8**
store i8*%bu,i8**%bv,align 8
%bw=load i8*,i8**%f,align 8
store i8*null,i8**%f,align 8
%bx=getelementptr inbounds i8,i8*%br,i64 8
%by=bitcast i8*%bx to i8**
store i8*%bw,i8**%by,align 8
%bz=load i8*,i8**%d,align 8
%bA=getelementptr inbounds i8,i8*%br,i64 16
%bB=bitcast i8*%bA to i8**
store i8*%bz,i8**%bB,align 8
%bC=getelementptr inbounds i8,i8*%br,i64 24
%bD=bitcast i8*%bC to i32*
store i32 7,i32*%bD,align 4
%bE=call i8*@sml_alloc(i32 inreg 20)#0
%bF=getelementptr inbounds i8,i8*%bE,i64 -4
%bG=bitcast i8*%bF to i32*
store i32 1342177296,i32*%bG,align 4
store i8*%bE,i8**%c,align 8
%bH=getelementptr inbounds i8,i8*%bE,i64 4
%bI=bitcast i8*%bH to i32*
store i32 0,i32*%bI,align 1
%bJ=bitcast i8*%bE to i32*
store i32 5,i32*%bJ,align 4
%bK=load i8*,i8**%g,align 8
store i8*null,i8**%g,align 8
%bL=getelementptr inbounds i8,i8*%bE,i64 8
%bM=bitcast i8*%bL to i8**
store i8*%bK,i8**%bM,align 8
%bN=getelementptr inbounds i8,i8*%bE,i64 16
%bO=bitcast i8*%bN to i32*
store i32 2,i32*%bO,align 4
%bP=call i8*@sml_alloc(i32 inreg 28)#0
%bQ=getelementptr inbounds i8,i8*%bP,i64 -4
%bR=bitcast i8*%bQ to i32*
store i32 1342177304,i32*%bR,align 4
%bS=load i8*,i8**%c,align 8
%bT=bitcast i8*%bP to i8**
store i8*%bS,i8**%bT,align 8
%bU=load i8*,i8**%d,align 8
%bV=getelementptr inbounds i8,i8*%bP,i64 8
%bW=bitcast i8*%bV to i8**
store i8*%bU,i8**%bW,align 8
%bX=load i8*,i8**%e,align 8
%bY=getelementptr inbounds i8,i8*%bP,i64 16
%bZ=bitcast i8*%bY to i8**
store i8*%bX,i8**%bZ,align 8
%b0=getelementptr inbounds i8,i8*%bP,i64 24
%b1=bitcast i8*%b0 to i32*
store i32 7,i32*%b1,align 4
ret i8*%bP
}
define fastcc i8*@_SMLFN12TypedCalcCon11TPPATRECORDE(i8*inreg%a)#4 gc"smlsharp"{
%b=alloca i8*,align 8
%c=alloca i8*,align 8
call void@llvm.gcroot(i8**%b,i8*null)#0
call void@llvm.gcroot(i8**%c,i8*null)#0
store i8*%a,i8**%b,align 8
%d=call i8*@sml_alloc(i32 inreg 12)#0
%e=getelementptr inbounds i8,i8*%d,i64 -4
%f=bitcast i8*%e to i32*
store i32 1342177288,i32*%f,align 4
store i8*%d,i8**%c,align 8
%g=load i8*,i8**%b,align 8
store i8*null,i8**%b,align 8
%h=bitcast i8*%d to i8**
store i8*%g,i8**%h,align 8
%i=getelementptr inbounds i8,i8*%d,i64 8
%j=bitcast i8*%i to i32*
store i32 1,i32*%j,align 4
%k=call i8*@sml_alloc(i32 inreg 28)#0
%l=getelementptr inbounds i8,i8*%k,i64 -4
%m=bitcast i8*%l to i32*
store i32 1342177304,i32*%m,align 4
%n=load i8*,i8**%c,align 8
%o=bitcast i8*%k to i8**
store i8*%n,i8**%o,align 8
%p=getelementptr inbounds i8,i8*%k,i64 8
%q=bitcast i8*%p to void(...)**
store void(...)*bitcast(i8*(i8*,i8*)*@_SMLLN12TypedCalcCon11TPPATRECORDE_531 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*)*@_SMLLN12TypedCalcCon11TPPATRECORDE_531 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*@_SMLLN12TypedCalcCon7patVarsE_536(i8*inreg%a)#5 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 i8*,i8**@_SMLZN3Bug3BugE,align 8
store i8*%d,i8**%b,align 8
%e=call i8*@sml_alloc(i32 inreg 28)#0
%f=getelementptr inbounds i8,i8*%e,i64 -4
%g=bitcast i8*%f to i32*
store i32 1342177304,i32*%g,align 4
store i8*%e,i8**%c,align 8
%h=load i8*,i8**%b,align 8
store i8*null,i8**%b,align 8
%i=bitcast i8*%e to i8**
store i8*%h,i8**%i,align 8
%j=getelementptr inbounds i8,i8*%e,i64 8
%k=bitcast i8*%j to i8**
store i8*getelementptr inbounds(<{[4x i8],i32,[71x i8]}>,<{[4x i8],i32,[71x i8]}>*@bn,i64 0,i32 2,i64 0),i8**%k,align 8
%l=getelementptr inbounds i8,i8*%e,i64 16
%m=bitcast i8*%l to i8**
store i8*getelementptr inbounds(<{[4x i8],i32,[8x i8]}>,<{[4x i8],i32,[8x i8]}>*@bo,i64 0,i32 2,i64 0),i8**%m,align 8
%n=getelementptr inbounds i8,i8*%e,i64 24
%o=bitcast i8*%n to i32*
store i32 7,i32*%o,align 4
%p=call i8*@sml_alloc(i32 inreg 60)#0
%q=getelementptr inbounds i8,i8*%p,i64 -4
%r=bitcast i8*%q to i32*
store i32 1342177336,i32*%r,align 4
%s=getelementptr inbounds i8,i8*%p,i64 56
%t=bitcast i8*%s to i32*
store i32 1,i32*%t,align 4
%u=load i8*,i8**%c,align 8
%v=bitcast i8*%p to i8**
store i8*%u,i8**%v,align 8
call void@sml_raise(i8*inreg%p)#1
unreachable
}
define internal fastcc i8*@_SMLLN12TypedCalcCon7patVarsE_538(i8*inreg%a)#2 gc"smlsharp"{
k:
%b=alloca i8*,align 8
%c=alloca i8*,align 8
%d=alloca i8*,align 8
call void@llvm.gcroot(i8**%b,i8*null)#0
call void@llvm.gcroot(i8**%c,i8*null)#0
call void@llvm.gcroot(i8**%d,i8*null)#0
store i8*%a,i8**%b,align 8
%e=load atomic i32,i32*@sml_check_flag unordered,align 4
%f=icmp eq i32%e,0
br i1%f,label%i,label%g
g:
call void@sml_check(i32 inreg%e)
%h=load i8*,i8**%b,align 8
br label%i
i:
%j=phi i8*[%h,%g],[%a,%k]
%l=bitcast i8*%j to i8**
%m=load i8*,i8**%l,align 8
%n=getelementptr inbounds i8,i8*%m,i64 16
%o=bitcast i8*%n to i8**
%p=load i8*,i8**%o,align 8
store i8*%p,i8**%b,align 8
%q=getelementptr inbounds i8,i8*%j,i64 8
%r=bitcast i8*%q to i8**
%s=load i8*,i8**%r,align 8
store i8*%s,i8**%c,align 8
%t=call fastcc i8*@_SMLFN5VarID3Map9unionWithE(i32 inreg 1,i32 inreg 8)
%u=getelementptr inbounds i8,i8*%t,i64 16
%v=bitcast i8*%u to i8*(i8*,i8*)**
%w=load i8*(i8*,i8*)*,i8*(i8*,i8*)**%v,align 8
%x=bitcast i8*%t to i8**
%y=load i8*,i8**%x,align 8
%z=call fastcc i8*%w(i8*inreg%y,i8*inreg bitcast(i8**getelementptr inbounds(<{[4x i8],i32,i8*,void(...)*,void(...)*,i32}>,<{[4x i8],i32,i8*,void(...)*,void(...)*,i32}>*@bp,i64 0,i32 2)to i8*))
%A=getelementptr inbounds i8,i8*%z,i64 16
%B=bitcast i8*%A to i8*(i8*,i8*)**
%C=load i8*(i8*,i8*)*,i8*(i8*,i8*)**%B,align 8
%D=bitcast i8*%z to i8**
%E=load i8*,i8**%D,align 8
store i8*%E,i8**%d,align 8
%F=call i8*@sml_alloc(i32 inreg 20)#0
%G=getelementptr inbounds i8,i8*%F,i64 -4
%H=bitcast i8*%G to i32*
store i32 1342177296,i32*%H,align 4
%I=load i8*,i8**%b,align 8
%J=bitcast i8*%F to i8**
store i8*%I,i8**%J,align 8
%K=load i8*,i8**%c,align 8
%L=getelementptr inbounds i8,i8*%F,i64 8
%M=bitcast i8*%L to i8**
store i8*%K,i8**%M,align 8
%N=getelementptr inbounds i8,i8*%F,i64 16
%O=bitcast i8*%N to i32*
store i32 3,i32*%O,align 4
%P=load i8*,i8**%d,align 8
%Q=tail call fastcc i8*%C(i8*inreg%P,i8*inreg%F)
ret i8*%Q
}
define fastcc i8*@_SMLFN12TypedCalcCon7patVarsE(i8*inreg%a)#2 gc"smlsharp"{
%b=alloca i8*,align 8
%c=alloca i8*,align 8
call void@llvm.gcroot(i8**%b,i8*null)#0
call void@llvm.gcroot(i8**%c,i8*null)#0
store i8*%a,i8**%b,align 8
%d=load atomic i32,i32*@sml_check_flag unordered,align 4
%e=icmp eq i32%d,0
br i1%e,label%g,label%f
f:
call void@sml_check(i32 inreg%d)
br label%g
g:
%h=call fastcc i8*@_SMLFN4List5foldlE(i32 inreg 1,i32 inreg 8,i32 inreg 1,i32 inreg 8)
%i=getelementptr inbounds i8,i8*%h,i64 16
%j=bitcast i8*%i to i8*(i8*,i8*)**
%k=load i8*(i8*,i8*)*,i8*(i8*,i8*)**%j,align 8
%l=bitcast i8*%h to i8**
%m=load i8*,i8**%l,align 8
%n=call fastcc i8*%k(i8*inreg%m,i8*inreg bitcast(i8**getelementptr inbounds(<{[4x i8],i32,i8*,void(...)*,void(...)*,i32}>,<{[4x i8],i32,i8*,void(...)*,void(...)*,i32}>*@bq,i64 0,i32 2)to i8*))
%o=getelementptr inbounds i8,i8*%n,i64 16
%p=bitcast i8*%o to i8*(i8*,i8*)**
%q=load i8*(i8*,i8*)*,i8*(i8*,i8*)**%p,align 8
%r=bitcast i8*%n to i8**
%s=load i8*,i8**%r,align 8
store i8*%s,i8**%c,align 8
%t=call fastcc i8*@_SMLFN5VarID3Map5emptyE(i32 inreg 1,i32 inreg 8)
%u=load i8*,i8**%c,align 8
store i8*null,i8**%c,align 8
%v=call fastcc i8*%q(i8*inreg%u,i8*inreg%t)
%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**
%A=load i8*,i8**%z,align 8
%B=load i8*,i8**%b,align 8
%C=tail call fastcc i8*%y(i8*inreg%A,i8*inreg%B)
ret i8*%C
}
define internal fastcc i8*@_SMLLN12TypedCalcCon9extendEnvE_542(i8*inreg%a)#4 gc"smlsharp"{
%b=getelementptr inbounds i8,i8*%a,i64 8
%c=bitcast i8*%b to i8**
%d=load i8*,i8**%c,align 8
ret i8*%d
}
define internal fastcc i8*@_SMLLN12TypedCalcCon9extendEnvE_544(i8*inreg%a)#4 gc"smlsharp"{
%b=getelementptr inbounds i8,i8*%a,i64 8
%c=bitcast i8*%b to i8**
%d=load i8*,i8**%c,align 8
ret i8*%d
}
define internal fastcc i8*@_SMLLN12TypedCalcCon9extendEnvE_546(i8*inreg%a)#4 gc"smlsharp"{
%b=getelementptr inbounds i8,i8*%a,i64 8
%c=bitcast i8*%b to i8**
%d=load i8*,i8**%c,align 8
ret i8*%d
}
define internal fastcc i8*@_SMLLN12TypedCalcCon9extendEnvE_548(i8*inreg%a)#4 gc"smlsharp"{
%b=getelementptr inbounds i8,i8*%a,i64 8
%c=bitcast i8*%b to i8**
%d=load i8*,i8**%c,align 8
ret i8*%d
}
define internal fastcc i8*@_SMLLN12TypedCalcCon9extendEnvE_550(i8*inreg%a)#4 gc"smlsharp"{
%b=getelementptr inbounds i8,i8*%a,i64 8
%c=bitcast i8*%b to i8**
%d=load i8*,i8**%c,align 8
ret i8*%d
}
define fastcc i8*@_SMLFN12TypedCalcCon9extendEnvE(i8*inreg%a)#2 gc"smlsharp"{
%b=alloca i8*,align 8
%c=alloca i8*,align 8
%d=alloca i8*,align 8
%e=alloca i8*,align 8
%f=alloca i8*,align 8
%g=alloca i8*,align 8
%h=alloca i8*,align 8
call void@llvm.gcroot(i8**%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
call void@llvm.gcroot(i8**%f,i8*null)#0
call void@llvm.gcroot(i8**%g,i8*null)#0
call void@llvm.gcroot(i8**%h,i8*null)#0
store i8*%a,i8**%b,align 8
%i=load atomic i32,i32*@sml_check_flag unordered,align 4
%j=icmp eq i32%i,0
br i1%j,label%l,label%k
k:
call void@sml_check(i32 inreg%i)
br label%l
l:
%m=call fastcc i8*@_SMLFN5ExnID3Map9unionWithE(i32 inreg 1,i32 inreg 8)
%n=getelementptr inbounds i8,i8*%m,i64 16
%o=bitcast i8*%n to i8*(i8*,i8*)**
%p=load i8*(i8*,i8*)*,i8*(i8*,i8*)**%o,align 8
%q=bitcast i8*%m to i8**
%r=load i8*,i8**%q,align 8
%s=call fastcc i8*%p(i8*inreg%r,i8*inreg bitcast(i8**getelementptr inbounds(<{[4x i8],i32,i8*,void(...)*,void(...)*,i32}>,<{[4x i8],i32,i8*,void(...)*,void(...)*,i32}>*@bs,i64 0,i32 2)to i8*))
%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
store i8*%x,i8**%e,align 8
%y=bitcast i8**%b to i8***
%z=load i8**,i8***%y,align 8
%A=load i8*,i8**%z,align 8
%B=getelementptr inbounds i8,i8*%A,i64 24
%C=bitcast i8*%B to i8**
%D=load i8*,i8**%C,align 8
store i8*%D,i8**%c,align 8
%E=getelementptr inbounds i8*,i8**%z,i64 1
%F=load i8*,i8**%E,align 8
%G=getelementptr inbounds i8,i8*%F,i64 24
%H=bitcast i8*%G to i8**
%I=load i8*,i8**%H,align 8
store i8*%I,i8**%d,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=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=load i8*,i8**%d,align 8
store i8*null,i8**%d,align 8
%P=getelementptr inbounds i8,i8*%J,i64 8
%Q=bitcast i8*%P to i8**
store i8*%O,i8**%Q,align 8
%R=getelementptr inbounds i8,i8*%J,i64 16
%S=bitcast i8*%R to i32*
store i32 3,i32*%S,align 4
%T=load i8*,i8**%e,align 8
store i8*null,i8**%e,align 8
%U=call fastcc i8*%v(i8*inreg%T,i8*inreg%J)
store i8*%U,i8**%c,align 8
%V=call fastcc i8*@_SMLFN13LongsymbolEnv9unionWithE(i32 inreg 1,i32 inreg 8)
%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
%ab=call fastcc i8*%Y(i8*inreg%aa,i8*inreg bitcast(i8**getelementptr inbounds(<{[4x i8],i32,i8*,void(...)*,void(...)*,i32}>,<{[4x i8],i32,i8*,void(...)*,void(...)*,i32}>*@bt,i64 0,i32 2)to i8*))
%ac=getelementptr inbounds i8,i8*%ab,i64 16
%ad=bitcast i8*%ac to i8*(i8*,i8*)**
%ae=load i8*(i8*,i8*)*,i8*(i8*,i8*)**%ad,align 8
%af=bitcast i8*%ab to i8**
%ag=load i8*,i8**%af,align 8
store i8*%ag,i8**%f,align 8
%ah=load i8**,i8***%y,align 8
%ai=load i8*,i8**%ah,align 8
%aj=getelementptr inbounds i8,i8*%ai,i64 8
%ak=bitcast i8*%aj to i8**
%al=load i8*,i8**%ak,align 8
store i8*%al,i8**%d,align 8
%am=getelementptr inbounds i8*,i8**%ah,i64 1
%an=load i8*,i8**%am,align 8
%ao=getelementptr inbounds i8,i8*%an,i64 8
%ap=bitcast i8*%ao to i8**
%aq=load i8*,i8**%ap,align 8
store i8*%aq,i8**%e,align 8
%ar=call i8*@sml_alloc(i32 inreg 20)#0
%as=getelementptr inbounds i8,i8*%ar,i64 -4
%at=bitcast i8*%as to i32*
store i32 1342177296,i32*%at,align 4
%au=load i8*,i8**%d,align 8
store i8*null,i8**%d,align 8
%av=bitcast i8*%ar to i8**
store i8*%au,i8**%av,align 8
%aw=load i8*,i8**%e,align 8
store i8*null,i8**%e,align 8
%ax=getelementptr inbounds i8,i8*%ar,i64 8
%ay=bitcast i8*%ax to i8**
store i8*%aw,i8**%ay,align 8
%az=getelementptr inbounds i8,i8*%ar,i64 16
%aA=bitcast i8*%az to i32*
store i32 3,i32*%aA,align 4
%aB=load i8*,i8**%f,align 8
store i8*null,i8**%f,align 8
%aC=call fastcc i8*%ae(i8*inreg%aB,i8*inreg%ar)
store i8*%aC,i8**%d,align 8
%aD=call fastcc i8*@_SMLFN5VarID3Map9unionWithE(i32 inreg 1,i32 inreg 8)
%aE=getelementptr inbounds i8,i8*%aD,i64 16
%aF=bitcast i8*%aE to i8*(i8*,i8*)**
%aG=load i8*(i8*,i8*)*,i8*(i8*,i8*)**%aF,align 8
%aH=bitcast i8*%aD to i8**
%aI=load i8*,i8**%aH,align 8
%aJ=call fastcc i8*%aG(i8*inreg%aI,i8*inreg bitcast(i8**getelementptr inbounds(<{[4x i8],i32,i8*,void(...)*,void(...)*,i32}>,<{[4x i8],i32,i8*,void(...)*,void(...)*,i32}>*@bu,i64 0,i32 2)to i8*))
%aK=getelementptr inbounds i8,i8*%aJ,i64 16
%aL=bitcast i8*%aK to i8*(i8*,i8*)**
%aM=load i8*(i8*,i8*)*,i8*(i8*,i8*)**%aL,align 8
%aN=bitcast i8*%aJ to i8**
%aO=load i8*,i8**%aN,align 8
store i8*%aO,i8**%g,align 8
%aP=load i8**,i8***%y,align 8
%aQ=load i8*,i8**%aP,align 8
%aR=getelementptr inbounds i8,i8*%aQ,i64 32
%aS=bitcast i8*%aR to i8**
%aT=load i8*,i8**%aS,align 8
store i8*%aT,i8**%e,align 8
%aU=getelementptr inbounds i8*,i8**%aP,i64 1
%aV=load i8*,i8**%aU,align 8
%aW=getelementptr inbounds i8,i8*%aV,i64 32
%aX=bitcast i8*%aW to i8**
%aY=load i8*,i8**%aX,align 8
store i8*%aY,i8**%f,align 8
%aZ=call i8*@sml_alloc(i32 inreg 20)#0
%a0=getelementptr inbounds i8,i8*%aZ,i64 -4
%a1=bitcast i8*%a0 to i32*
store i32 1342177296,i32*%a1,align 4
%a2=load i8*,i8**%e,align 8
store i8*null,i8**%e,align 8
%a3=bitcast i8*%aZ to i8**
store i8*%a2,i8**%a3,align 8
%a4=load i8*,i8**%f,align 8
store i8*null,i8**%f,align 8
%a5=getelementptr inbounds i8,i8*%aZ,i64 8
%a6=bitcast i8*%a5 to i8**
store i8*%a4,i8**%a6,align 8
%a7=getelementptr inbounds i8,i8*%aZ,i64 16
%a8=bitcast i8*%a7 to i32*
store i32 3,i32*%a8,align 4
%a9=load i8*,i8**%g,align 8
store i8*null,i8**%g,align 8
%ba=call fastcc i8*%aM(i8*inreg%a9,i8*inreg%aZ)
store i8*%ba,i8**%e,align 8
%bb=call fastcc i8*@_SMLFN13LongsymbolEnv9unionWithE(i32 inreg 1,i32 inreg 8)
%bc=getelementptr inbounds i8,i8*%bb,i64 16
%bd=bitcast i8*%bc to i8*(i8*,i8*)**
%be=load i8*(i8*,i8*)*,i8*(i8*,i8*)**%bd,align 8
%bf=bitcast i8*%bb to i8**
%bg=load i8*,i8**%bf,align 8
%bh=call fastcc i8*%be(i8*inreg%bg,i8*inreg bitcast(i8**getelementptr inbounds(<{[4x i8],i32,i8*,void(...)*,void(...)*,i32}>,<{[4x i8],i32,i8*,void(...)*,void(...)*,i32}>*@bv,i64 0,i32 2)to i8*))
%bi=getelementptr inbounds i8,i8*%bh,i64 16
%bj=bitcast i8*%bi to i8*(i8*,i8*)**
%bk=load i8*(i8*,i8*)*,i8*(i8*,i8*)**%bj,align 8
%bl=bitcast i8*%bh to i8**
%bm=load i8*,i8**%bl,align 8
store i8*%bm,i8**%h,align 8
%bn=load i8**,i8***%y,align 8
%bo=load i8*,i8**%bn,align 8
%bp=getelementptr inbounds i8,i8*%bo,i64 16
%bq=bitcast i8*%bp to i8**
%br=load i8*,i8**%bq,align 8
store i8*%br,i8**%f,align 8
%bs=getelementptr inbounds i8*,i8**%bn,i64 1
%bt=load i8*,i8**%bs,align 8
%bu=getelementptr inbounds i8,i8*%bt,i64 16
%bv=bitcast i8*%bu to i8**
%bw=load i8*,i8**%bv,align 8
store i8*%bw,i8**%g,align 8
%bx=call i8*@sml_alloc(i32 inreg 20)#0
%by=getelementptr inbounds i8,i8*%bx,i64 -4
%bz=bitcast i8*%by to i32*
store i32 1342177296,i32*%bz,align 4
%bA=load i8*,i8**%f,align 8
store i8*null,i8**%f,align 8
%bB=bitcast i8*%bx to i8**
store i8*%bA,i8**%bB,align 8
%bC=load i8*,i8**%g,align 8
store i8*null,i8**%g,align 8
%bD=getelementptr inbounds i8,i8*%bx,i64 8
%bE=bitcast i8*%bD to i8**
store i8*%bC,i8**%bE,align 8
%bF=getelementptr inbounds i8,i8*%bx,i64 16
%bG=bitcast i8*%bF to i32*
store i32 3,i32*%bG,align 4
%bH=load i8*,i8**%h,align 8
store i8*null,i8**%h,align 8
%bI=call fastcc i8*%bk(i8*inreg%bH,i8*inreg%bx)
store i8*%bI,i8**%f,align 8
%bJ=call fastcc i8*@_SMLFN14BoundTypeVarID3Map9unionWithE(i32 inreg 1,i32 inreg 8)
%bK=getelementptr inbounds i8,i8*%bJ,i64 16
%bL=bitcast i8*%bK to i8*(i8*,i8*)**
%bM=load i8*(i8*,i8*)*,i8*(i8*,i8*)**%bL,align 8
%bN=bitcast i8*%bJ to i8**
%bO=load i8*,i8**%bN,align 8
%bP=call fastcc i8*%bM(i8*inreg%bO,i8*inreg bitcast(i8**getelementptr inbounds(<{[4x i8],i32,i8*,void(...)*,void(...)*,i32}>,<{[4x i8],i32,i8*,void(...)*,void(...)*,i32}>*@bw,i64 0,i32 2)to i8*))
%bQ=getelementptr inbounds i8,i8*%bP,i64 16
%bR=bitcast i8*%bQ to i8*(i8*,i8*)**
%bS=load i8*(i8*,i8*)*,i8*(i8*,i8*)**%bR,align 8
%bT=bitcast i8*%bP to i8**
%bU=load i8*,i8**%bT,align 8
store i8*%bU,i8**%h,align 8
%bV=bitcast i8**%b to i8****
%bW=load i8***,i8****%bV,align 8
%bX=load i8**,i8***%bW,align 8
%bY=load i8*,i8**%bX,align 8
store i8*%bY,i8**%g,align 8
%bZ=getelementptr inbounds i8**,i8***%bW,i64 1
%b0=load i8**,i8***%bZ,align 8
%b1=load i8*,i8**%b0,align 8
store i8*%b1,i8**%b,align 8
%b2=call i8*@sml_alloc(i32 inreg 20)#0
%b3=getelementptr inbounds i8,i8*%b2,i64 -4
%b4=bitcast i8*%b3 to i32*
store i32 1342177296,i32*%b4,align 4
%b5=load i8*,i8**%g,align 8
store i8*null,i8**%g,align 8
%b6=bitcast i8*%b2 to i8**
store i8*%b5,i8**%b6,align 8
%b7=load i8*,i8**%b,align 8
store i8*null,i8**%b,align 8
%b8=getelementptr inbounds i8,i8*%b2,i64 8
%b9=bitcast i8*%b8 to i8**
store i8*%b7,i8**%b9,align 8
%ca=getelementptr inbounds i8,i8*%b2,i64 16
%cb=bitcast i8*%ca to i32*
store i32 3,i32*%cb,align 4
%cc=load i8*,i8**%h,align 8
store i8*null,i8**%h,align 8
%cd=call fastcc i8*%bS(i8*inreg%cc,i8*inreg%b2)
store i8*%cd,i8**%b,align 8
%ce=call i8*@sml_alloc(i32 inreg 44)#0
%cf=getelementptr inbounds i8,i8*%ce,i64 -4
%cg=bitcast i8*%cf to i32*
store i32 1342177320,i32*%cg,align 4
%ch=load i8*,i8**%b,align 8
%ci=bitcast i8*%ce to i8**
store i8*%ch,i8**%ci,align 8
%cj=load i8*,i8**%d,align 8
%ck=getelementptr inbounds i8,i8*%ce,i64 8
%cl=bitcast i8*%ck to i8**
store i8*%cj,i8**%cl,align 8
%cm=load i8*,i8**%f,align 8
%cn=getelementptr inbounds i8,i8*%ce,i64 16
%co=bitcast i8*%cn to i8**
store i8*%cm,i8**%co,align 8
%cp=load i8*,i8**%c,align 8
%cq=getelementptr inbounds i8,i8*%ce,i64 24
%cr=bitcast i8*%cq to i8**
store i8*%cp,i8**%cr,align 8
%cs=load i8*,i8**%e,align 8
%ct=getelementptr inbounds i8,i8*%ce,i64 32
%cu=bitcast i8*%ct to i8**
store i8*%cs,i8**%cu,align 8
%cv=getelementptr inbounds i8,i8*%ce,i64 40
%cw=bitcast i8*%cv to i32*
store i32 31,i32*%cw,align 4
ret i8*%ce
}
define internal fastcc i8*@_SMLL1x_554(i8*inreg%a)#2 gc"smlsharp"{
k:
%b=alloca i8*,align 8
%c=alloca i8*,align 8
%d=alloca i8*,align 8
call void@llvm.gcroot(i8**%b,i8*null)#0
call void@llvm.gcroot(i8**%c,i8*null)#0
call void@llvm.gcroot(i8**%d,i8*null)#0
store i8*%a,i8**%b,align 8
%e=load atomic i32,i32*@sml_check_flag unordered,align 4
%f=icmp eq i32%e,0
br i1%f,label%i,label%g
g:
call void@sml_check(i32 inreg%e)
%h=load i8*,i8**%b,align 8
br label%i
i:
%j=phi i8*[%h,%g],[%a,%k]
%l=bitcast i8*%j to i8**
%m=load i8*,i8**%l,align 8
store i8*%m,i8**%b,align 8
%n=getelementptr inbounds i8,i8*%j,i64 8
%o=bitcast i8*%n to i8**
%p=load i8*,i8**%o,align 8
store i8*%p,i8**%c,align 8
%q=call fastcc i8*@_SMLFN5ExnID3Map6insertE(i32 inreg 1,i32 inreg 8)
%r=getelementptr inbounds i8,i8*%q,i64 16
%s=bitcast i8*%r to i8*(i8*,i8*)**
%t=load i8*(i8*,i8*)*,i8*(i8*,i8*)**%s,align 8
%u=bitcast i8*%q to i8**
%v=load i8*,i8**%u,align 8
store i8*%v,i8**%d,align 8
%w=bitcast i8**%b to i32**
%x=load i32*,i32**%w,align 8
%y=load i32,i32*%x,align 4
%z=call i8*@sml_alloc(i32 inreg 28)#0
%A=getelementptr inbounds i8,i8*%z,i64 -4
%B=bitcast i8*%A to i32*
store i32 1342177304,i32*%B,align 4
%C=getelementptr inbounds i8,i8*%z,i64 12
%D=bitcast i8*%C to i32*
store i32 0,i32*%D,align 1
%E=load i8*,i8**%c,align 8
%F=bitcast i8*%z to i8**
store i8*%E,i8**%F,align 8
%G=getelementptr inbounds i8,i8*%z,i64 8
%H=bitcast i8*%G to i32*
store i32%y,i32*%H,align 4
%I=load i8*,i8**%b,align 8
%J=getelementptr inbounds i8,i8*%z,i64 16
%K=bitcast i8*%J to i8**
store i8*%I,i8**%K,align 8
%L=getelementptr inbounds i8,i8*%z,i64 24
%M=bitcast i8*%L to i32*
store i32 5,i32*%M,align 4
%N=load i8*,i8**%d,align 8
%O=tail call fastcc i8*%t(i8*inreg%N,i8*inreg%z)
ret i8*%O
}
define internal fastcc i8*@_SMLLN12TypedCalcCon10makeExnEnvE_556(i8*inreg%a,i8*inreg%b)#2 gc"smlsharp"{
%c=alloca i8*,align 8
%d=alloca i8*,align 8
%e=alloca i8*,align 8
%f=alloca i8*,align 8
%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**%d,align 8
store i8*%b,i8**%c,align 8
%h=load atomic i32,i32*@sml_check_flag unordered,align 4
%i=icmp eq i32%h,0
br i1%i,label%k,label%j
j:
call void@sml_check(i32 inreg%h)
br label%k
k:
%l=call fastcc i8*@_SMLFN4List5foldlE(i32 inreg 1,i32 inreg 8,i32 inreg 1,i32 inreg 8)
%m=getelementptr inbounds i8,i8*%l,i64 16
%n=bitcast i8*%m to i8*(i8*,i8*)**
%o=load i8*(i8*,i8*)*,i8*(i8*,i8*)**%n,align 8
%p=bitcast i8*%l to i8**
%q=load i8*,i8**%p,align 8
%r=call fastcc i8*%o(i8*inreg%q,i8*inreg bitcast(i8**getelementptr inbounds(<{[4x i8],i32,i8*,void(...)*,void(...)*,i32}>,<{[4x i8],i32,i8*,void(...)*,void(...)*,i32}>*@by,i64 0,i32 2)to i8*))
%s=getelementptr inbounds i8,i8*%r,i64 16
%t=bitcast i8*%s to i8*(i8*,i8*)**
%u=load i8*(i8*,i8*)*,i8*(i8*,i8*)**%t,align 8
%v=bitcast i8*%r to i8**
%w=load i8*,i8**%v,align 8
store i8*%w,i8**%e,align 8
%x=call fastcc i8*@_SMLFN5ExnID3Map5emptyE(i32 inreg 1,i32 inreg 8)
%y=load i8*,i8**%e,align 8
store i8*null,i8**%e,align 8
%z=call fastcc i8*%u(i8*inreg%y,i8*inreg%x)
%A=getelementptr inbounds i8,i8*%z,i64 16
%B=bitcast i8*%A to i8*(i8*,i8*)**
%C=load i8*(i8*,i8*)*,i8*(i8*,i8*)**%B,align 8
%D=bitcast i8*%z to i8**
%E=load i8*,i8**%D,align 8
%F=load i8*,i8**%c,align 8
store i8*null,i8**%c,align 8
%G=call fastcc i8*%C(i8*inreg%E,i8*inreg%F)
store i8*%G,i8**%c,align 8
%H=bitcast i8**%d to i8***
%I=load i8**,i8***%H,align 8
%J=load i8*,i8**%I,align 8
%K=bitcast i8*%J to i8**
%L=load i8*,i8**%K,align 8
store i8*%L,i8**%d,align 8
%M=getelementptr inbounds i8,i8*%J,i64 8
%N=bitcast i8*%M to i8**
%O=load i8*,i8**%N,align 8
store i8*%O,i8**%e,align 8
%P=getelementptr inbounds i8,i8*%J,i64 16
%Q=bitcast i8*%P to i8**
%R=load i8*,i8**%Q,align 8
store i8*%R,i8**%f,align 8
%S=getelementptr inbounds i8,i8*%J,i64 32
%T=bitcast i8*%S to i8**
%U=load i8*,i8**%T,align 8
store i8*%U,i8**%g,align 8
%V=call i8*@sml_alloc(i32 inreg 44)#0
%W=getelementptr inbounds i8,i8*%V,i64 -4
%X=bitcast i8*%W to i32*
store i32 1342177320,i32*%X,align 4
%Y=load i8*,i8**%d,align 8
%Z=bitcast i8*%V to i8**
store i8*%Y,i8**%Z,align 8
%aa=load i8*,i8**%e,align 8
%ab=getelementptr inbounds i8,i8*%V,i64 8
%ac=bitcast i8*%ab to i8**
store i8*%aa,i8**%ac,align 8
%ad=load i8*,i8**%f,align 8
%ae=getelementptr inbounds i8,i8*%V,i64 16
%af=bitcast i8*%ae to i8**
store i8*%ad,i8**%af,align 8
%ag=load i8*,i8**%c,align 8
%ah=getelementptr inbounds i8,i8*%V,i64 24
%ai=bitcast i8*%ah to i8**
store i8*%ag,i8**%ai,align 8
%aj=load i8*,i8**%g,align 8
%ak=getelementptr inbounds i8,i8*%V,i64 32
%al=bitcast i8*%ak to i8**
store i8*%aj,i8**%al,align 8
%am=getelementptr inbounds i8,i8*%V,i64 40
%an=bitcast i8*%am to i32*
store i32 31,i32*%an,align 4
ret i8*%V
}
define internal fastcc i8*@_SMLL1x_557(i8*inreg%a)#2 gc"smlsharp"{
l:
%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=load atomic i32,i32*@sml_check_flag unordered,align 4
%g=icmp eq i32%f,0
br i1%g,label%j,label%h
h:
call void@sml_check(i32 inreg%f)
%i=load i8*,i8**%b,align 8
br label%j
j:
%k=phi i8*[%i,%h],[%a,%l]
%m=bitcast i8*%k to i8**
%n=load i8*,i8**%m,align 8
store i8*%n,i8**%b,align 8
%o=getelementptr inbounds i8,i8*%k,i64 8
%p=bitcast i8*%o to i8**
%q=load i8*,i8**%p,align 8
store i8*%q,i8**%c,align 8
%r=call fastcc i8*@_SMLFN13LongsymbolEnv6insertE(i32 inreg 1,i32 inreg 8)
%s=getelementptr inbounds i8,i8*%r,i64 16
%t=bitcast i8*%s to i8*(i8*,i8*)**
%u=load i8*(i8*,i8*)*,i8*(i8*,i8*)**%t,align 8
%v=bitcast i8*%r to i8**
%w=load i8*,i8**%v,align 8
store i8*%w,i8**%e,align 8
%x=bitcast i8**%b to i8***
%y=load i8**,i8***%x,align 8
%z=load i8*,i8**%y,align 8
store i8*%z,i8**%d,align 8
%A=call i8*@sml_alloc(i32 inreg 28)#0
%B=getelementptr inbounds i8,i8*%A,i64 -4
%C=bitcast i8*%B to i32*
store i32 1342177304,i32*%C,align 4
%D=load i8*,i8**%c,align 8
%E=bitcast i8*%A to i8**
store i8*%D,i8**%E,align 8
%F=load i8*,i8**%d,align 8
%G=getelementptr inbounds i8,i8*%A,i64 8
%H=bitcast i8*%G to i8**
store i8*%F,i8**%H,align 8
%I=load i8*,i8**%b,align 8
%J=getelementptr inbounds i8,i8*%A,i64 16
%K=bitcast i8*%J to i8**
store i8*%I,i8**%K,align 8
%L=getelementptr inbounds i8,i8*%A,i64 24
%M=bitcast i8*%L to i32*
store i32 7,i32*%M,align 4
%N=load i8*,i8**%e,align 8
%O=tail call fastcc i8*%u(i8*inreg%N,i8*inreg%A)
ret i8*%O
}
define internal fastcc i8*@_SMLLN12TypedCalcCon12makeExExnEnvE_559(i8*inreg%a,i8*inreg%b)#2 gc"smlsharp"{
%c=alloca i8*,align 8
%d=alloca i8*,align 8
%e=alloca i8*,align 8
%f=alloca i8*,align 8
%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**%d,align 8
store i8*%b,i8**%c,align 8
%h=load atomic i32,i32*@sml_check_flag unordered,align 4
%i=icmp eq i32%h,0
br i1%i,label%k,label%j
j:
call void@sml_check(i32 inreg%h)
br label%k
k:
%l=call fastcc i8*@_SMLFN4List5foldlE(i32 inreg 1,i32 inreg 8,i32 inreg 1,i32 inreg 8)
%m=getelementptr inbounds i8,i8*%l,i64 16
%n=bitcast i8*%m to i8*(i8*,i8*)**
%o=load i8*(i8*,i8*)*,i8*(i8*,i8*)**%n,align 8
%p=bitcast i8*%l to i8**
%q=load i8*,i8**%p,align 8
%r=call fastcc i8*%o(i8*inreg%q,i8*inreg bitcast(i8**getelementptr inbounds(<{[4x i8],i32,i8*,void(...)*,void(...)*,i32}>,<{[4x i8],i32,i8*,void(...)*,void(...)*,i32}>*@bz,i64 0,i32 2)to i8*))
%s=getelementptr inbounds i8,i8*%r,i64 16
%t=bitcast i8*%s to i8*(i8*,i8*)**
%u=load i8*(i8*,i8*)*,i8*(i8*,i8*)**%t,align 8
%v=bitcast i8*%r to i8**
%w=load i8*,i8**%v,align 8
store i8*%w,i8**%e,align 8
%x=call fastcc i8*@_SMLFN13LongsymbolEnv5emptyE(i32 inreg 1,i32 inreg 8)
%y=load i8*,i8**%e,align 8
store i8*null,i8**%e,align 8
%z=call fastcc i8*%u(i8*inreg%y,i8*inreg%x)
%A=getelementptr inbounds i8,i8*%z,i64 16
%B=bitcast i8*%A to i8*(i8*,i8*)**
%C=load i8*(i8*,i8*)*,i8*(i8*,i8*)**%B,align 8
%D=bitcast i8*%z to i8**
%E=load i8*,i8**%D,align 8
%F=load i8*,i8**%c,align 8
store i8*null,i8**%c,align 8
%G=call fastcc i8*%C(i8*inreg%E,i8*inreg%F)
store i8*%G,i8**%c,align 8
%H=bitcast i8**%d to i8***
%I=load i8**,i8***%H,align 8
%J=load i8*,i8**%I,align 8
%K=bitcast i8*%J to i8**
%L=load i8*,i8**%K,align 8
store i8*%L,i8**%d,align 8
%M=getelementptr inbounds i8,i8*%J,i64 16
%N=bitcast i8*%M to i8**
%O=load i8*,i8**%N,align 8
store i8*%O,i8**%e,align 8
%P=getelementptr inbounds i8,i8*%J,i64 24
%Q=bitcast i8*%P to i8**
%R=load i8*,i8**%Q,align 8
store i8*%R,i8**%f,align 8
%S=getelementptr inbounds i8,i8*%J,i64 32
%T=bitcast i8*%S to i8**
%U=load i8*,i8**%T,align 8
store i8*%U,i8**%g,align 8
%V=call i8*@sml_alloc(i32 inreg 44)#0
%W=getelementptr inbounds i8,i8*%V,i64 -4
%X=bitcast i8*%W to i32*
store i32 1342177320,i32*%X,align 4
%Y=load i8*,i8**%d,align 8
%Z=bitcast i8*%V to i8**
store i8*%Y,i8**%Z,align 8
%aa=load i8*,i8**%c,align 8
%ab=getelementptr inbounds i8,i8*%V,i64 8
%ac=bitcast i8*%ab to i8**
store i8*%aa,i8**%ac,align 8
%ad=load i8*,i8**%e,align 8
%ae=getelementptr inbounds i8,i8*%V,i64 16
%af=bitcast i8*%ae to i8**
store i8*%ad,i8**%af,align 8
%ag=load i8*,i8**%f,align 8
%ah=getelementptr inbounds i8,i8*%V,i64 24
%ai=bitcast i8*%ah to i8**
store i8*%ag,i8**%ai,align 8
%aj=load i8*,i8**%g,align 8
%ak=getelementptr inbounds i8,i8*%V,i64 32
%al=bitcast i8*%ak to i8**
store i8*%aj,i8**%al,align 8
%am=getelementptr inbounds i8,i8*%V,i64 40
%an=bitcast i8*%am to i32*
store i32 31,i32*%an,align 4
ret i8*%V
}
define internal fastcc i8*@_SMLL1x_560(i8*inreg%a)#2 gc"smlsharp"{
k:
%b=alloca i8*,align 8
%c=alloca i8*,align 8
%d=alloca i8*,align 8
call void@llvm.gcroot(i8**%b,i8*null)#0
call void@llvm.gcroot(i8**%c,i8*null)#0
call void@llvm.gcroot(i8**%d,i8*null)#0
store i8*%a,i8**%b,align 8
%e=load atomic i32,i32*@sml_check_flag unordered,align 4
%f=icmp eq i32%e,0
br i1%f,label%i,label%g
g:
call void@sml_check(i32 inreg%e)
%h=load i8*,i8**%b,align 8
br label%i
i:
%j=phi i8*[%h,%g],[%a,%k]
%l=bitcast i8*%j to i8**
%m=load i8*,i8**%l,align 8
store i8*%m,i8**%b,align 8
%n=getelementptr inbounds i8,i8*%j,i64 8
%o=bitcast i8*%n to i8**
%p=load i8*,i8**%o,align 8
store i8*%p,i8**%c,align 8
%q=call fastcc i8*@_SMLFN5VarID3Map6insertE(i32 inreg 1,i32 inreg 8)
%r=getelementptr inbounds i8,i8*%q,i64 16
%s=bitcast i8*%r to i8*(i8*,i8*)**
%t=load i8*(i8*,i8*)*,i8*(i8*,i8*)**%s,align 8
%u=bitcast i8*%q to i8**
%v=load i8*,i8**%u,align 8
store i8*%v,i8**%d,align 8
%w=bitcast i8**%b to i32**
%x=load i32*,i32**%w,align 8
%y=load i32,i32*%x,align 4
%z=call i8*@sml_alloc(i32 inreg 28)#0
%A=getelementptr inbounds i8,i8*%z,i64 -4
%B=bitcast i8*%A to i32*
store i32 1342177304,i32*%B,align 4
%C=getelementptr inbounds i8,i8*%z,i64 12
%D=bitcast i8*%C to i32*
store i32 0,i32*%D,align 1
%E=load i8*,i8**%c,align 8
%F=bitcast i8*%z to i8**
store i8*%E,i8**%F,align 8
%G=getelementptr inbounds i8,i8*%z,i64 8
%H=bitcast i8*%G to i32*
store i32%y,i32*%H,align 4
%I=load i8*,i8**%b,align 8
%J=getelementptr inbounds i8,i8*%z,i64 16
%K=bitcast i8*%J to i8**
store i8*%I,i8**%K,align 8
%L=getelementptr inbounds i8,i8*%z,i64 24
%M=bitcast i8*%L to i32*
store i32 5,i32*%M,align 4
%N=load i8*,i8**%d,align 8
%O=tail call fastcc i8*%t(i8*inreg%N,i8*inreg%z)
ret i8*%O
}
define internal fastcc i8*@_SMLLN12TypedCalcCon10makeVarEnvE_562(i8*inreg%a,i8*inreg%b)#2 gc"smlsharp"{
%c=alloca i8*,align 8
%d=alloca i8*,align 8
%e=alloca i8*,align 8
%f=alloca i8*,align 8
%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**%d,align 8
store i8*%b,i8**%c,align 8
%h=load atomic i32,i32*@sml_check_flag unordered,align 4
%i=icmp eq i32%h,0
br i1%i,label%k,label%j
j:
call void@sml_check(i32 inreg%h)
br label%k
k:
%l=call fastcc i8*@_SMLFN4List5foldlE(i32 inreg 1,i32 inreg 8,i32 inreg 1,i32 inreg 8)
%m=getelementptr inbounds i8,i8*%l,i64 16
%n=bitcast i8*%m to i8*(i8*,i8*)**
%o=load i8*(i8*,i8*)*,i8*(i8*,i8*)**%n,align 8
%p=bitcast i8*%l to i8**
%q=load i8*,i8**%p,align 8
%r=call fastcc i8*%o(i8*inreg%q,i8*inreg bitcast(i8**getelementptr inbounds(<{[4x i8],i32,i8*,void(...)*,void(...)*,i32}>,<{[4x i8],i32,i8*,void(...)*,void(...)*,i32}>*@bA,i64 0,i32 2)to i8*))
%s=getelementptr inbounds i8,i8*%r,i64 16
%t=bitcast i8*%s to i8*(i8*,i8*)**
%u=load i8*(i8*,i8*)*,i8*(i8*,i8*)**%t,align 8
%v=bitcast i8*%r to i8**
%w=load i8*,i8**%v,align 8
store i8*%w,i8**%e,align 8
%x=call fastcc i8*@_SMLFN5VarID3Map5emptyE(i32 inreg 1,i32 inreg 8)
%y=load i8*,i8**%e,align 8
store i8*null,i8**%e,align 8
%z=call fastcc i8*%u(i8*inreg%y,i8*inreg%x)
%A=getelementptr inbounds i8,i8*%z,i64 16
%B=bitcast i8*%A to i8*(i8*,i8*)**
%C=load i8*(i8*,i8*)*,i8*(i8*,i8*)**%B,align 8
%D=bitcast i8*%z to i8**
%E=load i8*,i8**%D,align 8
%F=load i8*,i8**%c,align 8
store i8*null,i8**%c,align 8
%G=call fastcc i8*%C(i8*inreg%E,i8*inreg%F)
store i8*%G,i8**%c,align 8
%H=bitcast i8**%d to i8***
%I=load i8**,i8***%H,align 8
%J=load i8*,i8**%I,align 8
%K=bitcast i8*%J to i8**
%L=load i8*,i8**%K,align 8
store i8*%L,i8**%d,align 8
%M=getelementptr inbounds i8,i8*%J,i64 8
%N=bitcast i8*%M to i8**
%O=load i8*,i8**%N,align 8
store i8*%O,i8**%e,align 8
%P=getelementptr inbounds i8,i8*%J,i64 16
%Q=bitcast i8*%P to i8**
%R=load i8*,i8**%Q,align 8
store i8*%R,i8**%f,align 8
%S=getelementptr inbounds i8,i8*%J,i64 24
%T=bitcast i8*%S to i8**
%U=load i8*,i8**%T,align 8
store i8*%U,i8**%g,align 8
%V=call i8*@sml_alloc(i32 inreg 44)#0
%W=getelementptr inbounds i8,i8*%V,i64 -4
%X=bitcast i8*%W to i32*
store i32 1342177320,i32*%X,align 4
%Y=load i8*,i8**%d,align 8
%Z=bitcast i8*%V to i8**
store i8*%Y,i8**%Z,align 8
%aa=load i8*,i8**%e,align 8
%ab=getelementptr inbounds i8,i8*%V,i64 8
%ac=bitcast i8*%ab to i8**
store i8*%aa,i8**%ac,align 8
%ad=load i8*,i8**%f,align 8
%ae=getelementptr inbounds i8,i8*%V,i64 16
%af=bitcast i8*%ae to i8**
store i8*%ad,i8**%af,align 8
%ag=load i8*,i8**%g,align 8
%ah=getelementptr inbounds i8,i8*%V,i64 24
%ai=bitcast i8*%ah to i8**
store i8*%ag,i8**%ai,align 8
%aj=load i8*,i8**%c,align 8
%ak=getelementptr inbounds i8,i8*%V,i64 32
%al=bitcast i8*%ak to i8**
store i8*%aj,i8**%al,align 8
%am=getelementptr inbounds i8,i8*%V,i64 40
%an=bitcast i8*%am to i32*
store i32 31,i32*%an,align 4
ret i8*%V
}
define internal fastcc i8*@_SMLL1x_563(i8*inreg%a)#2 gc"smlsharp"{
l:
%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=load atomic i32,i32*@sml_check_flag unordered,align 4
%g=icmp eq i32%f,0
br i1%g,label%j,label%h
h:
call void@sml_check(i32 inreg%f)
%i=load i8*,i8**%b,align 8
br label%j
j:
%k=phi i8*[%i,%h],[%a,%l]
%m=bitcast i8*%k to i8**
%n=load i8*,i8**%m,align 8
store i8*%n,i8**%b,align 8
%o=getelementptr inbounds i8,i8*%k,i64 8
%p=bitcast i8*%o to i8**
%q=load i8*,i8**%p,align 8
store i8*%q,i8**%c,align 8
%r=call fastcc i8*@_SMLFN13LongsymbolEnv6insertE(i32 inreg 1,i32 inreg 8)
%s=getelementptr inbounds i8,i8*%r,i64 16
%t=bitcast i8*%s to i8*(i8*,i8*)**
%u=load i8*(i8*,i8*)*,i8*(i8*,i8*)**%t,align 8
%v=bitcast i8*%r to i8**
%w=load i8*,i8**%v,align 8
store i8*%w,i8**%e,align 8
%x=bitcast i8**%b to i8***
%y=load i8**,i8***%x,align 8
%z=load i8*,i8**%y,align 8
store i8*%z,i8**%d,align 8
%A=call i8*@sml_alloc(i32 inreg 28)#0
%B=getelementptr inbounds i8,i8*%A,i64 -4
%C=bitcast i8*%B to i32*
store i32 1342177304,i32*%C,align 4
%D=load i8*,i8**%c,align 8
%E=bitcast i8*%A to i8**
store i8*%D,i8**%E,align 8
%F=load i8*,i8**%d,align 8
%G=getelementptr inbounds i8,i8*%A,i64 8
%H=bitcast i8*%G to i8**
store i8*%F,i8**%H,align 8
%I=load i8*,i8**%b,align 8
%J=getelementptr inbounds i8,i8*%A,i64 16
%K=bitcast i8*%J to i8**
store i8*%I,i8**%K,align 8
%L=getelementptr inbounds i8,i8*%A,i64 24
%M=bitcast i8*%L to i32*
store i32 7,i32*%M,align 4
%N=load i8*,i8**%e,align 8
%O=tail call fastcc i8*%u(i8*inreg%N,i8*inreg%A)
ret i8*%O
}
define internal fastcc i8*@_SMLLN12TypedCalcCon12makeExVarEnvE_565(i8*inreg%a,i8*inreg%b)#2 gc"smlsharp"{
%c=alloca i8*,align 8
%d=alloca i8*,align 8
%e=alloca i8*,align 8
%f=alloca i8*,align 8
%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**%d,align 8
store i8*%b,i8**%c,align 8
%h=load atomic i32,i32*@sml_check_flag unordered,align 4
%i=icmp eq i32%h,0
br i1%i,label%k,label%j
j:
call void@sml_check(i32 inreg%h)
br label%k
k:
%l=call fastcc i8*@_SMLFN4List5foldlE(i32 inreg 1,i32 inreg 8,i32 inreg 1,i32 inreg 8)
%m=getelementptr inbounds i8,i8*%l,i64 16
%n=bitcast i8*%m to i8*(i8*,i8*)**
%o=load i8*(i8*,i8*)*,i8*(i8*,i8*)**%n,align 8
%p=bitcast i8*%l to i8**
%q=load i8*,i8**%p,align 8
%r=call fastcc i8*%o(i8*inreg%q,i8*inreg bitcast(i8**getelementptr inbounds(<{[4x i8],i32,i8*,void(...)*,void(...)*,i32}>,<{[4x i8],i32,i8*,void(...)*,void(...)*,i32}>*@bB,i64 0,i32 2)to i8*))
%s=getelementptr inbounds i8,i8*%r,i64 16
%t=bitcast i8*%s to i8*(i8*,i8*)**
%u=load i8*(i8*,i8*)*,i8*(i8*,i8*)**%t,align 8
%v=bitcast i8*%r to i8**
%w=load i8*,i8**%v,align 8
store i8*%w,i8**%e,align 8
%x=call fastcc i8*@_SMLFN13LongsymbolEnv5emptyE(i32 inreg 1,i32 inreg 8)
%y=load i8*,i8**%e,align 8
store i8*null,i8**%e,align 8
%z=call fastcc i8*%u(i8*inreg%y,i8*inreg%x)
%A=getelementptr inbounds i8,i8*%z,i64 16
%B=bitcast i8*%A to i8*(i8*,i8*)**
%C=load i8*(i8*,i8*)*,i8*(i8*,i8*)**%B,align 8
%D=bitcast i8*%z to i8**
%E=load i8*,i8**%D,align 8
%F=load i8*,i8**%c,align 8
store i8*null,i8**%c,align 8
%G=call fastcc i8*%C(i8*inreg%E,i8*inreg%F)
store i8*%G,i8**%c,align 8
%H=bitcast i8**%d to i8***
%I=load i8**,i8***%H,align 8
%J=load i8*,i8**%I,align 8
%K=bitcast i8*%J to i8**
%L=load i8*,i8**%K,align 8
store i8*%L,i8**%d,align 8
%M=getelementptr inbounds i8,i8*%J,i64 8
%N=bitcast i8*%M to i8**
%O=load i8*,i8**%N,align 8
store i8*%O,i8**%e,align 8
%P=getelementptr inbounds i8,i8*%J,i64 24
%Q=bitcast i8*%P to i8**
%R=load i8*,i8**%Q,align 8
store i8*%R,i8**%f,align 8
%S=getelementptr inbounds i8,i8*%J,i64 32
%T=bitcast i8*%S to i8**
%U=load i8*,i8**%T,align 8
store i8*%U,i8**%g,align 8
%V=call i8*@sml_alloc(i32 inreg 44)#0
%W=getelementptr inbounds i8,i8*%V,i64 -4
%X=bitcast i8*%W to i32*
store i32 1342177320,i32*%X,align 4
%Y=load i8*,i8**%d,align 8
%Z=bitcast i8*%V to i8**
store i8*%Y,i8**%Z,align 8
%aa=load i8*,i8**%e,align 8
%ab=getelementptr inbounds i8,i8*%V,i64 8
%ac=bitcast i8*%ab to i8**
store i8*%aa,i8**%ac,align 8
%ad=load i8*,i8**%c,align 8
%ae=getelementptr inbounds i8,i8*%V,i64 16
%af=bitcast i8*%ae to i8**
store i8*%ad,i8**%af,align 8
%ag=load i8*,i8**%f,align 8
%ah=getelementptr inbounds i8,i8*%V,i64 24
%ai=bitcast i8*%ah to i8**
store i8*%ag,i8**%ai,align 8
%aj=load i8*,i8**%g,align 8
%ak=getelementptr inbounds i8,i8*%V,i64 32
%al=bitcast i8*%ak to i8**
store i8*%aj,i8**%al,align 8
%am=getelementptr inbounds i8,i8*%V,i64 40
%an=bitcast i8*%am to i32*
store i32 31,i32*%an,align 4
ret i8*%V
}
define internal fastcc i8*@_SMLLN12TypedCalcCon9clsVarEnvE_566(i8*inreg%a,i8*inreg%b)#4 gc"smlsharp"{
%c=alloca i8*,align 8
%d=alloca i8*,align 8
%e=alloca i8*,align 8
%f=alloca i8*,align 8
%g=alloca i8*,align 8
call void@llvm.gcroot(i8**%c,i8*null)#0
call void@llvm.gcroot(i8**%d,i8*null)#0
call void@llvm.gcroot(i8**%e,i8*null)#0
call void@llvm.gcroot(i8**%f,i8*null)#0
call void@llvm.gcroot(i8**%g,i8*null)#0
%h=bitcast i8*%a to i8***
%i=load i8**,i8***%h,align 8
%j=load i8*,i8**%i,align 8
store i8*%j,i8**%c,align 8
%k=getelementptr inbounds i8*,i8**%i,i64 1
%l=load i8*,i8**%k,align 8
store i8*%l,i8**%d,align 8
%m=bitcast i8*%b to i32*
%n=load i32,i32*%m,align 4
%o=getelementptr inbounds i8,i8*%b,i64 4
%p=bitcast i8*%o to i32*
%q=load i32,i32*%p,align 4
%r=getelementptr inbounds i8,i8*%b,i64 8
%s=bitcast i8*%r to i8**
%t=load i8*,i8**%s,align 8
store i8*%t,i8**%e,align 8
%u=getelementptr inbounds i8,i8*%b,i64 16
%v=bitcast i8*%u to i8**
%w=load i8*,i8**%v,align 8
store i8*%w,i8**%f,align 8
%x=call i8*@sml_alloc(i32 inreg 28)#0
%y=getelementptr inbounds i8,i8*%x,i64 -4
%z=bitcast i8*%y to i32*
store i32 1342177304,i32*%z,align 4
store i8*%x,i8**%g,align 8
%A=load i8*,i8**%f,align 8
store i8*null,i8**%f,align 8
%B=bitcast i8*%x to i8**
store i8*%A,i8**%B,align 8
%C=load i8*,i8**%c,align 8
store i8*null,i8**%c,align 8
%D=getelementptr inbounds i8,i8*%x,i64 8
%E=bitcast i8*%D to i8**
store i8*%C,i8**%E,align 8
%F=load i8*,i8**%d,align 8
store i8*null,i8**%d,align 8
%G=getelementptr inbounds i8,i8*%x,i64 16
%H=bitcast i8*%G to i8**
store i8*%F,i8**%H,align 8
%I=getelementptr inbounds i8,i8*%x,i64 24
%J=bitcast i8*%I to i32*
store i32 7,i32*%J,align 4
%K=call i8*@sml_alloc(i32 inreg 20)#0
%L=getelementptr inbounds i8,i8*%K,i64 -4
%M=bitcast i8*%L to i32*
store i32 1342177296,i32*%M,align 4
store i8*%K,i8**%c,align 8
%N=getelementptr inbounds i8,i8*%K,i64 4
%O=bitcast i8*%N to i32*
store i32 0,i32*%O,align 1
%P=bitcast i8*%K to i32*
store i32 7,i32*%P,align 4
%Q=load i8*,i8**%g,align 8
store i8*null,i8**%g,align 8
%R=getelementptr inbounds i8,i8*%K,i64 8
%S=bitcast i8*%R to i8**
store i8*%Q,i8**%S,align 8
%T=getelementptr inbounds i8,i8*%K,i64 16
%U=bitcast i8*%T to i32*
store i32 2,i32*%U,align 4
%V=call i8*@sml_alloc(i32 inreg 28)#0
%W=bitcast i8*%V to i32*
%X=getelementptr inbounds i8,i8*%V,i64 -4
%Y=bitcast i8*%X to i32*
store i32 1342177304,i32*%Y,align 4
store i32%n,i32*%W,align 4
%Z=getelementptr inbounds i8,i8*%V,i64 4
%aa=bitcast i8*%Z to i32*
store i32%q,i32*%aa,align 4
%ab=load i8*,i8**%e,align 8
%ac=getelementptr inbounds i8,i8*%V,i64 8
%ad=bitcast i8*%ac to i8**
store i8*%ab,i8**%ad,align 8
%ae=load i8*,i8**%c,align 8
%af=getelementptr inbounds i8,i8*%V,i64 16
%ag=bitcast i8*%af to i8**
store i8*%ae,i8**%ag,align 8
%ah=getelementptr inbounds i8,i8*%V,i64 24
%ai=bitcast i8*%ah to i32*
store i32 6,i32*%ai,align 4
ret i8*%V
}
define internal fastcc i8*@_SMLLN12TypedCalcCon9clsVarEnvE_567(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
%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**%d,align 8
store i8*%b,i8**%c,align 8
%h=load atomic i32,i32*@sml_check_flag unordered,align 4
%i=icmp eq i32%h,0
br i1%i,label%l,label%j
j:
call void@sml_check(i32 inreg%h)
%k=load i8*,i8**%d,align 8
br label%l
l:
%m=phi i8*[%k,%j],[%a,%n]
%o=getelementptr inbounds i8,i8*%m,i64 8
%p=bitcast i8*%o to i8**
%q=load i8*,i8**%p,align 8
store i8*%q,i8**%f,align 8
%r=call fastcc i8*@_SMLFN4List3mapE(i32 inreg 1,i32 inreg 8,i32 inreg 1,i32 inreg 8)
%s=getelementptr inbounds i8,i8*%r,i64 16
%t=bitcast i8*%s to i8*(i8*,i8*)**
%u=load i8*(i8*,i8*)*,i8*(i8*,i8*)**%t,align 8
%v=bitcast i8*%r to i8**
%w=load i8*,i8**%v,align 8
store i8*%w,i8**%e,align 8
%x=bitcast i8**%d to i8***
%y=load i8**,i8***%x,align 8
%z=load i8*,i8**%y,align 8
store i8*%z,i8**%d,align 8
%A=call i8*@sml_alloc(i32 inreg 12)#0
%B=getelementptr inbounds i8,i8*%A,i64 -4
%C=bitcast i8*%B to i32*
store i32 1342177288,i32*%C,align 4
store i8*%A,i8**%g,align 8
%D=load i8*,i8**%d,align 8
store i8*null,i8**%d,align 8
%E=bitcast i8*%A to i8**
store i8*%D,i8**%E,align 8
%F=getelementptr inbounds i8,i8*%A,i64 8
%G=bitcast i8*%F to i32*
store i32 1,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**%g,align 8
store i8*null,i8**%g,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*)*@_SMLLN12TypedCalcCon9clsVarEnvE_566 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*)*@_SMLLN12TypedCalcCon9clsVarEnvE_566 to void(...)*),void(...)**%P,align 8
%Q=getelementptr inbounds i8,i8*%H,i64 24
%R=bitcast i8*%Q to i32*
store i32 -2147483647,i32*%R,align 4
%S=load i8*,i8**%e,align 8
store i8*null,i8**%e,align 8
%T=call fastcc i8*%u(i8*inreg%S,i8*inreg%H)
%U=getelementptr inbounds i8,i8*%T,i64 16
%V=bitcast i8*%U to i8*(i8*,i8*)**
%W=load i8*(i8*,i8*)*,i8*(i8*,i8*)**%V,align 8
%X=bitcast i8*%T to i8**
%Y=load i8*,i8**%X,align 8
%Z=load i8*,i8**%c,align 8
store i8*null,i8**%c,align 8
%aa=call fastcc i8*%W(i8*inreg%Y,i8*inreg%Z)
%ab=load i8*,i8**%f,align 8
%ac=tail call fastcc i8*@_SMLLN12TypedCalcCon10makeVarEnvE_562(i8*inreg%ab,i8*inreg%aa)
ret i8*%ac
}
define internal fastcc i8*@_SMLLN12TypedCalcCon9clsVarEnvE_568(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=bitcast i8*%a to i8**
%g=load i8*,i8**%f,align 8
store i8*%g,i8**%d,align 8
%h=call i8*@sml_alloc(i32 inreg 20)#0
%i=getelementptr inbounds i8,i8*%h,i64 -4
%j=bitcast i8*%i to i32*
store i32 1342177296,i32*%j,align 4
store i8*%h,i8**%e,align 8
%k=load i8*,i8**%c,align 8
store i8*null,i8**%c,align 8
%l=bitcast i8*%h to i8**
store i8*%k,i8**%l,align 8
%m=load i8*,i8**%d,align 8
store i8*null,i8**%d,align 8
%n=getelementptr inbounds i8,i8*%h,i64 8
%o=bitcast i8*%n to i8**
store i8*%m,i8**%o,align 8
%p=getelementptr inbounds i8,i8*%h,i64 16
%q=bitcast i8*%p to i32*
store i32 3,i32*%q,align 4
%r=call i8*@sml_alloc(i32 inreg 28)#0
%s=getelementptr inbounds i8,i8*%r,i64 -4
%t=bitcast i8*%s to i32*
store i32 1342177304,i32*%t,align 4
%u=load i8*,i8**%e,align 8
%v=bitcast i8*%r to i8**
store i8*%u,i8**%v,align 8
%w=getelementptr inbounds i8,i8*%r,i64 8
%x=bitcast i8*%w to void(...)**
store void(...)*bitcast(i8*(i8*,i8*)*@_SMLLN12TypedCalcCon9clsVarEnvE_567 to void(...)*),void(...)**%x,align 8
%y=getelementptr inbounds i8,i8*%r,i64 16
%z=bitcast i8*%y to void(...)**
store void(...)*bitcast(i8*(i8*,i8*)*@_SMLLN12TypedCalcCon9clsVarEnvE_567 to void(...)*),void(...)**%z,align 8
%A=getelementptr inbounds i8,i8*%r,i64 24
%B=bitcast i8*%A to i32*
store i32 -2147483647,i32*%B,align 4
ret i8*%r
}
define internal fastcc i8*@_SMLLN12TypedCalcCon5TPEXDE_569(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**%e,align 8
store i8*%b,i8**%c,align 8
%f=load atomic i32,i32*@sml_check_flag unordered,align 4
%g=icmp eq i32%f,0
br i1%g,label%h,label%k
h:
%i=bitcast i8*%a to i8**
%j=bitcast i8*%b to i8**
br label%p
k:
call void@sml_check(i32 inreg%f)
%l=bitcast i8**%c to i8***
%m=load i8**,i8***%l,align 8
%n=bitcast i8**%e to i8***
%o=load i8**,i8***%n,align 8
br label%p
p:
%q=phi i8**[%o,%k],[%i,%h]
%r=phi i8**[%m,%k],[%j,%h]
%s=load i8*,i8**%r,align 8
store i8*%s,i8**%d,align 8
%t=load i8*,i8**%q,align 8
store i8*%t,i8**%e,align 8
%u=call i8*@sml_alloc(i32 inreg 20)#0
%v=getelementptr inbounds i8,i8*%u,i64 -4
%w=bitcast i8*%v to i32*
store i32 1342177296,i32*%w,align 4
%x=load i8*,i8**%d,align 8
store i8*null,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 i8**
store i8*null,i8**%A,align 8
%B=getelementptr inbounds i8,i8*%u,i64 16
%C=bitcast i8*%B to i32*
store i32 3,i32*%C,align 4
%D=load i8*,i8**%e,align 8
store i8*null,i8**%e,align 8
%E=call fastcc i8*@_SMLLN12TypedCalcCon10makeExnEnvE_556(i8*inreg%D,i8*inreg%u)
store i8*%E,i8**%d,align 8
%F=call i8*@sml_alloc(i32 inreg 20)#0
%G=getelementptr inbounds i8,i8*%F,i64 -4
%H=bitcast i8*%G to i32*
store i32 1342177296,i32*%H,align 4
store i8*%F,i8**%e,align 8
%I=getelementptr inbounds i8,i8*%F,i64 4
%J=bitcast i8*%I to i32*
store i32 0,i32*%J,align 1
%K=bitcast i8*%F to i32*
store i32 1,i32*%K,align 4
%L=load i8*,i8**%c,align 8
store i8*null,i8**%c,align 8
%M=getelementptr inbounds i8,i8*%F,i64 8
%N=bitcast i8*%M to i8**
store i8*%L,i8**%N,align 8
%O=getelementptr inbounds i8,i8*%F,i64 16
%P=bitcast i8*%O to i32*
store i32 2,i32*%P,align 4
%Q=call i8*@sml_alloc(i32 inreg 20)#0
%R=getelementptr inbounds i8,i8*%Q,i64 -4
%S=bitcast i8*%R to i32*
store i32 1342177296,i32*%S,align 4
%T=load i8*,i8**%e,align 8
%U=bitcast i8*%Q to i8**
store i8*%T,i8**%U,align 8
%V=load i8*,i8**%d,align 8
%W=getelementptr inbounds i8,i8*%Q,i64 8
%X=bitcast i8*%W to i8**
store i8*%V,i8**%X,align 8
%Y=getelementptr inbounds i8,i8*%Q,i64 16
%Z=bitcast i8*%Y to i32*
store i32 3,i32*%Z,align 4
ret i8*%Q
}
define internal fastcc void@_SMLL1f_571(i8*inreg%a,i32 inreg%b)#2 gc"smlsharp"{
%c=alloca i8*,align 8
%d=alloca i8*,align 8
%e=alloca i8*,align 8
%f=alloca i8*,align 8
call void@llvm.gcroot(i8**%c,i8*null)#0
call void@llvm.gcroot(i8**%d,i8*null)#0
call void@llvm.gcroot(i8**%e,i8*null)#0
call void@llvm.gcroot(i8**%f,i8*null)#0
store i8*%a,i8**%c,align 8
%g=load atomic i32,i32*@sml_check_flag unordered,align 4
%h=icmp eq i32%g,0
br i1%h,label%j,label%i
i:
call void@sml_check(i32 inreg%g)
br label%j
j:
%k=call fastcc i8*@_SMLLN12TypedCalcCon4eqTyE_287(i8*inreg getelementptr inbounds(<{[4x i8],i32,[10x i8]}>,<{[4x i8],i32,[10x i8]}>*@bC,i64 0,i32 2,i64 0))
%l=getelementptr inbounds i8,i8*%k,i64 16
%m=bitcast i8*%l to i8*(i8*,i8*)**
%n=load i8*(i8*,i8*)*,i8*(i8*,i8*)**%m,align 8
%o=bitcast i8*%k to i8**
%p=load i8*,i8**%o,align 8
%q=bitcast i8**%c to i8***
%r=load i8**,i8***%q,align 8
%s=load i8*,i8**%r,align 8
%t=getelementptr inbounds i8,i8*%s,i64 8
%u=bitcast i8*%t to i8**
%v=load i8*,i8**%u,align 8
%w=call fastcc i8*%n(i8*inreg%p,i8*inreg%v)
%x=getelementptr inbounds i8,i8*%w,i64 16
%y=bitcast i8*%x to i8*(i8*,i8*)**
%z=load i8*(i8*,i8*)*,i8*(i8*,i8*)**%y,align 8
%A=bitcast i8*%w to i8**
%B=load i8*,i8**%A,align 8
store i8*%B,i8**%f,align 8
%C=bitcast i8**%c to i8****
%D=load i8***,i8****%C,align 8
store i8*null,i8**%c,align 8
%E=load i8**,i8***%D,align 8
%F=load i8*,i8**%E,align 8
%G=getelementptr inbounds i8,i8*%F,i64 8
%H=bitcast i8*%G to i8**
%I=load i8*,i8**%H,align 8
%J=getelementptr inbounds i8,i8*%I,i64 16
%K=bitcast i8*%J to i8**
%L=load i8*,i8**%K,align 8
store i8*%L,i8**%d,align 8
%M=load i8*,i8**@_SMLZN12BuiltinTypes8exntagTyE,align 8
store i8*%M,i8**%e,align 8
%N=call i8*@sml_alloc(i32 inreg 20)#0
%O=getelementptr inbounds i8,i8*%N,i64 -4
%P=bitcast i8*%O to i32*
store i32 1342177296,i32*%P,align 4
store i8*%N,i8**%c,align 8
%Q=load i8*,i8**%d,align 8
store i8*null,i8**%d,align 8
%R=bitcast i8*%N to i8**
store i8*%Q,i8**%R,align 8
%S=load i8*,i8**%e,align 8
store i8*null,i8**%e,align 8
%T=getelementptr inbounds i8,i8*%N,i64 8
%U=bitcast i8*%T to i8**
store i8*%S,i8**%U,align 8
%V=getelementptr inbounds i8,i8*%N,i64 16
%W=bitcast i8*%V to i32*
store i32 3,i32*%W,align 4
%X=call i8*@sml_alloc(i32 inreg 20)#0
%Y=getelementptr inbounds i8,i8*%X,i64 -4
%Z=bitcast i8*%Y to i32*
store i32 1342177296,i32*%Z,align 4
%aa=load i8*,i8**%c,align 8
store i8*null,i8**%c,align 8
%ab=bitcast i8*%X to i8**
store i8*%aa,i8**%ab,align 8
%ac=getelementptr inbounds i8,i8*%X,i64 8
%ad=bitcast i8*%ac to i8**
store i8*null,i8**%ad,align 8
%ae=getelementptr inbounds i8,i8*%X,i64 16
%af=bitcast i8*%ae to i32*
store i32 3,i32*%af,align 4
%ag=load i8*,i8**%f,align 8
store i8*null,i8**%f,align 8
%ah=call fastcc i8*%z(i8*inreg%ag,i8*inreg%X)
ret void
}
define internal fastcc i8*@_SMLLN12TypedCalcCon9TPEXNTAGDE_572(i8*inreg%a,i8*inreg%b)#2 gc"smlsharp"{
%c=alloca i8*,align 8
%d=alloca i8*,align 8
%e=alloca i8*,align 8
%f=alloca i8*,align 8
call void@llvm.gcroot(i8**%c,i8*null)#0
call void@llvm.gcroot(i8**%d,i8*null)#0
call void@llvm.gcroot(i8**%e,i8*null)#0
call void@llvm.gcroot(i8**%f,i8*null)#0
store i8*%a,i8**%e,align 8
store i8*%b,i8**%c,align 8
%g=load atomic i32,i32*@sml_check_flag unordered,align 4
%h=icmp eq i32%g,0
br i1%h,label%i,label%k
i:
%j=bitcast i8*%b to i8***
br label%n
k:
call void@sml_check(i32 inreg%g)
%l=bitcast i8**%c to i8****
%m=load i8***,i8****%l,align 8
br label%n
n:
%o=phi i8***[%m,%k],[%j,%i]
%p=load i8**,i8***%o,align 8
%q=load i8*,i8**%p,align 8
store i8*%q,i8**%d,align 8
%r=call i8*@sml_alloc(i32 inreg 12)#0
%s=getelementptr inbounds i8,i8*%r,i64 -4
%t=bitcast i8*%s to i32*
store i32 1342177288,i32*%t,align 4
store i8*%r,i8**%f,align 8
%u=load i8*,i8**%c,align 8
%v=bitcast i8*%r to i8**
store i8*%u,i8**%v,align 8
%w=getelementptr inbounds i8,i8*%r,i64 8
%x=bitcast i8*%w to i32*
store i32 1,i32*%x,align 4
%y=call i8*@sml_alloc(i32 inreg 28)#0
%z=getelementptr inbounds i8,i8*%y,i64 -4
%A=bitcast i8*%z to i32*
store i32 1342177304,i32*%A,align 4
%B=load i8*,i8**%f,align 8
%C=bitcast i8*%y to i8**
store i8*%B,i8**%C,align 8
%D=getelementptr inbounds i8,i8*%y,i64 8
%E=bitcast i8*%D to void(...)**
store void(...)*bitcast(void(i8*,i32)*@_SMLL1f_571 to void(...)*),void(...)**%E,align 8
%F=getelementptr inbounds i8,i8*%y,i64 16
%G=bitcast i8*%F to void(...)**
store void(...)*bitcast(i8*(i8*,i8*)*@_SMLL1f_780 to void(...)*),void(...)**%G,align 8
%H=getelementptr inbounds i8,i8*%y,i64 24
%I=bitcast i8*%H to i32*
store i32 -2147483647,i32*%I,align 4
%J=load i32*,i32**bitcast(i8**@_SMLZN7Control9checkTypeE to i32**),align 8
%K=load i32,i32*%J,align 4
%L=icmp eq i32%K,0
store i8*null,i8**%f,align 8
br i1%L,label%N,label%M
M:
call fastcc void@_SMLL1f_571(i8*inreg%B,i32 inreg 0)
br label%N
N:
%O=bitcast i8**%e to i8***
%P=load i8**,i8***%O,align 8
%Q=load i8*,i8**%P,align 8
store i8*%Q,i8**%e,align 8
%R=call i8*@sml_alloc(i32 inreg 20)#0
%S=getelementptr inbounds i8,i8*%R,i64 -4
%T=bitcast i8*%S to i32*
store i32 1342177296,i32*%T,align 4
%U=load i8*,i8**%d,align 8
store i8*null,i8**%d,align 8
%V=bitcast i8*%R to i8**
store i8*%U,i8**%V,align 8
%W=getelementptr inbounds i8,i8*%R,i64 8
%X=bitcast i8*%W to i8**
store i8*null,i8**%X,align 8
%Y=getelementptr inbounds i8,i8*%R,i64 16
%Z=bitcast i8*%Y to i32*
store i32 3,i32*%Z,align 4
%aa=load i8*,i8**%e,align 8
store i8*null,i8**%e,align 8
%ab=call fastcc i8*@_SMLLN12TypedCalcCon10makeExnEnvE_556(i8*inreg%aa,i8*inreg%R)
store i8*%ab,i8**%d,align 8
%ac=call i8*@sml_alloc(i32 inreg 20)#0
%ad=getelementptr inbounds i8,i8*%ac,i64 -4
%ae=bitcast i8*%ad to i32*
store i32 1342177296,i32*%ae,align 4
store i8*%ac,i8**%e,align 8
%af=getelementptr inbounds i8,i8*%ac,i64 4
%ag=bitcast i8*%af to i32*
store i32 0,i32*%ag,align 1
%ah=bitcast i8*%ac to i32*
store i32 2,i32*%ah,align 4
%ai=load i8*,i8**%c,align 8
store i8*null,i8**%c,align 8
%aj=getelementptr inbounds i8,i8*%ac,i64 8
%ak=bitcast i8*%aj to i8**
store i8*%ai,i8**%ak,align 8
%al=getelementptr inbounds i8,i8*%ac,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
%aq=load i8*,i8**%e,align 8
%ar=bitcast i8*%an to i8**
store i8*%aq,i8**%ar,align 8
%as=load i8*,i8**%d,align 8
%at=getelementptr inbounds i8,i8*%an,i64 8
%au=bitcast i8*%at to i8**
store i8*%as,i8**%au,align 8
%av=getelementptr inbounds i8,i8*%an,i64 16
%aw=bitcast i8*%av to i32*
store i32 3,i32*%aw,align 4
ret i8*%an
}
define internal fastcc i8*@_SMLLN12TypedCalcCon11TPEXPORTEXNE_573(i8*inreg%a,i8*inreg%b)#2 gc"smlsharp"{
%c=alloca i8*,align 8
%d=alloca i8*,align 8
%e=alloca i8*,align 8
%f=alloca i8*,align 8
%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**%d,align 8
store i8*%b,i8**%c,align 8
%h=load atomic i32,i32*@sml_check_flag unordered,align 4
%i=icmp eq i32%h,0
br i1%i,label%j,label%l
j:
%k=bitcast i8*%a to i8**
br label%p
l:
call void@sml_check(i32 inreg%h)
%m=load i8*,i8**%c,align 8
%n=bitcast i8**%d to i8***
%o=load i8**,i8***%n,align 8
br label%p
p:
%q=phi i8**[%o,%l],[%k,%j]
%r=phi i8*[%m,%l],[%b,%j]
%s=getelementptr inbounds i8,i8*%r,i64 8
%t=bitcast i8*%s to i8**
%u=load i8*,i8**%t,align 8
store i8*%u,i8**%e,align 8
%v=getelementptr inbounds i8,i8*%r,i64 16
%w=bitcast i8*%v to i8**
%x=load i8*,i8**%w,align 8
store i8*%x,i8**%f,align 8
store i8*null,i8**%d,align 8
%y=load i8*,i8**%q,align 8
store i8*%y,i8**%g,align 8
%z=call i8*@sml_alloc(i32 inreg 20)#0
%A=getelementptr inbounds i8,i8*%z,i64 -4
%B=bitcast i8*%A to i32*
store i32 1342177296,i32*%B,align 4
store i8*%z,i8**%d,align 8
%C=load i8*,i8**%e,align 8
store i8*null,i8**%e,align 8
%D=bitcast i8*%z to i8**
store i8*%C,i8**%D,align 8
%E=load i8*,i8**%f,align 8
store i8*null,i8**%f,align 8
%F=getelementptr inbounds i8,i8*%z,i64 8
%G=bitcast i8*%F to i8**
store i8*%E,i8**%G,align 8
%H=getelementptr inbounds i8,i8*%z,i64 16
%I=bitcast i8*%H to i32*
store i32 3,i32*%I,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
%M=load i8*,i8**%d,align 8
store i8*null,i8**%d,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 i8**
store i8*null,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=load i8*,i8**%g,align 8
store i8*null,i8**%g,align 8
%T=call fastcc i8*@_SMLLN12TypedCalcCon12makeExExnEnvE_559(i8*inreg%S,i8*inreg%J)
store i8*%T,i8**%d,align 8
%U=call i8*@sml_alloc(i32 inreg 20)#0
%V=getelementptr inbounds i8,i8*%U,i64 -4
%W=bitcast i8*%V to i32*
store i32 1342177296,i32*%W,align 4
store i8*%U,i8**%e,align 8
%X=getelementptr inbounds i8,i8*%U,i64 4
%Y=bitcast i8*%X to i32*
store i32 0,i32*%Y,align 1
%Z=bitcast i8*%U to i32*
store i32 3,i32*%Z,align 4
%aa=load i8*,i8**%c,align 8
store i8*null,i8**%c,align 8
%ab=getelementptr inbounds i8,i8*%U,i64 8
%ac=bitcast i8*%ab to i8**
store i8*%aa,i8**%ac,align 8
%ad=getelementptr inbounds i8,i8*%U,i64 16
%ae=bitcast i8*%ad to i32*
store i32 2,i32*%ae,align 4
%af=call i8*@sml_alloc(i32 inreg 20)#0
%ag=getelementptr inbounds i8,i8*%af,i64 -4
%ah=bitcast i8*%ag to i32*
store i32 1342177296,i32*%ah,align 4
%ai=load i8*,i8**%e,align 8
%aj=bitcast i8*%af to i8**
store i8*%ai,i8**%aj,align 8
%ak=load i8*,i8**%d,align 8
%al=getelementptr inbounds i8,i8*%af,i64 8
%am=bitcast i8*%al to i8**
store i8*%ak,i8**%am,align 8
%an=getelementptr inbounds i8,i8*%af,i64 16
%ao=bitcast i8*%an to i32*
store i32 3,i32*%ao,align 4
ret i8*%af
}
define internal fastcc void@_SMLL1f_575(i8*inreg%a,i32 inreg%b)#2 gc"smlsharp"{
%c=alloca i8*,align 8
%d=alloca i8*,align 8
%e=alloca i8*,align 8
%f=alloca i8*,align 8
call void@llvm.gcroot(i8**%c,i8*null)#0
call void@llvm.gcroot(i8**%d,i8*null)#0
call void@llvm.gcroot(i8**%e,i8*null)#0
call void@llvm.gcroot(i8**%f,i8*null)#0
store i8*%a,i8**%c,align 8
%g=load atomic i32,i32*@sml_check_flag unordered,align 4
%h=icmp eq i32%g,0
br i1%h,label%j,label%i
i:
call void@sml_check(i32 inreg%g)
br label%j
j:
%k=call fastcc i8*@_SMLLN12TypedCalcCon4eqTyE_287(i8*inreg getelementptr inbounds(<{[4x i8],i32,[12x i8]}>,<{[4x i8],i32,[12x i8]}>*@bD,i64 0,i32 2,i64 0))
%l=getelementptr inbounds i8,i8*%k,i64 16
%m=bitcast i8*%l to i8*(i8*,i8*)**
%n=load i8*(i8*,i8*)*,i8*(i8*,i8*)**%m,align 8
%o=bitcast i8*%k to i8**
%p=load i8*,i8**%o,align 8
%q=load i8*,i8**@_SMLZN3Loc5nolocE,align 8
%r=call fastcc i8*%n(i8*inreg%p,i8*inreg%q)
%s=getelementptr inbounds i8,i8*%r,i64 16
%t=bitcast i8*%s to i8*(i8*,i8*)**
%u=load i8*(i8*,i8*)*,i8*(i8*,i8*)**%t,align 8
%v=bitcast i8*%r to i8**
%w=load i8*,i8**%v,align 8
store i8*%w,i8**%f,align 8
%x=load i8*,i8**%c,align 8
%y=getelementptr inbounds i8,i8*%x,i64 8
%z=bitcast i8*%y to i8**
%A=load i8*,i8**%z,align 8
store i8*%A,i8**%d,align 8
%B=bitcast i8*%x to i8**
store i8*null,i8**%c,align 8
%C=load i8*,i8**%B,align 8
store i8*%C,i8**%e,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
store i8*%D,i8**%c,align 8
%G=load i8*,i8**%d,align 8
store i8*null,i8**%d,align 8
%H=bitcast i8*%D to i8**
store i8*%G,i8**%H,align 8
%I=load i8*,i8**%e,align 8
store i8*null,i8**%e,align 8
%J=getelementptr inbounds i8,i8*%D,i64 8
%K=bitcast i8*%J to i8**
store i8*%I,i8**%K,align 8
%L=getelementptr inbounds i8,i8*%D,i64 16
%M=bitcast i8*%L to i32*
store i32 3,i32*%M,align 4
%N=call i8*@sml_alloc(i32 inreg 20)#0
%O=getelementptr inbounds i8,i8*%N,i64 -4
%P=bitcast i8*%O to i32*
store i32 1342177296,i32*%P,align 4
%Q=load i8*,i8**%c,align 8
store i8*null,i8**%c,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 i8**
store i8*null,i8**%T,align 8
%U=getelementptr inbounds i8,i8*%N,i64 16
%V=bitcast i8*%U to i32*
store i32 3,i32*%V,align 4
%W=load i8*,i8**%f,align 8
store i8*null,i8**%f,align 8
%X=call fastcc i8*%u(i8*inreg%W,i8*inreg%N)
ret void
}
define internal fastcc i8*@_SMLLN12TypedCalcCon11TPEXPORTVARE_576(i8*inreg%a,i8*inreg%b)#2 gc"smlsharp"{
o:
%c=alloca i8*,align 8
%d=alloca i8*,align 8
%e=alloca i8*,align 8
%f=alloca i8*,align 8
%g=alloca i8*,align 8
%h=alloca i8*,align 8
call void@llvm.gcroot(i8**%c,i8*null)#0
call void@llvm.gcroot(i8**%d,i8*null)#0
call void@llvm.gcroot(i8**%e,i8*null)#0
call void@llvm.gcroot(i8**%f,i8*null)#0
call void@llvm.gcroot(i8**%g,i8*null)#0
call void@llvm.gcroot(i8**%h,i8*null)#0
store i8*%a,i8**%g,align 8
store i8*%b,i8**%c,align 8
%i=load atomic i32,i32*@sml_check_flag unordered,align 4
%j=icmp eq i32%i,0
br i1%j,label%m,label%k
k:
call void@sml_check(i32 inreg%i)
%l=load i8*,i8**%c,align 8
br label%m
m:
%n=phi i8*[%l,%k],[%b,%o]
%p=bitcast i8*%n to i8**
%q=bitcast i8*%n to i8***
%r=load i8**,i8***%q,align 8
%s=load i8*,i8**%r,align 8
store i8*%s,i8**%d,align 8
%t=load i8*,i8**%p,align 8
%u=getelementptr inbounds i8,i8*%t,i64 8
%v=bitcast i8*%u to i8**
%w=load i8*,i8**%v,align 8
store i8*%w,i8**%c,align 8
%x=getelementptr inbounds i8,i8*%n,i64 8
%y=bitcast i8*%x to i8**
%z=load i8*,i8**%y,align 8
store i8*%z,i8**%e,align 8
%A=getelementptr inbounds i8,i8*%z,i64 8
%B=bitcast i8*%A to i8**
%C=load i8*,i8**%B,align 8
store i8*%C,i8**%f,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
store i8*%D,i8**%h,align 8
%G=load i8*,i8**%c,align 8
store i8*null,i8**%c,align 8
%H=bitcast i8*%D to i8**
store i8*%G,i8**%H,align 8
%I=load i8*,i8**%f,align 8
store i8*null,i8**%f,align 8
%J=getelementptr inbounds i8,i8*%D,i64 8
%K=bitcast i8*%J to i8**
store i8*%I,i8**%K,align 8
%L=getelementptr inbounds i8,i8*%D,i64 16
%M=bitcast i8*%L to i32*
store i32 3,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**%h,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(void(i8*,i32)*@_SMLL1f_575 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*)*@_SMLL1f_781 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
%Y=load i32*,i32**bitcast(i8**@_SMLZN7Control9checkTypeE to i32**),align 8
%Z=load i32,i32*%Y,align 4
%aa=icmp eq i32%Z,0
store i8*null,i8**%h,align 8
br i1%aa,label%ac,label%ab
ab:
call fastcc void@_SMLL1f_575(i8*inreg%Q,i32 inreg 0)
br label%ac
ac:
%ad=bitcast i8**%g to i8***
%ae=load i8**,i8***%ad,align 8
store i8*null,i8**%g,align 8
%af=load i8*,i8**%ae,align 8
store i8*%af,i8**%c,align 8
%ag=call i8*@sml_alloc(i32 inreg 20)#0
%ah=getelementptr inbounds i8,i8*%ag,i64 -4
%ai=bitcast i8*%ah to i32*
store i32 1342177296,i32*%ai,align 4
%aj=load i8*,i8**%e,align 8
%ak=bitcast i8*%ag to i8**
store i8*%aj,i8**%ak,align 8
%al=getelementptr inbounds i8,i8*%ag,i64 8
%am=bitcast i8*%al to i8**
store i8*null,i8**%am,align 8
%an=getelementptr inbounds i8,i8*%ag,i64 16
%ao=bitcast i8*%an to i32*
store i32 3,i32*%ao,align 4
%ap=load i8*,i8**%c,align 8
store i8*null,i8**%c,align 8
%aq=call fastcc i8*@_SMLLN12TypedCalcCon12makeExVarEnvE_565(i8*inreg%ap,i8*inreg%ag)
store i8*%aq,i8**%c,align 8
%ar=call i8*@sml_alloc(i32 inreg 20)#0
%as=getelementptr inbounds i8,i8*%ar,i64 -4
%at=bitcast i8*%as to i32*
store i32 1342177296,i32*%at,align 4
store i8*%ar,i8**%f,align 8
%au=load i8*,i8**%d,align 8
store i8*null,i8**%d,align 8
%av=bitcast i8*%ar to i8**
store i8*%au,i8**%av,align 8
%aw=load i8*,i8**%e,align 8
store i8*null,i8**%e,align 8
%ax=getelementptr inbounds i8,i8*%ar,i64 8
%ay=bitcast i8*%ax to i8**
store i8*%aw,i8**%ay,align 8
%az=getelementptr inbounds i8,i8*%ar,i64 16
%aA=bitcast i8*%az to i32*
store i32 3,i32*%aA,align 4
%aB=call i8*@sml_alloc(i32 inreg 20)#0
%aC=getelementptr inbounds i8,i8*%aB,i64 -4
%aD=bitcast i8*%aC to i32*
store i32 1342177296,i32*%aD,align 4
store i8*%aB,i8**%d,align 8
%aE=getelementptr inbounds i8,i8*%aB,i64 4
%aF=bitcast i8*%aE to i32*
store i32 0,i32*%aF,align 1
%aG=bitcast i8*%aB to i32*
store i32 4,i32*%aG,align 4
%aH=load i8*,i8**%f,align 8
store i8*null,i8**%f,align 8
%aI=getelementptr inbounds i8,i8*%aB,i64 8
%aJ=bitcast i8*%aI to i8**
store i8*%aH,i8**%aJ,align 8
%aK=getelementptr inbounds i8,i8*%aB,i64 16
%aL=bitcast i8*%aK to i32*
store i32 2,i32*%aL,align 4
%aM=call i8*@sml_alloc(i32 inreg 20)#0
%aN=getelementptr inbounds i8,i8*%aM,i64 -4
%aO=bitcast i8*%aN to i32*
store i32 1342177296,i32*%aO,align 4
%aP=load i8*,i8**%d,align 8
%aQ=bitcast i8*%aM to i8**
store i8*%aP,i8**%aQ,align 8
%aR=load i8*,i8**%c,align 8
%aS=getelementptr inbounds i8,i8*%aM,i64 8
%aT=bitcast i8*%aS to i8**
store i8*%aR,i8**%aT,align 8
%aU=getelementptr inbounds i8,i8*%aM,i64 16
%aV=bitcast i8*%aU to i32*
store i32 3,i32*%aV,align 4
ret i8*%aM
}
define internal fastcc i8*@_SMLLN12TypedCalcCon11TPEXTERNEXNE_577(i8*inreg%a,i8*inreg%b)#2 gc"smlsharp"{
%c=alloca i8*,align 8
%d=alloca i8*,align 8
%e=alloca i8*,align 8
%f=alloca i8*,align 8
call void@llvm.gcroot(i8**%c,i8*null)#0
call void@llvm.gcroot(i8**%d,i8*null)#0
call void@llvm.gcroot(i8**%e,i8*null)#0
call void@llvm.gcroot(i8**%f,i8*null)#0
store i8*%a,i8**%c,align 8
store i8*%b,i8**%d,align 8
%g=load atomic i32,i32*@sml_check_flag unordered,align 4
%h=icmp eq i32%g,0
br i1%h,label%i,label%k
i:
%j=bitcast i8*%a to i8**
br label%o
k:
call void@sml_check(i32 inreg%g)
%l=load i8*,i8**%d,align 8
%m=bitcast i8**%c to i8***
%n=load i8**,i8***%m,align 8
br label%o
o:
%p=phi i8**[%n,%k],[%j,%i]
%q=phi i8*[%l,%k],[%b,%i]
%r=bitcast i8*%q to i8**
%s=load i8*,i8**%r,align 8
store i8*%s,i8**%d,align 8
%t=getelementptr inbounds i8,i8*%q,i64 8
%u=bitcast i8*%t to i8**
%v=load i8*,i8**%u,align 8
store i8*%v,i8**%e,align 8
%w=load i8*,i8**%p,align 8
store i8*%w,i8**%c,align 8
%x=call i8*@sml_alloc(i32 inreg 20)#0
%y=getelementptr inbounds i8,i8*%x,i64 -4
%z=bitcast i8*%y to i32*
store i32 1342177296,i32*%z,align 4
%A=load i8*,i8**%d,align 8
%B=bitcast i8*%x to i8**
store i8*%A,i8**%B,align 8
%C=getelementptr inbounds i8,i8*%x,i64 8
%D=bitcast i8*%C to i8**
store i8*null,i8**%D,align 8
%E=getelementptr inbounds i8,i8*%x,i64 16
%F=bitcast i8*%E to i32*
store i32 3,i32*%F,align 4
%G=load i8*,i8**%c,align 8
store i8*null,i8**%c,align 8
%H=call fastcc i8*@_SMLLN12TypedCalcCon12makeExExnEnvE_559(i8*inreg%G,i8*inreg%x)
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
store i8*%I,i8**%f,align 8
%L=load i8*,i8**%d,align 8
store i8*null,i8**%d,align 8
%M=bitcast i8*%I to i8**
store i8*%L,i8**%M,align 8
%N=load i8*,i8**%e,align 8
store i8*null,i8**%e,align 8
%O=getelementptr inbounds i8,i8*%I,i64 8
%P=bitcast i8*%O to i8**
store i8*%N,i8**%P,align 8
%Q=getelementptr inbounds i8,i8*%I,i64 16
%R=bitcast i8*%Q to i32*
store i32 3,i32*%R,align 4
%S=call i8*@sml_alloc(i32 inreg 20)#0
%T=getelementptr inbounds i8,i8*%S,i64 -4
%U=bitcast i8*%T to i32*
store i32 1342177296,i32*%U,align 4
store i8*%S,i8**%d,align 8
%V=getelementptr inbounds i8,i8*%S,i64 4
%W=bitcast i8*%V to i32*
store i32 0,i32*%W,align 1
%X=bitcast i8*%S to i32*
store i32 5,i32*%X,align 4
%Y=load i8*,i8**%f,align 8
store i8*null,i8**%f,align 8
%Z=getelementptr inbounds i8,i8*%S,i64 8
%aa=bitcast i8*%Z to i8**
store i8*%Y,i8**%aa,align 8
%ab=getelementptr inbounds i8,i8*%S,i64 16
%ac=bitcast i8*%ab to i32*
store i32 2,i32*%ac,align 4
%ad=call i8*@sml_alloc(i32 inreg 20)#0
%ae=getelementptr inbounds i8,i8*%ad,i64 -4
%af=bitcast i8*%ae to i32*
store i32 1342177296,i32*%af,align 4
%ag=load i8*,i8**%d,align 8
%ah=bitcast i8*%ad to i8**
store i8*%ag,i8**%ah,align 8
%ai=load i8*,i8**%c,align 8
%aj=getelementptr inbounds i8,i8*%ad,i64 8
%ak=bitcast i8*%aj to i8**
store i8*%ai,i8**%ak,align 8
%al=getelementptr inbounds i8,i8*%ad,i64 16
%am=bitcast i8*%al to i32*
store i32 3,i32*%am,align 4
ret i8*%ad
}
define internal fastcc i8*@_SMLLN12TypedCalcCon11TPEXTERNVARE_578(i8*inreg%a,i8*inreg%b)#2 gc"smlsharp"{
%c=alloca i8*,align 8
%d=alloca i8*,align 8
%e=alloca i8*,align 8
%f=alloca i8*,align 8
call void@llvm.gcroot(i8**%c,i8*null)#0
call void@llvm.gcroot(i8**%d,i8*null)#0
call void@llvm.gcroot(i8**%e,i8*null)#0
call void@llvm.gcroot(i8**%f,i8*null)#0
store i8*%a,i8**%c,align 8
store i8*%b,i8**%d,align 8
%g=load atomic i32,i32*@sml_check_flag unordered,align 4
%h=icmp eq i32%g,0
br i1%h,label%i,label%k
i:
%j=bitcast i8*%a to i8**
br label%o
k:
call void@sml_check(i32 inreg%g)
%l=load i8*,i8**%d,align 8
%m=bitcast i8**%c to i8***
%n=load i8**,i8***%m,align 8
br label%o
o:
%p=phi i8**[%n,%k],[%j,%i]
%q=phi i8*[%l,%k],[%b,%i]
%r=bitcast i8*%q to i8**
%s=load i8*,i8**%r,align 8
store i8*%s,i8**%d,align 8
%t=getelementptr inbounds i8,i8*%q,i64 8
%u=bitcast i8*%t to i8**
%v=load i8*,i8**%u,align 8
store i8*%v,i8**%e,align 8
%w=load i8*,i8**%p,align 8
store i8*%w,i8**%c,align 8
%x=call i8*@sml_alloc(i32 inreg 20)#0
%y=getelementptr inbounds i8,i8*%x,i64 -4
%z=bitcast i8*%y to i32*
store i32 1342177296,i32*%z,align 4
%A=load i8*,i8**%d,align 8
%B=bitcast i8*%x to i8**
store i8*%A,i8**%B,align 8
%C=getelementptr inbounds i8,i8*%x,i64 8
%D=bitcast i8*%C to i8**
store i8*null,i8**%D,align 8
%E=getelementptr inbounds i8,i8*%x,i64 16
%F=bitcast i8*%E to i32*
store i32 3,i32*%F,align 4
%G=load i8*,i8**%c,align 8
store i8*null,i8**%c,align 8
%H=call fastcc i8*@_SMLLN12TypedCalcCon12makeExVarEnvE_565(i8*inreg%G,i8*inreg%x)
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
store i8*%I,i8**%f,align 8
%L=load i8*,i8**%d,align 8
store i8*null,i8**%d,align 8
%M=bitcast i8*%I to i8**
store i8*%L,i8**%M,align 8
%N=load i8*,i8**%e,align 8
store i8*null,i8**%e,align 8
%O=getelementptr inbounds i8,i8*%I,i64 8
%P=bitcast i8*%O to i8**
store i8*%N,i8**%P,align 8
%Q=getelementptr inbounds i8,i8*%I,i64 16
%R=bitcast i8*%Q to i32*
store i32 3,i32*%R,align 4
%S=call i8*@sml_alloc(i32 inreg 20)#0
%T=getelementptr inbounds i8,i8*%S,i64 -4
%U=bitcast i8*%T to i32*
store i32 1342177296,i32*%U,align 4
store i8*%S,i8**%d,align 8
%V=getelementptr inbounds i8,i8*%S,i64 4
%W=bitcast i8*%V to i32*
store i32 0,i32*%W,align 1
%X=bitcast i8*%S to i32*
store i32 6,i32*%X,align 4
%Y=load i8*,i8**%f,align 8
store i8*null,i8**%f,align 8
%Z=getelementptr inbounds i8,i8*%S,i64 8
%aa=bitcast i8*%Z to i8**
store i8*%Y,i8**%aa,align 8
%ab=getelementptr inbounds i8,i8*%S,i64 16
%ac=bitcast i8*%ab to i32*
store i32 2,i32*%ac,align 4
%ad=call i8*@sml_alloc(i32 inreg 20)#0
%ae=getelementptr inbounds i8,i8*%ad,i64 -4
%af=bitcast i8*%ae to i32*
store i32 1342177296,i32*%af,align 4
%ag=load i8*,i8**%d,align 8
%ah=bitcast i8*%ad to i8**
store i8*%ag,i8**%ah,align 8
%ai=load i8*,i8**%c,align 8
%aj=getelementptr inbounds i8,i8*%ad,i64 8
%ak=bitcast i8*%aj to i8**
store i8*%ai,i8**%ak,align 8
%al=getelementptr inbounds i8,i8*%ad,i64 16
%am=bitcast i8*%al to i32*
store i32 3,i32*%am,align 4
ret i8*%ad
}
define internal fastcc i8*@_SMLL9argTyList_579(i8*inreg%a)#4 gc"smlsharp"{
%b=getelementptr inbounds i8,i8*%a,i64 8
%c=bitcast i8*%b to i8**
%d=load i8*,i8**%c,align 8
ret i8*%d
}
define internal fastcc void@_SMLL1f_582(i8*inreg%a,i32 inreg%b)#2 gc"smlsharp"{
%c=alloca i8*,align 8
%d=alloca i8*,align 8
%e=alloca i8*,align 8
%f=alloca i8*,align 8
call void@llvm.gcroot(i8**%c,i8*null)#0
call void@llvm.gcroot(i8**%d,i8*null)#0
call void@llvm.gcroot(i8**%e,i8*null)#0
call void@llvm.gcroot(i8**%f,i8*null)#0
store i8*%a,i8**%c,align 8
%g=load atomic i32,i32*@sml_check_flag unordered,align 4
%h=icmp eq i32%g,0
br i1%h,label%j,label%i
i:
call void@sml_check(i32 inreg%g)
br label%j
j:
%k=call fastcc i8*@_SMLFN4List3appE(i32 inreg 1,i32 inreg 8)
%l=getelementptr inbounds i8,i8*%k,i64 16
%m=bitcast i8*%l to i8*(i8*,i8*)**
%n=load i8*(i8*,i8*)*,i8*(i8*,i8*)**%m,align 8
%o=bitcast i8*%k to i8**
%p=load i8*,i8**%o,align 8
store i8*%p,i8**%d,align 8
%q=load i8*,i8**%c,align 8
%r=getelementptr inbounds i8,i8*%q,i64 8
%s=bitcast i8*%r to i8**
%t=load i8*,i8**%s,align 8
%u=call fastcc i8*@_SMLLN12TypedCalcCon10checkMatchE_384(i8*inreg%t)
%v=getelementptr inbounds i8,i8*%u,i64 16
%w=bitcast i8*%v to i8*(i8*,i8*)**
%x=load i8*(i8*,i8*)*,i8*(i8*,i8*)**%w,align 8
%y=bitcast i8*%u to i8**
%z=load i8*,i8**%y,align 8
%A=bitcast i8**%c to i8***
%B=load i8**,i8***%A,align 8
%C=load i8*,i8**%B,align 8
%D=call fastcc i8*%x(i8*inreg%z,i8*inreg%C)
%E=load i8*,i8**%d,align 8
store i8*null,i8**%d,align 8
%F=call fastcc i8*%n(i8*inreg%E,i8*inreg%D)
%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
%L=load i8*,i8**%c,align 8
%M=getelementptr inbounds i8,i8*%L,i64 16
%N=bitcast i8*%M to i8**
%O=load i8*,i8**%N,align 8
%P=getelementptr inbounds i8,i8*%O,i64 8
%Q=bitcast i8*%P to i8**
%R=load i8*,i8**%Q,align 8
%S=call fastcc i8*%I(i8*inreg%K,i8*inreg%R)
%T=call fastcc i8*@_SMLLN12TypedCalcCon4eqTyE_287(i8*inreg getelementptr inbounds(<{[4x i8],i32,[11x i8]}>,<{[4x i8],i32,[11x i8]}>*@bI,i64 0,i32 2,i64 0))
%U=getelementptr inbounds i8,i8*%T,i64 16
%V=bitcast i8*%U to i8*(i8*,i8*)**
%W=load i8*(i8*,i8*)*,i8*(i8*,i8*)**%V,align 8
%X=bitcast i8*%T to i8**
%Y=load i8*,i8**%X,align 8
%Z=load i8*,i8**%c,align 8
%aa=getelementptr inbounds i8,i8*%Z,i64 8
%ab=bitcast i8*%aa to i8**
%ac=load i8*,i8**%ab,align 8
%ad=call fastcc i8*%W(i8*inreg%Y,i8*inreg%ac)
%ae=getelementptr inbounds i8,i8*%ad,i64 16
%af=bitcast i8*%ae to i8*(i8*,i8*)**
%ag=load i8*(i8*,i8*)*,i8*(i8*,i8*)**%af,align 8
%ah=bitcast i8*%ad to i8**
%ai=load i8*,i8**%ah,align 8
store i8*%ai,i8**%f,align 8
%aj=load i8*,i8**%c,align 8
%ak=getelementptr inbounds i8,i8*%aj,i64 24
%al=bitcast i8*%ak to i8**
%am=load i8*,i8**%al,align 8
%an=getelementptr inbounds i8,i8*%am,i64 16
%ao=bitcast i8*%an to i8**
%ap=load i8*,i8**%ao,align 8
store i8*%ap,i8**%d,align 8
%aq=bitcast i8*%aj to i8**
store i8*null,i8**%c,align 8
%ar=load i8*,i8**%aq,align 8
store i8*%ar,i8**%e,align 8
%as=call i8*@sml_alloc(i32 inreg 20)#0
%at=getelementptr inbounds i8,i8*%as,i64 -4
%au=bitcast i8*%at to i32*
store i32 1342177296,i32*%au,align 4
store i8*%as,i8**%c,align 8
%av=load i8*,i8**%d,align 8
store i8*null,i8**%d,align 8
%aw=bitcast i8*%as to i8**
store i8*%av,i8**%aw,align 8
%ax=load i8*,i8**%e,align 8
store i8*null,i8**%e,align 8
%ay=getelementptr inbounds i8,i8*%as,i64 8
%az=bitcast i8*%ay to i8**
store i8*%ax,i8**%az,align 8
%aA=getelementptr inbounds i8,i8*%as,i64 16
%aB=bitcast i8*%aA to i32*
store i32 3,i32*%aB,align 4
%aC=call i8*@sml_alloc(i32 inreg 20)#0
%aD=getelementptr inbounds i8,i8*%aC,i64 -4
%aE=bitcast i8*%aD to i32*
store i32 1342177296,i32*%aE,align 4
%aF=load i8*,i8**%c,align 8
store i8*null,i8**%c,align 8
%aG=bitcast i8*%aC to i8**
store i8*%aF,i8**%aG,align 8
%aH=getelementptr inbounds i8,i8*%aC,i64 8
%aI=bitcast i8*%aH to i8**
store i8*null,i8**%aI,align 8
%aJ=getelementptr inbounds i8,i8*%aC,i64 16
%aK=bitcast i8*%aJ to i32*
store i32 3,i32*%aK,align 4
%aL=load i8*,i8**%f,align 8
store i8*null,i8**%f,align 8
%aM=call fastcc i8*%ag(i8*inreg%aL,i8*inreg%aC)
ret void
}
define internal fastcc i8*@_SMLLN12TypedCalcCon10funrecbindE_583(i8*inreg%a)#4 gc"smlsharp"{
%b=bitcast i8*%a to i8**
%c=load i8*,i8**%b,align 8
ret i8*%c
}
define internal fastcc i8*@_SMLLN12TypedCalcCon10funrecbindE_585(i8*inreg%a)#2 gc"smlsharp"{
j:
%b=alloca i8*,align 8
%c=alloca i8*,align 8
call void@llvm.gcroot(i8**%b,i8*null)#0
call void@llvm.gcroot(i8**%c,i8*null)#0
store i8*%a,i8**%b,align 8
%d=load atomic i32,i32*@sml_check_flag unordered,align 4
%e=icmp eq i32%d,0
br i1%e,label%h,label%f
f:
call void@sml_check(i32 inreg%d)
%g=load i8*,i8**%b,align 8
br label%h
h:
%i=phi i8*[%g,%f],[%a,%j]
%k=getelementptr inbounds i8,i8*%i,i64 8
%l=bitcast i8*%k to i8***
%m=load i8**,i8***%l,align 8
%n=load i8*,i8**%m,align 8
store i8*%n,i8**%c,align 8
%o=call fastcc i8*@_SMLFN4List3mapE(i32 inreg 1,i32 inreg 8,i32 inreg 1,i32 inreg 8)
%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
%u=call fastcc i8*%r(i8*inreg%t,i8*inreg bitcast(i8**getelementptr inbounds(<{[4x i8],i32,i8*,void(...)*,void(...)*,i32}>,<{[4x i8],i32,i8*,void(...)*,void(...)*,i32}>*@bF,i64 0,i32 2)to i8*))
%v=getelementptr inbounds i8,i8*%u,i64 16
%w=bitcast i8*%v to i8*(i8*,i8*)**
%x=load i8*(i8*,i8*)*,i8*(i8*,i8*)**%w,align 8
%y=bitcast i8*%u to i8**
%z=load i8*,i8**%y,align 8
%A=bitcast i8**%b to i8***
%B=load i8**,i8***%A,align 8
store i8*null,i8**%b,align 8
%C=load i8*,i8**%B,align 8
%D=call fastcc i8*%x(i8*inreg%z,i8*inreg%C)
store i8*%D,i8**%b,align 8
%E=call i8*@sml_alloc(i32 inreg 20)#0
%F=getelementptr inbounds i8,i8*%E,i64 -4
%G=bitcast i8*%F to i32*
store i32 1342177296,i32*%G,align 4
%H=load i8*,i8**%b,align 8
%I=bitcast i8*%E to i8**
store i8*%H,i8**%I,align 8
%J=load i8*,i8**%c,align 8
%K=getelementptr inbounds i8,i8*%E,i64 8
%L=bitcast i8*%K to i8**
store i8*%J,i8**%L,align 8
%M=getelementptr inbounds i8,i8*%E,i64 16
%N=bitcast i8*%M to i32*
store i32 3,i32*%N,align 4
ret i8*%E
}
define internal fastcc i8*@_SMLLN12TypedCalcCon10funrecbindE_589(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
%h=alloca i8*,align 8
%i=alloca i8*,align 8
call void@llvm.gcroot(i8**%c,i8*null)#0
call void@llvm.gcroot(i8**%d,i8*null)#0
call void@llvm.gcroot(i8**%e,i8*null)#0
call void@llvm.gcroot(i8**%f,i8*null)#0
call void@llvm.gcroot(i8**%g,i8*null)#0
call void@llvm.gcroot(i8**%h,i8*null)#0
call void@llvm.gcroot(i8**%i,i8*null)#0
store i8*%a,i8**%g,align 8
store i8*%b,i8**%c,align 8
%j=load atomic i32,i32*@sml_check_flag unordered,align 4
%k=icmp eq i32%j,0
br i1%k,label%n,label%l
l:
call void@sml_check(i32 inreg%j)
%m=load i8*,i8**%c,align 8
br label%n
n:
%o=phi i8*[%m,%l],[%b,%p]
store i8*%o,i8**%d,align 8
%q=bitcast i8*%o to i8**
%r=load i8*,i8**%q,align 8
store i8*%r,i8**%e,align 8
%s=getelementptr inbounds i8,i8*%o,i64 8
%t=bitcast i8*%s to i8**
%u=load i8*,i8**%t,align 8
%v=icmp eq i8*%u,null
br i1%v,label%w,label%Q
w:
store i8*null,i8**%d,align 8
store i8*null,i8**%e,align 8
store i8*null,i8**%g,align 8
%x=load i8*,i8**@_SMLZN3Bug3BugE,align 8
store i8*%x,i8**%c,align 8
%y=call i8*@sml_alloc(i32 inreg 28)#0
%z=getelementptr inbounds i8,i8*%y,i64 -4
%A=bitcast i8*%z to i32*
store i32 1342177304,i32*%A,align 4
store i8*%y,i8**%d,align 8
%B=load i8*,i8**%c,align 8
store i8*null,i8**%c,align 8
%C=bitcast i8*%y to i8**
store i8*%B,i8**%C,align 8
%D=getelementptr inbounds i8,i8*%y,i64 8
%E=bitcast i8*%D to i8**
store i8*getelementptr inbounds(<{[4x i8],i32,[71x i8]}>,<{[4x i8],i32,[71x i8]}>*@bH,i64 0,i32 2,i64 0),i8**%E,align 8
%F=getelementptr inbounds i8,i8*%y,i64 16
%G=bitcast i8*%F to i8**
store i8*getelementptr inbounds(<{[4x i8],i32,[11x i8]}>,<{[4x i8],i32,[11x i8]}>*@bI,i64 0,i32 2,i64 0),i8**%G,align 8
%H=getelementptr inbounds i8,i8*%y,i64 24
%I=bitcast i8*%H to i32*
store i32 7,i32*%I,align 4
%J=call i8*@sml_alloc(i32 inreg 60)#0
%K=getelementptr inbounds i8,i8*%J,i64 -4
%L=bitcast i8*%K to i32*
store i32 1342177336,i32*%L,align 4
%M=getelementptr inbounds i8,i8*%J,i64 56
%N=bitcast i8*%M to i32*
store i32 1,i32*%N,align 4
%O=load i8*,i8**%d,align 8
%P=bitcast i8*%J to i8**
store i8*%O,i8**%P,align 8
call void@sml_raise(i8*inreg%J)#1
unreachable
Q:
store i8*%u,i8**%c,align 8
%R=bitcast i8*%u to i8**
%S=load i8*,i8**%R,align 8
%T=getelementptr inbounds i8,i8*%S,i64 8
%U=bitcast i8*%T to i8**
%V=load i8*,i8**%U,align 8
%W=getelementptr inbounds i8,i8*%V,i64 8
%X=bitcast i8*%W to i8**
%Y=load i8*,i8**%X,align 8
store i8*%Y,i8**%f,align 8
%Z=call fastcc i8*@_SMLFN4List3mapE(i32 inreg 1,i32 inreg 8,i32 inreg 1,i32 inreg 8)
%aa=getelementptr inbounds i8,i8*%Z,i64 16
%ab=bitcast i8*%aa to i8*(i8*,i8*)**
%ac=load i8*(i8*,i8*)*,i8*(i8*,i8*)**%ab,align 8
%ad=bitcast i8*%Z to i8**
%ae=load i8*,i8**%ad,align 8
%af=call fastcc i8*%ac(i8*inreg%ae,i8*inreg bitcast(i8**getelementptr inbounds(<{[4x i8],i32,i8*,void(...)*,void(...)*,i32}>,<{[4x i8],i32,i8*,void(...)*,void(...)*,i32}>*@bE,i64 0,i32 2)to i8*))
%ag=getelementptr inbounds i8,i8*%af,i64 16
%ah=bitcast i8*%ag to i8*(i8*,i8*)**
%ai=load i8*(i8*,i8*)*,i8*(i8*,i8*)**%ah,align 8
%aj=bitcast i8*%af to i8**
%ak=load i8*,i8**%aj,align 8
%al=bitcast i8**%c to i8****
%am=load i8***,i8****%al,align 8
store i8*null,i8**%c,align 8
%an=load i8**,i8***%am,align 8
%ao=load i8*,i8**%an,align 8
%ap=call fastcc i8*%ai(i8*inreg%ak,i8*inreg%ao)
store i8*%ap,i8**%c,align 8
%aq=call i8*@sml_alloc(i32 inreg 20)#0
%ar=getelementptr inbounds i8,i8*%aq,i64 -4
%as=bitcast i8*%ar to i32*
store i32 1342177296,i32*%as,align 4
store i8*%aq,i8**%h,align 8
%at=load i8*,i8**%c,align 8
%au=bitcast i8*%aq to i8**
store i8*%at,i8**%au,align 8
%av=load i8*,i8**%f,align 8
%aw=getelementptr inbounds i8,i8*%aq,i64 8
%ax=bitcast i8*%aw to i8**
store i8*%av,i8**%ax,align 8
%ay=getelementptr inbounds i8,i8*%aq,i64 16
%az=bitcast i8*%ay to i32*
store i32 3,i32*%az,align 4
%aA=call i8*@sml_alloc(i32 inreg 20)#0
%aB=getelementptr inbounds i8,i8*%aA,i64 -4
%aC=bitcast i8*%aB to i32*
store i32 1342177296,i32*%aC,align 4
store i8*%aA,i8**%i,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 6,i32*%aF,align 4
%aG=load i8*,i8**%h,align 8
store i8*null,i8**%h,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=bitcast i8**%g to i8***
%aM=load i8**,i8***%aL,align 8
%aN=load i8*,i8**%aM,align 8
store i8*%aN,i8**%g,align 8
%aO=call i8*@sml_alloc(i32 inreg 36)#0
%aP=getelementptr inbounds i8,i8*%aO,i64 -4
%aQ=bitcast i8*%aP to i32*
store i32 1342177312,i32*%aQ,align 4
store i8*%aO,i8**%h,align 8
%aR=load i8*,i8**%i,align 8
store i8*null,i8**%i,align 8
%aS=bitcast i8*%aO to i8**
store i8*%aR,i8**%aS,align 8
%aT=load i8*,i8**%g,align 8
store i8*null,i8**%g,align 8
%aU=getelementptr inbounds i8,i8*%aO,i64 8
%aV=bitcast i8*%aU to i8**
store i8*%aT,i8**%aV,align 8
%aW=load i8*,i8**%d,align 8
%aX=getelementptr inbounds i8,i8*%aO,i64 16
%aY=bitcast i8*%aX to i8**
store i8*%aW,i8**%aY,align 8
%aZ=load i8*,i8**%e,align 8
%a0=getelementptr inbounds i8,i8*%aO,i64 24
%a1=bitcast i8*%a0 to i8**
store i8*%aZ,i8**%a1,align 8
%a2=getelementptr inbounds i8,i8*%aO,i64 32
%a3=bitcast i8*%a2 to i32*
store i32 15,i32*%a3,align 4
%a4=call i8*@sml_alloc(i32 inreg 28)#0
%a5=getelementptr inbounds i8,i8*%a4,i64 -4
%a6=bitcast i8*%a5 to i32*
store i32 1342177304,i32*%a6,align 4
%a7=load i8*,i8**%h,align 8
%a8=bitcast i8*%a4 to i8**
store i8*%a7,i8**%a8,align 8
%a9=getelementptr inbounds i8,i8*%a4,i64 8
%ba=bitcast i8*%a9 to void(...)**
store void(...)*bitcast(void(i8*,i32)*@_SMLL1f_582 to void(...)*),void(...)**%ba,align 8
%bb=getelementptr inbounds i8,i8*%a4,i64 16
%bc=bitcast i8*%bb to void(...)**
store void(...)*bitcast(i8*(i8*,i8*)*@_SMLL1f_783 to void(...)*),void(...)**%bc,align 8
%bd=getelementptr inbounds i8,i8*%a4,i64 24
%be=bitcast i8*%bd to i32*
store i32 -2147483647,i32*%be,align 4
%bf=load i32*,i32**bitcast(i8**@_SMLZN7Control9checkTypeE to i32**),align 8
%bg=load i32,i32*%bf,align 4
%bh=icmp eq i32%bg,0
store i8*null,i8**%h,align 8
br i1%bh,label%bj,label%bi
bi:
call fastcc void@_SMLL1f_582(i8*inreg%a7,i32 inreg 0)
br label%bj
bj:
%bk=call fastcc i8*@_SMLFN4List3mapE(i32 inreg 1,i32 inreg 8,i32 inreg 1,i32 inreg 8)
%bl=getelementptr inbounds i8,i8*%bk,i64 16
%bm=bitcast i8*%bl to i8*(i8*,i8*)**
%bn=load i8*(i8*,i8*)*,i8*(i8*,i8*)**%bm,align 8
%bo=bitcast i8*%bk to i8**
%bp=load i8*,i8**%bo,align 8
%bq=call fastcc i8*%bn(i8*inreg%bp,i8*inreg bitcast(i8**getelementptr inbounds(<{[4x i8],i32,i8*,void(...)*,void(...)*,i32}>,<{[4x i8],i32,i8*,void(...)*,void(...)*,i32}>*@bG,i64 0,i32 2)to i8*))
%br=getelementptr inbounds i8,i8*%bq,i64 16
%bs=bitcast i8*%br to i8*(i8*,i8*)**
%bt=load i8*(i8*,i8*)*,i8*(i8*,i8*)**%bs,align 8
%bu=bitcast i8*%bq to i8**
%bv=load i8*,i8**%bu,align 8
%bw=load i8*,i8**%d,align 8
store i8*null,i8**%d,align 8
%bx=getelementptr inbounds i8,i8*%bw,i64 8
%by=bitcast i8*%bx to i8**
%bz=load i8*,i8**%by,align 8
%bA=call fastcc i8*%bt(i8*inreg%bv,i8*inreg%bz)
store i8*%bA,i8**%d,align 8
%bB=call i8*@sml_alloc(i32 inreg 36)#0
%bC=getelementptr inbounds i8,i8*%bB,i64 -4
%bD=bitcast i8*%bC to i32*
store i32 1342177312,i32*%bD,align 4
%bE=load i8*,i8**%c,align 8
%bF=bitcast i8*%bB to i8**
store i8*%bE,i8**%bF,align 8
%bG=load i8*,i8**%f,align 8
%bH=getelementptr inbounds i8,i8*%bB,i64 8
%bI=bitcast i8*%bH to i8**
store i8*%bG,i8**%bI,align 8
%bJ=load i8*,i8**%e,align 8
%bK=getelementptr inbounds i8,i8*%bB,i64 16
%bL=bitcast i8*%bK to i8**
store i8*%bJ,i8**%bL,align 8
%bM=load i8*,i8**%d,align 8
%bN=getelementptr inbounds i8,i8*%bB,i64 24
%bO=bitcast i8*%bN to i8**
store i8*%bM,i8**%bO,align 8
%bP=getelementptr inbounds i8,i8*%bB,i64 32
%bQ=bitcast i8*%bP to i32*
store i32 15,i32*%bQ,align 4
ret i8*%bB
}
define internal fastcc i8*@_SMLLN12TypedCalcCon10funrecbindE_590(i8*inreg%a)unnamed_addr#4 gc"smlsharp"{
%b=alloca i8*,align 8
%c=alloca i8*,align 8
call void@llvm.gcroot(i8**%b,i8*null)#0
call void@llvm.gcroot(i8**%c,i8*null)#0
store i8*%a,i8**%b,align 8
%d=call i8*@sml_alloc(i32 inreg 12)#0
%e=getelementptr inbounds i8,i8*%d,i64 -4
%f=bitcast i8*%e to i32*
store i32 1342177288,i32*%f,align 4
store i8*%d,i8**%c,align 8
%g=load i8*,i8**%b,align 8
store i8*null,i8**%b,align 8
%h=bitcast i8*%d to i8**
store i8*%g,i8**%h,align 8
%i=getelementptr inbounds i8,i8*%d,i64 8
%j=bitcast i8*%i to i32*
store i32 1,i32*%j,align 4
%k=call i8*@sml_alloc(i32 inreg 28)#0
%l=getelementptr inbounds i8,i8*%k,i64 -4
%m=bitcast i8*%l to i32*
store i32 1342177304,i32*%m,align 4
%n=load i8*,i8**%c,align 8
%o=bitcast i8*%k to i8**
store i8*%n,i8**%o,align 8
%p=getelementptr inbounds i8,i8*%k,i64 8
%q=bitcast i8*%p to void(...)**
store void(...)*bitcast(i8*(i8*,i8*)*@_SMLLN12TypedCalcCon10funrecbindE_589 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*)*@_SMLLN12TypedCalcCon10funrecbindE_589 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*@_SMLLN12TypedCalcCon9TPFUNDECLE_592(i8*inreg%a)#4 gc"smlsharp"{
%b=getelementptr inbounds i8,i8*%a,i64 16
%c=bitcast i8*%b to i8**
%d=load i8*,i8**%c,align 8
ret i8*%d
}
define internal fastcc i8*@_SMLLN12TypedCalcCon9TPFUNDECLE_594(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
%f=alloca i8*,align 8
call void@llvm.gcroot(i8**%c,i8*null)#0
call void@llvm.gcroot(i8**%d,i8*null)#0
call void@llvm.gcroot(i8**%e,i8*null)#0
call void@llvm.gcroot(i8**%f,i8*null)#0
store i8*%a,i8**%d,align 8
store i8*%b,i8**%c,align 8
%g=load atomic i32,i32*@sml_check_flag unordered,align 4
%h=icmp eq i32%g,0
br i1%h,label%k,label%i
i:
call void@sml_check(i32 inreg%g)
%j=load i8*,i8**%c,align 8
br label%k
k:
%l=phi i8*[%j,%i],[%b,%m]
%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**%e,align 8
%q=call fastcc i8*@_SMLFN4List3mapE(i32 inreg 1,i32 inreg 8,i32 inreg 1,i32 inreg 8)
%r=getelementptr inbounds i8,i8*%q,i64 16
%s=bitcast i8*%r to i8*(i8*,i8*)**
%t=load i8*(i8*,i8*)*,i8*(i8*,i8*)**%s,align 8
%u=bitcast i8*%q to i8**
%v=load i8*,i8**%u,align 8
store i8*%v,i8**%f,align 8
%w=load i8*,i8**%e,align 8
%x=call fastcc i8*@_SMLLN12TypedCalcCon10funrecbindE_590(i8*inreg%w)
%y=load i8*,i8**%f,align 8
store i8*null,i8**%f,align 8
%z=call fastcc i8*%t(i8*inreg%y,i8*inreg%x)
%A=getelementptr inbounds i8,i8*%z,i64 16
%B=bitcast i8*%A to i8*(i8*,i8*)**
%C=load i8*(i8*,i8*)*,i8*(i8*,i8*)**%B,align 8
%D=bitcast i8*%z to i8**
%E=load i8*,i8**%D,align 8
%F=bitcast i8**%c to i8***
%G=load i8**,i8***%F,align 8
store i8*null,i8**%c,align 8
%H=load i8*,i8**%G,align 8
%I=call fastcc i8*%C(i8*inreg%E,i8*inreg%H)
store i8*%I,i8**%c,align 8
%J=bitcast i8**%d to i8***
%K=load i8**,i8***%J,align 8
%L=load i8*,i8**%K,align 8
store i8*%L,i8**%d,align 8
%M=call fastcc i8*@_SMLFN4List3mapE(i32 inreg 1,i32 inreg 8,i32 inreg 1,i32 inreg 8)
%N=getelementptr inbounds i8,i8*%M,i64 16
%O=bitcast i8*%N to i8*(i8*,i8*)**
%P=load i8*(i8*,i8*)*,i8*(i8*,i8*)**%O,align 8
%Q=bitcast i8*%M to i8**
%R=load i8*,i8**%Q,align 8
%S=call fastcc i8*%P(i8*inreg%R,i8*inreg bitcast(i8**getelementptr inbounds(<{[4x i8],i32,i8*,void(...)*,void(...)*,i32}>,<{[4x i8],i32,i8*,void(...)*,void(...)*,i32}>*@bJ,i64 0,i32 2)to i8*))
%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**%c,align 8
%Z=call fastcc i8*%V(i8*inreg%X,i8*inreg%Y)
%aa=load i8*,i8**%d,align 8
store i8*null,i8**%d,align 8
%ab=call fastcc i8*@_SMLLN12TypedCalcCon10makeVarEnvE_562(i8*inreg%aa,i8*inreg%Z)
store i8*%ab,i8**%d,align 8
%ac=call i8*@sml_alloc(i32 inreg 20)#0
%ad=getelementptr inbounds i8,i8*%ac,i64 -4
%ae=bitcast i8*%ad to i32*
store i32 1342177296,i32*%ae,align 4
store i8*%ac,i8**%f,align 8
%af=load i8*,i8**%c,align 8
store i8*null,i8**%c,align 8
%ag=bitcast i8*%ac to i8**
store i8*%af,i8**%ag,align 8
%ah=load i8*,i8**%e,align 8
store i8*null,i8**%e,align 8
%ai=getelementptr inbounds i8,i8*%ac,i64 8
%aj=bitcast i8*%ai to i8**
store i8*%ah,i8**%aj,align 8
%ak=getelementptr inbounds i8,i8*%ac,i64 16
%al=bitcast i8*%ak to i32*
store i32 3,i32*%al,align 4
%am=call i8*@sml_alloc(i32 inreg 20)#0
%an=getelementptr inbounds i8,i8*%am,i64 -4
%ao=bitcast i8*%an to i32*
store i32 1342177296,i32*%ao,align 4
store i8*%am,i8**%c,align 8
%ap=getelementptr inbounds i8,i8*%am,i64 4
%aq=bitcast i8*%ap to i32*
store i32 0,i32*%aq,align 1
%ar=bitcast i8*%am to i32*
store i32 7,i32*%ar,align 4
%as=load i8*,i8**%f,align 8
store i8*null,i8**%f,align 8
%at=getelementptr inbounds i8,i8*%am,i64 8
%au=bitcast i8*%at to i8**
store i8*%as,i8**%au,align 8
%av=getelementptr inbounds i8,i8*%am,i64 16
%aw=bitcast i8*%av to i32*
store i32 2,i32*%aw,align 4
%ax=call i8*@sml_alloc(i32 inreg 20)#0
%ay=getelementptr inbounds i8,i8*%ax,i64 -4
%az=bitcast i8*%ay to i32*
store i32 1342177296,i32*%az,align 4
%aA=load i8*,i8**%c,align 8
%aB=bitcast i8*%ax to i8**
store i8*%aA,i8**%aB,align 8
%aC=load i8*,i8**%d,align 8
%aD=getelementptr inbounds i8,i8*%ax,i64 8
%aE=bitcast i8*%aD to i8**
store i8*%aC,i8**%aE,align 8
%aF=getelementptr inbounds i8,i8*%ax,i64 16
%aG=bitcast i8*%aF to i32*
store i32 3,i32*%aG,align 4
ret i8*%ax
}
define internal fastcc i8*@_SMLLN12TypedCalcCon13TPPOLYFUNDECLE_595(i8*inreg%a)#4 gc"smlsharp"{
%b=getelementptr inbounds i8,i8*%a,i64 16
%c=bitcast i8*%b to i8**
%d=load i8*,i8**%c,align 8
ret i8*%d
}
define internal fastcc i8*@_SMLLN12TypedCalcCon13TPPOLYFUNDECLE_597(i8*inreg%a,i8*inreg%b)#2 gc"smlsharp"{
%c=alloca i8*,align 8
%d=alloca i8*,align 8
%e=alloca i8*,align 8
%f=alloca i8*,align 8
%g=alloca i8*,align 8
%h=alloca i8*,align 8
call void@llvm.gcroot(i8**%c,i8*null)#0
call void@llvm.gcroot(i8**%d,i8*null)#0
call void@llvm.gcroot(i8**%e,i8*null)#0
call void@llvm.gcroot(i8**%f,i8*null)#0
call void@llvm.gcroot(i8**%g,i8*null)#0
call void@llvm.gcroot(i8**%h,i8*null)#0
store i8*%a,i8**%d,align 8
store i8*%b,i8**%c,align 8
%i=load atomic i32,i32*@sml_check_flag unordered,align 4
%j=icmp eq i32%i,0
br i1%j,label%k,label%m
k:
%l=bitcast i8*%b to i8**
br label%p
m:
call void@sml_check(i32 inreg%i)
%n=bitcast i8**%c to i8***
%o=load i8**,i8***%n,align 8
br label%p
p:
%q=phi i8**[%o,%m],[%l,%k]
%r=load i8*,i8**%q,align 8
store i8*%r,i8**%e,align 8
%s=getelementptr inbounds i8*,i8**%q,i64 1
%t=load i8*,i8**%s,align 8
store i8*%t,i8**%f,align 8
%u=getelementptr inbounds i8*,i8**%q,i64 2
%v=load i8*,i8**%u,align 8
store i8*%v,i8**%g,align 8
%w=call fastcc i8*@_SMLFN4List3mapE(i32 inreg 1,i32 inreg 8,i32 inreg 1,i32 inreg 8)
%x=getelementptr inbounds i8,i8*%w,i64 16
%y=bitcast i8*%x to i8*(i8*,i8*)**
%z=load i8*(i8*,i8*)*,i8*(i8*,i8*)**%y,align 8
%A=bitcast i8*%w to i8**
%B=load i8*,i8**%A,align 8
store i8*%B,i8**%h,align 8
%C=load i8*,i8**%g,align 8
%D=call fastcc i8*@_SMLLN12TypedCalcCon10funrecbindE_590(i8*inreg%C)
%E=load i8*,i8**%h,align 8
store i8*null,i8**%h,align 8
%F=call fastcc i8*%z(i8*inreg%E,i8*inreg%D)
%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
%L=load i8*,i8**%c,align 8
store i8*null,i8**%c,align 8
%M=getelementptr inbounds i8,i8*%L,i64 24
%N=bitcast i8*%M to i8**
%O=load i8*,i8**%N,align 8
%P=call fastcc i8*%I(i8*inreg%K,i8*inreg%O)
store i8*%P,i8**%c,align 8
%Q=bitcast i8**%d to i8***
%R=load i8**,i8***%Q,align 8
%S=load i8*,i8**%R,align 8
store i8*%S,i8**%d,align 8
%T=call i8*@sml_alloc(i32 inreg 20)#0
%U=getelementptr inbounds i8,i8*%T,i64 -4
%V=bitcast i8*%U to i32*
store i32 1342177296,i32*%V,align 4
%W=load i8*,i8**%e,align 8
%X=bitcast i8*%T to i8**
store i8*%W,i8**%X,align 8
%Y=load i8*,i8**%f,align 8
%Z=getelementptr inbounds i8,i8*%T,i64 8
%aa=bitcast i8*%Z to i8**
store i8*%Y,i8**%aa,align 8
%ab=getelementptr inbounds i8,i8*%T,i64 16
%ac=bitcast i8*%ab to i32*
store i32 3,i32*%ac,align 4
%ad=load i8*,i8**%d,align 8
store i8*null,i8**%d,align 8
%ae=call fastcc i8*@_SMLLN12TypedCalcCon9clsVarEnvE_568(i8*inreg%ad,i8*inreg%T)
%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**%d,align 8
%ak=call fastcc i8*@_SMLFN4List3mapE(i32 inreg 1,i32 inreg 8,i32 inreg 1,i32 inreg 8)
%al=getelementptr inbounds i8,i8*%ak,i64 16
%am=bitcast i8*%al to i8*(i8*,i8*)**
%an=load i8*(i8*,i8*)*,i8*(i8*,i8*)**%am,align 8
%ao=bitcast i8*%ak to i8**
%ap=load i8*,i8**%ao,align 8
%aq=call fastcc i8*%an(i8*inreg%ap,i8*inreg bitcast(i8**getelementptr inbounds(<{[4x i8],i32,i8*,void(...)*,void(...)*,i32}>,<{[4x i8],i32,i8*,void(...)*,void(...)*,i32}>*@bK,i64 0,i32 2)to i8*))
%ar=getelementptr inbounds i8,i8*%aq,i64 16
%as=bitcast i8*%ar to i8*(i8*,i8*)**
%at=load i8*(i8*,i8*)*,i8*(i8*,i8*)**%as,align 8
%au=bitcast i8*%aq to i8**
%av=load i8*,i8**%au,align 8
%aw=load i8*,i8**%c,align 8
%ax=call fastcc i8*%at(i8*inreg%av,i8*inreg%aw)
%ay=load i8*,i8**%d,align 8
store i8*null,i8**%d,align 8
%az=call fastcc i8*%ah(i8*inreg%ay,i8*inreg%ax)
store i8*%az,i8**%d,align 8
%aA=call i8*@sml_alloc(i32 inreg 36)#0
%aB=getelementptr inbounds i8,i8*%aA,i64 -4
%aC=bitcast i8*%aB to i32*
store i32 1342177312,i32*%aC,align 4
store i8*%aA,i8**%h,align 8
%aD=load i8*,i8**%e,align 8
store i8*null,i8**%e,align 8
%aE=bitcast i8*%aA to i8**
store i8*%aD,i8**%aE,align 8
%aF=load i8*,i8**%f,align 8
store i8*null,i8**%f,align 8
%aG=getelementptr inbounds i8,i8*%aA,i64 8
%aH=bitcast i8*%aG to i8**
store i8*%aF,i8**%aH,align 8
%aI=load i8*,i8**%g,align 8
store i8*null,i8**%g,align 8
%aJ=getelementptr inbounds i8,i8*%aA,i64 16
%aK=bitcast i8*%aJ to i8**
store i8*%aI,i8**%aK,align 8
%aL=load i8*,i8**%c,align 8
store i8*null,i8**%c,align 8
%aM=getelementptr inbounds i8,i8*%aA,i64 24
%aN=bitcast i8*%aM to i8**
store i8*%aL,i8**%aN,align 8
%aO=getelementptr inbounds i8,i8*%aA,i64 32
%aP=bitcast i8*%aO to i32*
store i32 15,i32*%aP,align 4
%aQ=call i8*@sml_alloc(i32 inreg 20)#0
%aR=getelementptr inbounds i8,i8*%aQ,i64 -4
%aS=bitcast i8*%aR to i32*
store i32 1342177296,i32*%aS,align 4
store i8*%aQ,i8**%c,align 8
%aT=getelementptr inbounds i8,i8*%aQ,i64 4
%aU=bitcast i8*%aT to i32*
store i32 0,i32*%aU,align 1
%aV=bitcast i8*%aQ to i32*
store i32 8,i32*%aV,align 4
%aW=load i8*,i8**%h,align 8
store i8*null,i8**%h,align 8
%aX=getelementptr inbounds i8,i8*%aQ,i64 8
%aY=bitcast i8*%aX to i8**
store i8*%aW,i8**%aY,align 8
%aZ=getelementptr inbounds i8,i8*%aQ,i64 16
%a0=bitcast i8*%aZ to i32*
store i32 2,i32*%a0,align 4
%a1=call i8*@sml_alloc(i32 inreg 20)#0
%a2=getelementptr inbounds i8,i8*%a1,i64 -4
%a3=bitcast i8*%a2 to i32*
store i32 1342177296,i32*%a3,align 4
%a4=load i8*,i8**%c,align 8
%a5=bitcast i8*%a1 to i8**
store i8*%a4,i8**%a5,align 8
%a6=load i8*,i8**%d,align 8
%a7=getelementptr inbounds i8,i8*%a1,i64 8
%a8=bitcast i8*%a7 to i8**
store i8*%a6,i8**%a8,align 8
%a9=getelementptr inbounds i8,i8*%a1,i64 16
%ba=bitcast i8*%a9 to i32*
store i32 3,i32*%ba,align 4
ret i8*%a1
}
define internal fastcc void@_SMLL1f_599(i8*inreg%a,i32 inreg%b)#2 gc"smlsharp"{
%c=alloca i8*,align 8
%d=alloca i8*,align 8
%e=alloca i8*,align 8
%f=alloca i8*,align 8
call void@llvm.gcroot(i8**%c,i8*null)#0
call void@llvm.gcroot(i8**%d,i8*null)#0
call void@llvm.gcroot(i8**%e,i8*null)#0
call void@llvm.gcroot(i8**%f,i8*null)#0
store i8*%a,i8**%c,align 8
%g=load atomic i32,i32*@sml_check_flag unordered,align 4
%h=icmp eq i32%g,0
br i1%h,label%j,label%i
i:
call void@sml_check(i32 inreg%g)
br label%j
j:
%k=call fastcc i8*@_SMLLN12TypedCalcCon4eqTyE_287(i8*inreg getelementptr inbounds(<{[4x i8],i32,[6x i8]}>,<{[4x i8],i32,[6x i8]}>*@bL,i64 0,i32 2,i64 0))
%l=getelementptr inbounds i8,i8*%k,i64 16
%m=bitcast i8*%l to i8*(i8*,i8*)**
%n=load i8*(i8*,i8*)*,i8*(i8*,i8*)**%m,align 8
%o=bitcast i8*%k to i8**
%p=load i8*,i8**%o,align 8
%q=load i8*,i8**%c,align 8
%r=getelementptr inbounds i8,i8*%q,i64 16
%s=bitcast i8*%r to i8**
%t=load i8*,i8**%s,align 8
%u=call fastcc i8*%n(i8*inreg%p,i8*inreg%t)
%v=getelementptr inbounds i8,i8*%u,i64 16
%w=bitcast i8*%v to i8*(i8*,i8*)**
%x=load i8*(i8*,i8*)*,i8*(i8*,i8*)**%w,align 8
%y=bitcast i8*%u to i8**
%z=load i8*,i8**%y,align 8
store i8*%z,i8**%f,align 8
%A=bitcast i8**%c to i8*****
%B=load i8****,i8*****%A,align 8
%C=load i8***,i8****%B,align 8
%D=load i8**,i8***%C,align 8
%E=load i8*,i8**%D,align 8
%F=getelementptr inbounds i8,i8*%E,i64 16
%G=bitcast i8*%F to i8**
%H=load i8*,i8**%G,align 8
store i8*%H,i8**%d,align 8
store i8*null,i8**%c,align 8
%I=getelementptr inbounds i8***,i8****%B,i64 1
%J=bitcast i8****%I to i8**
%K=load i8*,i8**%J,align 8
store i8*%K,i8**%e,align 8
%L=call i8*@sml_alloc(i32 inreg 20)#0
%M=getelementptr inbounds i8,i8*%L,i64 -4
%N=bitcast i8*%M to i32*
store i32 1342177296,i32*%N,align 4
store i8*%L,i8**%c,align 8
%O=load i8*,i8**%d,align 8
store i8*null,i8**%d,align 8
%P=bitcast i8*%L to i8**
store i8*%O,i8**%P,align 8
%Q=load i8*,i8**%e,align 8
store i8*null,i8**%e,align 8
%R=getelementptr inbounds i8,i8*%L,i64 8
%S=bitcast i8*%R to i8**
store i8*%Q,i8**%S,align 8
%T=getelementptr inbounds i8,i8*%L,i64 16
%U=bitcast i8*%T to i32*
store i32 3,i32*%U,align 4
%V=call i8*@sml_alloc(i32 inreg 20)#0
%W=getelementptr inbounds i8,i8*%V,i64 -4
%X=bitcast i8*%W to i32*
store i32 1342177296,i32*%X,align 4
%Y=load i8*,i8**%c,align 8
store i8*null,i8**%c,align 8
%Z=bitcast i8*%V to i8**
store i8*%Y,i8**%Z,align 8
%aa=getelementptr inbounds i8,i8*%V,i64 8
%ab=bitcast i8*%aa to i8**
store i8*null,i8**%ab,align 8
%ac=getelementptr inbounds i8,i8*%V,i64 16
%ad=bitcast i8*%ac to i32*
store i32 3,i32*%ad,align 4
%ae=load i8*,i8**%f,align 8
store i8*null,i8**%f,align 8
%af=call fastcc i8*%x(i8*inreg%ae,i8*inreg%V)
ret void
}
define internal fastcc i8*@_SMLLN12TypedCalcCon5TPVALE_600(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
%h=alloca i8*,align 8
%i=alloca i8*,align 8
call void@llvm.gcroot(i8**%c,i8*null)#0
call void@llvm.gcroot(i8**%d,i8*null)#0
call void@llvm.gcroot(i8**%e,i8*null)#0
call void@llvm.gcroot(i8**%f,i8*null)#0
call void@llvm.gcroot(i8**%g,i8*null)#0
call void@llvm.gcroot(i8**%h,i8*null)#0
call void@llvm.gcroot(i8**%i,i8*null)#0
store i8*%a,i8**%h,align 8
store i8*%b,i8**%c,align 8
%j=load atomic i32,i32*@sml_check_flag unordered,align 4
%k=icmp eq i32%j,0
br i1%k,label%n,label%l
l:
call void@sml_check(i32 inreg%j)
%m=load i8*,i8**%c,align 8
br label%n
n:
%o=phi i8*[%m,%l],[%b,%p]
store i8*null,i8**%c,align 8
store i8*%o,i8**%d,align 8
%q=bitcast i8*%o to i8**
%r=load i8*,i8**%q,align 8
%s=getelementptr inbounds i8,i8*%r,i64 8
%t=bitcast i8*%s to i8***
%u=load i8**,i8***%t,align 8
%v=load i8*,i8**%u,align 8
store i8*%v,i8**%e,align 8
%w=load i8*,i8**%q,align 8
%x=getelementptr inbounds i8,i8*%w,i64 8
%y=bitcast i8*%x to i8**
%z=load i8*,i8**%y,align 8
%A=getelementptr inbounds i8,i8*%z,i64 8
%B=bitcast i8*%A to i8**
%C=load i8*,i8**%B,align 8
store i8*%C,i8**%f,align 8
%D=getelementptr inbounds i8,i8*%o,i64 8
%E=bitcast i8*%D to i8**
%F=load i8*,i8**%E,align 8
store i8*%F,i8**%g,align 8
%G=bitcast i8*%o to i8***
%H=load i8**,i8***%G,align 8
%I=load i8*,i8**%H,align 8
%J=bitcast i8*%I to i32*
%K=load i32,i32*%J,align 4
%L=getelementptr inbounds i8,i8*%I,i64 4
%M=bitcast i8*%L to i32*
%N=load i32,i32*%M,align 4
%O=getelementptr inbounds i8,i8*%I,i64 8
%P=bitcast i8*%O to i8**
%Q=load i8*,i8**%P,align 8
store i8*%Q,i8**%i,align 8
%R=call i8*@sml_alloc(i32 inreg 28)#0
%S=bitcast i8*%R to i32*
%T=getelementptr inbounds i8,i8*%R,i64 -4
%U=bitcast i8*%T to i32*
store i32 1342177304,i32*%U,align 4
store i8*%R,i8**%c,align 8
store i32%K,i32*%S,align 4
%V=getelementptr inbounds i8,i8*%R,i64 4
%W=bitcast i8*%V to i32*
store i32%N,i32*%W,align 4
%X=load i8*,i8**%i,align 8
store i8*null,i8**%i,align 8
%Y=getelementptr inbounds i8,i8*%R,i64 8
%Z=bitcast i8*%Y to i8**
store i8*%X,i8**%Z,align 8
%aa=load i8*,i8**%f,align 8
%ab=getelementptr inbounds i8,i8*%R,i64 16
%ac=bitcast i8*%ab to i8**
store i8*%aa,i8**%ac,align 8
%ad=getelementptr inbounds i8,i8*%R,i64 24
%ae=bitcast i8*%ad to i32*
store i32 6,i32*%ae,align 4
%af=call i8*@sml_alloc(i32 inreg 28)#0
%ag=getelementptr inbounds i8,i8*%af,i64 -4
%ah=bitcast i8*%ag to i32*
store i32 1342177304,i32*%ah,align 4
store i8*%af,i8**%i,align 8
%ai=load i8*,i8**%d,align 8
store i8*null,i8**%d,align 8
%aj=bitcast i8*%af to i8**
store i8*%ai,i8**%aj,align 8
%ak=load i8*,i8**%f,align 8
store i8*null,i8**%f,align 8
%al=getelementptr inbounds i8,i8*%af,i64 8
%am=bitcast i8*%al to i8**
store i8*%ak,i8**%am,align 8
%an=load i8*,i8**%g,align 8
%ao=getelementptr inbounds i8,i8*%af,i64 16
%ap=bitcast i8*%ao to i8**
store i8*%an,i8**%ap,align 8
%aq=getelementptr inbounds i8,i8*%af,i64 24
%ar=bitcast i8*%aq to i32*
store i32 7,i32*%ar,align 4
%as=call i8*@sml_alloc(i32 inreg 28)#0
%at=getelementptr inbounds i8,i8*%as,i64 -4
%au=bitcast i8*%at to i32*
store i32 1342177304,i32*%au,align 4
%av=load i8*,i8**%i,align 8
%aw=bitcast i8*%as to i8**
store i8*%av,i8**%aw,align 8
%ax=getelementptr inbounds i8,i8*%as,i64 8
%ay=bitcast i8*%ax to void(...)**
store void(...)*bitcast(void(i8*,i32)*@_SMLL1f_599 to void(...)*),void(...)**%ay,align 8
%az=getelementptr inbounds i8,i8*%as,i64 16
%aA=bitcast i8*%az to void(...)**
store void(...)*bitcast(i8*(i8*,i8*)*@_SMLL1f_789 to void(...)*),void(...)**%aA,align 8
%aB=getelementptr inbounds i8,i8*%as,i64 24
%aC=bitcast i8*%aB to i32*
store i32 -2147483647,i32*%aC,align 4
%aD=load i32*,i32**bitcast(i8**@_SMLZN7Control9checkTypeE to i32**),align 8
%aE=load i32,i32*%aD,align 4
%aF=icmp eq i32%aE,0
store i8*null,i8**%i,align 8
br i1%aF,label%aH,label%aG
aG:
call fastcc void@_SMLL1f_599(i8*inreg%av,i32 inreg 0)
br label%aH
aH:
%aI=bitcast i8**%h to i8***
%aJ=load i8**,i8***%aI,align 8
store i8*null,i8**%h,align 8
%aK=load i8*,i8**%aJ,align 8
store i8*%aK,i8**%d,align 8
%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
%aP=bitcast i8*%aL to i8**
store i8*%aO,i8**%aP,align 8
%aQ=getelementptr inbounds i8,i8*%aL,i64 8
%aR=bitcast i8*%aQ to i8**
store i8*null,i8**%aR,align 8
%aS=getelementptr inbounds i8,i8*%aL,i64 16
%aT=bitcast i8*%aS to i32*
store i32 3,i32*%aT,align 4
%aU=load i8*,i8**%d,align 8
store i8*null,i8**%d,align 8
%aV=call fastcc i8*@_SMLLN12TypedCalcCon10makeVarEnvE_562(i8*inreg%aU,i8*inreg%aL)
store i8*%aV,i8**%d,align 8
%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
store i8*%aW,i8**%f,align 8
%aZ=load i8*,i8**%c,align 8
store i8*null,i8**%c,align 8
%a0=bitcast i8*%aW to i8**
store i8*%aZ,i8**%a0,align 8
%a1=load i8*,i8**%e,align 8
store i8*null,i8**%e,align 8
%a2=getelementptr inbounds i8,i8*%aW,i64 8
%a3=bitcast i8*%a2 to i8**
store i8*%a1,i8**%a3,align 8
%a4=getelementptr inbounds i8,i8*%aW,i64 16
%a5=bitcast i8*%a4 to i32*
store i32 3,i32*%a5,align 4
%a6=call i8*@sml_alloc(i32 inreg 20)#0
%a7=getelementptr inbounds i8,i8*%a6,i64 -4
%a8=bitcast i8*%a7 to i32*
store i32 1342177296,i32*%a8,align 4
store i8*%a6,i8**%c,align 8
%a9=load i8*,i8**%f,align 8
store i8*null,i8**%f,align 8
%ba=bitcast i8*%a6 to i8**
store i8*%a9,i8**%ba,align 8
%bb=load i8*,i8**%g,align 8
store i8*null,i8**%g,align 8
%bc=getelementptr inbounds i8,i8*%a6,i64 8
%bd=bitcast i8*%bc to i8**
store i8*%bb,i8**%bd,align 8
%be=getelementptr inbounds i8,i8*%a6,i64 16
%bf=bitcast i8*%be to i32*
store i32 3,i32*%bf,align 4
%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**%e,align 8
%bj=getelementptr inbounds i8,i8*%bg,i64 4
%bk=bitcast i8*%bj to i32*
store i32 0,i32*%bk,align 1
%bl=bitcast i8*%bg to i32*
store i32 9,i32*%bl,align 4
%bm=load i8*,i8**%c,align 8
store i8*null,i8**%c,align 8
%bn=getelementptr inbounds i8,i8*%bg,i64 8
%bo=bitcast i8*%bn to i8**
store i8*%bm,i8**%bo,align 8
%bp=getelementptr inbounds i8,i8*%bg,i64 16
%bq=bitcast i8*%bp to i32*
store i32 2,i32*%bq,align 4
%br=call i8*@sml_alloc(i32 inreg 20)#0
%bs=getelementptr inbounds i8,i8*%br,i64 -4
%bt=bitcast i8*%bs to i32*
store i32 1342177296,i32*%bt,align 4
%bu=load i8*,i8**%e,align 8
%bv=bitcast i8*%br to i8**
store i8*%bu,i8**%bv,align 8
%bw=load i8*,i8**%d,align 8
%bx=getelementptr inbounds i8,i8*%br,i64 8
%by=bitcast i8*%bx to i8**
store i8*%bw,i8**%by,align 8
%bz=getelementptr inbounds i8,i8*%br,i64 16
%bA=bitcast i8*%bz to i32*
store i32 3,i32*%bA,align 4
ret i8*%br
}
define internal fastcc i8*@_SMLL11newRecbinds_601(i8*inreg%a)#4 gc"smlsharp"{
%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
%f=bitcast i8*%a to i8***
%g=load i8**,i8***%f,align 8
%h=load i8*,i8**%g,align 8
store i8*%h,i8**%c,align 8
%i=getelementptr inbounds i8,i8*%a,i64 8
%j=bitcast i8*%i to i8**
%k=load i8*,i8**%j,align 8
%l=bitcast i8*%k to i32*
%m=load i32,i32*%l,align 4
%n=getelementptr inbounds i8,i8*%k,i64 4
%o=bitcast i8*%n to i32*
%p=load i32,i32*%o,align 4
%q=getelementptr inbounds i8,i8*%k,i64 8
%r=bitcast i8*%q to i8**
%s=load i8*,i8**%r,align 8
store i8*%s,i8**%d,align 8
%t=getelementptr inbounds i8*,i8**%g,i64 1
%u=load i8*,i8**%t,align 8
store i8*%u,i8**%e,align 8
%v=call i8*@sml_alloc(i32 inreg 28)#0
%w=bitcast i8*%v to i32*
%x=getelementptr inbounds i8,i8*%v,i64 -4
%y=bitcast i8*%x to i32*
store i32 1342177304,i32*%y,align 4
store i8*%v,i8**%b,align 8
store i32%m,i32*%w,align 4
%z=getelementptr inbounds i8,i8*%v,i64 4
%A=bitcast i8*%z to i32*
store i32%p,i32*%A,align 4
%B=load i8*,i8**%d,align 8
store i8*null,i8**%d,align 8
%C=getelementptr inbounds i8,i8*%v,i64 8
%D=bitcast i8*%C to i8**
store i8*%B,i8**%D,align 8
%E=load i8*,i8**%e,align 8
store i8*null,i8**%e,align 8
%F=getelementptr inbounds i8,i8*%v,i64 16
%G=bitcast i8*%F to i8**
store i8*%E,i8**%G,align 8
%H=getelementptr inbounds i8,i8*%v,i64 24
%I=bitcast i8*%H to i32*
store i32 6,i32*%I,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
%M=load i8*,i8**%c,align 8
%N=bitcast i8*%J to i8**
store i8*%M,i8**%N,align 8
%O=load i8*,i8**%b,align 8
%P=getelementptr inbounds i8,i8*%J,i64 8
%Q=bitcast i8*%P to i8**
store i8*%O,i8**%Q,align 8
%R=getelementptr inbounds i8,i8*%J,i64 16
%S=bitcast i8*%R to i32*
store i32 3,i32*%S,align 4
ret i8*%J
}
define internal fastcc i8*@_SMLL1f_604(i8*inreg%a)#4 gc"smlsharp"{
%b=alloca i8*,align 8
%c=alloca i8*,align 8
call void@llvm.gcroot(i8**%b,i8*null)#0
call void@llvm.gcroot(i8**%c,i8*null)#0
%d=bitcast i8*%a to i8**
%e=load i8*,i8**%d,align 8
%f=getelementptr inbounds i8,i8*%e,i64 8
%g=bitcast i8*%f to i8**
%h=load i8*,i8**%g,align 8
store i8*%h,i8**%b,align 8
%i=getelementptr inbounds i8,i8*%a,i64 8
%j=bitcast i8*%i to i8**
%k=load i8*,i8**%j,align 8
%l=getelementptr inbounds i8,i8*%k,i64 16
%m=bitcast i8*%l to i8**
%n=load i8*,i8**%m,align 8
store i8*%n,i8**%c,align 8
%o=call i8*@sml_alloc(i32 inreg 20)#0
%p=getelementptr inbounds i8,i8*%o,i64 -4
%q=bitcast i8*%p to i32*
store i32 1342177296,i32*%q,align 4
%r=load i8*,i8**%c,align 8
%s=bitcast i8*%o to i8**
store i8*%r,i8**%s,align 8
%t=load i8*,i8**%b,align 8
%u=getelementptr inbounds i8,i8*%o,i64 8
%v=bitcast i8*%u to i8**
store i8*%t,i8**%v,align 8
%w=getelementptr inbounds i8,i8*%o,i64 16
%x=bitcast i8*%w to i32*
store i32 3,i32*%x,align 4
ret i8*%o
}
define internal fastcc void@_SMLL1f_606(i8*inreg%a,i32 inreg%b)#2 gc"smlsharp"{
%c=alloca i8*,align 8
%d=alloca i8*,align 8
call void@llvm.gcroot(i8**%c,i8*null)#0
call void@llvm.gcroot(i8**%d,i8*null)#0
store i8*%a,i8**%c,align 8
%e=load atomic i32,i32*@sml_check_flag unordered,align 4
%f=icmp eq i32%e,0
br i1%f,label%h,label%g
g:
call void@sml_check(i32 inreg%e)
br label%h
h:
%i=call fastcc i8*@_SMLLN12TypedCalcCon4eqTyE_287(i8*inreg getelementptr inbounds(<{[4x i8],i32,[9x i8]}>,<{[4x i8],i32,[9x i8]}>*@bN,i64 0,i32 2,i64 0))
%j=getelementptr inbounds i8,i8*%i,i64 16
%k=bitcast i8*%j to i8*(i8*,i8*)**
%l=load i8*(i8*,i8*)*,i8*(i8*,i8*)**%k,align 8
%m=bitcast i8*%i to i8**
%n=load i8*,i8**%m,align 8
%o=load i8*,i8**%c,align 8
%p=getelementptr inbounds i8,i8*%o,i64 8
%q=bitcast i8*%p to i8**
%r=load i8*,i8**%q,align 8
%s=call fastcc i8*%l(i8*inreg%n,i8*inreg%r)
%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
store i8*%x,i8**%d,align 8
%y=call fastcc i8*@_SMLFN4List3mapE(i32 inreg 1,i32 inreg 8,i32 inreg 1,i32 inreg 8)
%z=getelementptr inbounds i8,i8*%y,i64 16
%A=bitcast i8*%z to i8*(i8*,i8*)**
%B=load i8*(i8*,i8*)*,i8*(i8*,i8*)**%A,align 8
%C=bitcast i8*%y to i8**
%D=load i8*,i8**%C,align 8
%E=call fastcc i8*%B(i8*inreg%D,i8*inreg bitcast(i8**getelementptr inbounds(<{[4x i8],i32,i8*,void(...)*,void(...)*,i32}>,<{[4x i8],i32,i8*,void(...)*,void(...)*,i32}>*@bO,i64 0,i32 2)to i8*))
%F=getelementptr inbounds i8,i8*%E,i64 16
%G=bitcast i8*%F to i8*(i8*,i8*)**
%H=load i8*(i8*,i8*)*,i8*(i8*,i8*)**%G,align 8
%I=bitcast i8*%E to i8**
%J=load i8*,i8**%I,align 8
%K=bitcast i8**%c to i8****
%L=load i8***,i8****%K,align 8
store i8*null,i8**%c,align 8
%M=load i8**,i8***%L,align 8
%N=load i8*,i8**%M,align 8
%O=call fastcc i8*%H(i8*inreg%J,i8*inreg%N)
%P=load i8*,i8**%d,align 8
store i8*null,i8**%d,align 8
%Q=call fastcc i8*%v(i8*inreg%P,i8*inreg%O)
ret void
}
define internal fastcc i8*@_SMLLN12TypedCalcCon8TPVALRECE_607(i8*inreg%a)#4 gc"smlsharp"{
%b=getelementptr inbounds i8,i8*%a,i64 8
%c=bitcast i8*%b to i8**
%d=load i8*,i8**%c,align 8
ret i8*%d
}
define internal fastcc i8*@_SMLLN12TypedCalcCon8TPVALRECE_609(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
%g=alloca i8*,align 8
call void@llvm.gcroot(i8**%c,i8*null)#0
call void@llvm.gcroot(i8**%d,i8*null)#0
call void@llvm.gcroot(i8**%e,i8*null)#0
call void@llvm.gcroot(i8**%f,i8*null)#0
call void@llvm.gcroot(i8**%g,i8*null)#0
store i8*%a,i8**%f,align 8
store i8*%b,i8**%c,align 8
%h=load atomic i32,i32*@sml_check_flag unordered,align 4
%i=icmp eq i32%h,0
br i1%i,label%l,label%j
j:
call void@sml_check(i32 inreg%h)
%k=load i8*,i8**%c,align 8
br label%l
l:
%m=phi i8*[%k,%j],[%b,%n]
store i8*null,i8**%c,align 8
store i8*%m,i8**%d,align 8
%o=getelementptr inbounds i8,i8*%m,i64 8
%p=bitcast i8*%o to i8**
%q=load i8*,i8**%p,align 8
store i8*%q,i8**%e,align 8
%r=call fastcc i8*@_SMLFN4List3mapE(i32 inreg 1,i32 inreg 8,i32 inreg 1,i32 inreg 8)
%s=getelementptr inbounds i8,i8*%r,i64 16
%t=bitcast i8*%s to i8*(i8*,i8*)**
%u=load i8*(i8*,i8*)*,i8*(i8*,i8*)**%t,align 8
%v=bitcast i8*%r to i8**
%w=load i8*,i8**%v,align 8
%x=call fastcc i8*%u(i8*inreg%w,i8*inreg bitcast(i8**getelementptr inbounds(<{[4x i8],i32,i8*,void(...)*,void(...)*,i32}>,<{[4x i8],i32,i8*,void(...)*,void(...)*,i32}>*@bM,i64 0,i32 2)to i8*))
%y=getelementptr inbounds i8,i8*%x,i64 16
%z=bitcast i8*%y to i8*(i8*,i8*)**
%A=load i8*(i8*,i8*)*,i8*(i8*,i8*)**%z,align 8
%B=bitcast i8*%x to i8**
%C=load i8*,i8**%B,align 8
%D=bitcast i8**%d to i8***
%E=load i8**,i8***%D,align 8
%F=load i8*,i8**%E,align 8
%G=call fastcc i8*%A(i8*inreg%C,i8*inreg%F)
store i8*%G,i8**%c,align 8
%H=call i8*@sml_alloc(i32 inreg 20)#0
%I=getelementptr inbounds i8,i8*%H,i64 -4
%J=bitcast i8*%I to i32*
store i32 1342177296,i32*%J,align 4
store i8*%H,i8**%g,align 8
%K=load i8*,i8**%d,align 8
%L=bitcast i8*%H to i8**
store i8*%K,i8**%L,align 8
%M=load i8*,i8**%e,align 8
%N=getelementptr inbounds i8,i8*%H,i64 8
%O=bitcast i8*%N to i8**
store i8*%M,i8**%O,align 8
%P=getelementptr inbounds i8,i8*%H,i64 16
%Q=bitcast i8*%P to i32*
store i32 3,i32*%Q,align 4
%R=call i8*@sml_alloc(i32 inreg 28)#0
%S=getelementptr inbounds i8,i8*%R,i64 -4
%T=bitcast i8*%S to i32*
store i32 1342177304,i32*%T,align 4
%U=load i8*,i8**%g,align 8
%V=bitcast i8*%R to i8**
store i8*%U,i8**%V,align 8
%W=getelementptr inbounds i8,i8*%R,i64 8
%X=bitcast i8*%W to void(...)**
store void(...)*bitcast(void(i8*,i32)*@_SMLL1f_606 to void(...)*),void(...)**%X,align 8
%Y=getelementptr inbounds i8,i8*%R,i64 16
%Z=bitcast i8*%Y to void(...)**
store void(...)*bitcast(i8*(i8*,i8*)*@_SMLL1f_792 to void(...)*),void(...)**%Z,align 8
%aa=getelementptr inbounds i8,i8*%R,i64 24
%ab=bitcast i8*%aa to i32*
store i32 -2147483647,i32*%ab,align 4
%ac=load i32*,i32**bitcast(i8**@_SMLZN7Control9checkTypeE to i32**),align 8
%ad=load i32,i32*%ac,align 4
%ae=icmp eq i32%ad,0
store i8*null,i8**%g,align 8
br i1%ae,label%ag,label%af
af:
call fastcc void@_SMLL1f_606(i8*inreg%U,i32 inreg 0)
br label%ag
ag:
%ah=bitcast i8**%f to i8***
%ai=load i8**,i8***%ah,align 8
%aj=load i8*,i8**%ai,align 8
store i8*%aj,i8**%f,align 8
%ak=call fastcc i8*@_SMLFN4List3mapE(i32 inreg 1,i32 inreg 8,i32 inreg 1,i32 inreg 8)
%al=getelementptr inbounds i8,i8*%ak,i64 16
%am=bitcast i8*%al to i8*(i8*,i8*)**
%an=load i8*(i8*,i8*)*,i8*(i8*,i8*)**%am,align 8
%ao=bitcast i8*%ak to i8**
%ap=load i8*,i8**%ao,align 8
%aq=call fastcc i8*%an(i8*inreg%ap,i8*inreg bitcast(i8**getelementptr inbounds(<{[4x i8],i32,i8*,void(...)*,void(...)*,i32}>,<{[4x i8],i32,i8*,void(...)*,void(...)*,i32}>*@bP,i64 0,i32 2)to i8*))
%ar=getelementptr inbounds i8,i8*%aq,i64 16
%as=bitcast i8*%ar to i8*(i8*,i8*)**
%at=load i8*(i8*,i8*)*,i8*(i8*,i8*)**%as,align 8
%au=bitcast i8*%aq to i8**
%av=load i8*,i8**%au,align 8
%aw=load i8**,i8***%D,align 8
store i8*null,i8**%d,align 8
%ax=load i8*,i8**%aw,align 8
%ay=call fastcc i8*%at(i8*inreg%av,i8*inreg%ax)
%az=load i8*,i8**%f,align 8
store i8*null,i8**%f,align 8
%aA=call fastcc i8*@_SMLLN12TypedCalcCon10makeVarEnvE_562(i8*inreg%az,i8*inreg%ay)
store i8*%aA,i8**%d,align 8
%aB=call i8*@sml_alloc(i32 inreg 20)#0
%aC=getelementptr inbounds i8,i8*%aB,i64 -4
%aD=bitcast i8*%aC to i32*
store i32 1342177296,i32*%aD,align 4
store i8*%aB,i8**%f,align 8
%aE=load i8*,i8**%c,align 8
store i8*null,i8**%c,align 8
%aF=bitcast i8*%aB to i8**
store i8*%aE,i8**%aF,align 8
%aG=load i8*,i8**%e,align 8
store i8*null,i8**%e,align 8
%aH=getelementptr inbounds i8,i8*%aB,i64 8
%aI=bitcast i8*%aH to i8**
store i8*%aG,i8**%aI,align 8
%aJ=getelementptr inbounds i8,i8*%aB,i64 16
%aK=bitcast i8*%aJ to i32*
store i32 3,i32*%aK,align 4
%aL=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
store i8*%aL,i8**%c,align 8
%aO=getelementptr inbounds i8,i8*%aL,i64 4
%aP=bitcast i8*%aO to i32*
store i32 0,i32*%aP,align 1
%aQ=bitcast i8*%aL to i32*
store i32 11,i32*%aQ,align 4
%aR=load i8*,i8**%f,align 8
store i8*null,i8**%f,align 8
%aS=getelementptr inbounds i8,i8*%aL,i64 8
%aT=bitcast i8*%aS to i8**
store i8*%aR,i8**%aT,align 8
%aU=getelementptr inbounds i8,i8*%aL,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=load i8*,i8**%c,align 8
%a0=bitcast i8*%aW to i8**
store i8*%aZ,i8**%a0,align 8
%a1=load i8*,i8**%d,align 8
%a2=getelementptr inbounds i8,i8*%aW,i64 8
%a3=bitcast i8*%a2 to i8**
store i8*%a1,i8**%a3,align 8
%a4=getelementptr inbounds i8,i8*%aW,i64 16
%a5=bitcast i8*%a4 to i32*
store i32 3,i32*%a5,align 4
ret i8*%aW
}
define internal fastcc i8*@_SMLL11newRecbinds_610(i8*inreg%a)#4 gc"smlsharp"{
%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
%f=bitcast i8*%a to i8***
%g=load i8**,i8***%f,align 8
%h=load i8*,i8**%g,align 8
store i8*%h,i8**%c,align 8
%i=getelementptr inbounds i8,i8*%a,i64 8
%j=bitcast i8*%i to i8**
%k=load i8*,i8**%j,align 8
%l=bitcast i8*%k to i32*
%m=load i32,i32*%l,align 4
%n=getelementptr inbounds i8,i8*%k,i64 4
%o=bitcast i8*%n to i32*
%p=load i32,i32*%o,align 4
%q=getelementptr inbounds i8,i8*%k,i64 8
%r=bitcast i8*%q to i8**
%s=load i8*,i8**%r,align 8
store i8*%s,i8**%d,align 8
%t=getelementptr inbounds i8*,i8**%g,i64 1
%u=load i8*,i8**%t,align 8
store i8*%u,i8**%e,align 8
%v=call i8*@sml_alloc(i32 inreg 28)#0
%w=bitcast i8*%v to i32*
%x=getelementptr inbounds i8,i8*%v,i64 -4
%y=bitcast i8*%x to i32*
store i32 1342177304,i32*%y,align 4
store i8*%v,i8**%b,align 8
store i32%m,i32*%w,align 4
%z=getelementptr inbounds i8,i8*%v,i64 4
%A=bitcast i8*%z to i32*
store i32%p,i32*%A,align 4
%B=load i8*,i8**%d,align 8
store i8*null,i8**%d,align 8
%C=getelementptr inbounds i8,i8*%v,i64 8
%D=bitcast i8*%C to i8**
store i8*%B,i8**%D,align 8
%E=load i8*,i8**%e,align 8
store i8*null,i8**%e,align 8
%F=getelementptr inbounds i8,i8*%v,i64 16
%G=bitcast i8*%F to i8**
store i8*%E,i8**%G,align 8
%H=getelementptr inbounds i8,i8*%v,i64 24
%I=bitcast i8*%H to i32*
store i32 6,i32*%I,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
%M=load i8*,i8**%c,align 8
%N=bitcast i8*%J to i8**
store i8*%M,i8**%N,align 8
%O=load i8*,i8**%b,align 8
%P=getelementptr inbounds i8,i8*%J,i64 8
%Q=bitcast i8*%P to i8**
store i8*%O,i8**%Q,align 8
%R=getelementptr inbounds i8,i8*%J,i64 16
%S=bitcast i8*%R to i32*
store i32 3,i32*%S,align 4
ret i8*%J
}
define internal fastcc i8*@_SMLL1f_613(i8*inreg%a)#4 gc"smlsharp"{
%b=alloca i8*,align 8
%c=alloca i8*,align 8
call void@llvm.gcroot(i8**%b,i8*null)#0
call void@llvm.gcroot(i8**%c,i8*null)#0
%d=bitcast i8*%a to i8**
%e=load i8*,i8**%d,align 8
%f=getelementptr inbounds i8,i8*%e,i64 8
%g=bitcast i8*%f to i8**
%h=load i8*,i8**%g,align 8
store i8*%h,i8**%b,align 8
%i=getelementptr inbounds i8,i8*%a,i64 8
%j=bitcast i8*%i to i8**
%k=load i8*,i8**%j,align 8
%l=getelementptr inbounds i8,i8*%k,i64 16
%m=bitcast i8*%l to i8**
%n=load i8*,i8**%m,align 8
store i8*%n,i8**%c,align 8
%o=call i8*@sml_alloc(i32 inreg 20)#0
%p=getelementptr inbounds i8,i8*%o,i64 -4
%q=bitcast i8*%p to i32*
store i32 1342177296,i32*%q,align 4
%r=load i8*,i8**%c,align 8
%s=bitcast i8*%o to i8**
store i8*%r,i8**%s,align 8
%t=load i8*,i8**%b,align 8
%u=getelementptr inbounds i8,i8*%o,i64 8
%v=bitcast i8*%u to i8**
store i8*%t,i8**%v,align 8
%w=getelementptr inbounds i8,i8*%o,i64 16
%x=bitcast i8*%w to i32*
store i32 3,i32*%x,align 4
ret i8*%o
}
define internal fastcc void@_SMLL1f_615(i8*inreg%a,i32 inreg%b)#2 gc"smlsharp"{
%c=alloca i8*,align 8
%d=alloca i8*,align 8
call void@llvm.gcroot(i8**%c,i8*null)#0
call void@llvm.gcroot(i8**%d,i8*null)#0
store i8*%a,i8**%c,align 8
%e=load atomic i32,i32*@sml_check_flag unordered,align 4
%f=icmp eq i32%e,0
br i1%f,label%h,label%g
g:
call void@sml_check(i32 inreg%e)
br label%h
h:
%i=call fastcc i8*@_SMLLN12TypedCalcCon4eqTyE_287(i8*inreg getelementptr inbounds(<{[4x i8],i32,[13x i8]}>,<{[4x i8],i32,[13x i8]}>*@bR,i64 0,i32 2,i64 0))
%j=getelementptr inbounds i8,i8*%i,i64 16
%k=bitcast i8*%j to i8*(i8*,i8*)**
%l=load i8*(i8*,i8*)*,i8*(i8*,i8*)**%k,align 8
%m=bitcast i8*%i to i8**
%n=load i8*,i8**%m,align 8
%o=load i8*,i8**%c,align 8
%p=getelementptr inbounds i8,i8*%o,i64 8
%q=bitcast i8*%p to i8**
%r=load i8*,i8**%q,align 8
%s=call fastcc i8*%l(i8*inreg%n,i8*inreg%r)
%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
store i8*%x,i8**%d,align 8
%y=call fastcc i8*@_SMLFN4List3mapE(i32 inreg 1,i32 inreg 8,i32 inreg 1,i32 inreg 8)
%z=getelementptr inbounds i8,i8*%y,i64 16
%A=bitcast i8*%z to i8*(i8*,i8*)**
%B=load i8*(i8*,i8*)*,i8*(i8*,i8*)**%A,align 8
%C=bitcast i8*%y to i8**
%D=load i8*,i8**%C,align 8
%E=call fastcc i8*%B(i8*inreg%D,i8*inreg bitcast(i8**getelementptr inbounds(<{[4x i8],i32,i8*,void(...)*,void(...)*,i32}>,<{[4x i8],i32,i8*,void(...)*,void(...)*,i32}>*@bS,i64 0,i32 2)to i8*))
%F=getelementptr inbounds i8,i8*%E,i64 16
%G=bitcast i8*%F to i8*(i8*,i8*)**
%H=load i8*(i8*,i8*)*,i8*(i8*,i8*)**%G,align 8
%I=bitcast i8*%E to i8**
%J=load i8*,i8**%I,align 8
%K=bitcast i8**%c to i8***
%L=load i8**,i8***%K,align 8
store i8*null,i8**%c,align 8
%M=load i8*,i8**%L,align 8
%N=getelementptr inbounds i8,i8*%M,i64 24
%O=bitcast i8*%N to i8**
%P=load i8*,i8**%O,align 8
%Q=call fastcc i8*%H(i8*inreg%J,i8*inreg%P)
%R=load i8*,i8**%d,align 8
store i8*null,i8**%d,align 8
%S=call fastcc i8*%v(i8*inreg%R,i8*inreg%Q)
ret void
}
define internal fastcc i8*@_SMLLN12TypedCalcCon12TPVALPOLYRECE_616(i8*inreg%a)#4 gc"smlsharp"{
%b=getelementptr inbounds i8,i8*%a,i64 8
%c=bitcast i8*%b to i8**
%d=load i8*,i8**%c,align 8
ret i8*%d
}
define internal fastcc i8*@_SMLLN12TypedCalcCon12TPVALPOLYRECE_618(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
%h=alloca i8*,align 8
%i=alloca i8*,align 8
call void@llvm.gcroot(i8**%c,i8*null)#0
call void@llvm.gcroot(i8**%d,i8*null)#0
call void@llvm.gcroot(i8**%e,i8*null)#0
call void@llvm.gcroot(i8**%f,i8*null)#0
call void@llvm.gcroot(i8**%g,i8*null)#0
call void@llvm.gcroot(i8**%h,i8*null)#0
call void@llvm.gcroot(i8**%i,i8*null)#0
store i8*%a,i8**%h,align 8
store i8*%b,i8**%c,align 8
%j=load atomic i32,i32*@sml_check_flag unordered,align 4
%k=icmp eq i32%j,0
br i1%k,label%n,label%l
l:
call void@sml_check(i32 inreg%j)
%m=load i8*,i8**%c,align 8
br label%n
n:
%o=phi i8*[%m,%l],[%b,%p]
store i8*null,i8**%c,align 8
store i8*%o,i8**%d,align 8
%q=bitcast i8*%o to i8**
%r=load i8*,i8**%q,align 8
store i8*%r,i8**%e,align 8
%s=getelementptr inbounds i8,i8*%o,i64 8
%t=bitcast i8*%s to i8**
%u=load i8*,i8**%t,align 8
store i8*%u,i8**%f,align 8
%v=getelementptr inbounds i8,i8*%o,i64 16
%w=bitcast i8*%v to i8**
%x=load i8*,i8**%w,align 8
store i8*%x,i8**%g,align 8
%y=call fastcc i8*@_SMLFN4List3mapE(i32 inreg 1,i32 inreg 8,i32 inreg 1,i32 inreg 8)
%z=getelementptr inbounds i8,i8*%y,i64 16
%A=bitcast i8*%z to i8*(i8*,i8*)**
%B=load i8*(i8*,i8*)*,i8*(i8*,i8*)**%A,align 8
%C=bitcast i8*%y to i8**
%D=load i8*,i8**%C,align 8
%E=call fastcc i8*%B(i8*inreg%D,i8*inreg bitcast(i8**getelementptr inbounds(<{[4x i8],i32,i8*,void(...)*,void(...)*,i32}>,<{[4x i8],i32,i8*,void(...)*,void(...)*,i32}>*@bQ,i64 0,i32 2)to i8*))
%F=getelementptr inbounds i8,i8*%E,i64 16
%G=bitcast i8*%F to i8*(i8*,i8*)**
%H=load i8*(i8*,i8*)*,i8*(i8*,i8*)**%G,align 8
%I=bitcast i8*%E to i8**
%J=load i8*,i8**%I,align 8
%K=load i8*,i8**%d,align 8
%L=getelementptr inbounds i8,i8*%K,i64 24
%M=bitcast i8*%L to i8**
%N=load i8*,i8**%M,align 8
%O=call fastcc i8*%H(i8*inreg%J,i8*inreg%N)
store i8*%O,i8**%c,align 8
%P=call i8*@sml_alloc(i32 inreg 20)#0
%Q=getelementptr inbounds i8,i8*%P,i64 -4
%R=bitcast i8*%Q to i32*
store i32 1342177296,i32*%R,align 4
store i8*%P,i8**%i,align 8
%S=load i8*,i8**%d,align 8
%T=bitcast i8*%P to i8**
store i8*%S,i8**%T,align 8
%U=load i8*,i8**%g,align 8
%V=getelementptr inbounds i8,i8*%P,i64 8
%W=bitcast i8*%V to i8**
store i8*%U,i8**%W,align 8
%X=getelementptr inbounds i8,i8*%P,i64 16
%Y=bitcast i8*%X to i32*
store i32 3,i32*%Y,align 4
%Z=call i8*@sml_alloc(i32 inreg 28)#0
%aa=getelementptr inbounds i8,i8*%Z,i64 -4
%ab=bitcast i8*%aa to i32*
store i32 1342177304,i32*%ab,align 4
%ac=load i8*,i8**%i,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 void(...)**
store void(...)*bitcast(void(i8*,i32)*@_SMLL1f_615 to void(...)*),void(...)**%af,align 8
%ag=getelementptr inbounds i8,i8*%Z,i64 16
%ah=bitcast i8*%ag to void(...)**
store void(...)*bitcast(i8*(i8*,i8*)*@_SMLL1f_796 to void(...)*),void(...)**%ah,align 8
%ai=getelementptr inbounds i8,i8*%Z,i64 24
%aj=bitcast i8*%ai to i32*
store i32 -2147483647,i32*%aj,align 4
%ak=load i32*,i32**bitcast(i8**@_SMLZN7Control9checkTypeE to i32**),align 8
%al=load i32,i32*%ak,align 4
%am=icmp eq i32%al,0
store i8*null,i8**%i,align 8
br i1%am,label%ao,label%an
an:
call fastcc void@_SMLL1f_615(i8*inreg%ac,i32 inreg 0)
br label%ao
ao:
%ap=bitcast i8**%h to i8***
%aq=load i8**,i8***%ap,align 8
%ar=load i8*,i8**%aq,align 8
store i8*%ar,i8**%h,align 8
%as=call i8*@sml_alloc(i32 inreg 20)#0
%at=getelementptr inbounds i8,i8*%as,i64 -4
%au=bitcast i8*%at to i32*
store i32 1342177296,i32*%au,align 4
%av=load i8*,i8**%e,align 8
%aw=bitcast i8*%as to i8**
store i8*%av,i8**%aw,align 8
%ax=load i8*,i8**%f,align 8
%ay=getelementptr inbounds i8,i8*%as,i64 8
%az=bitcast i8*%ay to i8**
store i8*%ax,i8**%az,align 8
%aA=getelementptr inbounds i8,i8*%as,i64 16
%aB=bitcast i8*%aA to i32*
store i32 3,i32*%aB,align 4
%aC=load i8*,i8**%h,align 8
store i8*null,i8**%h,align 8
%aD=call fastcc i8*@_SMLLN12TypedCalcCon9clsVarEnvE_568(i8*inreg%aC,i8*inreg%as)
%aE=getelementptr inbounds i8,i8*%aD,i64 16
%aF=bitcast i8*%aE to i8*(i8*,i8*)**
%aG=load i8*(i8*,i8*)*,i8*(i8*,i8*)**%aF,align 8
%aH=bitcast i8*%aD to i8**
%aI=load i8*,i8**%aH,align 8
store i8*%aI,i8**%h,align 8
%aJ=call fastcc i8*@_SMLFN4List3mapE(i32 inreg 1,i32 inreg 8,i32 inreg 1,i32 inreg 8)
%aK=getelementptr inbounds i8,i8*%aJ,i64 16
%aL=bitcast i8*%aK to i8*(i8*,i8*)**
%aM=load i8*(i8*,i8*)*,i8*(i8*,i8*)**%aL,align 8
%aN=bitcast i8*%aJ to i8**
%aO=load i8*,i8**%aN,align 8
%aP=call fastcc i8*%aM(i8*inreg%aO,i8*inreg bitcast(i8**getelementptr inbounds(<{[4x i8],i32,i8*,void(...)*,void(...)*,i32}>,<{[4x i8],i32,i8*,void(...)*,void(...)*,i32}>*@bT,i64 0,i32 2)to i8*))
%aQ=getelementptr inbounds i8,i8*%aP,i64 16
%aR=bitcast i8*%aQ to i8*(i8*,i8*)**
%aS=load i8*(i8*,i8*)*,i8*(i8*,i8*)**%aR,align 8
%aT=bitcast i8*%aP to i8**
%aU=load i8*,i8**%aT,align 8
%aV=load i8*,i8**%d,align 8
store i8*null,i8**%d,align 8
%aW=getelementptr inbounds i8,i8*%aV,i64 24
%aX=bitcast i8*%aW to i8**
%aY=load i8*,i8**%aX,align 8
%aZ=call fastcc i8*%aS(i8*inreg%aU,i8*inreg%aY)
%a0=load i8*,i8**%h,align 8
store i8*null,i8**%h,align 8
%a1=call fastcc i8*%aG(i8*inreg%a0,i8*inreg%aZ)
store i8*%a1,i8**%d,align 8
%a2=call i8*@sml_alloc(i32 inreg 36)#0
%a3=getelementptr inbounds i8,i8*%a2,i64 -4
%a4=bitcast i8*%a3 to i32*
store i32 1342177312,i32*%a4,align 4
store i8*%a2,i8**%h,align 8
%a5=load i8*,i8**%e,align 8
store i8*null,i8**%e,align 8
%a6=bitcast i8*%a2 to i8**
store i8*%a5,i8**%a6,align 8
%a7=load i8*,i8**%f,align 8
store i8*null,i8**%f,align 8
%a8=getelementptr inbounds i8,i8*%a2,i64 8
%a9=bitcast i8*%a8 to i8**
store i8*%a7,i8**%a9,align 8
%ba=load i8*,i8**%g,align 8
store i8*null,i8**%g,align 8
%bb=getelementptr inbounds i8,i8*%a2,i64 16
%bc=bitcast i8*%bb to i8**
store i8*%ba,i8**%bc,align 8
%bd=load i8*,i8**%c,align 8
store i8*null,i8**%c,align 8
%be=getelementptr inbounds i8,i8*%a2,i64 24
%bf=bitcast i8*%be to i8**
store i8*%bd,i8**%bf,align 8
%bg=getelementptr inbounds i8,i8*%a2,i64 32
%bh=bitcast i8*%bg to i32*
store i32 15,i32*%bh,align 4
%bi=call i8*@sml_alloc(i32 inreg 20)#0
%bj=getelementptr inbounds i8,i8*%bi,i64 -4
%bk=bitcast i8*%bj to i32*
store i32 1342177296,i32*%bk,align 4
store i8*%bi,i8**%c,align 8
%bl=getelementptr inbounds i8,i8*%bi,i64 4
%bm=bitcast i8*%bl to i32*
store i32 0,i32*%bm,align 1
%bn=bitcast i8*%bi to i32*
store i32 10,i32*%bn,align 4
%bo=load i8*,i8**%h,align 8
store i8*null,i8**%h,align 8
%bp=getelementptr inbounds i8,i8*%bi,i64 8
%bq=bitcast i8*%bp to i8**
store i8*%bo,i8**%bq,align 8
%br=getelementptr inbounds i8,i8*%bi,i64 16
%bs=bitcast i8*%br to i32*
store i32 2,i32*%bs,align 4
%bt=call i8*@sml_alloc(i32 inreg 20)#0
%bu=getelementptr inbounds i8,i8*%bt,i64 -4
%bv=bitcast i8*%bu to i32*
store i32 1342177296,i32*%bv,align 4
%bw=load i8*,i8**%c,align 8
%bx=bitcast i8*%bt to i8**
store i8*%bw,i8**%bx,align 8
%by=load i8*,i8**%d,align 8
%bz=getelementptr inbounds i8,i8*%bt,i64 8
%bA=bitcast i8*%bz to i8**
store i8*%by,i8**%bA,align 8
%bB=getelementptr inbounds i8,i8*%bt,i64 16
%bC=bitcast i8*%bB to i32*
store i32 3,i32*%bC,align 4
ret i8*%bt
}
define fastcc i8*@_SMLFN12TypedCalcCon10TPCONSTANTE(i8*inreg%a)#4 gc"smlsharp"{
%b=alloca i8*,align 8
%c=alloca i8*,align 8
%d=alloca i8*,align 8
call void@llvm.gcroot(i8**%b,i8*null)#0
call void@llvm.gcroot(i8**%c,i8*null)#0
call void@llvm.gcroot(i8**%d,i8*null)#0
store i8*%a,i8**%b,align 8
%e=getelementptr inbounds i8,i8*%a,i64 16
%f=bitcast i8*%e to i8**
%g=load i8*,i8**%f,align 8
store i8*%g,i8**%c,align 8
%h=call i8*@sml_alloc(i32 inreg 20)#0
%i=getelementptr inbounds i8,i8*%h,i64 -4
%j=bitcast i8*%i to i32*
store i32 1342177296,i32*%j,align 4
store i8*%h,i8**%d,align 8
%k=getelementptr inbounds i8,i8*%h,i64 4
%l=bitcast i8*%k to i32*
store i32 0,i32*%l,align 1
%m=bitcast i8*%h to i32*
store i32 5,i32*%m,align 4
%n=load i8*,i8**%b,align 8
store i8*null,i8**%b,align 8
%o=getelementptr inbounds i8,i8*%h,i64 8
%p=bitcast i8*%o to i8**
store i8*%n,i8**%p,align 8
%q=getelementptr inbounds i8,i8*%h,i64 16
%r=bitcast i8*%q to i32*
store i32 2,i32*%r,align 4
%s=call i8*@sml_alloc(i32 inreg 20)#0
%t=getelementptr inbounds i8,i8*%s,i64 -4
%u=bitcast i8*%t to i32*
store i32 1342177296,i32*%u,align 4
%v=load i8*,i8**%d,align 8
%w=bitcast i8*%s to i8**
store i8*%v,i8**%w,align 8
%x=load i8*,i8**%c,align 8
%y=getelementptr inbounds i8,i8*%s,i64 8
%z=bitcast i8*%y to i8**
store i8*%x,i8**%z,align 8
%A=getelementptr inbounds i8,i8*%s,i64 16
%B=bitcast i8*%A to i32*
store i32 3,i32*%B,align 4
ret i8*%s
}
define fastcc i8*@_SMLFN12TypedCalcCon8TPSIZEOFE(i8*inreg%a)#4 gc"smlsharp"{
%b=alloca i8*,align 8
%c=alloca i8*,align 8
%d=alloca i8*,align 8
call void@llvm.gcroot(i8**%b,i8*null)#0
call void@llvm.gcroot(i8**%c,i8*null)#0
call void@llvm.gcroot(i8**%d,i8*null)#0
%e=bitcast i8*%a to i8**
%f=load i8*,i8**%e,align 8
store i8*%f,i8**%b,align 8
%g=getelementptr inbounds i8,i8*%a,i64 8
%h=bitcast i8*%g to i8**
%i=load i8*,i8**%h,align 8
store i8*%i,i8**%c,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
store i8*%j,i8**%d,align 8
%m=load i8*,i8**%b,align 8
%n=bitcast i8*%j to i8**
store i8*%m,i8**%n,align 8
%o=load i8*,i8**%c,align 8
store i8*null,i8**%c,align 8
%p=getelementptr inbounds i8,i8*%j,i64 8
%q=bitcast i8*%p to i8**
store i8*%o,i8**%q,align 8
%r=getelementptr inbounds i8,i8*%j,i64 16
%s=bitcast i8*%r to i32*
store i32 3,i32*%s,align 4
%t=call i8*@sml_alloc(i32 inreg 20)#0
%u=getelementptr inbounds i8,i8*%t,i64 -4
%v=bitcast i8*%u to i32*
store i32 1342177296,i32*%v,align 4
store i8*%t,i8**%c,align 8
%w=getelementptr inbounds i8,i8*%t,i64 4
%x=bitcast i8*%w to i32*
store i32 0,i32*%x,align 1
%y=bitcast i8*%t to i32*
store i32 36,i32*%y,align 4
%z=load i8*,i8**%d,align 8
store i8*null,i8**%d,align 8
%A=getelementptr inbounds i8,i8*%t,i64 8
%B=bitcast i8*%A to i8**
store i8*%z,i8**%B,align 8
%C=getelementptr inbounds i8,i8*%t,i64 16
%D=bitcast i8*%C to i32*
store i32 2,i32*%D,align 4
%E=call i8*@sml_alloc(i32 inreg 20)#0
%F=getelementptr inbounds i8,i8*%E,i64 -4
%G=bitcast i8*%F to i32*
store i32 1342177296,i32*%G,align 4
store i8*%E,i8**%d,align 8
%H=getelementptr inbounds i8,i8*%E,i64 4
%I=bitcast i8*%H to i32*
store i32 0,i32*%I,align 1
%J=bitcast i8*%E to i32*
store i32 3,i32*%J,align 4
%K=load i8*,i8**%b,align 8
store i8*null,i8**%b,align 8
%L=getelementptr inbounds i8,i8*%E,i64 8
%M=bitcast i8*%L to i8**
store i8*%K,i8**%M,align 8
%N=getelementptr inbounds i8,i8*%E,i64 16
%O=bitcast i8*%N to i32*
store i32 2,i32*%O,align 4
%P=call i8*@sml_alloc(i32 inreg 20)#0
%Q=getelementptr inbounds i8,i8*%P,i64 -4
%R=bitcast i8*%Q to i32*
store i32 1342177296,i32*%R,align 4
store i8*%P,i8**%b,align 8
%S=getelementptr inbounds i8,i8*%P,i64 4
%T=bitcast i8*%S to i32*
store i32 0,i32*%T,align 1
%U=bitcast i8*%P to i32*
store i32 9,i32*%U,align 4
%V=load i8*,i8**%d,align 8
store i8*null,i8**%d,align 8
%W=getelementptr inbounds i8,i8*%P,i64 8
%X=bitcast i8*%W to i8**
store i8*%V,i8**%X,align 8
%Y=getelementptr inbounds i8,i8*%P,i64 16
%Z=bitcast i8*%Y to i32*
store i32 2,i32*%Z,align 4
%aa=call i8*@sml_alloc(i32 inreg 20)#0
%ab=getelementptr inbounds i8,i8*%aa,i64 -4
%ac=bitcast i8*%ab to i32*
store i32 1342177296,i32*%ac,align 4
%ad=load i8*,i8**%c,align 8
%ae=bitcast i8*%aa to i8**
store i8*%ad,i8**%ae,align 8
%af=load i8*,i8**%b,align 8
%ag=getelementptr inbounds i8,i8*%aa,i64 8
%ah=bitcast i8*%ag to i8**
store i8*%af,i8**%ah,align 8
%ai=getelementptr inbounds i8,i8*%aa,i64 16
%aj=bitcast i8*%ai to i32*
store i32 3,i32*%aj,align 4
ret i8*%aa
}
define fastcc i8*@_SMLFN12TypedCalcCon8TPEXNTAGE(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 20)#0
%e=getelementptr inbounds i8,i8*%d,i64 -4
%f=bitcast i8*%e to i32*
store i32 1342177296,i32*%f,align 4
store i8*%d,i8**%c,align 8
%g=getelementptr inbounds i8,i8*%d,i64 4
%h=bitcast i8*%g to i32*
store i32 0,i32*%h,align 1
%i=bitcast i8*%d to i32*
store i32 17,i32*%i,align 4
%j=load i8*,i8**%b,align 8
%k=getelementptr inbounds i8,i8*%d,i64 8
%l=bitcast i8*%k to i8**
store i8*%j,i8**%l,align 8
%m=getelementptr inbounds i8,i8*%d,i64 16
%n=bitcast i8*%m to i32*
store i32 2,i32*%n,align 4
%o=load i8*,i8**@_SMLZN12BuiltinTypes8exntagTyE,align 8
store i8*%o,i8**%b,align 8
%p=call i8*@sml_alloc(i32 inreg 20)#0
%q=getelementptr inbounds i8,i8*%p,i64 -4
%r=bitcast i8*%q to i32*
store i32 1342177296,i32*%r,align 4
%s=load i8*,i8**%c,align 8
%t=bitcast i8*%p to i8**
store i8*%s,i8**%t,align 8
%u=load i8*,i8**%b,align 8
%v=getelementptr inbounds i8,i8*%p,i64 8
%w=bitcast i8*%v to i8**
store i8*%u,i8**%w,align 8
%x=getelementptr inbounds i8,i8*%p,i64 16
%y=bitcast i8*%x to i32*
store i32 3,i32*%y,align 4
ret i8*%p
}
define fastcc i8*@_SMLFN12TypedCalcCon10TPEXEXNTAGE(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 20)#0
%e=getelementptr inbounds i8,i8*%d,i64 -4
%f=bitcast i8*%e to i32*
store i32 1342177296,i32*%f,align 4
store i8*%d,i8**%c,align 8
%g=getelementptr inbounds i8,i8*%d,i64 4
%h=bitcast i8*%g to i32*
store i32 0,i32*%h,align 1
%i=bitcast i8*%d to i32*
store i32 15,i32*%i,align 4
%j=load i8*,i8**%b,align 8
%k=getelementptr inbounds i8,i8*%d,i64 8
%l=bitcast i8*%k to i8**
store i8*%j,i8**%l,align 8
%m=getelementptr inbounds i8,i8*%d,i64 16
%n=bitcast i8*%m to i32*
store i32 2,i32*%n,align 4
%o=load i8*,i8**@_SMLZN12BuiltinTypes8exntagTyE,align 8
store i8*%o,i8**%b,align 8
%p=call i8*@sml_alloc(i32 inreg 20)#0
%q=getelementptr inbounds i8,i8*%p,i64 -4
%r=bitcast i8*%q to i32*
store i32 1342177296,i32*%r,align 4
%s=load i8*,i8**%c,align 8
%t=bitcast i8*%p to i8**
store i8*%s,i8**%t,align 8
%u=load i8*,i8**%b,align 8
%v=getelementptr inbounds i8,i8*%p,i64 8
%w=bitcast i8*%v to i8**
store i8*%u,i8**%w,align 8
%x=getelementptr inbounds i8,i8*%p,i64 16
%y=bitcast i8*%x to i32*
store i32 3,i32*%y,align 4
ret i8*%p
}
define fastcc i8*@_SMLFN12TypedCalcCon7TPEXVARE(i8*inreg%a)#4 gc"smlsharp"{
%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
%f=bitcast i8*%a to i8**
%g=load i8*,i8**%f,align 8
store i8*%g,i8**%b,align 8
%h=getelementptr inbounds i8,i8*%g,i64 8
%i=bitcast i8*%h to i8**
%j=load i8*,i8**%i,align 8
store i8*%j,i8**%c,align 8
%k=getelementptr inbounds i8,i8*%a,i64 8
%l=bitcast i8*%k to i8**
%m=load i8*,i8**%l,align 8
store i8*%m,i8**%d,align 8
%n=call i8*@sml_alloc(i32 inreg 20)#0
%o=getelementptr inbounds i8,i8*%n,i64 -4
%p=bitcast i8*%o to i32*
store i32 1342177296,i32*%p,align 4
store i8*%n,i8**%e,align 8
%q=load i8*,i8**%b,align 8
store i8*null,i8**%b,align 8
%r=bitcast i8*%n to i8**
store i8*%q,i8**%r,align 8
%s=load i8*,i8**%d,align 8
store i8*null,i8**%d,align 8
%t=getelementptr inbounds i8,i8*%n,i64 8
%u=bitcast i8*%t to i8**
store i8*%s,i8**%u,align 8
%v=getelementptr inbounds i8,i8*%n,i64 16
%w=bitcast i8*%v to i32*
store i32 3,i32*%w,align 4
%x=call i8*@sml_alloc(i32 inreg 20)#0
%y=getelementptr inbounds i8,i8*%x,i64 -4
%z=bitcast i8*%y to i32*
store i32 1342177296,i32*%z,align 4
store i8*%x,i8**%b,align 8
%A=getelementptr inbounds i8,i8*%x,i64 4
%B=bitcast i8*%A to i32*
store i32 0,i32*%B,align 1
%C=bitcast i8*%x to i32*
store i32 18,i32*%C,align 4
%D=load i8*,i8**%e,align 8
store i8*null,i8**%e,align 8
%E=getelementptr inbounds i8,i8*%x,i64 8
%F=bitcast i8*%E to i8**
store i8*%D,i8**%F,align 8
%G=getelementptr inbounds i8,i8*%x,i64 16
%H=bitcast i8*%G to i32*
store i32 2,i32*%H,align 4
%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
%M=bitcast i8*%I to i8**
store i8*%L,i8**%M,align 8
%N=load i8*,i8**%c,align 8
%O=getelementptr inbounds i8,i8*%I,i64 8
%P=bitcast i8*%O to i8**
store i8*%N,i8**%P,align 8
%Q=getelementptr inbounds i8,i8*%I,i64 16
%R=bitcast i8*%Q to i32*
store i32 3,i32*%R,align 4
ret i8*%I
}
define fastcc i8*@_SMLFN12TypedCalcCon5TPVARE(i8*inreg%a)#4 gc"smlsharp"{
%b=alloca i8*,align 8
%c=alloca i8*,align 8
%d=alloca i8*,align 8
call void@llvm.gcroot(i8**%b,i8*null)#0
call void@llvm.gcroot(i8**%c,i8*null)#0
call void@llvm.gcroot(i8**%d,i8*null)#0
store i8*%a,i8**%b,align 8
%e=getelementptr inbounds i8,i8*%a,i64 16
%f=bitcast i8*%e to i8**
%g=load i8*,i8**%f,align 8
store i8*%g,i8**%c,align 8
%h=call i8*@sml_alloc(i32 inreg 20)#0
%i=getelementptr inbounds i8,i8*%h,i64 -4
%j=bitcast i8*%i to i32*
store i32 1342177296,i32*%j,align 4
store i8*%h,i8**%d,align 8
%k=getelementptr inbounds i8,i8*%h,i64 4
%l=bitcast i8*%k to i32*
store i32 0,i32*%l,align 1
%m=bitcast i8*%h to i32*
store i32 40,i32*%m,align 4
%n=load i8*,i8**%b,align 8
store i8*null,i8**%b,align 8
%o=getelementptr inbounds i8,i8*%h,i64 8
%p=bitcast i8*%o to i8**
store i8*%n,i8**%p,align 8
%q=getelementptr inbounds i8,i8*%h,i64 16
%r=bitcast i8*%q to i32*
store i32 2,i32*%r,align 4
%s=call i8*@sml_alloc(i32 inreg 20)#0
%t=getelementptr inbounds i8,i8*%s,i64 -4
%u=bitcast i8*%t to i32*
store i32 1342177296,i32*%u,align 4
%v=load i8*,i8**%d,align 8
%w=bitcast i8*%s to i8**
store i8*%v,i8**%w,align 8
%x=load i8*,i8**%c,align 8
%y=getelementptr inbounds i8,i8*%s,i64 8
%z=bitcast i8*%y to i8**
store i8*%x,i8**%z,align 8
%A=getelementptr inbounds i8,i8*%s,i64 16
%B=bitcast i8*%A to i32*
store i32 3,i32*%B,align 4
ret i8*%s
}
define fastcc i8*@_SMLFN12TypedCalcCon11TPRECFUNVARE(i8*inreg%a)#4 gc"smlsharp"{
%b=alloca i8*,align 8
%c=alloca i8*,align 8
%d=alloca i8*,align 8
call void@llvm.gcroot(i8**%b,i8*null)#0
call void@llvm.gcroot(i8**%c,i8*null)#0
call void@llvm.gcroot(i8**%d,i8*null)#0
store i8*%a,i8**%b,align 8
%e=getelementptr inbounds i8,i8*%a,i64 8
%f=bitcast i8*%e to i8**
%g=load i8*,i8**%f,align 8
%h=getelementptr inbounds i8,i8*%g,i64 16
%i=bitcast i8*%h to i8**
%j=load i8*,i8**%i,align 8
store i8*%j,i8**%c,align 8
%k=call i8*@sml_alloc(i32 inreg 20)#0
%l=getelementptr inbounds i8,i8*%k,i64 -4
%m=bitcast i8*%l to i32*
store i32 1342177296,i32*%m,align 4
store i8*%k,i8**%d,align 8
%n=getelementptr inbounds i8,i8*%k,i64 4
%o=bitcast i8*%n to i32*
store i32 0,i32*%o,align 1
%p=bitcast i8*%k to i32*
store i32 32,i32*%p,align 4
%q=load i8*,i8**%b,align 8
store i8*null,i8**%b,align 8
%r=getelementptr inbounds i8,i8*%k,i64 8
%s=bitcast i8*%r to i8**
store i8*%q,i8**%s,align 8
%t=getelementptr inbounds i8,i8*%k,i64 16
%u=bitcast i8*%t to i32*
store i32 2,i32*%u,align 4
%v=call i8*@sml_alloc(i32 inreg 20)#0
%w=getelementptr inbounds i8,i8*%v,i64 -4
%x=bitcast i8*%w to i32*
store i32 1342177296,i32*%x,align 4
%y=load i8*,i8**%d,align 8
%z=bitcast i8*%v to i8**
store i8*%y,i8**%z,align 8
%A=load i8*,i8**%c,align 8
%B=getelementptr inbounds i8,i8*%v,i64 8
%C=bitcast i8*%B to i8**
store i8*%A,i8**%C,align 8
%D=getelementptr inbounds i8,i8*%v,i64 16
%E=bitcast i8*%D to i32*
store i32 3,i32*%E,align 4
ret i8*%v
}
define fastcc i8*@_SMLFN12TypedCalcCon13TPPATCONSTANTE(i8*inreg%a)#2 gc"smlsharp"{
l:
%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=load atomic i32,i32*@sml_check_flag unordered,align 4
%g=icmp eq i32%f,0
br i1%g,label%j,label%h
h:
call void@sml_check(i32 inreg%f)
%i=load i8*,i8**%b,align 8
br label%j
j:
%k=phi i8*[%i,%h],[%a,%l]
%m=getelementptr inbounds i8,i8*%k,i64 8
%n=bitcast i8*%m to i8**
%o=load i8*,i8**%n,align 8
store i8*%o,i8**%c,align 8
%p=call i8*@sml_alloc(i32 inreg 20)#0
%q=getelementptr inbounds i8,i8*%p,i64 -4
%r=bitcast i8*%q to i32*
store i32 1342177296,i32*%r,align 4
store i8*%p,i8**%d,align 8
%s=bitcast i8*%p to i64*
store i64 0,i64*%s,align 4
%t=load i8*,i8**%b,align 8
%u=getelementptr inbounds i8,i8*%p,i64 8
%v=bitcast i8*%u to i8**
store i8*%t,i8**%v,align 8
%w=getelementptr inbounds i8,i8*%p,i64 16
%x=bitcast i8*%w to i32*
store i32 2,i32*%x,align 4
%y=load i8*,i8**@_SMLZN5VarID3Map5emptyE,align 8
store i8*%y,i8**%b,align 8
%z=call i8*@sml_alloc(i32 inreg 28)#0
%A=getelementptr inbounds i8,i8*%z,i64 -4
%B=bitcast i8*%A to i32*
store i32 1342177304,i32*%B,align 4
%C=load i8*,i8**%d,align 8
%D=bitcast i8*%z to i8**
store i8*%C,i8**%D,align 8
%E=load i8*,i8**%c,align 8
%F=getelementptr inbounds i8,i8*%z,i64 8
%G=bitcast i8*%F to i8**
store i8*%E,i8**%G,align 8
%H=load i8*,i8**%b,align 8
%I=getelementptr inbounds i8,i8*%z,i64 16
%J=bitcast i8*%I to i8**
store i8*%H,i8**%J,align 8
%K=getelementptr inbounds i8,i8*%z,i64 24
%L=bitcast i8*%K to i32*
store i32 7,i32*%L,align 4
store i8*%C,i8**%b,align 8
%M=getelementptr inbounds i8,i8*%H,i64 16
%N=bitcast i8*%M to i8*(i8*,i8*,i8*)**
%O=load i8*(i8*,i8*,i8*)*,i8*(i8*,i8*,i8*)**%N,align 8
%P=bitcast i8*%H to i8**
%Q=load i8*,i8**%P,align 8
store i8*%Q,i8**%d,align 8
%R=call i8*@sml_alloc(i32 inreg 4)#0
%S=bitcast i8*%R to i32*
%T=getelementptr inbounds i8,i8*%R,i64 -4
%U=bitcast i8*%T to i32*
store i32 4,i32*%U,align 4
store i8*%R,i8**%e,align 8
store i32 1,i32*%S,align 4
%V=call i8*@sml_alloc(i32 inreg 4)#0
%W=bitcast i8*%V to i32*
%X=getelementptr inbounds i8,i8*%V,i64 -4
%Y=bitcast i8*%X to i32*
store i32 4,i32*%Y,align 4
store i32 8,i32*%W,align 4
%Z=load i8*,i8**%d,align 8
%aa=load i8*,i8**%e,align 8
store i8*null,i8**%d,align 8
store i8*null,i8**%e,align 8
%ab=call fastcc i8*%O(i8*inreg%Z,i8*inreg%aa,i8*inreg%V)
store i8*%ab,i8**%d,align 8
%ac=call i8*@sml_alloc(i32 inreg 28)#0
%ad=getelementptr inbounds i8,i8*%ac,i64 -4
%ae=bitcast i8*%ad to i32*
store i32 1342177304,i32*%ae,align 4
%af=load i8*,i8**%b,align 8
%ag=bitcast i8*%ac to i8**
store i8*%af,i8**%ag,align 8
%ah=load i8*,i8**%c,align 8
%ai=getelementptr inbounds i8,i8*%ac,i64 8
%aj=bitcast i8*%ai to i8**
store i8*%ah,i8**%aj,align 8
%ak=load i8*,i8**%d,align 8
%al=getelementptr inbounds i8,i8*%ac,i64 16
%am=bitcast i8*%al to i8**
store i8*%ak,i8**%am,align 8
%an=getelementptr inbounds i8,i8*%ac,i64 24
%ao=bitcast i8*%an to i32*
store i32 7,i32*%ao,align 4
ret i8*%ac
}
define fastcc i8*@_SMLFN12TypedCalcCon9TPPATWILDE(i8*inreg%a)#2 gc"smlsharp"{
%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=load atomic i32,i32*@sml_check_flag unordered,align 4
%g=icmp eq i32%f,0
br i1%g,label%h,label%j
h:
%i=bitcast i8*%a to i8**
br label%m
j:
call void@sml_check(i32 inreg%f)
%k=bitcast i8**%b to i8***
%l=load i8**,i8***%k,align 8
br label%m
m:
%n=phi i8**[%l,%j],[%i,%h]
%o=load i8*,i8**%n,align 8
store i8*%o,i8**%c,align 8
%p=call i8*@sml_alloc(i32 inreg 20)#0
%q=getelementptr inbounds i8,i8*%p,i64 -4
%r=bitcast i8*%q to i32*
store i32 1342177296,i32*%r,align 4
store i8*%p,i8**%d,align 8
%s=getelementptr inbounds i8,i8*%p,i64 4
%t=bitcast i8*%s to i32*
store i32 0,i32*%t,align 1
%u=bitcast i8*%p to i32*
store i32 7,i32*%u,align 4
%v=load i8*,i8**%b,align 8
%w=getelementptr inbounds i8,i8*%p,i64 8
%x=bitcast i8*%w to i8**
store i8*%v,i8**%x,align 8
%y=getelementptr inbounds i8,i8*%p,i64 16
%z=bitcast i8*%y to i32*
store i32 2,i32*%z,align 4
%A=load i8*,i8**@_SMLZN5VarID3Map5emptyE,align 8
store i8*%A,i8**%b,align 8
%B=call i8*@sml_alloc(i32 inreg 28)#0
%C=getelementptr inbounds i8,i8*%B,i64 -4
%D=bitcast i8*%C to i32*
store i32 1342177304,i32*%D,align 4
%E=load i8*,i8**%d,align 8
%F=bitcast i8*%B to i8**
store i8*%E,i8**%F,align 8
%G=load i8*,i8**%c,align 8
%H=getelementptr inbounds i8,i8*%B,i64 8
%I=bitcast i8*%H to i8**
store i8*%G,i8**%I,align 8
%J=load i8*,i8**%b,align 8
%K=getelementptr inbounds i8,i8*%B,i64 16
%L=bitcast i8*%K to i8**
store i8*%J,i8**%L,align 8
%M=getelementptr inbounds i8,i8*%B,i64 24
%N=bitcast i8*%M to i32*
store i32 7,i32*%N,align 4
store i8*%E,i8**%b,align 8
%O=getelementptr inbounds i8,i8*%J,i64 16
%P=bitcast i8*%O to i8*(i8*,i8*,i8*)**
%Q=load i8*(i8*,i8*,i8*)*,i8*(i8*,i8*,i8*)**%P,align 8
%R=bitcast i8*%J to i8**
%S=load i8*,i8**%R,align 8
store i8*%S,i8**%d,align 8
%T=call i8*@sml_alloc(i32 inreg 4)#0
%U=bitcast i8*%T to i32*
%V=getelementptr inbounds i8,i8*%T,i64 -4
%W=bitcast i8*%V to i32*
store i32 4,i32*%W,align 4
store i8*%T,i8**%e,align 8
store i32 1,i32*%U,align 4
%X=call i8*@sml_alloc(i32 inreg 4)#0
%Y=bitcast i8*%X to i32*
%Z=getelementptr inbounds i8,i8*%X,i64 -4
%aa=bitcast i8*%Z to i32*
store i32 4,i32*%aa,align 4
store i32 8,i32*%Y,align 4
%ab=load i8*,i8**%d,align 8
%ac=load i8*,i8**%e,align 8
store i8*null,i8**%d,align 8
store i8*null,i8**%e,align 8
%ad=call fastcc i8*%Q(i8*inreg%ab,i8*inreg%ac,i8*inreg%X)
store i8*%ad,i8**%d,align 8
%ae=call i8*@sml_alloc(i32 inreg 28)#0
%af=getelementptr inbounds i8,i8*%ae,i64 -4
%ag=bitcast i8*%af to i32*
store i32 1342177304,i32*%ag,align 4
%ah=load i8*,i8**%b,align 8
%ai=bitcast i8*%ae to i8**
store i8*%ah,i8**%ai,align 8
%aj=load i8*,i8**%c,align 8
%ak=getelementptr inbounds i8,i8*%ae,i64 8
%al=bitcast i8*%ak to i8**
store i8*%aj,i8**%al,align 8
%am=load i8*,i8**%d,align 8
%an=getelementptr inbounds i8,i8*%ae,i64 16
%ao=bitcast i8*%an to i8**
store i8*%am,i8**%ao,align 8
%ap=getelementptr inbounds i8,i8*%ae,i64 24
%aq=bitcast i8*%ap to i32*
store i32 7,i32*%aq,align 4
ret i8*%ae
}
define internal fastcc i8*@_SMLLN12TypedCalcCon6exnEnvE_638(i8*inreg%a,i8*inreg%b)#4 gc"smlsharp"{
%c=alloca i8*,align 8
%d=alloca i8*,align 8
%e=alloca i8*,align 8
%f=alloca i8*,align 8
%g=alloca i8*,align 8
call void@llvm.gcroot(i8**%c,i8*null)#0
call void@llvm.gcroot(i8**%d,i8*null)#0
call void@llvm.gcroot(i8**%e,i8*null)#0
call void@llvm.gcroot(i8**%f,i8*null)#0
call void@llvm.gcroot(i8**%g,i8*null)#0
store i8*%b,i8**%c,align 8
%h=bitcast i8*%a to i8**
%i=load i8*,i8**%h,align 8
%j=bitcast i8*%i to i8**
%k=load i8*,i8**%j,align 8
store i8*%k,i8**%d,align 8
%l=getelementptr inbounds i8,i8*%i,i64 8
%m=bitcast i8*%l to i8**
%n=load i8*,i8**%m,align 8
store i8*%n,i8**%e,align 8
%o=getelementptr inbounds i8,i8*%i,i64 16
%p=bitcast i8*%o to i8**
%q=load i8*,i8**%p,align 8
store i8*%q,i8**%f,align 8
%r=getelementptr inbounds i8,i8*%i,i64 32
%s=bitcast i8*%r to i8**
%t=load i8*,i8**%s,align 8
store i8*%t,i8**%g,align 8
%u=call i8*@sml_alloc(i32 inreg 44)#0
%v=getelementptr inbounds i8,i8*%u,i64 -4
%w=bitcast i8*%v to i32*
store i32 1342177320,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=load i8*,i8**%e,align 8
%A=getelementptr inbounds i8,i8*%u,i64 8
%B=bitcast i8*%A to i8**
store i8*%z,i8**%B,align 8
%C=load i8*,i8**%f,align 8
%D=getelementptr inbounds i8,i8*%u,i64 16
%E=bitcast i8*%D to i8**
store i8*%C,i8**%E,align 8
%F=load i8*,i8**%c,align 8
%G=getelementptr inbounds i8,i8*%u,i64 24
%H=bitcast i8*%G to i8**
store i8*%F,i8**%H,align 8
%I=load i8*,i8**%g,align 8
%J=getelementptr inbounds i8,i8*%u,i64 32
%K=bitcast i8*%J to i8**
store i8*%I,i8**%K,align 8
%L=getelementptr inbounds i8,i8*%u,i64 40
%M=bitcast i8*%L to i32*
store i32 31,i32*%M,align 4
ret i8*%u
}
define fastcc i8*@_SMLFN12TypedCalcCon6exnEnvE(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**getelementptr inbounds(<{[4x i8],i32,[24x i8*]}>,<{[4x i8],i32,[24x i8*]}>*@_SML_gvar1d09938e346dcc6f_TypedCalcCon,i64 0,i32 2,i64 2),align 8
%k=getelementptr inbounds i8,i8*%j,i64 16
%l=bitcast i8*%k to i8*(i8*,i8*)**
%m=load i8*(i8*,i8*)*,i8*(i8*,i8*)**%l,align 8
%n=bitcast i8*%j to i8**
%o=load i8*,i8**%n,align 8
%p=tail call fastcc i8*%m(i8*inreg%o,i8*inreg%h)
ret i8*%p
}
define internal fastcc i8*@_SMLLN12TypedCalcCon8exExnEnvE_640(i8*inreg%a,i8*inreg%b)#4 gc"smlsharp"{
%c=alloca i8*,align 8
%d=alloca i8*,align 8
%e=alloca i8*,align 8
%f=alloca i8*,align 8
%g=alloca i8*,align 8
call void@llvm.gcroot(i8**%c,i8*null)#0
call void@llvm.gcroot(i8**%d,i8*null)#0
call void@llvm.gcroot(i8**%e,i8*null)#0
call void@llvm.gcroot(i8**%f,i8*null)#0
call void@llvm.gcroot(i8**%g,i8*null)#0
store i8*%b,i8**%c,align 8
%h=bitcast i8*%a to i8**
%i=load i8*,i8**%h,align 8
%j=bitcast i8*%i to i8**
%k=load i8*,i8**%j,align 8
store i8*%k,i8**%d,align 8
%l=getelementptr inbounds i8,i8*%i,i64 16
%m=bitcast i8*%l to i8**
%n=load i8*,i8**%m,align 8
store i8*%n,i8**%e,align 8
%o=getelementptr inbounds i8,i8*%i,i64 24
%p=bitcast i8*%o to i8**
%q=load i8*,i8**%p,align 8
store i8*%q,i8**%f,align 8
%r=getelementptr inbounds i8,i8*%i,i64 32
%s=bitcast i8*%r to i8**
%t=load i8*,i8**%s,align 8
store i8*%t,i8**%g,align 8
%u=call i8*@sml_alloc(i32 inreg 44)#0
%v=getelementptr inbounds i8,i8*%u,i64 -4
%w=bitcast i8*%v to i32*
store i32 1342177320,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=load i8*,i8**%c,align 8
%A=getelementptr inbounds i8,i8*%u,i64 8
%B=bitcast i8*%A to i8**
store i8*%z,i8**%B,align 8
%C=load i8*,i8**%e,align 8
%D=getelementptr inbounds i8,i8*%u,i64 16
%E=bitcast i8*%D to i8**
store i8*%C,i8**%E,align 8
%F=load i8*,i8**%f,align 8
%G=getelementptr inbounds i8,i8*%u,i64 24
%H=bitcast i8*%G to i8**
store i8*%F,i8**%H,align 8
%I=load i8*,i8**%g,align 8
%J=getelementptr inbounds i8,i8*%u,i64 32
%K=bitcast i8*%J to i8**
store i8*%I,i8**%K,align 8
%L=getelementptr inbounds i8,i8*%u,i64 40
%M=bitcast i8*%L to i32*
store i32 31,i32*%M,align 4
ret i8*%u
}
define fastcc i8*@_SMLFN12TypedCalcCon8exExnEnvE(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**getelementptr inbounds(<{[4x i8],i32,[24x i8*]}>,<{[4x i8],i32,[24x i8*]}>*@_SML_gvar1d09938e346dcc6f_TypedCalcCon,i64 0,i32 2,i64 3),align 8
%k=getelementptr inbounds i8,i8*%j,i64 16
%l=bitcast i8*%k to i8*(i8*,i8*)**
%m=load i8*(i8*,i8*)*,i8*(i8*,i8*)**%l,align 8
%n=bitcast i8*%j to i8**
%o=load i8*,i8**%n,align 8
%p=tail call fastcc i8*%m(i8*inreg%o,i8*inreg%h)
ret i8*%p
}
define internal fastcc i8*@_SMLLN12TypedCalcCon6varEnvE_642(i8*inreg%a,i8*inreg%b)#4 gc"smlsharp"{
%c=alloca i8*,align 8
%d=alloca i8*,align 8
%e=alloca i8*,align 8
%f=alloca i8*,align 8
%g=alloca i8*,align 8
call void@llvm.gcroot(i8**%c,i8*null)#0
call void@llvm.gcroot(i8**%d,i8*null)#0
call void@llvm.gcroot(i8**%e,i8*null)#0
call void@llvm.gcroot(i8**%f,i8*null)#0
call void@llvm.gcroot(i8**%g,i8*null)#0
store i8*%b,i8**%c,align 8
%h=bitcast i8*%a to i8**
%i=load i8*,i8**%h,align 8
%j=bitcast i8*%i to i8**
%k=load i8*,i8**%j,align 8
store i8*%k,i8**%d,align 8
%l=getelementptr inbounds i8,i8*%i,i64 8
%m=bitcast i8*%l to i8**
%n=load i8*,i8**%m,align 8
store i8*%n,i8**%e,align 8
%o=getelementptr inbounds i8,i8*%i,i64 16
%p=bitcast i8*%o to i8**
%q=load i8*,i8**%p,align 8
store i8*%q,i8**%f,align 8
%r=getelementptr inbounds i8,i8*%i,i64 24
%s=bitcast i8*%r to i8**
%t=load i8*,i8**%s,align 8
store i8*%t,i8**%g,align 8
%u=call i8*@sml_alloc(i32 inreg 44)#0
%v=getelementptr inbounds i8,i8*%u,i64 -4
%w=bitcast i8*%v to i32*
store i32 1342177320,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=load i8*,i8**%e,align 8
%A=getelementptr inbounds i8,i8*%u,i64 8
%B=bitcast i8*%A to i8**
store i8*%z,i8**%B,align 8
%C=load i8*,i8**%f,align 8
%D=getelementptr inbounds i8,i8*%u,i64 16
%E=bitcast i8*%D to i8**
store i8*%C,i8**%E,align 8
%F=load i8*,i8**%g,align 8
%G=getelementptr inbounds i8,i8*%u,i64 24
%H=bitcast i8*%G to i8**
store i8*%F,i8**%H,align 8
%I=load i8*,i8**%c,align 8
%J=getelementptr inbounds i8,i8*%u,i64 32
%K=bitcast i8*%J to i8**
store i8*%I,i8**%K,align 8
%L=getelementptr inbounds i8,i8*%u,i64 40
%M=bitcast i8*%L to i32*
store i32 31,i32*%M,align 4
ret i8*%u
}
define fastcc i8*@_SMLFN12TypedCalcCon6varEnvE(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**getelementptr inbounds(<{[4x i8],i32,[24x i8*]}>,<{[4x i8],i32,[24x i8*]}>*@_SML_gvar1d09938e346dcc6f_TypedCalcCon,i64 0,i32 2,i64 4),align 8
%k=getelementptr inbounds i8,i8*%j,i64 16
%l=bitcast i8*%k to i8*(i8*,i8*)**
%m=load i8*(i8*,i8*)*,i8*(i8*,i8*)**%l,align 8
%n=bitcast i8*%j to i8**
%o=load i8*,i8**%n,align 8
%p=tail call fastcc i8*%m(i8*inreg%o,i8*inreg%h)
ret i8*%p
}
define internal fastcc i8*@_SMLLN12TypedCalcCon8exVarEnvE_644(i8*inreg%a,i8*inreg%b)#4 gc"smlsharp"{
%c=alloca i8*,align 8
%d=alloca i8*,align 8
%e=alloca i8*,align 8
%f=alloca i8*,align 8
%g=alloca i8*,align 8
call void@llvm.gcroot(i8**%c,i8*null)#0
call void@llvm.gcroot(i8**%d,i8*null)#0
call void@llvm.gcroot(i8**%e,i8*null)#0
call void@llvm.gcroot(i8**%f,i8*null)#0
call void@llvm.gcroot(i8**%g,i8*null)#0
store i8*%b,i8**%c,align 8
%h=bitcast i8*%a to i8**
%i=load i8*,i8**%h,align 8
%j=bitcast i8*%i to i8**
%k=load i8*,i8**%j,align 8
store i8*%k,i8**%d,align 8
%l=getelementptr inbounds i8,i8*%i,i64 8
%m=bitcast i8*%l to i8**
%n=load i8*,i8**%m,align 8
store i8*%n,i8**%e,align 8
%o=getelementptr inbounds i8,i8*%i,i64 24
%p=bitcast i8*%o to i8**
%q=load i8*,i8**%p,align 8
store i8*%q,i8**%f,align 8
%r=getelementptr inbounds i8,i8*%i,i64 32
%s=bitcast i8*%r to i8**
%t=load i8*,i8**%s,align 8
store i8*%t,i8**%g,align 8
%u=call i8*@sml_alloc(i32 inreg 44)#0
%v=getelementptr inbounds i8,i8*%u,i64 -4
%w=bitcast i8*%v to i32*
store i32 1342177320,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=load i8*,i8**%e,align 8
%A=getelementptr inbounds i8,i8*%u,i64 8
%B=bitcast i8*%A to i8**
store i8*%z,i8**%B,align 8
%C=load i8*,i8**%c,align 8
%D=getelementptr inbounds i8,i8*%u,i64 16
%E=bitcast i8*%D to i8**
store i8*%C,i8**%E,align 8
%F=load i8*,i8**%f,align 8
%G=getelementptr inbounds i8,i8*%u,i64 24
%H=bitcast i8*%G to i8**
store i8*%F,i8**%H,align 8
%I=load i8*,i8**%g,align 8
%J=getelementptr inbounds i8,i8*%u,i64 32
%K=bitcast i8*%J to i8**
store i8*%I,i8**%K,align 8
%L=getelementptr inbounds i8,i8*%u,i64 40
%M=bitcast i8*%L to i32*
store i32 31,i32*%M,align 4
ret i8*%u
}
define fastcc i8*@_SMLFN12TypedCalcCon8exVarEnvE(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**getelementptr inbounds(<{[4x i8],i32,[24x i8*]}>,<{[4x i8],i32,[24x i8*]}>*@_SML_gvar1d09938e346dcc6f_TypedCalcCon,i64 0,i32 2,i64 5),align 8
%k=getelementptr inbounds i8,i8*%j,i64 16
%l=bitcast i8*%k to i8*(i8*,i8*)**
%m=load i8*(i8*,i8*)*,i8*(i8*,i8*)**%l,align 8
%n=bitcast i8*%j to i8**
%o=load i8*,i8**%n,align 8
%p=tail call fastcc i8*%m(i8*inreg%o,i8*inreg%h)
ret i8*%p
}
define internal fastcc i8*@_SMLLN12TypedCalcCon6btvEnvE_646(i8*inreg%a,i8*inreg%b)#4 gc"smlsharp"{
%c=alloca i8*,align 8
%d=alloca i8*,align 8
%e=alloca i8*,align 8
%f=alloca i8*,align 8
%g=alloca i8*,align 8
call void@llvm.gcroot(i8**%c,i8*null)#0
call void@llvm.gcroot(i8**%d,i8*null)#0
call void@llvm.gcroot(i8**%e,i8*null)#0
call void@llvm.gcroot(i8**%f,i8*null)#0
call void@llvm.gcroot(i8**%g,i8*null)#0
store i8*%b,i8**%c,align 8
%h=bitcast i8*%a to i8**
%i=load i8*,i8**%h,align 8
%j=getelementptr inbounds i8,i8*%i,i64 8
%k=bitcast i8*%j to i8**
%l=load i8*,i8**%k,align 8
store i8*%l,i8**%d,align 8
%m=getelementptr inbounds i8,i8*%i,i64 16
%n=bitcast i8*%m to i8**
%o=load i8*,i8**%n,align 8
store i8*%o,i8**%e,align 8
%p=getelementptr inbounds i8,i8*%i,i64 24
%q=bitcast i8*%p to i8**
%r=load i8*,i8**%q,align 8
store i8*%r,i8**%f,align 8
%s=getelementptr inbounds i8,i8*%i,i64 32
%t=bitcast i8*%s to i8**
%u=load i8*,i8**%t,align 8
store i8*%u,i8**%g,align 8
%v=call i8*@sml_alloc(i32 inreg 44)#0
%w=getelementptr inbounds i8,i8*%v,i64 -4
%x=bitcast i8*%w to i32*
store i32 1342177320,i32*%x,align 4
%y=load i8*,i8**%c,align 8
%z=bitcast i8*%v to i8**
store i8*%y,i8**%z,align 8
%A=load i8*,i8**%d,align 8
%B=getelementptr inbounds i8,i8*%v,i64 8
%C=bitcast i8*%B to i8**
store i8*%A,i8**%C,align 8
%D=load i8*,i8**%e,align 8
%E=getelementptr inbounds i8,i8*%v,i64 16
%F=bitcast i8*%E to i8**
store i8*%D,i8**%F,align 8
%G=load i8*,i8**%f,align 8
%H=getelementptr inbounds i8,i8*%v,i64 24
%I=bitcast i8*%H to i8**
store i8*%G,i8**%I,align 8
%J=load i8*,i8**%g,align 8
%K=getelementptr inbounds i8,i8*%v,i64 32
%L=bitcast i8*%K to i8**
store i8*%J,i8**%L,align 8
%M=getelementptr inbounds i8,i8*%v,i64 40
%N=bitcast i8*%M to i32*
store i32 31,i32*%N,align 4
ret i8*%v
}
define fastcc i8*@_SMLFN12TypedCalcCon6btvEnvE(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**getelementptr inbounds(<{[4x i8],i32,[24x i8*]}>,<{[4x i8],i32,[24x i8*]}>*@_SML_gvar1d09938e346dcc6f_TypedCalcCon,i64 0,i32 2,i64 6),align 8
%k=getelementptr inbounds i8,i8*%j,i64 16
%l=bitcast i8*%k to i8*(i8*,i8*)**
%m=load i8*(i8*,i8*)*,i8*(i8*,i8*)**%l,align 8
%n=bitcast i8*%j to i8**
%o=load i8*,i8**%n,align 8
%p=tail call fastcc i8*%m(i8*inreg%o,i8*inreg%h)
ret i8*%p
}
define fastcc i8*@_SMLFN12TypedCalcCon10makeExnEnvE(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,[24x i8*]}>,<{[4x i8],i32,[24x i8*]}>*@_SML_gvar1d09938e346dcc6f_TypedCalcCon,i64 0,i32 2,i64 7)to i8***),align 8
%k=load i8*,i8**%j,align 8
%l=tail call fastcc i8*@_SMLLN12TypedCalcCon10makeExnEnvE_556(i8*inreg%k,i8*inreg%h)
ret i8*%l
}
define fastcc i8*@_SMLFN12TypedCalcCon12makeExExnEnvE(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,[24x i8*]}>,<{[4x i8],i32,[24x i8*]}>*@_SML_gvar1d09938e346dcc6f_TypedCalcCon,i64 0,i32 2,i64 8)to i8***),align 8
%k=load i8*,i8**%j,align 8
%l=tail call fastcc i8*@_SMLLN12TypedCalcCon12makeExExnEnvE_559(i8*inreg%k,i8*inreg%h)
ret i8*%l
}
define fastcc i8*@_SMLFN12TypedCalcCon10makeVarEnvE(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,[24x i8*]}>,<{[4x i8],i32,[24x i8*]}>*@_SML_gvar1d09938e346dcc6f_TypedCalcCon,i64 0,i32 2,i64 9)to i8***),align 8
%k=load i8*,i8**%j,align 8
%l=tail call fastcc i8*@_SMLLN12TypedCalcCon10makeVarEnvE_562(i8*inreg%k,i8*inreg%h)
ret i8*%l
}
define fastcc i8*@_SMLFN12TypedCalcCon12makeExVarEnvE(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,[24x i8*]}>,<{[4x i8],i32,[24x i8*]}>*@_SML_gvar1d09938e346dcc6f_TypedCalcCon,i64 0,i32 2,i64 10)to i8***),align 8
%k=load i8*,i8**%j,align 8
%l=tail call fastcc i8*@_SMLLN12TypedCalcCon12makeExVarEnvE_565(i8*inreg%k,i8*inreg%h)
ret i8*%l
}
define fastcc i8*@_SMLFN12TypedCalcCon9clsVarEnvE(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,[24x i8*]}>,<{[4x i8],i32,[24x i8*]}>*@_SML_gvar1d09938e346dcc6f_TypedCalcCon,i64 0,i32 2,i64 11)to i8***),align 8
%k=load i8*,i8**%j,align 8
%l=tail call fastcc i8*@_SMLLN12TypedCalcCon9clsVarEnvE_568(i8*inreg%k,i8*inreg%h)
ret i8*%l
}
define fastcc i8*@_SMLFN12TypedCalcCon5TPEXDE(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,[24x i8*]}>,<{[4x i8],i32,[24x i8*]}>*@_SML_gvar1d09938e346dcc6f_TypedCalcCon,i64 0,i32 2,i64 12)to i8***),align 8
%k=load i8*,i8**%j,align 8
%l=tail call fastcc i8*@_SMLLN12TypedCalcCon5TPEXDE_569(i8*inreg%k,i8*inreg%h)
ret i8*%l
}
define fastcc i8*@_SMLFN12TypedCalcCon9TPEXNTAGDE(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,[24x i8*]}>,<{[4x i8],i32,[24x i8*]}>*@_SML_gvar1d09938e346dcc6f_TypedCalcCon,i64 0,i32 2,i64 13)to i8***),align 8
%k=load i8*,i8**%j,align 8
%l=tail call fastcc i8*@_SMLLN12TypedCalcCon9TPEXNTAGDE_572(i8*inreg%k,i8*inreg%h)
ret i8*%l
}
define fastcc i8*@_SMLFN12TypedCalcCon11TPEXPORTEXNE(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,[24x i8*]}>,<{[4x i8],i32,[24x i8*]}>*@_SML_gvar1d09938e346dcc6f_TypedCalcCon,i64 0,i32 2,i64 14)to i8***),align 8
%k=load i8*,i8**%j,align 8
%l=tail call fastcc i8*@_SMLLN12TypedCalcCon11TPEXPORTEXNE_573(i8*inreg%k,i8*inreg%h)
ret i8*%l
}
define fastcc i8*@_SMLFN12TypedCalcCon11TPEXPORTVARE(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,[24x i8*]}>,<{[4x i8],i32,[24x i8*]}>*@_SML_gvar1d09938e346dcc6f_TypedCalcCon,i64 0,i32 2,i64 15)to i8***),align 8
%k=load i8*,i8**%j,align 8
%l=tail call fastcc i8*@_SMLLN12TypedCalcCon11TPEXPORTVARE_576(i8*inreg%k,i8*inreg%h)
ret i8*%l
}
define fastcc i8*@_SMLFN12TypedCalcCon11TPEXTERNEXNE(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,[24x i8*]}>,<{[4x i8],i32,[24x i8*]}>*@_SML_gvar1d09938e346dcc6f_TypedCalcCon,i64 0,i32 2,i64 16)to i8***),align 8
%k=load i8*,i8**%j,align 8
%l=tail call fastcc i8*@_SMLLN12TypedCalcCon11TPEXTERNEXNE_577(i8*inreg%k,i8*inreg%h)
ret i8*%l
}
define internal fastcc i8*@_SMLLN12TypedCalcCon12TPBUILTINEXNE_658(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
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%h,label%j
h:
%i=bitcast i8*%a to i8**
br label%m
j:
call void@sml_check(i32 inreg%f)
%k=bitcast i8**%d to i8***
%l=load i8**,i8***%k,align 8
br label%m
m:
%n=phi i8**[%l,%j],[%i,%h]
%o=load i8*,i8**%n,align 8
store i8*%o,i8**%d,align 8
%p=call i8*@sml_alloc(i32 inreg 20)#0
%q=getelementptr inbounds i8,i8*%p,i64 -4
%r=bitcast i8*%q to i32*
store i32 1342177296,i32*%r,align 4
%s=load i8*,i8**%c,align 8
%t=bitcast i8*%p to i8**
store i8*%s,i8**%t,align 8
%u=getelementptr inbounds i8,i8*%p,i64 8
%v=bitcast i8*%u to i8**
store i8*null,i8**%v,align 8
%w=getelementptr inbounds i8,i8*%p,i64 16
%x=bitcast i8*%w to i32*
store i32 3,i32*%x,align 4
%y=load i8*,i8**%d,align 8
store i8*null,i8**%d,align 8
%z=call fastcc i8*@_SMLLN12TypedCalcCon12makeExExnEnvE_559(i8*inreg%y,i8*inreg%p)
store i8*%z,i8**%d,align 8
%A=call i8*@sml_alloc(i32 inreg 20)#0
%B=getelementptr inbounds i8,i8*%A,i64 -4
%C=bitcast i8*%B to i32*
store i32 1342177296,i32*%C,align 4
store i8*%A,i8**%e,align 8
%D=bitcast i8*%A to i64*
store i64 0,i64*%D,align 4
%E=load i8*,i8**%c,align 8
store i8*null,i8**%c,align 8
%F=getelementptr inbounds i8,i8*%A,i64 8
%G=bitcast i8*%F to i8**
store i8*%E,i8**%G,align 8
%H=getelementptr inbounds i8,i8*%A,i64 16
%I=bitcast i8*%H to i32*
store i32 2,i32*%I,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
%M=load i8*,i8**%e,align 8
%N=bitcast i8*%J to i8**
store i8*%M,i8**%N,align 8
%O=load i8*,i8**%d,align 8
%P=getelementptr inbounds i8,i8*%J,i64 8
%Q=bitcast i8*%P to i8**
store i8*%O,i8**%Q,align 8
%R=getelementptr inbounds i8,i8*%J,i64 16
%S=bitcast i8*%R to i32*
store i32 3,i32*%S,align 4
ret i8*%J
}
define fastcc i8*@_SMLFN12TypedCalcCon12TPBUILTINEXNE(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**getelementptr inbounds(<{[4x i8],i32,[24x i8*]}>,<{[4x i8],i32,[24x i8*]}>*@_SML_gvar1d09938e346dcc6f_TypedCalcCon,i64 0,i32 2,i64 17),align 8
%k=getelementptr inbounds i8,i8*%j,i64 16
%l=bitcast i8*%k to i8*(i8*,i8*)**
%m=load i8*(i8*,i8*)*,i8*(i8*,i8*)**%l,align 8
%n=bitcast i8*%j to i8**
%o=load i8*,i8**%n,align 8
%p=tail call fastcc i8*%m(i8*inreg%o,i8*inreg%h)
ret i8*%p
}
define fastcc i8*@_SMLFN12TypedCalcCon11TPEXTERNVARE(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,[24x i8*]}>,<{[4x i8],i32,[24x i8*]}>*@_SML_gvar1d09938e346dcc6f_TypedCalcCon,i64 0,i32 2,i64 18)to i8***),align 8
%k=load i8*,i8**%j,align 8
%l=tail call fastcc i8*@_SMLLN12TypedCalcCon11TPEXTERNVARE_578(i8*inreg%k,i8*inreg%h)
ret i8*%l
}
define fastcc i8*@_SMLFN12TypedCalcCon9TPFUNDECLE(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,[24x i8*]}>,<{[4x i8],i32,[24x i8*]}>*@_SML_gvar1d09938e346dcc6f_TypedCalcCon,i64 0,i32 2,i64 19)to i8***),align 8
%k=load i8*,i8**%j,align 8
%l=tail call fastcc i8*@_SMLLN12TypedCalcCon9TPFUNDECLE_594(i8*inreg%k,i8*inreg%h)
ret i8*%l
}
define fastcc i8*@_SMLFN12TypedCalcCon13TPPOLYFUNDECLE(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,[24x i8*]}>,<{[4x i8],i32,[24x i8*]}>*@_SML_gvar1d09938e346dcc6f_TypedCalcCon,i64 0,i32 2,i64 20)to i8***),align 8
%k=load i8*,i8**%j,align 8
%l=tail call fastcc i8*@_SMLLN12TypedCalcCon13TPPOLYFUNDECLE_597(i8*inreg%k,i8*inreg%h)
ret i8*%l
}
define fastcc i8*@_SMLFN12TypedCalcCon5TPVALE(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,[24x i8*]}>,<{[4x i8],i32,[24x i8*]}>*@_SML_gvar1d09938e346dcc6f_TypedCalcCon,i64 0,i32 2,i64 21)to i8***),align 8
%k=load i8*,i8**%j,align 8
%l=tail call fastcc i8*@_SMLLN12TypedCalcCon5TPVALE_600(i8*inreg%k,i8*inreg%h)
ret i8*%l
}
define fastcc i8*@_SMLFN12TypedCalcCon8TPVALRECE(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,[24x i8*]}>,<{[4x i8],i32,[24x i8*]}>*@_SML_gvar1d09938e346dcc6f_TypedCalcCon,i64 0,i32 2,i64 22)to i8***),align 8
%k=load i8*,i8**%j,align 8
%l=tail call fastcc i8*@_SMLLN12TypedCalcCon8TPVALRECE_609(i8*inreg%k,i8*inreg%h)
ret i8*%l
}
define fastcc i8*@_SMLFN12TypedCalcCon12TPVALPOLYRECE(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,[24x i8*]}>,<{[4x i8],i32,[24x i8*]}>*@_SML_gvar1d09938e346dcc6f_TypedCalcCon,i64 0,i32 2,i64 23)to i8***),align 8
%k=load i8*,i8**%j,align 8
%l=tail call fastcc i8*@_SMLLN12TypedCalcCon12TPVALPOLYRECE_618(i8*inreg%k,i8*inreg%h)
ret i8*%l
}
define internal fastcc i8*@_SMLLN12TypedCalcCon5fail1E_670(i8*inreg%a,i8*inreg%b)#2 gc"smlsharp"{
tail call fastcc void@_SMLLN12TypedCalcCon5fail1E_257(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*@_SMLLN12TypedCalcCon5fail2E_672(i8*inreg%a,i8*inreg%b)#2 gc"smlsharp"{
tail call fastcc void@_SMLLN12TypedCalcCon5fail2E_266(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*@_SMLLN12TypedCalcCon17mustBeCONSTRUCTtyE_674(i8*inreg%a,i8*inreg%b)#2 gc"smlsharp"{
tail call fastcc void@_SMLLN12TypedCalcCon17mustBeCONSTRUCTtyE_272(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*@_SMLLN12TypedCalcCon4eqTyE_676(i8*inreg%a,i8*inreg%b)#2 gc"smlsharp"{
%c=tail call fastcc i32@_SMLLN12TypedCalcCon4eqTyE_276(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*@_SMLLN12TypedCalcCon4eqTyE_677(i8*inreg%a,i8*inreg%b)#4 gc"smlsharp"{
%c=tail call fastcc i8*@_SMLLN12TypedCalcCon4eqTyE_278(i8*inreg%b)
ret i8*%c
}
define internal fastcc i8*@_SMLLN12TypedCalcCon4eqTyE_678(i8*inreg%a,i8*inreg%b)#2 gc"smlsharp"{
tail call fastcc void@_SMLLN12TypedCalcCon4eqTyE_284(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*@_SMLLN12TypedCalcCon4eqTyE_679(i8*inreg%a,i8*inreg%b)#2 gc"smlsharp"{
tail call fastcc void@_SMLLN12TypedCalcCon4eqTyE_285(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*@_SMLLN12TypedCalcCon9TPREIFYTYE_681(i8*inreg%a,i8*inreg%b)#2 gc"smlsharp"{
%c=tail call fastcc i8*@_SMLFN12TypedCalcCon9TPREIFYTYE(i8*inreg%b)
ret i8*%c
}
define internal fastcc i8*@_SMLL1f_682(i8*inreg%a,i8*inreg%b)#2 gc"smlsharp"{
%c=bitcast i8*%b to i32*
%d=load i32,i32*%c,align 4
tail call fastcc void@_SMLL1f_292(i8*inreg%a,i32 inreg%d)
%e=tail call i8*@sml_alloc(i32 inreg 4)#0
%f=bitcast i8*%e to i32*
%g=getelementptr inbounds i8,i8*%e,i64 -4
%h=bitcast i8*%g to i32*
store i32 4,i32*%h,align 4
store i32 0,i32*%f,align 4
ret i8*%e
}
define internal fastcc i8*@_SMLLN12TypedCalcCon6TPCASTE_683(i8*inreg%a,i8*inreg%b)#2 gc"smlsharp"{
%c=tail call fastcc i8*@_SMLFN12TypedCalcCon6TPCASTE(i8*inreg%b)
ret i8*%c
}
define internal fastcc i8*@_SMLL1f_684(i8*inreg%a,i8*inreg%b)#2 gc"smlsharp"{
%c=bitcast i8*%b to i32*
%d=load i32,i32*%c,align 4
tail call fastcc void@_SMLL1f_299(i8*inreg%a,i32 inreg%d)
%e=tail call i8*@sml_alloc(i32 inreg 4)#0
%f=bitcast i8*%e to i32*
%g=getelementptr inbounds i8,i8*%e,i64 -4
%h=bitcast i8*%g to i32*
store i32 4,i32*%h,align 4
store i32 0,i32*%f,align 4
ret i8*%e
}
define internal fastcc i8*@_SMLLN12TypedCalcCon15TPDATACONSTRUCTE_685(i8*inreg%a,i8*inreg%b)#2 gc"smlsharp"{
%c=tail call fastcc i8*@_SMLFN12TypedCalcCon15TPDATACONSTRUCTE(i8*inreg%b)
ret i8*%c
}
define internal fastcc i8*@_SMLL1f_686(i8*inreg%a,i8*inreg%b)#2 gc"smlsharp"{
%c=bitcast i8*%b to i32*
%d=load i32,i32*%c,align 4
tail call fastcc void@_SMLL1f_307(i8*inreg%a,i32 inreg%d)
%e=tail call i8*@sml_alloc(i32 inreg 4)#0
%f=bitcast i8*%e to i32*
%g=getelementptr inbounds i8,i8*%e,i64 -4
%h=bitcast i8*%g to i32*
store i32 4,i32*%h,align 4
store i32 0,i32*%f,align 4
ret i8*%e
}
define internal fastcc i8*@_SMLL1f_687(i8*inreg%a,i8*inreg%b)#2 gc"smlsharp"{
%c=bitcast i8*%b to i32*
%d=load i32,i32*%c,align 4
tail call fastcc void@_SMLL1f_310(i8*inreg%a,i32 inreg%d)
%e=tail call i8*@sml_alloc(i32 inreg 4)#0
%f=bitcast i8*%e to i32*
%g=getelementptr inbounds i8,i8*%e,i64 -4
%h=bitcast i8*%g to i32*
store i32 4,i32*%h,align 4
store i32 0,i32*%f,align 4
ret i8*%e
}
define internal fastcc i8*@_SMLLN12TypedCalcCon14TPEXNCONSTRUCTE_688(i8*inreg%a,i8*inreg%b)#2 gc"smlsharp"{
%c=tail call fastcc i8*@_SMLFN12TypedCalcCon14TPEXNCONSTRUCTE(i8*inreg%b)
ret i8*%c
}
define internal fastcc i8*@_SMLL6argTys_689(i8*inreg%a,i8*inreg%b)#2 gc"smlsharp"{
%c=tail call fastcc i8*@_SMLL6argTys_320(i8*inreg%b)
ret i8*%c
}
define internal fastcc i8*@_SMLL6varTys_690(i8*inreg%a,i8*inreg%b)#2 gc"smlsharp"{
%c=tail call fastcc i8*@_SMLL6varTys_322(i8*inreg%b)
ret i8*%c
}
define internal fastcc i8*@_SMLL6retTys_691(i8*inreg%a,i8*inreg%b)#2 gc"smlsharp"{
%c=tail call fastcc i8*@_SMLL6retTys_324(i8*inreg%b)
ret i8*%c
}
define internal fastcc i8*@_SMLLN12TypedCalcCon9ffiStubTyE_692(i8*inreg%a,i8*inreg%b)#2 gc"smlsharp"{
%c=tail call fastcc i8*@_SMLLN12TypedCalcCon9ffiStubTyE_326(i8*inreg%b)
ret i8*%c
}
define internal fastcc i8*@_SMLL1f_694(i8*inreg%a,i8*inreg%b)#2 gc"smlsharp"{
%c=bitcast i8*%b to i32*
%d=load i32,i32*%c,align 4
tail call fastcc void@_SMLL1f_330(i8*inreg%a,i32 inreg%d)
%e=tail call i8*@sml_alloc(i32 inreg 4)#0
%f=bitcast i8*%e to i32*
%g=getelementptr inbounds i8,i8*%e,i64 -4
%h=bitcast i8*%g to i32*
store i32 4,i32*%h,align 4
store i32 0,i32*%f,align 4
ret i8*%e
}
define internal fastcc i8*@_SMLLN12TypedCalcCon15TPFFIIMPORT__FUNE_695(i8*inreg%a,i8*inreg%b)#2 gc"smlsharp"{
%c=tail call fastcc i8*@_SMLFN12TypedCalcCon15TPFFIIMPORT__FUNE(i8*inreg%b)
ret i8*%c
}
define internal fastcc i8*@_SMLLN12TypedCalcCon15TPFFIIMPORT__EXTE_696(i8*inreg%a,i8*inreg%b)#2 gc"smlsharp"{
%c=tail call fastcc i8*@_SMLFN12TypedCalcCon15TPFFIIMPORT__EXTE(i8*inreg%b)
ret i8*%c
}
define internal fastcc i8*@_SMLLN12TypedCalcCon15TPFOREIGNSYMBOLE_697(i8*inreg%a,i8*inreg%b)#4 gc"smlsharp"{
%c=tail call fastcc i8*@_SMLFN12TypedCalcCon15TPFOREIGNSYMBOLE(i8*inreg%b)
ret i8*%c
}
define internal fastcc i8*@_SMLLN12TypedCalcCon14TPFOREIGNAPPLYE_698(i8*inreg%a,i8*inreg%b)#2 gc"smlsharp"{
%c=tail call fastcc i8*@_SMLFN12TypedCalcCon14TPFOREIGNAPPLYE(i8*inreg%b)
ret i8*%c
}
define internal fastcc i8*@_SMLLN12TypedCalcCon12TPCALLBACKFNE_699(i8*inreg%a,i8*inreg%b)#4 gc"smlsharp"{
%c=getelementptr inbounds i8,i8*%b,i64 16
%d=bitcast i8*%c to i8**
%e=load i8*,i8**%d,align 8
ret i8*%e
}
define internal fastcc i8*@_SMLLN12TypedCalcCon12TPCALLBACKFNE_700(i8*inreg%a,i8*inreg%b)#2 gc"smlsharp"{
%c=tail call fastcc i8*@_SMLFN12TypedCalcCon12TPCALLBACKFNE(i8*inreg%b)
ret i8*%c
}
define internal fastcc i8*@_SMLLN12TypedCalcCon6TPTAPPE_701(i8*inreg%a,i8*inreg%b)#2 gc"smlsharp"{
%c=tail call fastcc i8*@_SMLFN12TypedCalcCon6TPTAPPE(i8*inreg%b)
ret i8*%c
}
define internal fastcc i8*@_SMLLN12TypedCalcCon6TPPOLYE_702(i8*inreg%a,i8*inreg%b)#2 gc"smlsharp"{
%c=tail call fastcc i8*@_SMLFN12TypedCalcCon6TPPOLYE(i8*inreg%b)
ret i8*%c
}
define internal fastcc i8*@_SMLLN12TypedCalcCon5TPLETE_703(i8*inreg%a,i8*inreg%b)#2 gc"smlsharp"{
%c=tail call fastcc i8*@_SMLFN12TypedCalcCon5TPLETE(i8*inreg%b)
ret i8*%c
}
define internal fastcc i8*@_SMLLN12TypedCalcCon5TPFNME_704(i8*inreg%a,i8*inreg%b)#4 gc"smlsharp"{
%c=getelementptr inbounds i8,i8*%b,i64 16
%d=bitcast i8*%c to i8**
%e=load i8*,i8**%d,align 8
ret i8*%e
}
define internal fastcc i8*@_SMLLN12TypedCalcCon5TPFNME_705(i8*inreg%a,i8*inreg%b)#2 gc"smlsharp"{
%c=tail call fastcc i8*@_SMLFN12TypedCalcCon5TPFNME(i8*inreg%b)
ret i8*%c
}
define internal fastcc i8*@_SMLL1f_706(i8*inreg%a,i8*inreg%b)#2 gc"smlsharp"{
%c=bitcast i8*%b to i32*
%d=load i32,i32*%c,align 4
tail call fastcc void@_SMLL1f_363(i8*inreg%a,i32 inreg%d)
%e=tail call i8*@sml_alloc(i32 inreg 4)#0
%f=bitcast i8*%e to i32*
%g=getelementptr inbounds i8,i8*%e,i64 -4
%h=bitcast i8*%g to i32*
store i32 4,i32*%h,align 4
store i32 0,i32*%f,align 4
ret i8*%e
}
define internal fastcc i8*@_SMLLN12TypedCalcCon6TPAPPME_707(i8*inreg%a,i8*inreg%b)#2 gc"smlsharp"{
%c=tail call fastcc i8*@_SMLFN12TypedCalcCon6TPAPPME(i8*inreg%b)
ret i8*%c
}
define internal fastcc i8*@_SMLLN12TypedCalcCon10checkMatchE_708(i8*inreg%a,i8*inreg%b)#4 gc"smlsharp"{
%c=getelementptr inbounds i8,i8*%b,i64 8
%d=bitcast i8*%c to i8**
%e=load i8*,i8**%d,align 8
ret i8*%e
}
define internal fastcc i8*@_SMLLN12TypedCalcCon10checkMatchE_709(i8*inreg%a,i8*inreg%b)#2 gc"smlsharp"{
tail call fastcc void@_SMLLN12TypedCalcCon10checkMatchE_379(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*@_SMLLN12TypedCalcCon10checkMatchE_710(i8*inreg%a,i8*inreg%b)#2 gc"smlsharp"{
tail call fastcc void@_SMLLN12TypedCalcCon10checkMatchE_382(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*@_SMLLN12TypedCalcCon7TPCASEME_712(i8*inreg%a,i8*inreg%b)#4 gc"smlsharp"{
%c=bitcast i8*%b to i8**
%d=load i8*,i8**%c,align 8
ret i8*%d
}
define internal fastcc i8*@_SMLLN12TypedCalcCon7TPCASEME_713(i8*inreg%a,i8*inreg%b)#2 gc"smlsharp"{
%c=tail call fastcc i8*@_SMLLN12TypedCalcCon7TPCASEME_388(i8*inreg%b)
ret i8*%c
}
define internal fastcc i8*@_SMLLN12TypedCalcCon7TPCASEME_714(i8*inreg%a,i8*inreg%b)#2 gc"smlsharp"{
%c=tail call fastcc i8*@_SMLFN12TypedCalcCon7TPCASEME(i8*inreg%b)
ret i8*%c
}
define internal fastcc i8*@_SMLL9checkRule_715(i8*inreg%a,i8*inreg%b)#2 gc"smlsharp"{
tail call fastcc void@_SMLL9checkRule_395(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*@_SMLLN12TypedCalcCon18TPSWITCH__CONSTCASEE_716(i8*inreg%a,i8*inreg%b)#4 gc"smlsharp"{
%c=tail call fastcc i8*@_SMLLN12TypedCalcCon18TPSWITCH__CONSTCASEE_396(i8*inreg%b)
ret i8*%c
}
define internal fastcc i8*@_SMLLN12TypedCalcCon18TPSWITCH__CONSTCASEE_717(i8*inreg%a,i8*inreg%b)#2 gc"smlsharp"{
%c=tail call fastcc i8*@_SMLFN12TypedCalcCon18TPSWITCH__CONSTCASEE(i8*inreg%b)
ret i8*%c
}
define internal fastcc i8*@_SMLL9checkRule_718(i8*inreg%a,i8*inreg%b)#2 gc"smlsharp"{
tail call fastcc void@_SMLL9checkRule_406(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*@_SMLLN12TypedCalcCon16TPSWITCH__CONCASEE_719(i8*inreg%a,i8*inreg%b)#4 gc"smlsharp"{
%c=tail call fastcc i8*@_SMLLN12TypedCalcCon16TPSWITCH__CONCASEE_407(i8*inreg%b)
ret i8*%c
}
define internal fastcc i8*@_SMLLN12TypedCalcCon16TPSWITCH__CONCASEE_720(i8*inreg%a,i8*inreg%b)#2 gc"smlsharp"{
%c=tail call fastcc i8*@_SMLFN12TypedCalcCon16TPSWITCH__CONCASEE(i8*inreg%b)
ret i8*%c
}
define internal fastcc i8*@_SMLL9checkRule_721(i8*inreg%a,i8*inreg%b)#2 gc"smlsharp"{
tail call fastcc void@_SMLL9checkRule_416(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*@_SMLLN12TypedCalcCon16TPSWITCH__EXNCASEE_722(i8*inreg%a,i8*inreg%b)#4 gc"smlsharp"{
%c=tail call fastcc i8*@_SMLLN12TypedCalcCon16TPSWITCH__EXNCASEE_417(i8*inreg%b)
ret i8*%c
}
define internal fastcc i8*@_SMLLN12TypedCalcCon16TPSWITCH__EXNCASEE_723(i8*inreg%a,i8*inreg%b)#2 gc"smlsharp"{
%c=tail call fastcc i8*@_SMLFN12TypedCalcCon16TPSWITCH__EXNCASEE(i8*inreg%b)
ret i8*%c
}
define internal fastcc i8*@_SMLLN12TypedCalcCon7TPTHROWE_724(i8*inreg%a,i8*inreg%b)#4 gc"smlsharp"{
%c=bitcast i8*%b to i8**
%d=load i8*,i8**%c,align 8
ret i8*%d
}
define internal fastcc i8*@_SMLLN12TypedCalcCon7TPTHROWE_725(i8*inreg%a,i8*inreg%b)#2 gc"smlsharp"{
%c=tail call fastcc i8*@_SMLFN12TypedCalcCon7TPTHROWE(i8*inreg%b)
ret i8*%c
}
define internal fastcc i8*@_SMLL1f_726(i8*inreg%a,i8*inreg%b)#2 gc"smlsharp"{
%c=bitcast i8*%b to i32*
%d=load i32,i32*%c,align 4
tail call fastcc void@_SMLL1f_426(i8*inreg%a,i32 inreg%d)
%e=tail call i8*@sml_alloc(i32 inreg 4)#0
%f=bitcast i8*%e to i32*
%g=getelementptr inbounds i8,i8*%e,i64 -4
%h=bitcast i8*%g to i32*
store i32 4,i32*%h,align 4
store i32 0,i32*%f,align 4
ret i8*%e
}
define internal fastcc i8*@_SMLLN12TypedCalcCon7TPCATCHE_727(i8*inreg%a,i8*inreg%b)#2 gc"smlsharp"{
%c=tail call fastcc i8*@_SMLFN12TypedCalcCon7TPCATCHE(i8*inreg%b)
ret i8*%c
}
define internal fastcc i8*@_SMLLN12TypedCalcCon9TPMONOLETE_728(i8*inreg%a,i8*inreg%b)#4 gc"smlsharp"{
%c=tail call fastcc i8*@_SMLLN12TypedCalcCon9TPMONOLETE_429(i8*inreg%b)
ret i8*%c
}
define internal fastcc i8*@_SMLLN12TypedCalcCon9TPMONOLETE_729(i8*inreg%a,i8*inreg%b)#2 gc"smlsharp"{
%c=tail call fastcc i8*@_SMLFN12TypedCalcCon9TPMONOLETE(i8*inreg%b)
ret i8*%c
}
define internal fastcc i8*@_SMLL1f_730(i8*inreg%a,i8*inreg%b)#2 gc"smlsharp"{
%c=bitcast i8*%b to i32*
%d=load i32,i32*%c,align 4
tail call fastcc void@_SMLL1f_434(i8*inreg%a,i32 inreg%d)
%e=tail call i8*@sml_alloc(i32 inreg 4)#0
%f=bitcast i8*%e to i32*
%g=getelementptr inbounds i8,i8*%e,i64 -4
%h=bitcast i8*%g to i32*
store i32 4,i32*%h,align 4
store i32 0,i32*%f,align 4
ret i8*%e
}
define internal fastcc i8*@_SMLLN12TypedCalcCon7TPRAISEE_731(i8*inreg%a,i8*inreg%b)#2 gc"smlsharp"{
%c=tail call fastcc i8*@_SMLFN12TypedCalcCon7TPRAISEE(i8*inreg%b)
ret i8*%c
}
define internal fastcc i8*@_SMLL1f_732(i8*inreg%a,i8*inreg%b)#2 gc"smlsharp"{
%c=bitcast i8*%b to i32*
%d=load i32,i32*%c,align 4
tail call fastcc void@_SMLL1f_438(i8*inreg%a,i32 inreg%d)
%e=tail call i8*@sml_alloc(i32 inreg 4)#0
%f=bitcast i8*%e to i32*
%g=getelementptr inbounds i8,i8*%e,i64 -4
%h=bitcast i8*%g to i32*
store i32 4,i32*%h,align 4
store i32 0,i32*%f,align 4
ret i8*%e
}
define internal fastcc i8*@_SMLLN12TypedCalcCon8TPHANDLEE_733(i8*inreg%a,i8*inreg%b)#2 gc"smlsharp"{
%c=tail call fastcc i8*@_SMLFN12TypedCalcCon8TPHANDLEE(i8*inreg%b)
ret i8*%c
}
define internal fastcc i8*@_SMLL4exps_734(i8*inreg%a,i8*inreg%b)#4 gc"smlsharp"{
%c=bitcast i8*%b to i8**
%d=load i8*,i8**%c,align 8
ret i8*%d
}
define internal fastcc i8*@_SMLL3tys_735(i8*inreg%a,i8*inreg%b)#4 gc"smlsharp"{
%c=getelementptr inbounds i8,i8*%b,i64 8
%d=bitcast i8*%c to i8**
%e=load i8*,i8**%d,align 8
ret i8*%e
}
define internal fastcc i8*@_SMLLN12TypedCalcCon8TPRECORDE_736(i8*inreg%a,i8*inreg%b)#2 gc"smlsharp"{
%c=tail call fastcc i8*@_SMLFN12TypedCalcCon8TPRECORDE(i8*inreg%b)
ret i8*%c
}
define internal fastcc i8*@_SMLLN12TypedCalcCon8TPSELECTE_738(i8*inreg%a,i8*inreg%b)#4 gc"smlsharp"{
%c=tail call fastcc i8*@_SMLFN12TypedCalcCon8TPSELECTE(i8*inreg%b)
ret i8*%c
}
define internal fastcc i8*@_SMLL1f_739(i8*inreg%a,i8*inreg%b)#2 gc"smlsharp"{
%c=bitcast i8*%b to i32*
%d=load i32,i32*%c,align 4
tail call fastcc void@_SMLL1f_458(i8*inreg%a,i32 inreg%d)
%e=tail call i8*@sml_alloc(i32 inreg 4)#0
%f=bitcast i8*%e to i32*
%g=getelementptr inbounds i8,i8*%e,i64 -4
%h=bitcast i8*%g to i32*
store i32 4,i32*%h,align 4
store i32 0,i32*%f,align 4
ret i8*%e
}
define internal fastcc i8*@_SMLLN12TypedCalcCon8TPMODIFYE_740(i8*inreg%a,i8*inreg%b)#4 gc"smlsharp"{
%c=tail call fastcc i8*@_SMLFN12TypedCalcCon8TPMODIFYE(i8*inreg%b)
ret i8*%c
}
define internal fastcc i8*@_SMLL1f_741(i8*inreg%a,i8*inreg%b)#2 gc"smlsharp"{
%c=bitcast i8*%b to i32*
%d=load i32,i32*%c,align 4
tail call fastcc void@_SMLL1f_465(i8*inreg%a,i32 inreg%d)
%e=tail call i8*@sml_alloc(i32 inreg 4)#0
%f=bitcast i8*%e to i32*
%g=getelementptr inbounds i8,i8*%e,i64 -4
%h=bitcast i8*%g to i32*
store i32 4,i32*%h,align 4
store i32 0,i32*%f,align 4
ret i8*%e
}
define internal fastcc i8*@_SMLLN12TypedCalcCon11TPPRIMAPPLYE_742(i8*inreg%a,i8*inreg%b)#2 gc"smlsharp"{
%c=tail call fastcc i8*@_SMLFN12TypedCalcCon11TPPRIMAPPLYE(i8*inreg%b)
ret i8*%c
}
define internal fastcc i8*@_SMLL1f_743(i8*inreg%a,i8*inreg%b)#2 gc"smlsharp"{
%c=bitcast i8*%b to i32*
%d=load i32,i32*%c,align 4
tail call fastcc void@_SMLL1f_471(i8*inreg%a,i32 inreg%d)
%e=tail call i8*@sml_alloc(i32 inreg 4)#0
%f=bitcast i8*%e to i32*
%g=getelementptr inbounds i8,i8*%e,i64 -4
%h=bitcast i8*%g to i32*
store i32 4,i32*%h,align 4
store i32 0,i32*%f,align 4
ret i8*%e
}
define internal fastcc i8*@_SMLLN12TypedCalcCon12TPOPRIMAPPLYE_744(i8*inreg%a,i8*inreg%b)#2 gc"smlsharp"{
%c=tail call fastcc i8*@_SMLFN12TypedCalcCon12TPOPRIMAPPLYE(i8*inreg%b)
ret i8*%c
}
define internal fastcc i8*@_SMLLN12TypedCalcCon6TPJOINE_745(i8*inreg%a,i8*inreg%b)#4 gc"smlsharp"{
%c=tail call fastcc i8*@_SMLFN12TypedCalcCon6TPJOINE(i8*inreg%b)
ret i8*%c
}
define internal fastcc i8*@_SMLLN12TypedCalcCon9TPDYNAMICE_746(i8*inreg%a,i8*inreg%b)#4 gc"smlsharp"{
%c=tail call fastcc i8*@_SMLFN12TypedCalcCon9TPDYNAMICE(i8*inreg%b)
ret i8*%c
}
define internal fastcc i8*@_SMLLN12TypedCalcCon11TPDYNAMICISE_747(i8*inreg%a,i8*inreg%b)#4 gc"smlsharp"{
%c=tail call fastcc i8*@_SMLFN12TypedCalcCon11TPDYNAMICISE(i8*inreg%b)
ret i8*%c
}
define internal fastcc i8*@_SMLLN12TypedCalcCon13TPDYNAMICNULLE_748(i8*inreg%a,i8*inreg%b)#4 gc"smlsharp"{
%c=tail call fastcc i8*@_SMLFN12TypedCalcCon13TPDYNAMICNULLE(i8*inreg%b)
ret i8*%c
}
define internal fastcc i8*@_SMLLN12TypedCalcCon12TPDYNAMICTOPE_749(i8*inreg%a,i8*inreg%b)#4 gc"smlsharp"{
%c=tail call fastcc i8*@_SMLFN12TypedCalcCon12TPDYNAMICTOPE(i8*inreg%b)
ret i8*%c
}
define internal fastcc i8*@_SMLLN12TypedCalcCon13TPDYNAMICVIEWE_750(i8*inreg%a,i8*inreg%b)#4 gc"smlsharp"{
%c=tail call fastcc i8*@_SMLFN12TypedCalcCon13TPDYNAMICVIEWE(i8*inreg%b)
ret i8*%c
}
define internal fastcc i8*@_SMLLN12TypedCalcCon13TPDYNAMICCASEE_751(i8*inreg%a,i8*inreg%b)#4 gc"smlsharp"{
%c=tail call fastcc i8*@_SMLFN12TypedCalcCon13TPDYNAMICCASEE(i8*inreg%b)
ret i8*%c
}
define internal fastcc i8*@_SMLLN12TypedCalcCon18TPDYNAMICEXISTTAPPE_752(i8*inreg%a,i8*inreg%b)#2 gc"smlsharp"{
%c=tail call fastcc i8*@_SMLFN12TypedCalcCon18TPDYNAMICEXISTTAPPE(i8*inreg%b)
ret i8*%c
}
define internal fastcc i8*@_SMLLN12TypedCalcCon8TPPATVARE_753(i8*inreg%a,i8*inreg%b)#2 gc"smlsharp"{
%c=tail call fastcc i8*@_SMLFN12TypedCalcCon8TPPATVARE(i8*inreg%b)
ret i8*%c
}
define internal fastcc i8*@_SMLL1f_754(i8*inreg%a,i8*inreg%b)#2 gc"smlsharp"{
%c=bitcast i8*%b to i32*
%d=load i32,i32*%c,align 4
tail call fastcc void@_SMLL1f_496(i8*inreg%a,i32 inreg%d)
%e=tail call i8*@sml_alloc(i32 inreg 4)#0
%f=bitcast i8*%e to i32*
%g=getelementptr inbounds i8,i8*%e,i64 -4
%h=bitcast i8*%g to i32*
store i32 4,i32*%h,align 4
store i32 0,i32*%f,align 4
ret i8*%e
}
define internal fastcc i8*@_SMLLN12TypedCalcCon18TPPATDATACONSTRUCTE_755(i8*inreg%a,i8*inreg%b)#2 gc"smlsharp"{
%c=tail call fastcc i8*@_SMLFN12TypedCalcCon18TPPATDATACONSTRUCTE(i8*inreg%b)
ret i8*%c
}
define internal fastcc i8*@_SMLL1f_756(i8*inreg%a,i8*inreg%b)#2 gc"smlsharp"{
%c=bitcast i8*%b to i32*
%d=load i32,i32*%c,align 4
tail call fastcc void@_SMLL1f_505(i8*inreg%a,i32 inreg%d)
%e=tail call i8*@sml_alloc(i32 inreg 4)#0
%f=bitcast i8*%e to i32*
%g=getelementptr inbounds i8,i8*%e,i64 -4
%h=bitcast i8*%g to i32*
store i32 4,i32*%h,align 4
store i32 0,i32*%f,align 4
ret i8*%e
}
define internal fastcc i8*@_SMLLN12TypedCalcCon17TPPATEXNCONSTRUCTE_757(i8*inreg%a,i8*inreg%b)#2 gc"smlsharp"{
%c=tail call fastcc i8*@_SMLFN12TypedCalcCon17TPPATEXNCONSTRUCTE(i8*inreg%b)
ret i8*%c
}
define internal fastcc i8*@_SMLL1f_758(i8*inreg%a,i8*inreg%b)#2 gc"smlsharp"{
%c=bitcast i8*%b to i32*
%d=load i32,i32*%c,align 4
tail call fastcc void@_SMLL1f_511(i8*inreg%a,i32 inreg%d)
%e=tail call i8*@sml_alloc(i32 inreg 4)#0
%f=bitcast i8*%e to i32*
%g=getelementptr inbounds i8,i8*%e,i64 -4
%h=bitcast i8*%g to i32*
store i32 4,i32*%h,align 4
store i32 0,i32*%f,align 4
ret i8*%e
}
define internal fastcc i8*@_SMLLN12TypedCalcCon12TPPATLAYEREDE_759(i8*inreg%a,i8*inreg%b)#5 gc"smlsharp"{
%c=tail call fastcc i8*@_SMLLN12TypedCalcCon12TPPATLAYEREDE_514(i8*inreg%b)
unreachable
}
define internal fastcc i8*@_SMLLN12TypedCalcCon12TPPATLAYEREDE_760(i8*inreg%a,i8*inreg%b)#2 gc"smlsharp"{
%c=tail call fastcc i8*@_SMLFN12TypedCalcCon12TPPATLAYEREDE(i8*inreg%b)
ret i8*%c
}
define internal fastcc i8*@_SMLL4pats_761(i8*inreg%a,i8*inreg%b)#4 gc"smlsharp"{
%c=bitcast i8*%b to i8**
%d=load i8*,i8**%c,align 8
ret i8*%d
}
define internal fastcc i8*@_SMLL3tys_762(i8*inreg%a,i8*inreg%b)#4 gc"smlsharp"{
%c=getelementptr inbounds i8,i8*%b,i64 8
%d=bitcast i8*%c to i8**
%e=load i8*,i8**%d,align 8
ret i8*%e
}
define internal fastcc i8*@_SMLL1f_763(i8*inreg%a,i8*inreg%b)#2 gc"smlsharp"{
%c=bitcast i8*%b to i32*
%d=load i32,i32*%c,align 4
tail call fastcc void@_SMLL1f_524(i8*inreg%a,i32 inreg%d)
%e=tail call i8*@sml_alloc(i32 inreg 4)#0
%f=bitcast i8*%e to i32*
%g=getelementptr inbounds i8,i8*%e,i64 -4
%h=bitcast i8*%g to i32*
store i32 4,i32*%h,align 4
store i32 0,i32*%f,align 4
ret i8*%e
}
define internal fastcc i8*@_SMLLN12TypedCalcCon11TPPATRECORDE_764(i8*inreg%a,i8*inreg%b)#5 gc"smlsharp"{
%c=tail call fastcc i8*@_SMLLN12TypedCalcCon11TPPATRECORDE_527(i8*inreg%b)
unreachable
}
define internal fastcc i8*@_SMLLN12TypedCalcCon11TPPATRECORDE_765(i8*inreg%a,i8*inreg%b)#2 gc"smlsharp"{
%c=tail call fastcc i8*@_SMLLN12TypedCalcCon11TPPATRECORDE_529(i8*inreg%b)
ret i8*%c
}
define internal fastcc i8*@_SMLLN12TypedCalcCon11TPPATRECORDE_766(i8*inreg%a,i8*inreg%b)#4 gc"smlsharp"{
%c=tail call fastcc i8*@_SMLFN12TypedCalcCon11TPPATRECORDE(i8*inreg%b)
ret i8*%c
}
define internal fastcc i8*@_SMLLN12TypedCalcCon7patVarsE_767(i8*inreg%a,i8*inreg%b)#5 gc"smlsharp"{
%c=tail call fastcc i8*@_SMLLN12TypedCalcCon7patVarsE_536(i8*inreg%b)
unreachable
}
define internal fastcc i8*@_SMLLN12TypedCalcCon7patVarsE_768(i8*inreg%a,i8*inreg%b)#2 gc"smlsharp"{
%c=tail call fastcc i8*@_SMLLN12TypedCalcCon7patVarsE_538(i8*inreg%b)
ret i8*%c
}
define internal fastcc i8*@_SMLLN12TypedCalcCon7patVarsE_769(i8*inreg%a,i8*inreg%b)#2 gc"smlsharp"{
%c=tail call fastcc i8*@_SMLFN12TypedCalcCon7patVarsE(i8*inreg%b)
ret i8*%c
}
define internal fastcc i8*@_SMLLN12TypedCalcCon9extendEnvE_770(i8*inreg%a,i8*inreg%b)#4 gc"smlsharp"{
%c=getelementptr inbounds i8,i8*%b,i64 8
%d=bitcast i8*%c to i8**
%e=load i8*,i8**%d,align 8
ret i8*%e
}
define internal fastcc i8*@_SMLLN12TypedCalcCon9extendEnvE_771(i8*inreg%a,i8*inreg%b)#4 gc"smlsharp"{
%c=getelementptr inbounds i8,i8*%b,i64 8
%d=bitcast i8*%c to i8**
%e=load i8*,i8**%d,align 8
ret i8*%e
}
define internal fastcc i8*@_SMLLN12TypedCalcCon9extendEnvE_772(i8*inreg%a,i8*inreg%b)#4 gc"smlsharp"{
%c=getelementptr inbounds i8,i8*%b,i64 8
%d=bitcast i8*%c to i8**
%e=load i8*,i8**%d,align 8
ret i8*%e
}
define internal fastcc i8*@_SMLLN12TypedCalcCon9extendEnvE_773(i8*inreg%a,i8*inreg%b)#4 gc"smlsharp"{
%c=getelementptr inbounds i8,i8*%b,i64 8
%d=bitcast i8*%c to i8**
%e=load i8*,i8**%d,align 8
ret i8*%e
}
define internal fastcc i8*@_SMLLN12TypedCalcCon9extendEnvE_774(i8*inreg%a,i8*inreg%b)#4 gc"smlsharp"{
%c=getelementptr inbounds i8,i8*%b,i64 8
%d=bitcast i8*%c to i8**
%e=load i8*,i8**%d,align 8
ret i8*%e
}
define internal fastcc i8*@_SMLLN12TypedCalcCon9extendEnvE_775(i8*inreg%a,i8*inreg%b)#2 gc"smlsharp"{
%c=tail call fastcc i8*@_SMLFN12TypedCalcCon9extendEnvE(i8*inreg%b)
ret i8*%c
}
define internal fastcc i8*@_SMLL1x_776(i8*inreg%a,i8*inreg%b)#2 gc"smlsharp"{
%c=tail call fastcc i8*@_SMLL1x_554(i8*inreg%b)
ret i8*%c
}
define internal fastcc i8*@_SMLL1x_777(i8*inreg%a,i8*inreg%b)#2 gc"smlsharp"{
%c=tail call fastcc i8*@_SMLL1x_557(i8*inreg%b)
ret i8*%c
}
define internal fastcc i8*@_SMLL1x_778(i8*inreg%a,i8*inreg%b)#2 gc"smlsharp"{
%c=tail call fastcc i8*@_SMLL1x_560(i8*inreg%b)
ret i8*%c
}
define internal fastcc i8*@_SMLL1x_779(i8*inreg%a,i8*inreg%b)#2 gc"smlsharp"{
%c=tail call fastcc i8*@_SMLL1x_563(i8*inreg%b)
ret i8*%c
}
define internal fastcc i8*@_SMLL1f_780(i8*inreg%a,i8*inreg%b)#2 gc"smlsharp"{
%c=bitcast i8*%b to i32*
%d=load i32,i32*%c,align 4
tail call fastcc void@_SMLL1f_571(i8*inreg%a,i32 inreg%d)
%e=tail call i8*@sml_alloc(i32 inreg 4)#0
%f=bitcast i8*%e to i32*
%g=getelementptr inbounds i8,i8*%e,i64 -4
%h=bitcast i8*%g to i32*
store i32 4,i32*%h,align 4
store i32 0,i32*%f,align 4
ret i8*%e
}
define internal fastcc i8*@_SMLL1f_781(i8*inreg%a,i8*inreg%b)#2 gc"smlsharp"{
%c=bitcast i8*%b to i32*
%d=load i32,i32*%c,align 4
tail call fastcc void@_SMLL1f_575(i8*inreg%a,i32 inreg%d)
%e=tail call i8*@sml_alloc(i32 inreg 4)#0
%f=bitcast i8*%e to i32*
%g=getelementptr inbounds i8,i8*%e,i64 -4
%h=bitcast i8*%g to i32*
store i32 4,i32*%h,align 4
store i32 0,i32*%f,align 4
ret i8*%e
}
define internal fastcc i8*@_SMLL9argTyList_782(i8*inreg%a,i8*inreg%b)#4 gc"smlsharp"{
%c=getelementptr inbounds i8,i8*%b,i64 8
%d=bitcast i8*%c to i8**
%e=load i8*,i8**%d,align 8
ret i8*%e
}
define internal fastcc i8*@_SMLL1f_783(i8*inreg%a,i8*inreg%b)#2 gc"smlsharp"{
%c=bitcast i8*%b to i32*
%d=load i32,i32*%c,align 4
tail call fastcc void@_SMLL1f_582(i8*inreg%a,i32 inreg%d)
%e=tail call i8*@sml_alloc(i32 inreg 4)#0
%f=bitcast i8*%e to i32*
%g=getelementptr inbounds i8,i8*%e,i64 -4
%h=bitcast i8*%g to i32*
store i32 4,i32*%h,align 4
store i32 0,i32*%f,align 4
ret i8*%e
}
define internal fastcc i8*@_SMLLN12TypedCalcCon10funrecbindE_784(i8*inreg%a,i8*inreg%b)#4 gc"smlsharp"{
%c=bitcast i8*%b to i8**
%d=load i8*,i8**%c,align 8
ret i8*%d
}
define internal fastcc i8*@_SMLLN12TypedCalcCon10funrecbindE_785(i8*inreg%a,i8*inreg%b)#2 gc"smlsharp"{
%c=tail call fastcc i8*@_SMLLN12TypedCalcCon10funrecbindE_585(i8*inreg%b)
ret i8*%c
}
define internal fastcc i8*@_SMLLN12TypedCalcCon9TPFUNDECLE_787(i8*inreg%a,i8*inreg%b)#4 gc"smlsharp"{
%c=getelementptr inbounds i8,i8*%b,i64 16
%d=bitcast i8*%c to i8**
%e=load i8*,i8**%d,align 8
ret i8*%e
}
define internal fastcc i8*@_SMLLN12TypedCalcCon13TPPOLYFUNDECLE_788(i8*inreg%a,i8*inreg%b)#4 gc"smlsharp"{
%c=getelementptr inbounds i8,i8*%b,i64 16
%d=bitcast i8*%c to i8**
%e=load i8*,i8**%d,align 8
ret i8*%e
}
define internal fastcc i8*@_SMLL1f_789(i8*inreg%a,i8*inreg%b)#2 gc"smlsharp"{
%c=bitcast i8*%b to i32*
%d=load i32,i32*%c,align 4
tail call fastcc void@_SMLL1f_599(i8*inreg%a,i32 inreg%d)
%e=tail call i8*@sml_alloc(i32 inreg 4)#0
%f=bitcast i8*%e to i32*
%g=getelementptr inbounds i8,i8*%e,i64 -4
%h=bitcast i8*%g to i32*
store i32 4,i32*%h,align 4
store i32 0,i32*%f,align 4
ret i8*%e
}
define internal fastcc i8*@_SMLL11newRecbinds_790(i8*inreg%a,i8*inreg%b)#4 gc"smlsharp"{
%c=tail call fastcc i8*@_SMLL11newRecbinds_601(i8*inreg%b)
ret i8*%c
}
define internal fastcc i8*@_SMLL1f_791(i8*inreg%a,i8*inreg%b)#4 gc"smlsharp"{
%c=tail call fastcc i8*@_SMLL1f_604(i8*inreg%b)
ret i8*%c
}
define internal fastcc i8*@_SMLL1f_792(i8*inreg%a,i8*inreg%b)#2 gc"smlsharp"{
%c=bitcast i8*%b to i32*
%d=load i32,i32*%c,align 4
tail call fastcc void@_SMLL1f_606(i8*inreg%a,i32 inreg%d)
%e=tail call i8*@sml_alloc(i32 inreg 4)#0
%f=bitcast i8*%e to i32*
%g=getelementptr inbounds i8,i8*%e,i64 -4
%h=bitcast i8*%g to i32*
store i32 4,i32*%h,align 4
store i32 0,i32*%f,align 4
ret i8*%e
}
define internal fastcc i8*@_SMLLN12TypedCalcCon8TPVALRECE_793(i8*inreg%a,i8*inreg%b)#4 gc"smlsharp"{
%c=getelementptr inbounds i8,i8*%b,i64 8
%d=bitcast i8*%c to i8**
%e=load i8*,i8**%d,align 8
ret i8*%e
}
define internal fastcc i8*@_SMLL11newRecbinds_794(i8*inreg%a,i8*inreg%b)#4 gc"smlsharp"{
%c=tail call fastcc i8*@_SMLL11newRecbinds_610(i8*inreg%b)
ret i8*%c
}
define internal fastcc i8*@_SMLL1f_795(i8*inreg%a,i8*inreg%b)#4 gc"smlsharp"{
%c=tail call fastcc i8*@_SMLL1f_613(i8*inreg%b)
ret i8*%c
}
define internal fastcc i8*@_SMLL1f_796(i8*inreg%a,i8*inreg%b)#2 gc"smlsharp"{
%c=bitcast i8*%b to i32*
%d=load i32,i32*%c,align 4
tail call fastcc void@_SMLL1f_615(i8*inreg%a,i32 inreg%d)
%e=tail call i8*@sml_alloc(i32 inreg 4)#0
%f=bitcast i8*%e to i32*
%g=getelementptr inbounds i8,i8*%e,i64 -4
%h=bitcast i8*%g to i32*
store i32 4,i32*%h,align 4
store i32 0,i32*%f,align 4
ret i8*%e
}
define internal fastcc i8*@_SMLLN12TypedCalcCon12TPVALPOLYRECE_797(i8*inreg%a,i8*inreg%b)#4 gc"smlsharp"{
%c=getelementptr inbounds i8,i8*%b,i64 8
%d=bitcast i8*%c to i8**
%e=load i8*,i8**%d,align 8
ret i8*%e
}
define internal fastcc i8*@_SMLLN12TypedCalcCon10TPCONSTANTE_798(i8*inreg%a,i8*inreg%b)#4 gc"smlsharp"{
%c=tail call fastcc i8*@_SMLFN12TypedCalcCon10TPCONSTANTE(i8*inreg%b)
ret i8*%c
}
define internal fastcc i8*@_SMLLN12TypedCalcCon8TPSIZEOFE_799(i8*inreg%a,i8*inreg%b)#4 gc"smlsharp"{
%c=tail call fastcc i8*@_SMLFN12TypedCalcCon8TPSIZEOFE(i8*inreg%b)
ret i8*%c
}
define internal fastcc i8*@_SMLLN12TypedCalcCon8TPEXNTAGE_800(i8*inreg%a,i8*inreg%b)#4 gc"smlsharp"{
%c=tail call fastcc i8*@_SMLFN12TypedCalcCon8TPEXNTAGE(i8*inreg%b)
ret i8*%c
}
define internal fastcc i8*@_SMLLN12TypedCalcCon10TPEXEXNTAGE_801(i8*inreg%a,i8*inreg%b)#4 gc"smlsharp"{
%c=tail call fastcc i8*@_SMLFN12TypedCalcCon10TPEXEXNTAGE(i8*inreg%b)
ret i8*%c
}
define internal fastcc i8*@_SMLLN12TypedCalcCon7TPEXVARE_802(i8*inreg%a,i8*inreg%b)#4 gc"smlsharp"{
%c=tail call fastcc i8*@_SMLFN12TypedCalcCon7TPEXVARE(i8*inreg%b)
ret i8*%c
}
define internal fastcc i8*@_SMLLN12TypedCalcCon5TPVARE_803(i8*inreg%a,i8*inreg%b)#4 gc"smlsharp"{
%c=tail call fastcc i8*@_SMLFN12TypedCalcCon5TPVARE(i8*inreg%b)
ret i8*%c
}
define internal fastcc i8*@_SMLLN12TypedCalcCon11TPRECFUNVARE_804(i8*inreg%a,i8*inreg%b)#4 gc"smlsharp"{
%c=tail call fastcc i8*@_SMLFN12TypedCalcCon11TPRECFUNVARE(i8*inreg%b)
ret i8*%c
}
define internal fastcc i8*@_SMLLN12TypedCalcCon13TPPATCONSTANTE_805(i8*inreg%a,i8*inreg%b)#2 gc"smlsharp"{
%c=tail call fastcc i8*@_SMLFN12TypedCalcCon13TPPATCONSTANTE(i8*inreg%b)
ret i8*%c
}
define internal fastcc i8*@_SMLLN12TypedCalcCon9TPPATWILDE_806(i8*inreg%a,i8*inreg%b)#2 gc"smlsharp"{
%c=tail call fastcc i8*@_SMLFN12TypedCalcCon9TPPATWILDE(i8*inreg%b)
ret i8*%c
}
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}
attributes#5={noreturn uwtable}
