Changeset 13280 for src/Pugs/AST.hs
- Timestamp:
- 09/14/06 00:25:21 (2 years ago)
- Files:
-
- 1 modified
-
src/Pugs/AST.hs (modified) (1 diff)
Legend:
- Unmodified
- Added
- Removed
-
src/Pugs/AST.hs
r13162 r13280 234 234 metaObj = _Sym SGlobal (':':'*':name) $! Syn ":=" 235 235 [ _Var (':':'*':name) 236 , App (_Var "& META::new")236 , App (_Var "&HOW::new") 237 237 (Just $ Val (VType $ mkType cls)) 238 238 [ Syn "named"
