Rename "compiler" functionality to Evaluator

Allows for stdin input for evaluation when no input file is provided.
This commit is contained in:
James Eversole
2025-01-01 08:17:05 -06:00
parent 458d3c3b10
commit 7d38d99dcd
8 changed files with 43 additions and 32 deletions

19
src/FileEval.hs Normal file
View File

@ -0,0 +1,19 @@
module FileEval where
import Eval
import Library
import Parser
import Research
import System.IO
import qualified Data.Map as Map
evaluateFile :: FilePath -> IO T
evaluateFile filePath = do
contents <- readFile filePath
let asts = parseTricu contents
let finalEnv = evalTricu library asts
case Map.lookup "__result" finalEnv of
Just finalResult -> return finalResult
Nothing -> error "No result found in final environment"