diff options
Diffstat (limited to 'src-3.0/GF/GFCC/Raw')
| -rw-r--r-- | src-3.0/GF/GFCC/Raw/ConvertGFCC.hs | 2 |
1 files changed, 0 insertions, 2 deletions
diff --git a/src-3.0/GF/GFCC/Raw/ConvertGFCC.hs b/src-3.0/GF/GFCC/Raw/ConvertGFCC.hs index d72d74b77..7f5e0ba00 100644 --- a/src-3.0/GF/GFCC/Raw/ConvertGFCC.hs +++ b/src-3.0/GF/GFCC/Raw/ConvertGFCC.hs @@ -136,7 +136,6 @@ toTerm e = case e of App "S" es -> S (lmap toTerm es) App "FV" es -> FV (lmap toTerm es) App "P" [e,v] -> P (toTerm e) (toTerm v) - App "RP" [e,v] -> RP (toTerm e) (toTerm v) ---- App "W" [AStr s,v] -> W s (toTerm v) App "A" [AInt i] -> V (fromInteger i) App f [] -> F (mkCId f) @@ -203,7 +202,6 @@ fromTerm e = case e of S es -> App "S" (lmap fromTerm es) FV es -> App "FV" (lmap fromTerm es) P e v -> App "P" [fromTerm e, fromTerm v] - RP e v -> App "RP" [fromTerm e, fromTerm v] ---- W s v -> App "W" [AStr s, fromTerm v] C i -> AInt (toInteger i) TM _ -> AMet |