[jackhill/mal.git] / ada / eval_callback.ads

with Envs;
with Types;

package Eval_Callback is

   type Eval_Func is access
     function (MH : Types.Mal_Handle; Env : Envs.Env_Handle) return Types.Mal_Handle;

   Eval : Eval_Func;

end Eval_Callback;
Commit	Line	Data
1c28e560	1	with Envs;
18e21187 CM	2	with Types;
	3
	4	package Eval_Callback is
	5
1c28e560 CM	6	type Eval_Func is access
	7	function (MH : Types.Mal_Handle; Env : Envs.Env_Handle) return Types.Mal_Handle;
	8
	9	Eval : Eval_Func;
18e21187 CM	10
18e21187 CM	11	end Eval_Callback;