paweld/fpc
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/fpc/source.git synced 2025-09-03 15:50:26 +02:00
Code Issues Packages Projects Releases Wiki Activity

* functions with ansi strings as result didn't work, solved

Browse Source
This commit is contained in:
florian 1998-11-12 16:43:32 +00:00
parent 364132b0bb
commit 70261b4c01
1 changed files with 5 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

6
compiler/cg386flw.pas
View File

@ -58,6 +58,7 @@ implementation
lcont,lbreak,lloop,
oldclabel,oldblabel : plabel;
otlabel,oflabel : plabel;
begin
getlabel(lloop);
getlabel(lcont);
@ -753,7 +754,10 @@ do_jmp:
end.
{
$Log$
Revision 1.22 1998-10-29 15:42:44 florian
Revision 1.23 1998-11-12 16:43:32 florian
* functions with ansi strings as result didn't work, solved
Revision 1.22 1998/10/29 15:42:44 florian
+ partial disposing of temp. ansistrings
Revision 1.21 1998/10/26 22:58:16 florian