diff options
Diffstat (limited to 'src/GF/API.hs')
| -rw-r--r-- | src/GF/API.hs | 7 |
1 files changed, 2 insertions, 5 deletions
diff --git a/src/GF/API.hs b/src/GF/API.hs index ff199f589..6ba3c261a 100644 --- a/src/GF/API.hs +++ b/src/GF/API.hs @@ -369,11 +369,8 @@ applyTransfer opts gr trs (mm,f) t = Just m -> maybe empty id $ lookup m trs _ -> ifNull empty (snd . head) trs - -- these are missing - trans = error "no transfer yet" - ----- core2exp . T.appTransfer tr . exp2core - empty = error "emptyEnv" - ---- T.emptyEnv + trans tr f = core2exp . T.evaluateExp tr . exp2core f + empty = T.builtin {- optTransfer :: Options -> StateGrammar -> G.Term -> G.Term |