annotate lab3/check.mli @ 0:bfdcc3820b32

Basis
author Mike Spivey <mike@cs.ox.ac.uk>
date Thu, 05 Oct 2017 08:04:15 +0100
parents
children
rev   line source
mike@0 1 (* lab3/check.mli *)
mike@0 2 (* Copyright (c) 2017 J. M. Spivey *)
mike@0 3
mike@0 4 open Tree
mike@0 5
mike@0 6 (* |annotate| -- check tree for type errors and annotate with definitions *)
mike@0 7 val annotate : program -> unit
mike@0 8
mike@0 9 (* |Semantic_error| -- exception raised if error detected *)
mike@0 10 exception Semantic_error of string * Print.arg list * int