diff src/monoize.sml @ 1799:3d922a28370b

Basis.getenv
author Adam Chlipala <adam@chlipala.net>
date Thu, 02 Aug 2012 16:33:25 -0400
parents 2e01a36701eb
children 38297294cf98
line wrap: on
line diff
--- a/src/monoize.sml	Sun Jul 29 12:54:17 2012 -0400
+++ b/src/monoize.sml	Thu Aug 02 16:33:25 2012 -0400
@@ -225,6 +225,9 @@
                   | L.CFfi ("Basis", "css_property") => (L'.TFfi ("Basis", "string"), loc)
                   | L.CFfi ("Basis", "css_style") => (L'.TFfi ("Basis", "string"), loc)
                   | L.CFfi ("Basis", "id") => (L'.TFfi ("Basis", "string"), loc)
+                  | L.CFfi ("Basis", "requestHeader") => (L'.TFfi ("Basis", "string"), loc)
+                  | L.CFfi ("Basis", "responseHeader") => (L'.TFfi ("Basis", "string"), loc)
+                  | L.CFfi ("Basis", "envVar") => (L'.TFfi ("Basis", "string"), loc)
 
                   | L.CApp ((L.CFfi ("Basis", "serialized"), _), _) =>
                     (L'.TFfi ("Basis", "string"), loc)