diff options
Diffstat (limited to 'src/GF/Compile/ShellState.hs')
| -rw-r--r-- | src/GF/Compile/ShellState.hs | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/src/GF/Compile/ShellState.hs b/src/GF/Compile/ShellState.hs index 580bdeb5f..6e6f00176 100644 --- a/src/GF/Compile/ShellState.hs +++ b/src/GF/Compile/ShellState.hs @@ -5,9 +5,9 @@ -- Stability : (stable) -- Portability : (portable) -- --- > CVS $Date: 2005/04/11 13:53:38 $ +-- > CVS $Date: 2005/04/14 11:42:05 $ -- > CVS $Author: peb $ --- > CVS $Revision: 1.41 $ +-- > CVS $Revision: 1.42 $ -- -- (Description of the module) ----------------------------------------------------------------------------- @@ -190,7 +190,7 @@ updateShellState opts mcnc sh ((_,sgr,gr),rts) = do let pinfosOld = map (CnvOld.pInfo opts cgr) concrs -- peb 18/6 (OBSOLETE) let g2s = Cnv.gfc2simple - fin = Cnv.simple2finite + fin = Cnv.removeSingletons . Cnv.simple2finite s2mN = Cnv.simple2mcfg_nondet s2mS = Cnv.simple2mcfg_strict -- ____ kan man ha flera '-conversion=X -conversion=Y'? |