Changeset 15425 for src/Pugs/Prim/Match.hs
- Timestamp:
- 03/03/07 16:37:34 (21 months ago)
- Files:
-
- 1 modified
-
src/Pugs/Prim/Match.hs (modified) (1 diff)
Legend:
- Unmodified
- Added
- Removed
-
src/Pugs/Prim/Match.hs
r15324 r15425 161 161 op2Match x (VType (mkType name)) 162 162 163 -- $x ~~ tr/x/y/==> $x = ~$x.trans('x' => 'y')163 -- '$x ~~ tr/x/y/' ==> $x = ~$x.trans('x' => 'y') 164 164 op2Match x (VSubst (MkTrans from to)) = do 165 165 str <- fromVal x
