瀏覽代碼

* minor reformatting, and removed superfluous assigned test (the value is
already used before that test)

git-svn-id: trunk@21502 -

Jonas Maebe 13 年之前
父節點
當前提交
3414f91590
共有 1 個文件被更改,包括 2 次插入3 次删除
  1. 2 3
      compiler/ncal.pas

+ 2 - 3
compiler/ncal.pas

@@ -2964,7 +2964,7 @@ implementation
            end;
 
           { check for hints (deprecated etc) }
-          if (procdefinition.typ = procdef) then
+          if procdefinition.typ = procdef then
             check_hints(tprocdef(procdefinition).procsym,tprocdef(procdefinition).symoptions,tprocdef(procdefinition).deprecatedmsg);
 
           { add reference to corresponding procsym; may not be the one
@@ -2973,8 +2973,7 @@ implementation
             addsymref(tprocdef(procdefinition).procsym);
 
           { add needed default parameters }
-          if assigned(procdefinition) and
-             (paralength<procdefinition.maxparacount) then
+          if (paralength<procdefinition.maxparacount) then
            begin
              paraidx:=0;
              i:=0;