src/Main.hs


1
2
3
4
5
6
7
8
9
10
11
12
13
14

-- vim: et ts=2 sw=2 ai:
module Main where

import Prelude hiding(lex)

import SPL.Syntax
import SPL.Parse

main :: IO ()
main = do
  putStrLn $ show result
  where
    result :: Maybe [Token]
    result = lex "+-123"