From 5db8fa83151110706ef4df3ef04a23df9590c516 Mon Sep 17 00:00:00 2001 From: =?UTF-8?q?Ondr=CC=8Cej=20S=CC=8Cebek?= Date: Sun, 6 Aug 2023 02:39:38 +0200 Subject: [PATCH] Make CI happy --- bench/Benchmark.hs | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/bench/Benchmark.hs b/bench/Benchmark.hs index 1228d31669..cd5fc3e3da 100644 --- a/bench/Benchmark.hs +++ b/bench/Benchmark.hs @@ -75,7 +75,7 @@ circlerProgram = -- | Initializes a robot with program prog at location loc facing north. initRobot :: ProcessedTerm -> Location -> TRobot -initRobot prog loc = mkRobot () Nothing "" [] (Just $ Cosmic DefaultRootSubworld loc) north defaultRobotDisplay (initMachine prog Context.empty emptyStore) [] [] False False 0 +initRobot prog loc = mkRobot () Nothing "" mempty (Just $ Cosmic DefaultRootSubworld loc) north defaultRobotDisplay (initMachine prog Context.empty emptyStore) [] [] False False 0 -- | Creates a GameState with numRobot copies of robot on a blank map, aligned -- in a row starting at (0,0) and spreading east.