Changeset 12002
- Timestamp:
- 28.07.2009 11:38:33 (4 months ago)
- Files:
-
- 1 modified
-
trunk/Static/AnalysisStructured.hs (modified) (1 diff)
Legend:
- Unmodified
- Added
- Removed
-
trunk/Static/AnalysisStructured.hs
r11982 r12002 833 833 newIdentifications = myKernel hmor Set.\\ myKernel h 834 834 when (not (Set.null newIdentifications)) 835 ( plain_error() (836 "Fitting morphism leadsto forbidden identifications:\n"835 (warning () ( 836 "Fitting morphism may lead to forbidden identifications:\n" 837 837 ++ showDoc newIdentifications "") nullRange) 838 838 incl <- ext_inclusion lid sigmaAD sigma