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

* fixed wrong initialization

Browse Source
This commit is contained in:
peter 2003-11-12 16:58:42 +00:00
parent 2ebd9f20b5
commit 9b9d30b0e9
1 changed files with 4 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

7
compiler/rabase.pas
View File

@ -96,8 +96,6 @@ unit rabase;
var
asmmode : tasmmode;
initialization
fillchar(asmmode,sizeof(asminfos),0);
finalization
for asmmode:=low(tasmmode) to high(tasmmode) do
if assigned(asmmodeinfos[asmmode]) then
@ -108,7 +106,10 @@ finalization
end.
{
$Log$
Revision 1.1 2003-11-12 16:05:39 florian
Revision 1.2 2003-11-12 16:58:42 peter
* fixed wrong initialization
Revision 1.1 2003/11/12 16:05:39 florian
* assembler readers OOPed
+ typed currency constants
+ typed 128 bit float constants if the CPU supports it