diff options
| author | aarne <aarne@cs.chalmers.se> | 2006-11-21 18:18:54 +0000 |
|---|---|---|
| committer | aarne <aarne@cs.chalmers.se> | 2006-11-21 18:18:54 +0000 |
| commit | 1d372525eabd8260faf7ce393f731556cec92dfb (patch) | |
| tree | 575c2a4301d518768dfbf5a1a7f0d3292b5d4341 /src/GF/Compile/Update.hs | |
| parent | 57b39a84758e84fa6104326f75e92275dcd8a0bc (diff) | |
Constructors documented
Diffstat (limited to 'src/GF/Compile/Update.hs')
| -rw-r--r-- | src/GF/Compile/Update.hs | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/src/GF/Compile/Update.hs b/src/GF/Compile/Update.hs index 1570cbdaa..82d7a609e 100644 --- a/src/GF/Compile/Update.hs +++ b/src/GF/Compile/Update.hs @@ -70,7 +70,7 @@ unifyAnyInfo c i j = errIn ("combining information for" +++ prt c) $ case (i,j) (_,CncFun Nothing Nope (Yes pr)) -> unifyAnyInfo c i (CncCat Nope Nope (Yes pr)) - _ -> Bad $ "cannot unify informations in" +++ show i +++ "and" +++ show j + _ -> Bad $ "cannot unify informations in" ++++ show i ++++ "and" ++++ show j --- these auxiliaries should be somewhere else since they don't use the info types |