Division by zero when closing editor files

Original Reporter info from Mantis: ludob

• Reporter name: Ludo Brands

Description:

Closing multiple files with Ctrl F4 raises sometimes a division by zero exception. Happened twice in last week.

Console output:
ERROR in LCL: TNBPages.Get Index out of bounds
Creating gdb catchable error:

  $004C1D2D  TLAZLOGGER__DEBUGLNSTACK,  line 676 of lazloggerbase.pas
  $0043CF4C  DUMPSTACK,  line 1406 of lclproc.pas
  $0043C54B  RAISEGDBEXCEPTION,  line 864 of lclproc.pas
  $0055B923  TNBPAGES__GET,  line 56 of ./include/customnotebook.inc
  $007F327B  TSOURCEEDITOR__UPDATEPAGENAME,  line 4275 of sourceeditor.pp
  $007F95E0  TSOURCENOTEBOOK__UPDATEPAGENAMES,  line 5951 of sourceeditor.pp
  $007FC921  TSOURCENOTEBOOK__CLOSEFILE,  line 7017 of sourceeditor.pp
  $008038C7  TSOURCEEDITORMANAGER__CLOSEFILE,  line 9321 of sourceeditor.pp
  $0046072B  TMAINIDE__DOCLOSEEDITORFILE,  line 9499 of main.pp
TApplication.HandleException Division by zero
  Stack trace:
  $0043C575  RAISEGDBEXCEPTION,  line 865 of lclproc.pas
  $0055B923  TNBPAGES__GET,  line 56 of ./include/customnotebook.inc
  $007F327B  TSOURCEEDITOR__UPDATEPAGENAME,  line 4275 of sourceeditor.pp
  $007F95E0  TSOURCENOTEBOOK__UPDATEPAGENAMES,  line 5951 of sourceeditor.pp
  $007FC921  TSOURCENOTEBOOK__CLOSEFILE,  line 7017 of sourceeditor.pp
  $008038C7  TSOURCEEDITORMANAGER__CLOSEFILE,  line 9321 of sourceeditor.pp
  $0046072B  TMAINIDE__DOCLOSEEDITORFILE,  line 9499 of main.pp
  $0044A2A7  TMAINIDE__MNUCLOSECLICKED,  line 3062 of main.pp
  $006F5C02  TIDECOMMAND__EXECUTE,  line 961 of idecommands.pas
  $0044B826  TMAINIDE__ONPROCESSIDECOMMAND,  line 3522 of main.pp
  $007FDE16  TSOURCENOTEBOOK__PROCESSPARENTCOMMAND,  line 7479 of sourceeditor.p
p
  $007EF617  TSOURCEEDITOR__PROCESSUSERCOMMAND,  line 3210 of sourceeditor.pp
  $0098674B  TCUSTOMSYNEDIT__DOONPROCESSCOMMAND,  line 6523 of synedit.pp
  $009836F7  TCUSTOMSYNEDIT__COMMANDPROCESSOR,  line 5923 of synedit.pp
  $00977672  TCUSTOMSYNEDIT__KEYDOWN,  line 2713 of synedit.pp
  $0058F286  TWINCONTROL__KEYDOWNBEFOREINTERFACE,  line 5540 of ./include/wincon
trol.inc
  $0058F51C  TWINCONTROL__DOKEYDOWNBEFOREINTERFACE,  line 5669 of ./include/winc
ontrol.inc

Additional information:

lazarus 37146 with fpc trunk.

Mantis conversion info:

• Mantis ID: 22015
• Version: 1.1 (SVN)
• Fixed in version: 1.1 (SVN)
• Fixed in revision: 37273 (#f8a052f4), 37471 (#20487798)