fix: linter

EdenComp · Jan 8, 2024 · 60d3bd1 · 60d3bd1
1 parent 3051b66
commit 60d3bd1
Showing 1 changed file with 1 addition and 1 deletion.
diff --git a/src/Dreamberd/Vm.hs b/src/Dreamberd/Vm.hs
@@ -80,7 +80,7 @@ exec env args (Bool x : xs) (JumpIfFalse num : insts)
     | otherwise = exec env args xs insts
 exec _ _ _ (JumpIfFalse _ : _) = return (Left "Wrong data types in stack: JumpIfFalse needs a Bool")
 
-execCall :: [Env] -> [Value] ->  IO (Either String [Value])
+execCall :: [Env] -> [Value] -> IO (Either String [Value])
 execCall _ [] = return (Left "Stack is empty for Call instruction")
 execCall _ (Symbol (FunctionName "print") : val : xs) = putStr (show val) >> return (Right xs)
 execCall _ (Symbol (FunctionName "print") : _) = return (Left "Stack is empty for print instruction")