GitHub/gf-core
1
0
Fork 1
mirror of https://github.com/GrammaticalFramework/gf-core.git synced 2026-05-02 15:52:50 -06:00
Code Issues Packages Projects Releases Wiki Activity

"Committed_by_peb"

Browse Source
This commit is contained in:
peb
2005-03-18 09:17:10 +00:00
parent af6cb59fe8
commit 24c666fbe5
8 changed files with 49 additions and 29 deletions
Download Patch File Download Diff File Expand all files Collapse all files

6
src/GF/Compile/ShellState.hs
View File

@@ -5,9 +5,9 @@
-- Stability : (stable)
-- Portability : (portable)
--
-- > CVS $Date: 2005/03/02 14:22:53 $
-- > CVS $Date: 2005/03/18 10:17:10 $
-- > CVS $Author: peb $
-- > CVS $Revision: 1.37 $
-- > CVS $Revision: 1.38 $
--
-- (Description of the module)
-----------------------------------------------------------------------------
@@ -166,7 +166,7 @@ updateShellState opts mcnc sh ((_,sgr,gr),rts) = do
notInrts f = notElem f $ map fst rts
cfs <- mapM (canon2cf opts cgr) concrs --- would not need to update all...
let pinfos = map (Cnv.pInfo cgr) concrs -- peb 18/6
let pinfos = map (Cnv.pInfo opts cgr) concrs -- peb 18/6
let funs = funRulesOf cgr
let cats = allCatsOf cgr