diff options
Diffstat (limited to 'src/Miscellaneous.hs')
| -rw-r--r-- | src/Miscellaneous.hs | 9 |
1 files changed, 9 insertions, 0 deletions
diff --git a/src/Miscellaneous.hs b/src/Miscellaneous.hs index 5f018e6..ba9ca98 100644 --- a/src/Miscellaneous.hs +++ b/src/Miscellaneous.hs @@ -1,6 +1,7 @@ module Miscellaneous( if', (?), + (.:), selectFrom, readMaybe, partBeforeAfter @@ -29,6 +30,14 @@ infixr 1 ? +-- with this, I have truly gone dotty +infixr 9 .: +(.:) :: (a -> b) -> (c -> d -> a) -> c -> d -> b +(.:) = (.).(.) + + + + -- kinda functions like poor man's sql -- first argument is the indices of the items you want in the results -- second argument is index-item pairs to dictate what records are acceptable to select from |