FIXUP fix error message

turion · May 13, 2024 · 76dffde · 76dffde
1 parent fb0b505
commit 76dffde
Showing 1 changed file with 1 addition and 1 deletion.
diff --git a/rhine/src/FRP/Rhine/SN/Free.hs b/rhine/src/FRP/Rhine/SN/Free.hs
@@ -254,7 +254,7 @@ eraseClockResBuf _ orderedPositions resbuf0 =
         (Nothing, _) -> returnA -< resbuf
         (Just ti, Present a) -> do
           arrM $ uncurry $ uncurry put -< ((resbuf, ti), a)
-        _ -> error "eraseClockSNComponent: internal error (Resampling)" -< ()
+        _ -> error "eraseClockResBuf: internal error" -< ()
       case projectPosition posOut $ getTick tick of
         Nothing -> returnA -< (Absent, resbuf')
         Just ti -> do