diff --git a/src/ATrade/Driver/Backtest.hs b/src/ATrade/Driver/Backtest.hs
index 0cfb9a4..894ef99 100644
--- a/src/ATrade/Driver/Backtest.hs
+++ b/src/ATrade/Driver/Backtest.hs
@@ -277,7 +277,7 @@ backtestMain dataDownloadDelta defaultState initCallback callback = do
                                 }
 
     handleEvent event@(NewBar bar) = do
-      events <- executePendingOrders bar
+      executePendingOrders bar
       firedTimers <- fireTimers (barTimestamp bar)
       mapM_ (\x -> enqueueEvent (TimerFired x)) firedTimers
       handleEvent' event