mirror of
https://github.com/GrammaticalFramework/gf-core.git
synced 2026-10-27 08:53:18 -06:00
deprecate PW in favour of PV identW
This commit is contained in:
1 parent
b547e39857
commit
880d3aa76c
11 files changed
+28
-31
No files matched your search
@@ -293,7 +293,6 @@ ppPatt q d (PChar) = pp '?'
|
||||
ppPatt q d (PChars s) = brackets (str s)
|
||||
ppPatt q d (PMacro id) = '#' <> id
|
||||
ppPatt q d (PM id) = '#' <> ppQIdent q id
|
||||
ppPatt q d PW = pp '_'
|
||||
ppPatt q d (PV id) = pp id
|
||||
ppPatt q d (PInt n) = pp n
|
||||
ppPatt q d (PFloat f) = pp f
|
||||
@@ -369,8 +368,6 @@ getAbs e = ([],e)
|
||||
getCTable :: Term -> ([Ident], Term)
|
||||
getCTable (T TRaw [(PV v,e)]) = let (vs,e') = getCTable e
|
||||
in (v:vs,e')
|
||||
getCTable (T TRaw [(PW, e)]) = let (vs,e') = getCTable e
|
||||
in (identW:vs,e')
|
||||
getCTable e = ([],e)
|
||||
|
||||
getLet :: Term -> ([LocalDef], Term)
|
||||
|
||||
Reference in new issue
Block a user