Changeset 8699 for src/Pugs/Monads.hs
- Timestamp:
- 01/16/06 13:08:43 (3 years ago)
- Files:
-
- 1 modified
-
src/Pugs/Monads.hs (modified) (1 diff)
Legend:
- Unmodified
- Added
- Removed
-
src/Pugs/Monads.hs
r8207 r8699 224 224 if typ >= SubBlock 225 225 then do 226 doFix <- fixEnv undefinedenv226 doFix <- fixEnv return env 227 227 local doFix action 228 228 else resetT $ callCC $ \cc -> do
