mirror of
https://github.com/GrammaticalFramework/gf-core.git
synced 2026-05-20 08:32:50 -06:00
String pattern handling
This commit is contained in:
@@ -77,6 +77,7 @@ isInConstantForm trm = case trm of
|
||||
Abs _ _ -> True
|
||||
App c a -> isInConstantForm c && isInConstantForm a
|
||||
R r -> all (isInConstantForm . snd . snd) r
|
||||
K _ -> True
|
||||
Alias _ _ t -> isInConstantForm t
|
||||
_ -> False ---- isInArgVarForm trm
|
||||
|
||||
|
||||
Reference in New Issue
Block a user