[make Comb an instance of HasProperties
John Meacham <john@repetae.net>**20080226181224] hunk ./E/Type.hs 19
+import Info.Types
hunk ./E/Type.hs 30
+instance HasProperties Comb where
+    modifyProperties f comb = combHead_u (modifyProperties f) comb
+    getProperties comb = getProperties $ combHead comb
+    putProperties p comb = combHead_u (putProperties p) comb
+
+instance HasProperties TVr where
+    modifyProperties f = tvrInfo_u (modifyProperties f)
+    getProperties = getProperties . tvrInfo
+    putProperties prop =  tvrInfo_u (putProperties prop)
+
+
hunk ./E/Values.hs 190
-instance HasProperties TVr where
-    modifyProperties f = tvrInfo_u (modifyProperties f)
-    getProperties = getProperties . tvrInfo
-    putProperties prop =  tvrInfo_u (putProperties prop)
hunk ./E/Values.hs 195
-