* You should have received a copy of the GNU General Public License
* along with this program; if not, write to the Free Software
* Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301, USA.
-*)
+ *)
(* Main interface *)
signature MAIN = sig
- val tInit : Ast.typ
+ val tInit : unit -> Ast.typ
+ val registerDefault : string * Ast.typ * (unit -> Ast.exp) -> unit
- val check : string -> unit
+ val check : string -> Env.env * Ast.exp option
+ val check' : Env.env -> string -> Env.env
+
+ val basis : unit -> Env.env
+
+ val reduce : string -> Ast.exp option
+ val eval : string -> unit
+
+ val request : string -> unit
+ val service : unit -> unit
end