36 lines
666 B
Agda
36 lines
666 B
Agda
|
module Luau.Syntax where
|
|||
|
|
|
|||
|
|
open import Agda.Builtin.String using (String)
|
|||
|
|
|
|||
|
|
infixr 5 _∙_
|
|||
|
|
|
|||
|
|
data Type : Set where
|
|||
|
|
nil : Type
|
|||
|
|
_⇒_ : Type → Type → Type
|
|||
|
|
none : Type
|
|||
|
|
any : Type
|
|||
|
|
_∪_ : Type → Type → Type
|
|||
|
|
_∩_ : Type → Type → Type
|
|||
|
|
|
|||
|
|
Var : Set
|
|||
|
|
Var = String
|
|||
|
|
|
|||
|
|
data Block : Set
|
|||
|
|
data Stat : Set
|
|||
|
|
data Expr : Set
|
|||
|
|
|
|||
|
|
data Block where
|
|||
|
|
_∙_ : Stat → Block → Block
|
|||
|
|
_∙ : Stat → Block
|
|||
|
|
|
|||
|
|
data Stat where
|
|||
|
|
function_⟨_⟩_end : Var → Var → Block → Stat
|
|||
|
|
local_←_ : Var → Expr → Stat
|
|||
|
|
return : Expr → Stat
|
|||
|
|
|
|||
|
|
data Expr where
|
|||
|
|
nil : Expr
|
|||
|
|
var : Var → Expr
|
|||
|
|
_$_ : Expr → Expr → Expr
|
|||
|
|
function⟨_⟩_end : Var → Block → Expr
|