diff options
Diffstat (limited to 'src/GF/Canon')
| -rw-r--r-- | src/GF/Canon/Share.hs | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/src/GF/Canon/Share.hs b/src/GF/Canon/Share.hs index 89323eb2f..b6d1df520 100644 --- a/src/GF/Canon/Share.hs +++ b/src/GF/Canon/Share.hs @@ -10,6 +10,9 @@ -- > CVS $Revision $ -- -- Optimizations on GFC code: sharing, parametrization, value sets. +-- +-- optimization: sharing branches in tables. AR 25\/4\/2003. +-- following advice of Josef Svenningsson ----------------------------------------------------------------------------- module Share (shareModule, OptSpec, shareOpt, paramOpt, valOpt, allOpt) where @@ -23,9 +26,6 @@ import Operations import List import qualified Modules as M --- optimization: sharing branches in tables. AR 25/4/2003 --- following advice of Josef Svenningsson - type OptSpec = [Integer] --- doOptFactor opt = elem 2 opt |