Skip to content
Commit 2b74a79a authored by Stefan's avatar Stefan
Browse files

* src/env.ml (value_type) <Vtype>: New, replaces Vdummy and Vinductive

(value_equal): Adjust accordingly.  Emit a warning for Vundefined.

* src/eval.ml (make_symbol, make_string, make_integer): Simplify.
(make_float): Implement.
(make_block): Comment out.
(read_impl, write_impl): Simplify.
(eval_call): Adjust Vinductive case to the new Vtype and tweak it so
that the result can itself be passed to eval_call, in case the
inductive type is applied to more than one argument.
(_eval_decls, y_operator): Use Vundefined instead of Vdummy.
(register_built_functions): Comment out `block_`.

* src/lexp.ml (_lexp_str): Remove unreachable case.
(lexp_str.septp): Remove, unused.

* btl/builtins.typer (block_): Comment out, not implemented.

* src/elexp.ml (elexp): Unify Type and Inductive.  Keep lexp in `Type`.

* tests/env_test.ml (_.rctx): Use Vundefined instead of Vdummy.
parent a6aff881
Loading
Loading
Loading
Loading
0% Loading or .
You are about to add 0 people to the discussion. Proceed with caution.
Please register or to comment