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

* version 17 ppu

Browse Source
This commit is contained in:
peter 1999-07-27 23:46:55 +00:00
parent dd29b972d8
commit 4409fe47dc
1 changed files with 18 additions and 5 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

23
utils/ppu.pas
View File

@ -37,7 +37,7 @@ type
{$endif Test_Double_checksum} {$endif Test_Double_checksum}
const const
CurrentPPUVersion=16; CurrentPPUVersion=17;
{ buffer sizes } { buffer sizes }
maxentrysize = 1024; maxentrysize = 1024;
@ -120,6 +120,8 @@ const
uf_static_linked = $80; { the ppu can be linked static } uf_static_linked = $80; { the ppu can be linked static }
uf_shared_linked = $100; { the ppu can be linked shared } uf_shared_linked = $100; { the ppu can be linked shared }
uf_local_browser = $200; uf_local_browser = $200;
uf_no_link = $400; { unit has no .o generated, but can still have
external linking! }
type type
{$ifdef m68k} {$ifdef m68k}
@ -384,7 +386,7 @@ begin
Id[3]:='U'; Id[3]:='U';
Ver[1]:='0'; Ver[1]:='0';
Ver[2]:='1'; Ver[2]:='1';
Ver[3]:='6'; Ver[3]:='7';
end; end;
end; end;
@ -869,9 +871,20 @@ end;
end. end.
{ {
$Log$ $Log$
Revision 1.2 1999-07-03 00:25:43 peter Revision 1.3 1999-07-27 23:46:55 peter
* 0.99.13 * version 17 ppu
* new link support
Revision 1.36 1999/07/23 16:05:25 peter
* alignment is now saved in the symtable
* C alignment added for records
* PPU version increased to solve .12 <-> .13 probs
Revision 1.35 1999/07/05 16:21:30 peter
* fixed linking for units without linking necessary
Revision 1.34 1999/07/03 00:29:57 peter
* new link writing to the ppu, one .ppu is needed for all link types,
static (.o) is now always created also when smartlinking is used
Revision 1.33 1999/05/13 21:59:36 peter Revision 1.33 1999/05/13 21:59:36 peter
* removed oldppu code * removed oldppu code