Annotation of /sml/trunk/src/compiler/FLINT/flint/ppflint.sig

Parent Directory | Revision Log

---

Revision 40 - (view) (download) (as text)

1 :	monnier	16	(* COPYRIGHT (c) 1997 YALE FLINT PROJECT *)
2 :			(* ppflint.sig -- Pretty printer for Flint IL. *)
3 :
4 :			signature PPFLINT =
5 :			sig
6 :			val printFKind : FLINT.fkind -> unit
7 :			val printRKind : FLINT.rkind -> unit
8 :			val printCon : FLINT.con -> unit
9 :			val printSval : FLINT.value -> unit
10 :			val printLexp : FLINT.lexp -> unit
11 :			val printFundec: FLINT.fundec -> unit
12 :
13 :	monnier	40	(* defaults to LV.lvarName *)
14 :			val LVarString : (FLINT.lvar -> string) ref
15 :
16 :	monnier	16	end (* signature PPFLINT *)
17 :

---

root@smlnj-gforge.cs.uchicago.edu	ViewVC Help
Powered by ViewVC 1.0.0