diff options
Diffstat (limited to 'app/Load.hs')
| -rw-r--r-- | app/Load.hs | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/app/Load.hs b/app/Load.hs index b1ad0a5..23b92fe 100644 --- a/app/Load.hs +++ b/app/Load.hs @@ -60,9 +60,9 @@ expansion noexpand expander output x = do ] else noexpand o x -queryExpansion = expansion (\_ -> id) "query_expansion" "call" +queryExpansion = expansion (\_ -> id) "expand_query" "call" -loadExpansion = expansion (\o x -> IR.CallI o [x]) "load_expansion" "assert" +loadExpansion = expansion (\o x -> IR.CallI o [x]) "expand_load" "assert" processInput fn queryMode input = do asts <- except $ tokenize fn input >>= parse fn |