From 5f3771069b5e4c7e99b1c1bbe98de2e8e7b96161 Mon Sep 17 00:00:00 2001 From: Adam Chlipala Date: Mon, 20 Dec 2010 09:34:10 -0500 Subject: Implement constrained type kinding properly; bump mono inline threshhold --- src/settings.sml | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) (limited to 'src/settings.sml') diff --git a/src/settings.sml b/src/settings.sml index 898b503f..4c611336 100644 --- a/src/settings.sml +++ b/src/settings.sml @@ -464,7 +464,7 @@ val coreInline = ref 20 fun setCoreInline n = coreInline := n fun getCoreInline () = !coreInline -val monoInline = ref 20 +val monoInline = ref 100 fun setMonoInline n = monoInline := n fun getMonoInline () = !monoInline -- cgit v1.2.3