Diff of /sml/trunk/src/compiler/TopLevel/viscomp/control.sml

Parent Directory | Revision Log | Patch

	revision 212, Fri Jan 15 16:19:21 1999 UTC	revision 213, Fri Jan 15 21:18:35 1999 UTC
#	Line 48	Line 48
48	"reify", "loopify", "fixfix", "fcontract",	"reify", "loopify", "fixfix", "fcontract",
49	"fixfix", "fcontract"]	"fixfix", "fcontract"]
50
51	val inlineThreshold = ref 14	val inlineThreshold = ref 16
52	val unrollThreshold = ref 20	val unrollThreshold = ref 20
53	val maxargs         = ref 6	val maxargs         = ref 6
54	val dropinvariant   = ref true	val dropinvariant   = ref true
#	Line 62	Line 62
62	val misc        = ref 0	val misc        = ref 0
63
64	(* FLINT internal type-checking controls *)	(* FLINT internal type-checking controls *)
65	val check       = ref true	val check           = ref true  (* fails on MLRISC/sparc/sparcRegAlloc.sml *)
66	val checkDatatypes = ref false  (* loops on the new cm.sml *)	val checkDatatypes = ref false  (* loops on the new cm.sml *)
67	val checkKinds  = ref true	val checkKinds  = ref true
68	end	end

---

Colored Diff Long Colored Diff Unidiff Context Diff Side by Side

Legend: Removed from v.212   changed lines   Added in v.213

---

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