Преглед на файлове

Merged revisions 11063 via svnmerge from
http://svn.freepascal.org/svn/fpc/trunk

........
r11063 | florian | 2008-05-23 23:12:03 +0200 (Fri, 23 May 2008) | 2 lines

* when the end of a sequence is reached, first_row has to be set for proper address checking, resolves #10856
........

git-svn-id: branches/fixes_2_2@11064 -

florian преди 17 години
родител
ревизия
c954527391
променени са 1 файла, в които са добавени 1 реда и са изтрити 0 реда
  1. 1 0
      rtl/inc/lnfodwrf.pp

+ 1 - 0
rtl/inc/lnfodwrf.pp

@@ -654,6 +654,7 @@ begin
       state.append_row := false;
       if (state.end_sequence) then begin
         InitStateRegisters(state, header64.default_is_stmt);
+        first_row := true;
       end;
     end;