浏览代码

* fixed formatting

git-svn-id: trunk@26607 -
Jonas Maebe 11 年之前
父节点
当前提交
9c4505045b
共有 1 个文件被更改,包括 5 次插入4 次删除
  1. 5 4
      compiler/pexpr.pas

+ 5 - 4
compiler/pexpr.pas

@@ -1357,7 +1357,8 @@ implementation
          { allow Ordinal(Value) for type declarations since it
            can be an enummeration declaration or a set lke:
            (OrdinalType(const1)..OrdinalType(const2) }
-         if (not typeonly or is_ordinal(hdef))and try_to_consume(_LKLAMMER) then
+         if (not typeonly or is_ordinal(hdef)) and
+            try_to_consume(_LKLAMMER) then
           begin
             result:=comp_expr(true,false);
             consume(_RKLAMMER);
@@ -1368,9 +1369,9 @@ implementation
             else
               result:=ctypeconvnode.create_explicit(result,hdef);
           end
-         else { not LKLAMMER }
-          if (token=_POINT) and
-             (is_object(hdef) or is_record(hdef)) then
+         { not LKLAMMER }
+         else if (token=_POINT) and
+            (is_object(hdef) or is_record(hdef)) then
            begin
              consume(_POINT);
              { handles calling methods declared in parent objects