+ callparan support in node_complexity()

git-svn-id: trunk@8601 -

compiler/nutils.pas

@@ -642,7 +642,8 @@ implementation
                     exit;
                   p := tunarynode(p).left;
                 end;
-              blockn:
+              blockn,
+              callparan:
                 p := tunarynode(p).left;
               notn,
               derefn :