diff options
Diffstat (limited to 'src/Options.purs')
-rw-r--r-- | src/Options.purs | 4 |
1 files changed, 4 insertions, 0 deletions
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 @@ | |||
1 | module PursLoader.Options | 1 | module PursLoader.Options |
2 | ( pscOptions | 2 | ( pscOptions |
3 | , loaderSrcOption | 3 | , loaderSrcOption |
4 | , loaderFFIOption | ||
4 | ) where | 5 | ) where |
5 | 6 | ||
6 | import Data.Array (concat) | 7 | import Data.Array (concat) |
@@ -101,3 +102,6 @@ pscOptions query = either (const []) fold parsed | |||
101 | 102 | ||
102 | loaderSrcOption :: Foreign -> Maybe [String] | 103 | loaderSrcOption :: Foreign -> Maybe [String] |
103 | loaderSrcOption query = either (const Nothing) (\(Options a) -> runNullOrUndefined a.src) (read query) | 104 | loaderSrcOption query = either (const Nothing) (\(Options a) -> runNullOrUndefined a.src) (read query) |
105 | |||
106 | loaderFFIOption :: Foreign -> Maybe [String] | ||
107 | loaderFFIOption query = either (const Nothing) (\(Options a) -> runNullOrUndefined a.ffi) (read query) | ||