From 0e1221d7b15e578d5e9146b01e11a24007d4ba9b Mon Sep 17 00:00:00 2001
From: eric thul <thul.eric@gmail.com>
Date: Mon, 6 Jul 2015 23:49:47 -0400
Subject: Generate .psci file

Resolves #11
---
 src/Options.purs | 4 ++++
 1 file changed, 4 insertions(+)

(limited to 'src/Options.purs')

diff --git a/src/Options.purs b/src/Options.purs
index be21877..51e9be5 100644
--- a/src/Options.purs
+++ b/src/Options.purs
@@ -1,6 +1,7 @@
 module PursLoader.Options
   ( pscOptions
   , loaderSrcOption
+  , loaderFFIOption
   ) where
 
 import Data.Array (concat)
@@ -101,3 +102,6 @@ pscOptions query = either (const []) fold parsed
 
 loaderSrcOption :: Foreign -> Maybe [String]
 loaderSrcOption query = either (const Nothing) (\(Options a) -> runNullOrUndefined a.src) (read query)
+
+loaderFFIOption :: Foreign -> Maybe [String]
+loaderFFIOption query = either (const Nothing) (\(Options a) -> runNullOrUndefined a.ffi) (read query)
-- 
cgit v1.2.3