paweld/fpc
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/fpc/source.git synced 2025-10-23 18:35:47 +02:00
Code Issues Packages Projects Releases Wiki Activity

* defcoll must be assigned in insert_typeconv

Browse Source
This commit is contained in:
peter 2001-04-26 21:55:05 +00:00
parent 5eae8f2b82
commit d923961b1a
1 changed files with 8 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

9
compiler/ncal.pas
View File

@ -186,6 +186,10 @@ implementation
{$endif def extdebug} {$endif def extdebug}
begin begin
inc(parsing_para_level); inc(parsing_para_level);
if not assigned(defcoll) then
internalerror(200104261);
{$ifdef extdebug} {$ifdef extdebug}
if do_count then if do_count then
begin begin
@ -1606,7 +1610,10 @@ begin
end. end.
{ {
$Log$ $Log$
Revision 1.31 2001-04-21 12:03:11 peter Revision 1.32 2001-04-26 21:55:05 peter
* defcoll must be assigned in insert_typeconv
Revision 1.31 2001/04/21 12:03:11 peter
* m68k updates merged from fixes branch * m68k updates merged from fixes branch
Revision 1.30 2001/04/18 22:01:54 peter Revision 1.30 2001/04/18 22:01:54 peter