Browse Source

* don't give illegal expression for errorn statements. The error is already given
or can be ignored during a generic template parsing

git-svn-id: trunk@9520 -

peter 17 years ago
parent
commit
505e4f7809
1 changed files with 1 additions and 1 deletions
  1. 1 1
      compiler/pstatmnt.pas

+ 1 - 1
compiler/pstatmnt.pas

@@ -1079,7 +1079,7 @@ implementation
              { blockn support because a read/write is changed into a blocknode }
              { blockn support because a read/write is changed into a blocknode }
              { with a separate statement for each read/write operation (JM)    }
              { with a separate statement for each read/write operation (JM)    }
              { the same is true for val() if the third parameter is not 32 bit }
              { the same is true for val() if the third parameter is not 32 bit }
-             if not(p.nodetype in [nothingn,calln,ifn,assignn,breakn,inlinen,
+             if not(p.nodetype in [nothingn,errorn,calln,ifn,assignn,breakn,inlinen,
                                    continuen,labeln,blockn,exitn]) or
                                    continuen,labeln,blockn,exitn]) or
                 ((p.nodetype=inlinen) and
                 ((p.nodetype=inlinen) and
                  not is_void(p.resultdef)) then
                  not is_void(p.resultdef)) then