Javascript.Time.$wccall1 ds_s5GY ds1_s5GZ eta_s5H0 = ffi_wrapper4 _Javascript_Time_setTimeout_ ds_s5GY ds1_s5GZ eta_s5H0 Javascript.Time.a ds_s5H5 ds1_s5H8 eta_s5He = select ds_s5H5 (GHC.Types.I# ds3_s5Hc -> select ds1_s5H8 (GHC.Ptr.Ptr ds5_s5Hd -> let !wild_s5JE = ffi_wrapper4 _Javascript_Time_setTimeout_ ds3_s5Hc ds5_s5Hd eta_s5He in select wild_s5JE (<{GHC.Tuple.(,)}> ds6_s5Hj ds7_s5Hk -> <{GHC.Tuple.(,)}> ds6_s5Hj (GHC.Ptr.Ptr ds7_s5Hk)))) Javascript.Time.setTimeout_ eta_B3_B3 eta_B2_B2 eta_B1_B1 = Javascript.Time.a eta_B3_B3 eta_B2_B2 eta_B1_B1 Javascript.Time.$wa ww_s5HA w_s5Hp w1_s5HC = let !ds_s5JU = Javascript.Base.Types.FakePtr w_s5Hp in select ds_s5JU (GHC.Ptr.Ptr ds1_s5Hu -> let !tpl_s5JT = w_s5Hp, !wild_s5JS = ffi_wrapper3 makeCallback ds1_s5Hu GHC.Prim.realWorld# in select wild_s5JS (<{GHC.Tuple.(,)}> ds2_s5JR ds3_s5HB -> let !wild1_s5JQ = ffi_wrapper4 _Javascript_Time_setTimeout_ ww_s5HA ds3_s5HB w1_s5HC in select wild1_s5JQ (<{GHC.Tuple.(,)}> ds4_s5HH ds5_s5HI -> <{GHC.Tuple.(,)}> ds4_s5HH (GHC.Ptr.Ptr ds5_s5HI)))) <{Javascript.Time.defer'1}> w_s5HN w1_s5HR w2_s5HS = select w_s5HN (GHC.Types.I# ww_s5HQ -> Javascript.Time.$wa ww_s5HQ w1_s5HR w2_s5HS) <{Javascript.Time.defer'}> eta_B3_B3 eta_B2_B2 eta_B1_B1 = <{Javascript.Time.defer'1}> eta_B3_B3 eta_B2_B2 eta_B1_B1 Javascript.Time.defer1 eta_s5HV eta1_s5I7 = let !ds_s5K4 = Javascript.Base.Types.FakePtr eta_s5HV in select ds_s5K4 (GHC.Ptr.Ptr ds1_s5I0 -> let !tpl_s5K3 = eta_s5HV, !wild_s5K2 = ffi_wrapper3 makeCallback ds1_s5I0 GHC.Prim.realWorld# in select wild_s5K2 (<{GHC.Tuple.(,)}> ds2_s5K1 ds3_s5I6 -> let !wild1_s5K0 = ffi_wrapper4 _Javascript_Time_setTimeout_ 0 ds3_s5I6 eta1_s5I7 in select wild1_s5K0 (<{GHC.Tuple.(,)}> ds4_s5Ic ds5_s5Id -> <{GHC.Tuple.(,)}> ds4_s5Ic (GHC.Ptr.Ptr ds5_s5Id)))) Javascript.Time.defer eta_B2_B2 eta_B1_B1 = Javascript.Time.defer1 eta_B2_B2 eta_B1_B1 Javascript.Time.setTimeout eta_B2_B2 eta_B1_B1 = Javascript.Time.defer1 eta_B2_B2 eta_B1_B1 <{Javascript.Time.setTimeout'}> eta_B3_B3 eta_B2_B2 eta_B1_B1 = <{Javascript.Time.defer'1}> eta_B3_B3 eta_B2_B2 eta_B1_B1 Javascript.Time.a1 ds_s5Ih eta_s5Im = select ds_s5Ih (GHC.Ptr.Ptr ds2_s5Il -> let !wild_s5K9 = ffi_wrapper3 _Javascript_Time_clearTimeout ds2_s5Il eta_s5Im in select wild_s5K9 (<{GHC.Tuple.()}> ds3_s5Iq -> <{GHC.Tuple.(,)}> ds3_s5Iq <{GHC.Tuple.()}>)) Javascript.Time.clearTimeout eta_B2_B2 eta_B1_B1 = Javascript.Time.a1 eta_B2_B2 eta_B1_B1 Javascript.Time.$wccall ds_s5Iv ds1_s5Iw eta_s5Ix = ffi_wrapper4 _Javascript_Time_setInterval_ ds_s5Iv ds1_s5Iw eta_s5Ix Javascript.Time.a2 ds_s5IC ds1_s5IF eta_s5IL = select ds_s5IC (GHC.Types.I# ds3_s5IJ -> select ds1_s5IF (GHC.Ptr.Ptr ds5_s5IK -> let !wild_s5Kf = ffi_wrapper4 _Javascript_Time_setInterval_ ds3_s5IJ ds5_s5IK eta_s5IL in select wild_s5Kf (<{GHC.Tuple.(,)}> ds6_s5IQ ds7_s5IR -> <{GHC.Tuple.(,)}> ds6_s5IQ (GHC.Ptr.Ptr ds7_s5IR)))) Javascript.Time.setInterval_ eta_B3_B3 eta_B2_B2 eta_B1_B1 = Javascript.Time.a2 eta_B3_B3 eta_B2_B2 eta_B1_B1 Javascript.Time.$wa1 ww_s5J7 w_s5IW w1_s5J9 = let !ds_s5Kp = Javascript.Base.Types.FakePtr w_s5IW in select ds_s5Kp (GHC.Ptr.Ptr ds1_s5J1 -> let !tpl_s5Ko = w_s5IW, !wild_s5Kn = ffi_wrapper3 makeCallback ds1_s5J1 GHC.Prim.realWorld# in select wild_s5Kn (<{GHC.Tuple.(,)}> ds2_s5Km ds3_s5J8 -> let !wild1_s5Kl = ffi_wrapper4 _Javascript_Time_setInterval_ ww_s5J7 ds3_s5J8 w1_s5J9 in select wild1_s5Kl (<{GHC.Tuple.(,)}> ds4_s5Je ds5_s5Jf -> <{GHC.Tuple.(,)}> ds4_s5Je (GHC.Ptr.Ptr ds5_s5Jf)))) Javascript.Time.interval1 w_s5Jk w1_s5Jo w2_s5Jp = select w_s5Jk (GHC.Types.I# ww_s5Jn -> Javascript.Time.$wa1 ww_s5Jn w1_s5Jo w2_s5Jp) Javascript.Time.interval eta_B3_B3 eta_B2_B2 eta_B1_B1 = Javascript.Time.interval1 eta_B3_B3 eta_B2_B2 eta_B1_B1 Javascript.Time.setInterval eta_B3_B3 eta_B2_B2 eta_B1_B1 = Javascript.Time.interval1 eta_B3_B3 eta_B2_B2 eta_B1_B1 Javascript.Time.a3 ds_s5Js eta_s5Jx = select ds_s5Js (GHC.Ptr.Ptr ds2_s5Jw -> let !wild_s5Kv = ffi_wrapper3 _Javascript_Time_clearInterval ds2_s5Jw eta_s5Jx in select wild_s5Kv (<{GHC.Tuple.()}> ds3_s5JB -> <{GHC.Tuple.(,)}> ds3_s5JB <{GHC.Tuple.()}>)) Javascript.Time.clearInterval eta_B2_B2 eta_B1_B1 = Javascript.Time.a3 eta_B2_B2 eta_B1_B1