Diff of /sml/trunk/src/compiler/FLINT/flint/ppflint.sml

Parent Directory | Revision Log | Patch

	revision 198, Sun Nov 22 02:11:29 1998 UTC	revision 199, Wed Nov 25 18:30:38 1998 UTC
#	Line 38	Line 38
38	| F.IH_SAFE => "")^	| F.IH_SAFE => "")^
39	(case isrec	(case isrec
40	of SOME(_,F.LK_UNKNOWN) => "R"	of SOME(_,F.LK_UNKNOWN) => "R"
41	| SOME(_,F.LK_LOOP) => "L"	| SOME(_,F.LK_LOOP) => "LR"
42	| SOME(_,F.LK_WHILE) => "W"	| SOME(_,F.LK_TAIL) => "TR"
43	| NONE => "")^	| NONE => "")^
44	(case cconv	(case cconv
45	of F.CC_FCT => "FCT"	of F.CC_FCT => "FCT"

---

Colored Diff Long Colored Diff Unidiff Context Diff Side by Side

Legend: Removed from v.198   changed lines   Added in v.199

---

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