File tree Expand file tree Collapse file tree 1 file changed +3
-3
lines changed Expand file tree Collapse file tree 1 file changed +3
-3
lines changed Original file line number Diff line number Diff line change @@ -63,7 +63,7 @@ def oneSleep : IO Unit := do
63
63
assert! (← task.block) == 37
64
64
where
65
65
go : IO (AsyncTask Nat) := do
66
- let interval ← Interval.mk BASE_DURATION sorry
66
+ let interval ← Interval.mk BASE_DURATION
67
67
(← interval.tick).mapIO fun _ => do
68
68
interval.stop
69
69
return 37
@@ -73,7 +73,7 @@ def doubleSleep : IO Unit := do
73
73
assert! (← task.block) == 37
74
74
where
75
75
go : IO (AsyncTask Nat) := do
76
- let interval ← Interval.mk BASE_DURATION sorry
76
+ let interval ← Interval.mk BASE_DURATION
77
77
(← interval.tick).bindIO fun _ => do
78
78
(← interval.tick).mapIO fun _ => do
79
79
interval.stop
@@ -84,7 +84,7 @@ def resetSleep : IO Unit := do
84
84
assert! (← task.block) == 37
85
85
where
86
86
go : IO (AsyncTask Nat) := do
87
- let interval ← Interval.mk BASE_DURATION sorry
87
+ let interval ← Interval.mk BASE_DURATION
88
88
(← interval.tick).bindIO fun _ => do
89
89
let waiter ← interval.tick
90
90
interval.reset
You can’t perform that action at this time.
0 commit comments