Changeset 4928 for src/Pugs/Types/Code.hs
- Timestamp:
- 06/24/05 01:11:01 (4 years ago)
- svk:copy_cache_prev:
- 6771
- Files:
-
- 1 modified
-
src/Pugs/Types/Code.hs (modified) (1 diff)
Legend:
- Unmodified
- Added
- Removed
-
src/Pugs/Types/Code.hs
r4285 r4928 26 26 -- XXX - subType should really just be a mkType itself 27 27 code_iType c = case subType c of 28 SubBlock -> mkType "B are"28 SubBlock -> mkType "Block" 29 29 SubPointy -> mkType "Block" 30 30 SubMethod -> mkType "Method"
