--- a/Cface__CTypeNode.st	Fri Jul 04 08:35:55 2008 +0000
+++ b/Cface__CTypeNode.st	Fri Jul 04 12:05:15 2008 +0000
@@ -28,6 +28,13 @@
 
 !CTypeNode methodsFor:'testing'!
 
+isAnonymous
+
+    ^cName isNil
+
+    "Created: / 04-07-2008 / 11:44:38 / Jan Vrany <vranyj1@fel.cvut.cz>"
+!
+
 isCCharNode
     ^ false
 
@@ -38,6 +45,13 @@
     ^ true
 
     "Created: / 17-02-2008 / 21:49:53 / janfrog"
+!
+
+isForeign
+
+    ^cName isNil
+
+    "Created: / 04-07-2008 / 11:44:45 / Jan Vrany <vranyj1@fel.cvut.cz>"
 ! !
 
 !CTypeNode class methodsFor:'documentation'!