From fa1ac29899b0a7d37bc8e0d42fc90f98543471fc Mon Sep 17 00:00:00 2001 From: Adam Chlipala Date: Thu, 12 Feb 2015 15:09:26 -0500 Subject: The 2nd half of proper CSRF protection related to environment variables --- src/sidecheck.sig | 5 +++++ 1 file changed, 5 insertions(+) (limited to 'src/sidecheck.sig') diff --git a/src/sidecheck.sig b/src/sidecheck.sig index 30abced6..1e3e2275 100644 --- a/src/sidecheck.sig +++ b/src/sidecheck.sig @@ -29,4 +29,9 @@ signature SIDE_CHECK = sig val check : Mono.file -> Mono.file + (* While we're checking, we'll do some other signature-related work, recording + * which environment variables are read. This function conveys the list, + * coming from the most recent call to [check]. *) + val readEnvVars : unit -> string list + end -- cgit v1.2.3