Staticstatic evaluation of expressions
exception Error of errorval remove : 'a Ident.Env.t -> 'b Ident.Env.t -> 'a Ident.Env.tRemove entries in the type environment of a block
val record_access : Global.value_code -> Lident.t -> Global.value_codePattern matching
val matches :
Global.value_code Ident.Env.t ->
Zelus.pattern ->
Global.value_code ->
Global.value_code Ident.Env.tPattern matching. matches env p v = env' returns an extended
val select :
Global.value_code Ident.Env.t ->
Global.value_code ->
'a Zelus.match_handler list ->
Global.value_code Ident.Env.t * 'aselect env v m_b_list = b where * - env is a environment; * - v a value; * - m_b_list a list of pattern * block; * - b a block whose pattern matches v and is the first in the list
val expression :
Global.value_code Ident.Env.t ->
Zelus.exp ->
Global.value_codeEvaluate an expression. expression env e = v
val app : Global.value_code -> Global.value_code list -> Global.value_codeEvaluate an application
val local :
Global.value_code Ident.Env.t ->
Zelus.local ->
Global.value_code Ident.Env.tEvaluate all the definitions and returns an environment
val equation :
Global.value_code Ident.Env.t ->
Zelus.eq ->
Global.value_code Ident.Env.tReduce an equation.
val block :
Global.value_code Ident.Env.t ->
Zelus.eq list Zelus.block ->
Global.value_code Ident.Env.t