paweld/fpc
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/fpc/source.git synced 2025-10-27 09:31:52 +01:00
Code Issues Packages Projects Releases Wiki Activity

* fixed to work after the changes in the handling of mode switching

Browse Source 
git-svn-id: trunk@2014 -
This commit is contained in:
Jonas Maebe 2005-12-20 20:32:43 +00:00
parent 66ebbbc5c2
commit d6ea5d6bde
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
tests/webtbs/tw2911.pp
View File

@ -4,9 +4,9 @@
{ Submitted by "Chris Hilder" on 2004-01-19 } { Submitted by "Chris Hilder" on 2004-01-19 }
{ e-mail: cj.hilder@astronomyinyourhands.com } { e-mail: cj.hilder@astronomyinyourhands.com }
program bug_demo; program bug_demo;
{$LONGSTRINGS ON}
{$ifdef fpc}{$Mode objfpc}{$endif} {$ifdef fpc}{$Mode objfpc}{$endif}
{$LONGSTRINGS ON}
type type
RecordWithStrings = RecordWithStrings =