UnaryNode.st
changeset 2863 4d5cbdfebcb2
parent 2597 cf2f79153a11
child 2866 21be09ac87b1
equal deleted inserted replaced
2862:fbb540cd74bd 2863:4d5cbdfebcb2
   328     "Created: / 20-04-2005 / 14:10:34 / cg"
   328     "Created: / 20-04-2005 / 14:10:34 / cg"
   329 ! !
   329 ! !
   330 
   330 
   331 !UnaryNode methodsFor:'testing'!
   331 !UnaryNode methodsFor:'testing'!
   332 
   332 
       
   333 isJavaPackageReference
       
   334     "Return true, given node is JAVA class reference in form:
       
   335         JAVA package1 package2
       
   336     "
       
   337 
       
   338     ^receiver isJavaPackageReference 
       
   339         and:[selector first isLowercase
       
   340             and:[selector isUnary]]
       
   341 
       
   342     "Created: / 19-04-2012 / 09:52:38 / Jan Vrany <jan.vrany@fit.cvut.cz>"
       
   343 !
       
   344 
   333 isUnaryMessage
   345 isUnaryMessage
   334     "return true, if this node is one for a unary message"
   346     "return true, if this node is one for a unary message"
   335 
   347 
   336     ^ true
   348     ^ true
   337 
   349 
   350 ! !
   362 ! !
   351 
   363 
   352 !UnaryNode class methodsFor:'documentation'!
   364 !UnaryNode class methodsFor:'documentation'!
   353 
   365 
   354 version
   366 version
   355     ^ '$Header: /cvs/stx/stx/libcomp/UnaryNode.st,v 1.55 2011-07-25 22:33:18 vrany Exp $'
   367     ^ '$Header: /cvs/stx/stx/libcomp/UnaryNode.st,v 1.56 2012-04-19 08:03:14 vrany Exp $'
   356 !
   368 !
   357 
   369 
   358 version_CVS
   370 version_CVS
   359     ^ '$Header: /cvs/stx/stx/libcomp/UnaryNode.st,v 1.55 2011-07-25 22:33:18 vrany Exp $'
   371     ^ '$Header: /cvs/stx/stx/libcomp/UnaryNode.st,v 1.56 2012-04-19 08:03:14 vrany Exp $'
   360 ! !
   372 ! !