diff options
Diffstat (limited to 'src')
| -rw-r--r-- | src/GF/Canon/Look.hs | 1 |
1 files changed, 1 insertions, 0 deletions
diff --git a/src/GF/Canon/Look.hs b/src/GF/Canon/Look.hs index 2fc652c81..a93d4c834 100644 --- a/src/GF/Canon/Look.hs +++ b/src/GF/Canon/Look.hs @@ -118,6 +118,7 @@ allParamValues cnc ptyp = case ptyp of let (ls,tys) = unzip [(l,t) | Lbg l t <- r] tss <- mapM allPV tys return [R (map (uncurry Ass) (zip ls ts)) | ts <- combinations tss] + TInts n -> return [EInt i | i <- [0..n]] _ -> prtBad "cannot possibly find parameter values for" ptyp where allPV = allParamValues cnc |