crafting-interpreters-hs/app/Main.hs

module Main where

import Lox.Scanner

run :: String -> IO ()
run source = mapM_ print tokens
    where tokens = scanTokensFromSource source

main :: IO ()
main = getLine >>= run
init 2025-12-02 23:26:17 +03:00			`module Main where`

scanner first steps 2025-12-09 17:23:54 +03:00			`import Lox.Scanner`

			`run :: String -> IO ()`
			`run source = mapM_ print tokens`
scanner finished 2025-12-24 18:06:03 +03:00			`where tokens = scanTokensFromSource source`
scanner first steps 2025-12-09 17:23:54 +03:00
init 2025-12-02 23:26:17 +03:00			`main :: IO ()`
scanner finished 2025-12-24 18:06:03 +03:00			`main = getLine >>= run`