SmurfParse.dcl


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

definition module SmurfParse

from Data.Maybe import ::Maybe

from Smurf import ::Program, ::Stm, ::Expr

:: VarChar = Char Char
           | VarString String
           | Quoted Expr

eToVarChars :: Expr -> [VarChar]

parse :: ![Char] -> Maybe Program
parsev :: ![VarChar] -> Maybe Program