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

* updated copyright to 2000

Browse Source
This commit is contained in:
peter 2000-01-07 01:14:18 +00:00
parent 682d3453ee
commit e525797c51
200 changed files with 1330 additions and 760 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

7
compiler/aasm.pas
View File

@ -1,6 +1,6 @@
{
$Id$
Copyright (c) 1996-98 by Florian Klaempfl
Copyright (c) 1998-2000 by Florian Klaempfl
This unit implements an abstract asmoutput class for all processor types
@ -1028,7 +1028,10 @@ uses
end.
{
$Log$
Revision 1.69 1999-12-22 01:01:46 peter
Revision 1.70 2000-01-07 01:14:18 peter
* updated copyright to 2000
Revision 1.69 1999/12/22 01:01:46 peter
- removed freelabel()
* added undefined label detection in internal assembler, this prevents
a lot of ld crashes and wrong .o files

7
compiler/ag386att.pas
View File

@ -1,6 +1,6 @@
{
$Id$
Copyright (c) 1996-98 by the FPC development team
Copyright (c) 1998-2000 by Florian Klaempfl
This unit implements an asmoutput class for i386 AT&T syntax
@ -871,7 +871,10 @@ unit ag386att;
end.
{
$Log$
Revision 1.22 1999-12-18 20:00:33 florian
Revision 1.23 2000-01-07 01:14:18 peter
* updated copyright to 2000
Revision 1.22 1999/12/18 20:00:33 florian
* Bug reported by Marco fixed: Intel assembler reader: fld qword ptr x
was read as fldq x but it must be fldl x

7
compiler/ag386bin.pas
View File

@ -1,6 +1,6 @@
{
$Id$
Copyright (c) 1996-98 by the FPC development team
Copyright (c) 1998-2000 by Peter Vreman
This unit implements an binary assembler output class
@ -932,7 +932,10 @@ unit ag386bin;
end.
{
$Log$
Revision 1.32 1999-12-24 15:22:52 peter
Revision 1.33 2000-01-07 01:14:18 peter
* updated copyright to 2000
Revision 1.32 1999/12/24 15:22:52 peter
* reset insentry/lastinsoffset so writing smartlink works correct for
short jmps

7
compiler/ag386int.pas
View File

@ -1,6 +1,6 @@
{
$Id$
Copyright (c) 1996,97 by Florian Klaempfl
Copyright (c) 1998-2000 by Florian Klaempfl
This unit implements an asmoutput class for Intel syntax with Intel i386+
@ -631,7 +631,10 @@ ait_stab_function_name : ;
end.
{
$Log$
Revision 1.57 1999-12-19 17:36:25 florian
Revision 1.58 2000-01-07 01:14:18 peter
* updated copyright to 2000
Revision 1.57 1999/12/19 17:36:25 florian
* generation of LOCALS @@ removed
Revision 1.56 1999/11/06 14:34:16 peter

7
compiler/ag386nsm.pas
View File

@ -1,6 +1,6 @@
{
$Id$
Copyright (c) 1996,97 by Florian Klaempfl
Copyright (c) 1998-2000 by Florian Klaempfl
This unit implements an asmoutput class for the Nasm assembler with
Intel syntax for the i386+
@ -654,7 +654,10 @@ unit ag386nsm;
end.
{
$Log$
Revision 1.54 1999-11-06 14:34:16 peter
Revision 1.55 2000-01-07 01:14:18 peter
* updated copyright to 2000
Revision 1.54 1999/11/06 14:34:16 peter
* truncated log to 20 revs
Revision 1.53 1999/11/02 15:06:56 peter

7
compiler/ag68kgas.pas
View File

@ -1,6 +1,6 @@
{
$Id$
Copyright (c) 1998 by the FPC development team
Copyright (c) 1998-2000 by Florian Klaempfl
This unit implements an asmoutput class for MOTOROLA syntax with
Motorola 68000 (for GAS v2.52 AND HIGER)
@ -706,7 +706,10 @@ ait_stab_function_name : funcname:=pai_stab_function_name(hp)^.str;
end.
{
$Log$
Revision 1.23 1999-09-16 23:05:51 florian
Revision 1.24 2000-01-07 01:14:18 peter
* updated copyright to 2000
Revision 1.23 1999/09/16 23:05:51 florian
* m68k compiler is again compilable (only gas writer, no assembler reader)
Revision 1.22 1998/12/23 22:53:44 peter

7
compiler/ag68kmit.pas
View File

@ -1,6 +1,6 @@
{
$Id$
Copyright (c) 1998 by the FPC development team
Copyright (c) 1998-2000 by Florian Klaempfl
This unit implements an asmoutput class for MIT syntax with
Motorola 68000 (for MIT syntax TEST WITH GAS v1.34)
@ -668,7 +668,10 @@ ait_stab_function_name : funcname:=pai_stab_function_name(hp)^.str;
end.
{
$Log$
Revision 1.22 1999-09-16 23:05:51 florian
Revision 1.23 2000-01-07 01:14:18 peter
* updated copyright to 2000
Revision 1.22 1999/09/16 23:05:51 florian
* m68k compiler is again compilable (only gas writer, no assembler reader)
Revision 1.21 1999/03/10 13:25:45 pierre

7
compiler/ag68kmot.pas
View File

@ -1,6 +1,6 @@
{
$Id$
Copyright (c) 1998 by the FPC development team
Copyright (c) 1998-2000 by Florian Klaempfl
This unit implements an asmoutput class for MOTOROLA syntax with
Motorola 68000 (recognized by the Amiga Assembler and Charlie Gibbs's
@ -542,7 +542,10 @@ ait_labeled_instruction :
end.
{
$Log$
Revision 1.18 1999-09-16 23:05:51 florian
Revision 1.19 2000-01-07 01:14:18 peter
* updated copyright to 2000
Revision 1.18 1999/09/16 23:05:51 florian
* m68k compiler is again compilable (only gas writer, no assembler reader)
Revision 1.17 1999/03/04 13:55:41 pierre

7
compiler/ag68kmpw.pas
View File

@ -1,6 +1,6 @@
{
$Id$
Copyright (c) 1998 by the FPC development team
Copyright (c) 1998-2000 by Florian Klaempfl
This unit implements an asmoutput class for Macintosh MPW syntax
@ -581,7 +581,10 @@ ait_labeled_instruction :
end.
{
$Log$
Revision 1.10 1999-11-06 14:34:16 peter
Revision 1.11 2000-01-07 01:14:18 peter
* updated copyright to 2000
Revision 1.10 1999/11/06 14:34:16 peter
* truncated log to 20 revs
Revision 1.9 1999/09/16 23:05:51 florian

7
compiler/aopt386.pas
View File

@ -1,6 +1,6 @@
{
$Id$
Copyright (c) 1998 by Jonas Maebe
Copyright (c) 1998-2000 by Jonas Maebe
This unit calls the optimization procedures to optimize the assembler
code for i386+
@ -101,7 +101,10 @@ End.
{
$Log$
Revision 1.30 1999-11-27 23:50:22 jonas
Revision 1.31 2000-01-07 01:14:19 peter
* updated copyright to 2000
Revision 1.30 1999/11/27 23:50:22 jonas
+ if you define "newOptimizations", all extra optimizations that
require conditional defines will be activated (ie., it's equivalent
to "-dreplacereg -darithopt -dforopt -dfoldarithops")

7
compiler/assemble.pas
View File

@ -1,6 +1,6 @@
{
$Id$
Copyright (c) 1998 by the FPC development team
Copyright (c) 1998-2000 by Peter Vreman
This unit handles the assemblerfile write and assembler calls of FPC
@ -564,7 +564,10 @@ end;
end.
{
$Log$
Revision 1.58 1999-11-12 11:03:49 peter
Revision 1.59 2000-01-07 01:14:19 peter
* updated copyright to 2000
Revision 1.58 1999/11/12 11:03:49 peter
* searchpaths changed to stringqueue object
Revision 1.57 1999/11/08 10:37:12 peter

7
compiler/browcol.pas
View File

@ -1,6 +1,6 @@
{
$Id$
Copyright (c) 1993-98 by the FPC development team
Copyright (c) 1998-2000 by Florian Klaempfl and Pierre Muller
Support routines for getting browser info in collections
@ -1706,7 +1706,10 @@ begin
end.
{
$Log$
Revision 1.30 1999-12-01 11:11:19 pierre
Revision 1.31 2000-01-07 01:14:19 peter
* updated copyright to 2000
Revision 1.30 1999/12/01 11:11:19 pierre
* don't redefine sw_integer for FPC : corrected version
Revision 1.29 1999/12/01 11:05:47 pierre

7
compiler/browlog.pas
View File

@ -1,6 +1,6 @@
{
$Id$
Copyright (c) 1993-98 by the FPC development team
Copyright (c) 1998-2000 by Florian Klaempfl and Pierre Muller
Support routines for creating the browser log
@ -448,7 +448,10 @@ implementation
end.
{
$Log$
Revision 1.4 1999-11-30 10:40:42 peter
Revision 1.5 2000-01-07 01:14:20 peter
* updated copyright to 2000
Revision 1.4 1999/11/30 10:40:42 peter
+ ttype, tsymlist
Revision 1.3 1999/11/17 17:04:58 pierre

7
compiler/catch.pas
View File

@ -1,6 +1,6 @@
{
$Id$
Copyright (c) 1997-98 by Michael Van Canneyt
Copyright (c) 1998-2000 by Michael Van Canneyt
Unit to catch segmentation faults and Ctrl-C and exit gracefully
under linux and go32v2
@ -100,7 +100,10 @@ end.
{
$Log$
Revision 1.9 1999-08-25 16:41:04 peter
Revision 1.10 2000-01-07 01:14:20 peter
* updated copyright to 2000
Revision 1.9 1999/08/25 16:41:04 peter
* resources are working again
Revision 1.8 1999/08/10 12:27:15 pierre

7
compiler/cg386add.pas
View File

@ -1,6 +1,6 @@
{
$Id$
Copyright (c) 1993-98 by Florian Klaempfl
Copyright (c) 1998-2000 by Florian Klaempfl
Generate i386 assembler for in add node
@ -2136,7 +2136,10 @@ implementation
end.
{
$Log$
Revision 1.83 1999-12-11 18:53:31 jonas
Revision 1.84 2000-01-07 01:14:20 peter
* updated copyright to 2000
Revision 1.83 1999/12/11 18:53:31 jonas
* fixed type conversions of results of operations with cardinals
(between -dcardinalmulfix)

7
compiler/cg386cal.pas
View File

@ -1,6 +1,6 @@
{
$Id$
Copyright (c) 1993-98 by Florian Klaempfl
Copyright (c) 1998-2000 by Florian Klaempfl
Generate i386 assembler for in call nodes
@ -1230,7 +1230,10 @@ implementation
end.
{
$Log$
Revision 1.113 1999-12-22 01:01:46 peter
Revision 1.114 2000-01-07 01:14:20 peter
* updated copyright to 2000
Revision 1.113 1999/12/22 01:01:46 peter
- removed freelabel()
* added undefined label detection in internal assembler, this prevents
a lot of ld crashes and wrong .o files

7
compiler/cg386cnv.pas
View File

@ -1,6 +1,6 @@
{
$Id$
Copyright (c) 1993-98 by Florian Klaempfl
Copyright (c) 1998-2000 by Florian Klaempfl
Generate i386 assembler for type converting nodes
@ -1486,7 +1486,10 @@ implementation
end.
{
$Log$
Revision 1.97 1999-12-22 01:01:46 peter
Revision 1.98 2000-01-07 01:14:20 peter
* updated copyright to 2000
Revision 1.97 1999/12/22 01:01:46 peter
- removed freelabel()
* added undefined label detection in internal assembler, this prevents
a lot of ld crashes and wrong .o files

7
compiler/cg386con.pas
View File

@ -1,6 +1,6 @@
{
$Id$
Copyright (c) 1993-98 by Florian Klaempfl
Copyright (c) 1998-2000 by Florian Klaempfl
Generate i386 assembler for constants
@ -431,7 +431,10 @@ implementation
end.
{
$Log$
Revision 1.43 1999-11-06 14:34:17 peter
Revision 1.44 2000-01-07 01:14:20 peter
* updated copyright to 2000
Revision 1.43 1999/11/06 14:34:17 peter
* truncated log to 20 revs
Revision 1.42 1999/09/26 21:30:15 peter

29
compiler/cg386flw.pas
View File

@ -1,6 +1,6 @@
{
$Id$
Copyright (c) 1993-99 by Florian Klaempfl
Copyright (c) 1998-2000 by Florian Klaempfl
Generate i386 assembler for nodes that influence the flow
@ -610,8 +610,8 @@ do_jmp:
getlabel(exitexceptlabel);
aktexitlabel:=exitexceptlabel;
aktexit2label:=exitexceptlabel;
if assigned(aktbreaklabel) then
begin
if assigned(aktbreaklabel) then
begin
oldaktcontinuelabel:=aktcontinuelabel;
oldaktbreaklabel:=aktbreaklabel;
getlabel(breakexceptlabel);
@ -700,11 +700,11 @@ do_jmp:
endexceptlabel:=oldendexceptlabel;
aktexitlabel:=oldaktexitlabel;
aktexit2label:=oldaktexit2label;
if assigned(aktbreaklabel) then
begin
if assigned(aktbreaklabel) then
begin
aktcontinuelabel:=oldaktcontinuelabel;
aktbreaklabel:=oldaktbreaklabel;
end;
end;
end;
procedure secondon(var p : ptree);
@ -788,15 +788,15 @@ do_jmp:
getlabel(exitfinallylabel);
aktexitlabel:=exitfinallylabel;
aktexit2label:=exitfinallylabel;
if assigned(aktbreaklabel) then
begin
if assigned(aktbreaklabel) then
begin
oldaktcontinuelabel:=aktcontinuelabel;
oldaktbreaklabel:=aktbreaklabel;
getlabel(breakfinallylabel);
getlabel(continuefinallylabel);
aktcontinuelabel:=continuefinallylabel;
aktbreaklabel:=breakfinallylabel;
end;
end;
push_int(1); { Type of stack-frame must be pushed}
emitcall('FPC_PUSHEXCEPTADDR');
@ -864,11 +864,11 @@ do_jmp:
aktexitlabel:=oldaktexitlabel;
aktexit2label:=oldaktexit2label;
if assigned(aktbreaklabel) then
begin
if assigned(aktbreaklabel) then
begin
aktcontinuelabel:=oldaktcontinuelabel;
aktbreaklabel:=oldaktbreaklabel;
end;
end;
end;
@ -885,7 +885,10 @@ do_jmp:
end.
{
$Log$
Revision 1.65 1999-12-22 23:30:06 peter
Revision 1.66 2000-01-07 01:14:20 peter
* updated copyright to 2000
Revision 1.65 1999/12/22 23:30:06 peter
* nested try blocks work again
Revision 1.64 1999/12/22 01:01:46 peter

7
compiler/cg386inl.pas
View File

@ -1,6 +1,6 @@
{
$Id$
Copyright (c) 1993-98 by Florian Klaempfl
Copyright (c) 1998-2000 by Florian Klaempfl
Generate i386 inline nodes
@ -1479,7 +1479,10 @@ implementation
end.
{
$Log$
Revision 1.86 1999-12-22 01:01:46 peter
Revision 1.87 2000-01-07 01:14:20 peter
* updated copyright to 2000
Revision 1.86 1999/12/22 01:01:46 peter
- removed freelabel()
* added undefined label detection in internal assembler, this prevents
a lot of ld crashes and wrong .o files

9
compiler/cg386ld.pas
View File

@ -1,6 +1,6 @@
{
$Id$
Copyright (c) 1993-98 by Florian Klaempfl
Copyright (c) 1998-2000 by Florian Klaempfl
Generate i386 assembler for load/assignment nodes
@ -996,7 +996,10 @@ implementation
end.
{
$Log$
Revision 1.93 1999-12-30 15:04:31 peter
Revision 1.94 2000-01-07 01:14:21 peter
* updated copyright to 2000
Revision 1.93 1999/12/30 15:04:31 peter
* fixed funcret within inlined procedure
Revision 1.92 1999/12/22 01:01:47 peter
@ -1033,7 +1036,7 @@ end.
* some other potential bugs with array constructors fixed
* for classes compiled in $M+ and it's childs, the default access method
is now published
* fixed copyright message (it is now 1993-99)
* fixed copyright message (it is now 1998-2000)
Revision 1.84 1999/09/11 09:08:31 florian
* fixed bug 596

7
compiler/cg386mat.pas
View File

@ -1,6 +1,6 @@
{
$Id$
Copyright (c) 1993-98 by Florian Klaempfl
Copyright (c) 1998-2000 by Florian Klaempfl
Generate i386 assembler for math nodes
@ -940,7 +940,10 @@ implementation
end.
{
$Log$
Revision 1.37 2000-01-07 00:12:10 peter
Revision 1.38 2000-01-07 01:14:21 peter
* updated copyright to 2000
Revision 1.37 2000/01/07 00:12:10 peter
* fixed movd isntruction to be A_MOVD instead of A_MOV S_D
Revision 1.36 1999/11/18 15:34:44 pierre

7
compiler/cg386mem.pas
View File

@ -1,6 +1,6 @@
{
$Id$
Copyright (c) 1993-98 by Florian Klaempfl
Copyright (c) 1998-2000 by Florian Klaempfl
Generate i386 assembler for in memory related nodes
@ -885,7 +885,10 @@ implementation
end.
{
$Log$
Revision 1.65 2000-01-04 15:15:50 florian
Revision 1.66 2000-01-07 01:14:21 peter
* updated copyright to 2000
Revision 1.65 2000/01/04 15:15:50 florian
+ added compiler switch $maxfpuregisters
+ fixed a small problem in secondvecn

7
compiler/cg386set.pas
View File

@ -1,6 +1,6 @@
{
$Id$
Copyright (c) 1993-98 by Florian Klaempfl
Copyright (c) 1998-2000 by Florian Klaempfl
Generate i386 assembler for in set/case nodes
@ -898,7 +898,10 @@ implementation
end.
{
$Log$
Revision 1.44 1999-12-01 22:45:54 peter
Revision 1.45 2000-01-07 01:14:21 peter
* updated copyright to 2000
Revision 1.44 1999/12/01 22:45:54 peter
* fixed wrong assembler with in-node
Revision 1.43 1999/11/06 14:34:18 peter

7
compiler/cg68kadd.pas
View File

@ -1,6 +1,6 @@
{
$Id$
Copyright (c) 1993-98 by Florian Klaempfl
Copyright (c) 1998-2000 by Florian Klaempfl
Generate m68k assembler for add node
@ -1281,7 +1281,10 @@ implementation
end.
{
$Log$
Revision 1.17 1999-09-16 23:05:51 florian
Revision 1.18 2000-01-07 01:14:21 peter
* updated copyright to 2000
Revision 1.17 1999/09/16 23:05:51 florian
* m68k compiler is again compilable (only gas writer, no assembler reader)
Revision 1.16 1999/09/16 11:34:52 pierre

7
compiler/cg68kcal.pas
View File

@ -1,6 +1,6 @@
{
$Id$
Copyright (c) 1993-98 by Florian Klaempfl
Copyright (c) 1998-2000 by Florian Klaempfl
Generate m68k assembler for in call nodes
@ -1067,7 +1067,10 @@ implementation
end.
{
$Log$
Revision 1.22 1999-12-22 01:01:47 peter
Revision 1.23 2000-01-07 01:14:21 peter
* updated copyright to 2000
Revision 1.22 1999/12/22 01:01:47 peter
- removed freelabel()
* added undefined label detection in internal assembler, this prevents
a lot of ld crashes and wrong .o files

7
compiler/cg68kcnv.pas
View File

@ -1,6 +1,6 @@
{
$Id$
Copyright (c) 1993-98 by Florian Klaempfl
Copyright (c) 1998-2000 by Florian Klaempfl
Generate m68k assembler for type converting nodes
@ -1359,7 +1359,10 @@ implementation
end.
{
$Log$
Revision 1.15 1999-12-22 01:01:47 peter
Revision 1.16 2000-01-07 01:14:21 peter
* updated copyright to 2000
Revision 1.15 1999/12/22 01:01:47 peter
- removed freelabel()
* added undefined label detection in internal assembler, this prevents
a lot of ld crashes and wrong .o files

7
compiler/cg68kcon.pas
View File

@ -1,6 +1,6 @@
{
$Id$
Copyright (c) 1993-98 by Florian Klaempfl
Copyright (c) 1998-2000 by Florian Klaempfl
Generate m68k assembler for constants
@ -372,7 +372,10 @@ implementation
end.
{
$Log$
Revision 1.7 1999-09-20 16:38:52 peter
Revision 1.8 2000-01-07 01:14:22 peter
* updated copyright to 2000
Revision 1.7 1999/09/20 16:38:52 peter
* cs_create_smart instead of cs_smartlink
* -CX is create smartlink
* -CD is create dynamic, but does nothing atm.

7
compiler/cg68kflw.pas
View File

@ -1,6 +1,6 @@
{
$Id$
Copyright (c) 1993-98 by Florian Klaempfl
Copyright (c) 1998-2000 by Florian Klaempfl
Generate m68k assembler for nodes that influence the flow
@ -770,7 +770,10 @@ do_jmp:
end.
{
$Log$
Revision 1.13 1999-12-22 01:01:47 peter
Revision 1.14 2000-01-07 01:14:22 peter
* updated copyright to 2000
Revision 1.13 1999/12/22 01:01:47 peter
- removed freelabel()
* added undefined label detection in internal assembler, this prevents
a lot of ld crashes and wrong .o files

7
compiler/cg68kinl.pas
View File

@ -1,6 +1,6 @@
{
$Id$
Copyright (c) 1993-98 by Florian Klaempfl
Copyright (c) 1998-2000 by Florian Klaempfl
Generate m68k inline nodes
@ -900,7 +900,10 @@ implementation
end.
{
$Log$
Revision 1.20 1999-12-20 21:42:35 pierre
Revision 1.21 2000-01-07 01:14:22 peter
* updated copyright to 2000
Revision 1.20 1999/12/20 21:42:35 pierre
+ dllversion global variable
* FPC_USE_CPREFIX code removed, not necessary anymore
as we use .edata direct writing by default now.

7
compiler/cg68kld.pas
View File

@ -1,6 +1,6 @@
{
$Id$
Copyright (c) 1993-98 by Florian Klaempfl
Copyright (c) 1998-2000 by Florian Klaempfl
Generate m68k assembler for load/assignment nodes
@ -471,7 +471,10 @@ implementation
end.
{
$Log$
Revision 1.11 1999-12-22 01:01:47 peter
Revision 1.12 2000-01-07 01:14:22 peter
* updated copyright to 2000
Revision 1.11 1999/12/22 01:01:47 peter
- removed freelabel()
* added undefined label detection in internal assembler, this prevents
a lot of ld crashes and wrong .o files

7
compiler/cg68kmat.pas
View File

@ -1,6 +1,6 @@
{
$Id$
Copyright (c) 1993-98 by Florian Klaempfl
Copyright (c) 1998-2000 by Florian Klaempfl
Generate m68k assembler for math nodes
@ -449,7 +449,10 @@ implementation
end.
{
$Log$
Revision 1.6 1999-11-18 15:34:44 pierre
Revision 1.7 2000-01-07 01:14:22 peter
* updated copyright to 2000
Revision 1.6 1999/11/18 15:34:44 pierre
* Notes/Hints for local syms changed to
Set_varstate function

7
compiler/cg68kmem.pas
View File

@ -1,6 +1,6 @@
{
$Id$
Copyright (c) 1993-98 by Florian Klaempfl
Copyright (c) 1998-2000 by Florian Klaempfl
Generate m68k assembler for in memory related nodes
@ -725,7 +725,10 @@ implementation
end.
{
$Log$
Revision 1.13 1999-09-16 23:05:51 florian
Revision 1.14 2000-01-07 01:14:22 peter
* updated copyright to 2000
Revision 1.13 1999/09/16 23:05:51 florian
* m68k compiler is again compilable (only gas writer, no assembler reader)
Revision 1.12 1999/08/25 11:59:52 jonas

7
compiler/cg68kset.pas
View File

@ -1,6 +1,6 @@
{
$Id$
Copyright (c) 1993-98 by Florian Klaempfl
Copyright (c) 1998-2000 by Florian Klaempfl
Generate m68k assembler for in set/case nodes
@ -813,7 +813,10 @@ implementation
end.
{
$Log$
Revision 1.9 1999-09-16 23:05:51 florian
Revision 1.10 2000-01-07 01:14:22 peter
* updated copyright to 2000
Revision 1.9 1999/09/16 23:05:51 florian
* m68k compiler is again compilable (only gas writer, no assembler reader)
Revision 1.8 1998/12/11 00:03:08 peter

7
compiler/cga68k.pas
View File

@ -1,6 +1,6 @@
{
$Id$
Copyright (c) 1993-98 by Florian Klaempfl, Carl Eric Codere
Copyright (c) 1998-2000 by Florian Klaempfl, Carl Eric Codere
This unit generates 68000 (or better) assembler from the parse tree
@ -1391,7 +1391,10 @@ end;
end.
{
$Log$
Revision 1.38 1999-11-17 17:04:58 pierre
Revision 1.39 2000-01-07 01:14:22 peter
* updated copyright to 2000
Revision 1.38 1999/11/17 17:04:58 pierre
* Notes/hints changes
Revision 1.37 1999/11/09 23:06:44 peter

9
compiler/cgai386.pas
View File

@ -1,6 +1,6 @@
{
$Id$
Copyright (c) 1993-98 by Florian Klaempfl
Copyright (c) 1998-2000 by Florian Klaempfl
Helper routines for the i386 code generator
@ -3447,7 +3447,10 @@ procedure mov_reg_to_dest(p : ptree; s : topsize; reg : tregister);
end.
{
$Log$
Revision 1.65 1999-12-22 01:01:47 peter
Revision 1.66 2000-01-07 01:14:22 peter
* updated copyright to 2000
Revision 1.65 1999/12/22 01:01:47 peter
- removed freelabel()
* added undefined label detection in internal assembler, this prevents
a lot of ld crashes and wrong .o files
@ -3547,7 +3550,7 @@ end.
* some other potential bugs with array constructors fixed
* for classes compiled in $M+ and it's childs, the default access method
is now published
* fixed copyright message (it is now 1993-99)
* fixed copyright message (it is now 1998-2000)
Revision 1.40 1999/09/11 11:23:58 florian
* bug 603 fixed

7
compiler/cobjects.pas
View File

@ -1,6 +1,6 @@
{
$Id$
Copyright (c) 1993-98 by Florian Klaempfl
Copyright (c) 1998-2000 by Florian Klaempfl
This module provides some basic objects
@ -2318,7 +2318,10 @@ end;
end.
{
$Log$
Revision 1.49 1999-12-22 01:01:48 peter
Revision 1.50 2000-01-07 01:14:23 peter
* updated copyright to 2000
Revision 1.49 1999/12/22 01:01:48 peter
- removed freelabel()
* added undefined label detection in internal assembler, this prevents
a lot of ld crashes and wrong .o files

7
compiler/comphook.pas
View File

@ -1,6 +1,6 @@
{
$Id$
Copyright (c) 1998 by Peter Vreman
Copyright (c) 1998-2000 by Peter Vreman
This unit handles the compilerhooks for output to external programs
@ -295,7 +295,10 @@ end;
end.
{
$Log$
Revision 1.19 1999-11-18 15:34:45 pierre
Revision 1.20 2000-01-07 01:14:23 peter
* updated copyright to 2000
Revision 1.19 1999/11/18 15:34:45 pierre
* Notes/Hints for local syms changed to
Set_varstate function

7
compiler/compiler.pas
View File

@ -1,6 +1,6 @@
{
$Id$
Copyright (c) 1993-98 by Florian Klaempfl
Copyright (c) 1998-2000 by Florian Klaempfl
This unit is the interface of the compiler which can be used by
external programs to link in the compiler
@ -329,7 +329,10 @@ end;
end.
{
$Log$
Revision 1.41 1999-12-02 17:34:34 peter
Revision 1.42 2000-01-07 01:14:23 peter
* updated copyright to 2000
Revision 1.41 1999/12/02 17:34:34 peter
* preprocessor support. But it fails on the caret in type blocks
Revision 1.40 1999/11/18 13:43:48 pierre

7
compiler/comprsrc.pas
View File

@ -1,6 +1,6 @@
{
$Id$
Copyright (c) 1998 by Florian Klaempfl
Copyright (c) 1998-2000 by Florian Klaempfl
Handles the resource files handling
@ -109,7 +109,10 @@ end;
end.
{
$Log$
Revision 1.8 1999-12-01 12:42:32 peter
Revision 1.9 2000-01-07 01:14:23 peter
* updated copyright to 2000
Revision 1.8 1999/12/01 12:42:32 peter
* fixed bug 698
* removed some notes about unused vars

7
compiler/cpuasm.pas
View File

@ -1,6 +1,6 @@
{
$Id$
Copyright (c) 1999 by Florian Klaempfl and Peter Vreman
Copyright (c) 1998-2000 by Florian Klaempfl and Peter Vreman
Contains the assembler object for the i386
@ -1565,7 +1565,10 @@ end;
end.
{
$Log$
Revision 1.8 2000-01-07 00:07:24 peter
Revision 1.9 2000-01-07 01:14:23 peter
* updated copyright to 2000
Revision 1.8 2000/01/07 00:07:24 peter
* display fpu,mmx,xmm names instead of reg??
Revision 1.7 1999/12/24 15:22:52 peter

7
compiler/cpubase.pas
View File

@ -1,6 +1,6 @@
{
$Id$
Copyright (c) 1999 by Florian Klaempfl and Peter Vreman
Copyright (c) 1998-2000 by Florian Klaempfl and Peter Vreman
Contains the base types for the i386
@ -899,7 +899,10 @@ end;
end.
{
$Log$
Revision 1.19 1999-12-02 19:28:29 peter
Revision 1.20 2000-01-07 01:14:23 peter
* updated copyright to 2000
Revision 1.19 1999/12/02 19:28:29 peter
* more A_LOOP<Cond> to is_calljmp
Revision 1.18 1999/12/02 11:26:41 peter

25
compiler/cpuinfo.pas
View File

@ -1,19 +1,25 @@
{
$Id$
This file is part of the Free Pascal run time library.
Copyright (c) 1999 by the Free Pascal development team
Copyright (c) 1998-2000 by Florian Klaempfl
Basic Processor information
See the file COPYING.FPC, included in this distribution,
for details about the copyright.
This program is free software; you can redistribute it and/or modify
it under the terms of the GNU General Public License as published by
the Free Software Foundation; either version 2 of the License, or
(at your option) any later version.
This program is distributed in the hope that it will be useful,
but WITHOUT ANY WARRANTY; without even the implied warranty of
MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.
MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
GNU General Public License for more details.
**********************************************************************}
You should have received a copy of the GNU General Public License
along with this program; if not, write to the Free Software
Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
****************************************************************************
}
Unit CPUInfo;
Interface
@ -28,13 +34,16 @@ Type
Const
{ Size of native extended type }
extended_size = 10;
Implementation
end.
{
$Log$
Revision 1.1 1999-08-04 11:13:38 florian
Revision 1.2 2000-01-07 01:14:23 peter
* updated copyright to 2000
Revision 1.1 1999/08/04 11:13:38 florian
+ initial revision
}

8
compiler/cresstr.pas
View File

@ -1,6 +1,6 @@
{
$Id$
Copyright (c) 1999 by the Free Pascal development team
Copyright (c) 1998-2000 by Michael van Canneyt
Handles resourcestrings
@ -17,6 +17,7 @@
You should have received a copy of the GNU General Public License
along with this program; if not, write to the Free Software
Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
****************************************************************************
}
unit cresstr;
@ -308,7 +309,10 @@ end;
end.
{
$Log$
Revision 1.15 1999-11-06 14:34:20 peter
Revision 1.16 2000-01-07 01:14:23 peter
* updated copyright to 2000
Revision 1.15 1999/11/06 14:34:20 peter
* truncated log to 20 revs
Revision 1.14 1999/08/27 15:55:36 michael

9
compiler/csopt386.pas
View File

@ -1,6 +1,6 @@
{
$Id$
Copyright (c) 1997-98 by Jonas Maebe
Copyright (c) 1998-2000 by Jonas Maebe
This unit contains the common subexpression elimination procedure.
@ -744,7 +744,7 @@ begin
If RegLoadedWithNewValue(newReg,endP) then
GetLastInstruction(endP,hp)
else hp := endP;
if (p <> endp) or
if (p <> endp) or
not RegLoadedWithNewValue(newReg,endP) then
RestoreRegContentsTo(newReg, c ,p, hp);
{ In both case a and b, it is possible that the new register was modified }
@ -1114,7 +1114,10 @@ End.
{
$Log$
Revision 1.37 2000-01-03 17:11:17 jonas
Revision 1.38 2000-01-07 01:14:23 peter
* updated copyright to 2000
Revision 1.37 2000/01/03 17:11:17 jonas
* fixed bug with -dreplacereg
Revision 1.36 1999/12/05 16:48:43 jonas

7
compiler/daopt386.pas
View File

@ -1,6 +1,6 @@
{
$Id$
Copyright (c) 1997-98 by Jonas Maebe
Copyright (c) 1998-2000 by Jonas Maebe
This unit contains the data flow analyzer and several helper procedures
and functions.
@ -1918,7 +1918,10 @@ End.
{
$Log$
Revision 1.75 1999-12-05 16:48:43 jonas
Revision 1.76 2000-01-07 01:14:23 peter
* updated copyright to 2000
Revision 1.75 1999/12/05 16:48:43 jonas
* CSE of constant loading in regs works properly again
+ if a constant is stored into memory using "mov const, ref" and
there is a reg that contains this const, it is changed into

534
compiler/depend
View File

@ -1,339 +1,339 @@
pp: pp.pas \
globals.ppu \
compiler.ppu
$(COMPILER) $(LOCALOPT) pp.pas
globals.ppu \
compiler.ppu
$(COMPILER) $(LOCALOPT) pp.pas
globals.ppu: globals.pas \
cobjects.ppu \
systems.ppu
cobjects.ppu \
systems.ppu
cobjects.ppu: cobjects.pas
systems.ppu: systems.pas
compiler.ppu: compiler.pas \
verbose.ppu \
comphook.ppu \
systems.ppu \
globals.ppu \
options.ppu \
parser.ppu \
symtable.ppu \
link.ppu \
import.ppu
verbose.ppu \
comphook.ppu \
systems.ppu \
globals.ppu \
options.ppu \
parser.ppu \
symtable.ppu \
link.ppu \
import.ppu
verbose.ppu: verbose.pas \
messages.ppu \
files.ppu \
comphook.ppu \
globals.ppu
messages.ppu \
files.ppu \
comphook.ppu \
globals.ppu
messages.ppu: messages.pas
files.ppu: files.pas \
cobjects.ppu \
globals.ppu \
ppu.ppu \
verbose.ppu \
systems.ppu
cobjects.ppu \
globals.ppu \
ppu.ppu \
verbose.ppu \
systems.ppu
ppu.ppu: ppu.pas
comphook.ppu: comphook.pas
options.ppu: options.pas \
verbose.ppu \
cobjects.ppu \
comphook.ppu \
systems.ppu \
globals.ppu \
scanner.ppu \
link.ppu \
messages.ppu \
gendef.ppu
verbose.ppu \
cobjects.ppu \
comphook.ppu \
systems.ppu \
globals.ppu \
scanner.ppu \
link.ppu \
messages.ppu \
gendef.ppu
scanner.ppu: scanner.pas \
cobjects.ppu \
globals.ppu \
verbose.ppu \
comphook.ppu \
files.ppu \
systems.ppu \
symtable.ppu \
switches.ppu
cobjects.ppu \
globals.ppu \
verbose.ppu \
comphook.ppu \
files.ppu \
systems.ppu \
symtable.ppu \
switches.ppu
symtable.ppu: symtable.pas \
cobjects.ppu \
verbose.ppu \
comphook.ppu \
systems.ppu \
globals.ppu \
aasm.ppu \
files.ppu \
gendef.ppu \
types.ppu \
ppu.ppu \
hcodegen.ppu
cobjects.ppu \
verbose.ppu \
comphook.ppu \
systems.ppu \
globals.ppu \
aasm.ppu \
files.ppu \
gendef.ppu \
types.ppu \
ppu.ppu \
hcodegen.ppu
aasm.ppu: aasm.pas \
cobjects.ppu \
files.ppu \
globals.ppu \
verbose.ppu \
systems.ppu
cobjects.ppu \
files.ppu \
globals.ppu \
verbose.ppu \
systems.ppu
gendef.ppu: gendef.pas \
cobjects.ppu \
systems.ppu \
globals.ppu
cobjects.ppu \
systems.ppu \
globals.ppu
types.ppu: types.pas \
cobjects.ppu \
globals.ppu \
symtable.ppu \
verbose.ppu \
aasm.ppu
cobjects.ppu \
globals.ppu \
symtable.ppu \
verbose.ppu \
aasm.ppu
hcodegen.ppu: hcodegen.pas \
verbose.ppu \
aasm.ppu \
tree.ppu \
symtable.ppu \
systems.ppu \
comphook.ppu \
cobjects.ppu \
globals.ppu \
files.ppu
verbose.ppu \
aasm.ppu \
tree.ppu \
symtable.ppu \
systems.ppu \
comphook.ppu \
cobjects.ppu \
globals.ppu \
files.ppu
tree.ppu: tree.pas \
cobjects.ppu \
globals.ppu \
symtable.ppu \
aasm.ppu \
types.ppu \
verbose.ppu \
files.ppu
cobjects.ppu \
globals.ppu \
symtable.ppu \
aasm.ppu \
types.ppu \
verbose.ppu \
files.ppu
switches.ppu: switches.pas \
globals.ppu \
verbose.ppu \
files.ppu \
systems.ppu
globals.ppu \
verbose.ppu \
files.ppu \
systems.ppu
link.ppu: link.pas \
cobjects.ppu \
files.ppu \
script.ppu \
globals.ppu \
systems.ppu \
verbose.ppu
cobjects.ppu \
files.ppu \
script.ppu \
globals.ppu \
systems.ppu \
verbose.ppu
script.ppu: script.pas \
cobjects.ppu \
globals.ppu \
systems.ppu
cobjects.ppu \
globals.ppu \
systems.ppu
parser.ppu: parser.pas \
cobjects.ppu \
comphook.ppu \
systems.ppu \
globals.ppu \
hcodegen.ppu \
verbose.ppu \
symtable.ppu \
files.ppu \
aasm.ppu \
assemble.ppu \
link.ppu \
script.ppu \
gendef.ppu \
scanner.ppu \
pbase.ppu \
pdecl.ppu \
psystem.ppu \
pmodules.ppu
cobjects.ppu \
comphook.ppu \
systems.ppu \
globals.ppu \
hcodegen.ppu \
verbose.ppu \
symtable.ppu \
files.ppu \
aasm.ppu \
assemble.ppu \
link.ppu \
script.ppu \
gendef.ppu \
scanner.ppu \
pbase.ppu \
pdecl.ppu \
psystem.ppu \
pmodules.ppu
assemble.ppu: assemble.pas \
cobjects.ppu \
globals.ppu \
aasm.ppu \
script.ppu \
files.ppu \
systems.ppu \
verbose.ppu
cobjects.ppu \
globals.ppu \
aasm.ppu \
script.ppu \
files.ppu \
systems.ppu \
verbose.ppu
pbase.ppu: pbase.pas \
cobjects.ppu \
globals.ppu \
symtable.ppu \
files.ppu \
scanner.ppu \
systems.ppu \
verbose.ppu
cobjects.ppu \
globals.ppu \
symtable.ppu \
files.ppu \
scanner.ppu \
systems.ppu \
verbose.ppu
pdecl.ppu: pdecl.pas \
globals.ppu \
symtable.ppu \
cobjects.ppu \
scanner.ppu \
aasm.ppu \
tree.ppu \
pass_1.ppu \
files.ppu \
types.ppu \
hcodegen.ppu \
verbose.ppu \
systems.ppu \
pbase.ppu \
ptconst.ppu \
pexpr.ppu \
psub.ppu \
pexports.ppu
globals.ppu \
symtable.ppu \
cobjects.ppu \
scanner.ppu \
aasm.ppu \
tree.ppu \
pass_1.ppu \
files.ppu \
types.ppu \
hcodegen.ppu \
verbose.ppu \
systems.ppu \
pbase.ppu \
ptconst.ppu \
pexpr.ppu \
psub.ppu \
pexports.ppu
pass_1.ppu: pass_1.pas \
tree.ppu \
cobjects.ppu \
verbose.ppu \
comphook.ppu \
systems.ppu \
globals.ppu \
aasm.ppu \
symtable.ppu \
types.ppu \
hcodegen.ppu \
files.ppu
tree.ppu \
cobjects.ppu \
verbose.ppu \
comphook.ppu \
systems.ppu \
globals.ppu \
aasm.ppu \
symtable.ppu \
types.ppu \
hcodegen.ppu \
files.ppu
ptconst.ppu: ptconst.pas \
symtable.ppu \
cobjects.ppu \
globals.ppu \
scanner.ppu \
aasm.ppu \
tree.ppu \
pass_1.ppu \
hcodegen.ppu \
types.ppu \
verbose.ppu \
pbase.ppu \
pexpr.ppu
symtable.ppu \
cobjects.ppu \
globals.ppu \
scanner.ppu \
aasm.ppu \
tree.ppu \
pass_1.ppu \
hcodegen.ppu \
types.ppu \
verbose.ppu \
pbase.ppu \
pexpr.ppu
pexpr.ppu: pexpr.pas \
symtable.ppu \
tree.ppu \
cobjects.ppu \
globals.ppu \
scanner.ppu \
aasm.ppu \
pass_1.ppu \
systems.ppu \
hcodegen.ppu \
types.ppu \
verbose.ppu \
pbase.ppu \
pdecl.ppu
symtable.ppu \
tree.ppu \
cobjects.ppu \
globals.ppu \
scanner.ppu \
aasm.ppu \
pass_1.ppu \
systems.ppu \
hcodegen.ppu \
types.ppu \
verbose.ppu \
pbase.ppu \
pdecl.ppu
psub.ppu: psub.pas \
cobjects.ppu \
symtable.ppu \
globals.ppu \
scanner.ppu \
aasm.ppu \
tree.ppu \
types.ppu \
files.ppu \
verbose.ppu \
systems.ppu \
import.ppu \
gendef.ppu \
hcodegen.ppu \
temp_gen.ppu \
pass_1.ppu \
pass_2.ppu \
pbase.ppu \
pdecl.ppu \
pexpr.ppu \
pstatmnt.ppu
cobjects.ppu \
symtable.ppu \
globals.ppu \
scanner.ppu \
aasm.ppu \
tree.ppu \
types.ppu \
files.ppu \
verbose.ppu \
systems.ppu \
import.ppu \
gendef.ppu \
hcodegen.ppu \
temp_gen.ppu \
pass_1.ppu \
pass_2.ppu \
pbase.ppu \
pdecl.ppu \
pexpr.ppu \
pstatmnt.ppu
import.ppu: import.pas \
cobjects.ppu \
systems.ppu \
verbose.ppu
cobjects.ppu \
systems.ppu \
verbose.ppu
temp_gen.ppu: temp_gen.pas \
cobjects.ppu \
globals.ppu \
tree.ppu \
hcodegen.ppu \
verbose.ppu \
files.ppu \
aasm.ppu
cobjects.ppu \
globals.ppu \
tree.ppu \
hcodegen.ppu \
verbose.ppu \
files.ppu \
aasm.ppu
pass_2.ppu: pass_2.pas \
tree.ppu \
cobjects.ppu \
verbose.ppu \
comphook.ppu \
systems.ppu \
globals.ppu \
files.ppu \
symtable.ppu \
types.ppu \
aasm.ppu \
scanner.ppu \
pass_1.ppu \
hcodegen.ppu \
temp_gen.ppu
tree.ppu \
cobjects.ppu \
verbose.ppu \
comphook.ppu \
systems.ppu \
globals.ppu \
files.ppu \
symtable.ppu \
types.ppu \
aasm.ppu \
scanner.ppu \
pass_1.ppu \
hcodegen.ppu \
temp_gen.ppu
pstatmnt.ppu: pstatmnt.pas \
tree.ppu \
cobjects.ppu \
globals.ppu \
files.ppu \
verbose.ppu \
systems.ppu \
symtable.ppu \
aasm.ppu \
pass_1.ppu \
types.ppu \
scanner.ppu \
hcodegen.ppu \
ppu.ppu \
pbase.ppu \
pexpr.ppu \
pdecl.ppu
tree.ppu \
cobjects.ppu \
globals.ppu \
files.ppu \
verbose.ppu \
systems.ppu \
symtable.ppu \
aasm.ppu \
pass_1.ppu \
types.ppu \
scanner.ppu \
hcodegen.ppu \
ppu.ppu \
pbase.ppu \
pexpr.ppu \
pdecl.ppu
pexports.ppu: pexports.pas \
cobjects.ppu \
globals.ppu \
scanner.ppu \
symtable.ppu \
pbase.ppu \
verbose.ppu
cobjects.ppu \
globals.ppu \
scanner.ppu \
symtable.ppu \
pbase.ppu \
verbose.ppu
psystem.ppu: psystem.pas \
symtable.ppu \
globals.ppu \
tree.ppu
symtable.ppu \
globals.ppu \
tree.ppu
pmodules.ppu: pmodules.pas \
cobjects.ppu \
comphook.ppu \
systems.ppu \
globals.ppu \
symtable.ppu \
aasm.ppu \
files.ppu \
hcodegen.ppu \
verbose.ppu \
link.ppu \
assemble.ppu \
import.ppu \
gendef.ppu \
ppu.ppu \
scanner.ppu \
pbase.ppu \
psystem.ppu \
pdecl.ppu \
psub.ppu \
parser.ppu
cobjects.ppu \
comphook.ppu \
systems.ppu \
globals.ppu \
symtable.ppu \
aasm.ppu \
files.ppu \
hcodegen.ppu \
verbose.ppu \
link.ppu \
assemble.ppu \
import.ppu \
gendef.ppu \
ppu.ppu \
scanner.ppu \
pbase.ppu \
psystem.ppu \
pdecl.ppu \
psub.ppu \
parser.ppu

30
compiler/dmisc.pas
View File

@ -1,18 +1,25 @@
{
$Id$
This file is part of the Free Pascal run time library.
Copyright (c) 1993,97 by the Free Pascal development team.
Copyright (c) 1998-2000 by Florian Klaempfl
Dos unit for BP7 compatible RTL
Dos unit for BP7 compatible RTL for Delphi
See the file COPYING.FPC, included in this distribution,
for details about the copyright.
This program is free software; you can redistribute it and/or modify
it under the terms of the GNU General Public License as published by
the Free Software Foundation; either version 2 of the License, or
(at your option) any later version.
This program is distributed in the hope that it will be useful,
but WITHOUT ANY WARRANTY; without even the implied warranty of
MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.
MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
GNU General Public License for more details.
**********************************************************************}
You should have received a copy of the GNU General Public License
along with this program; if not, write to the Free Software
Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
****************************************************************************
}
unit dmisc;
interface
@ -636,7 +643,7 @@ begin
until i=0;
{ Turbo Pascal gets rid of a \.. at the end of the path }
{ Now remove also any reference to '\..' at end of line
{ Now remove also any reference to '\..' at end of line
+ of course previous dir.. }
i:=pos('\..',pa);
if i<>0 then
@ -653,7 +660,7 @@ begin
{ Remove End . and \}
if (length(pa)>0) and (pa[length(pa)]='.') then
dec(byte(pa[0]));
{ if only the drive + a '\' is left then the '\' should be left to prevtn the program
{ if only the drive + a '\' is left then the '\' should be left to prevtn the program
accessing the current directory on the drive rather than the root!}
{ if the last char of path = '\' then leave it in as this is what TP does! }
if ((length(pa)>3) and (pa[length(pa)]='\')) and (path[length(path)] <> '\') then
@ -847,7 +854,10 @@ End;
end.
{
$Log$
Revision 1.5 1999-07-18 10:19:50 florian
Revision 1.6 2000-01-07 01:14:23 peter
* updated copyright to 2000
Revision 1.5 1999/07/18 10:19:50 florian
* made it compilable with Dlephi 4 again
+ fixed problem with large stack allocations on win32

4
compiler/errord.msg
View File

@ -3,7 +3,7 @@
#
# $Id$
# This file is part of the Free Pascal Compiler
# Copyright (c) 1999 by the Free Pascal Development team
# Copyright (c) 1998-2000 by the Free Pascal Development team
#
# German (alternative) Language File for Free Pascal
#
@ -1546,7 +1546,7 @@ option_switch_bin_to_src_assembler=N_Schalte Assembler auf den Standard Assemble
# Logo (option -l)
#
option_logo_start=Free Pascal Compiler Version $FPCVER [$FPCDATE] f<>r $FPCTARGET
option_logo_end=Copyright (c) 1993-99 by Florian Klaempfl
option_logo_end=Copyright (c) 1998-2000 by Florian Klaempfl
#
# Info (option -i)
#

4
compiler/errores.msg
View File

@ -1,7 +1,7 @@
#
# $Id$
# This file is part of the Free Pascal Compiler
# Copyright (c) 1998 by the Free Pascal Development team
# Copyright (c) 1998-2000 by the Free Pascal Development team
#
# English (default) Language File for Free Pascal
#
@ -1407,7 +1407,7 @@ option_switch_bin_to_src_assembler=N_Cambi
# Logo (option -l)
#
option_logo_start=Free Pascal Compiler versi¢n $FPCVER [$FPCDATE] para $FPCTARGET
option_logo_end=Copyright (c) 1993-99 por Florian Klaempfl
option_logo_end=Copyright (c) 1998-2000 por Florian Klaempfl
#
# Info (option -i)

4
compiler/errorf.msg
View File

@ -1,7 +1,7 @@
#
# $Id$
# This file is part of the Free Pascal Compiler
# Copyright (c) 1998 by the Free Pascal Development team
# Copyright (c) 1998-2000 by the Free Pascal Development team
#
# French (cp850) Language File for Free Pascal
#
@ -1408,7 +1408,7 @@ option_switch_bin_to_src_assembler=N_Switching assembler to default source writi
# Logo (option -l)
#
option_logo_start=Compilatuer Free Pascal version $FPCVER [$FPCDATE] pour $FPCTARGET
option_logo_end=Copyright (c) 1993-99 by Florian Klaempfl
option_logo_end=Copyright (c) 1998-2000 by Florian Klaempfl
#
# Info (option -i)
#

6
compiler/errorn.msg
View File

@ -1,7 +1,7 @@
#
# $Id$
# This file is part of the Free Pascal Compiler
# Copyright (c) 1998 by the Free Pascal Development team
# Copyright (c) 1998-2000 by the Free Pascal Development team
#
# Dutch Language File for Free Pascal
#
@ -53,7 +53,7 @@
# Illegaal betekent onwettig in het Nederlands.
# - Zo wordt "execute" niet met "executeren" vertaalt maar met "uitvoeren".
# Programma, hebt u nog een laatste wens voordat de trekker wordt
# overgehaald?
# overgehaald?
# - In het Nederlands schrijft men woorden vaker aan elkaar dan in het
# Engels: "compiler switch" (2 woorden ) wordt "compileroptie" (1 woord).
# Let ook op voorvoegingen: "Interface and implementation names" wordt:
@ -1431,7 +1431,7 @@ option_switch_bin_to_src_assembler=N_Switching assembler to default source writi
# Logo (option -l)
#
option_logo_start=Free Pascal Compiler versie $FPCVER [$FPCDATE] voor $FPCTARGET
option_logo_end=Copyright (c) 1993-99 door Florian Klaempfl en anderen
option_logo_end=Copyright (c) 1998-2000 door Florian Klaempfl en anderen
#
# Info (option -i)
#

9
compiler/errorr.msg
View File

@ -1,7 +1,7 @@
#
# $Id: errorr.msg, v1.9 1999/10/29 00:33:16 michail A.baikov
# <20>â®â ä ©« - ç áâì Free Pascal Compilator
# €¢â®à᪮¥ ¯à ¢® (c) 1998,1999 by Free Pascal Development Team (Russian)
# €¢â®à᪮¥ ¯à ¢® (c) 1998,1998-2000 by Free Pascal Development Team (Russian)
#
# <20>yá᪨© ä ©« ï§ëª  ¤«ï Free Pascal (¯®áâ ¢«ï¥âáï á v.0.99.12)
#
@ -828,7 +828,7 @@ option_switch_bin_to_src_assembler=N_
# ‹®£® (®¯æ¨ï -l)
#
option_logo_start=Free Pascal Compiler version $FPCVER [$FPCDATE] for $FPCTARGET [Russian]
option_logo_end=Copyright (c) 1993-99 by Florian Klaempfl
option_logo_end=Copyright (c) 1998-2000 by Florian Klaempfl
#
# ˆ­ä®p¬ æ¨ï (®¯æ¨ï -i)
@ -995,7 +995,10 @@ ol_end=**1h_
#
# $Log$
# Revision 1.9 1999-11-12 22:52:13 michael
# Revision 1.10 2000-01-07 01:14:26 peter
# * updated copyright to 2000
#
# Revision 1.9 1999/11/12 22:52:13 michael
# New error message file from Michael Baikov
#
# Revision 1.9 1999/10/29 00:33:16 michail a.baikov

10
compiler/export.pas
View File

@ -1,6 +1,6 @@
{
$Id$
Copyright (c) 1998 by Florian Klaempfl
Copyright (c) 1998-2000 by Florian Klaempfl
This unit implements an uniform export object
@ -18,7 +18,8 @@
along with this program; if not, write to the Free Software
Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
****************************************************************************}
****************************************************************************
}
unit export;
interface
@ -193,7 +194,10 @@ end;
end.
{
$Log$
Revision 1.8 1999-11-06 14:34:20 peter
Revision 1.9 2000-01-07 01:14:27 peter
* updated copyright to 2000
Revision 1.8 1999/11/06 14:34:20 peter
* truncated log to 20 revs
Revision 1.7 1999/10/21 14:29:34 peter

7
compiler/files.pas
View File

@ -1,6 +1,6 @@
{
$Id$
Copyright (c) 1996-98 by Florian Klaempfl
Copyright (c) 1998-2000 by Florian Klaempfl
This unit implements an extended file management and the first loading
and searching of the modules (ppufiles)
@ -1348,7 +1348,10 @@ end;
end.
{
$Log$
Revision 1.111 1999-12-08 01:01:11 peter
Revision 1.112 2000-01-07 01:14:27 peter
* updated copyright to 2000
Revision 1.111 1999/12/08 01:01:11 peter
* fixed circular unit reference checking. loaded_from was reset after
reseting a unit, so no loaded_from info was available anymore.

7
compiler/gdb.pas
View File

@ -1,6 +1,6 @@
{
$Id$
Copyright (c) 1996-98 by Florian Klaempfl
Copyright (c) 1998-2000 by Florian Klaempfl
This units contains special support for the GDB
@ -249,7 +249,10 @@ end.
{
$Log$
Revision 1.13 1999-11-09 23:51:25 pierre
Revision 1.14 2000-01-07 01:14:27 peter
* updated copyright to 2000
Revision 1.13 1999/11/09 23:51:25 pierre
* some DBX work
Revision 1.12 1999/08/04 00:23:01 florian

7
compiler/gendef.pas
View File

@ -1,6 +1,6 @@
{
$Id$
Copyright (c) 1996-98 by Florian Klaempfl
Copyright (c) 1998-2000 by Florian Klaempfl
Generation of a .def file for needed for Os2/Win32
@ -165,7 +165,10 @@ end;
end.
{
$Log$
Revision 1.4 1999-12-20 23:23:28 pierre
Revision 1.5 2000-01-07 01:14:27 peter
* updated copyright to 2000
Revision 1.4 1999/12/20 23:23:28 pierre
+ $description $version
Revision 1.3 1999/03/26 00:05:29 peter

7
compiler/globals.pas
View File

@ -1,6 +1,6 @@
{
$Id$
Copyright (C) 1993-98 by Florian Klaempfl
Copyright (C) 1998-2000 by Florian Klaempfl
This unit implements some support functions and global variables
@ -1472,7 +1472,10 @@ begin
end.
{
$Log$
Revision 1.45 2000-01-07 00:08:09 peter
Revision 1.46 2000-01-07 01:14:27 peter
* updated copyright to 2000
Revision 1.45 2000/01/07 00:08:09 peter
* tp7 fix
Revision 1.44 2000/01/06 15:48:59 peter

7
compiler/globtype.pas
View File

@ -1,6 +1,6 @@
{
$Id$
Copyright (c) 1993-98 by Florian Klaempfl, Pierre Muller
Copyright (c) 1998-2000 by Florian Klaempfl, Pierre Muller
Global types
@ -180,7 +180,10 @@ begin
end.
{
$Log$
Revision 1.24 1999-11-12 11:03:50 peter
Revision 1.25 2000-01-07 01:14:27 peter
* updated copyright to 2000
Revision 1.24 1999/11/12 11:03:50 peter
* searchpaths changed to stringqueue object
Revision 1.23 1999/11/09 13:00:38 peter

7
compiler/hcgdata.pas
View File

@ -1,6 +1,6 @@
{
$Id$
Copyright (c) 1996-98 by Florian Klaempfl
Copyright (c) 1998-2000 by Florian Klaempfl
Routines for the code generation of data structures
like VMT,Messages
@ -616,7 +616,10 @@ implementation
end.
{
$Log$
Revision 1.22 1999-12-02 19:22:16 peter
Revision 1.23 2000-01-07 01:14:27 peter
* updated copyright to 2000
Revision 1.22 1999/12/02 19:22:16 peter
* write also parameters for override info
Revision 1.21 1999/12/01 12:42:32 peter

7
compiler/hcodegen.pas
View File

@ -1,6 +1,6 @@
{
$Id$
Copyright (c) 1996-98 by Florian Klaempfl
Copyright (c) 1998-2000 by Florian Klaempfl
This unit exports some help routines for the code generation
@ -405,7 +405,10 @@ end.
{
$Log$
Revision 1.52 1999-12-09 23:18:04 pierre
Revision 1.53 2000-01-07 01:14:27 peter
* updated copyright to 2000
Revision 1.52 1999/12/09 23:18:04 pierre
* no_fast_exit if procedure contains implicit termination code
Revision 1.51 1999/12/01 12:42:32 peter

7
compiler/htypechk.pas
View File

@ -1,6 +1,6 @@
{
$Id$
Copyright (c) 1996-98 by Florian Klaempfl
Copyright (c) 1998-2000 by Florian Klaempfl
This unit exports some help routines for the type checking
@ -848,7 +848,10 @@ implementation
end.
{
$Log$
Revision 1.54 1999-12-31 14:26:27 peter
Revision 1.55 2000-01-07 01:14:27 peter
* updated copyright to 2000
Revision 1.54 1999/12/31 14:26:27 peter
* fixed crash with empty array constructors
Revision 1.53 1999/12/18 14:55:21 florian

7
compiler/import.pas
View File

@ -1,6 +1,6 @@
{
$Id$
Copyright (c) 1998 by Peter Vreman
Copyright (c) 1998-2000 by Peter Vreman
This unit implements an uniform import object
@ -234,7 +234,10 @@ end;
end.
{
$Log$
Revision 1.15 1999-11-06 14:34:21 peter
Revision 1.16 2000-01-07 01:14:27 peter
* updated copyright to 2000
Revision 1.15 1999/11/06 14:34:21 peter
* truncated log to 20 revs
Revision 1.14 1999/11/02 15:06:57 peter

9
compiler/innr.inc
View File

@ -1,7 +1,7 @@
{
$Id$
This file is part of the Free Pascal run time library and compiler.
Copyright (c) 1993,98 by the Free Pascal development team
Copyright (c) 1998-2000 by the Free Pascal development team
Internal Function/Constant Evaluator numbers
@ -77,7 +77,7 @@ const
in_pi = 121;
in_abs_extended = 122;
in_sqr_extended = 123;
in_sqrt_extended = 124;
in_sqrt_extended = 124;
in_arctan_extended = 125;
in_ln_extended = 126;
in_sin_extended = 127;
@ -99,7 +99,10 @@ const
{
$Log$
Revision 1.14 1999-09-15 20:35:40 florian
Revision 1.15 2000-01-07 01:14:27 peter
* updated copyright to 2000
Revision 1.14 1999/09/15 20:35:40 florian
* small fix to operator overloading when in MMX mode
+ the compiler uses now fldz and fld1 if possible
+ some fixes to floating point registers

7
compiler/link.pas
View File

@ -1,6 +1,6 @@
{
$Id$
Copyright (c) 1998,99 by the FPC development team
Copyright (c) 1998-2000 by Peter Vreman
This unit handles the linker and binder calls for programs and
libraries
@ -530,7 +530,10 @@ end;
end.
{
$Log$
Revision 1.78 1999-11-22 22:22:30 pierre
Revision 1.79 2000-01-07 01:14:27 peter
* updated copyright to 2000
Revision 1.78 1999/11/22 22:22:30 pierre
* Give better info in script
Revision 1.77 1999/11/12 11:03:50 peter

7
compiler/m68k/cpuasm.pas
View File

@ -1,6 +1,6 @@
{
$Id$
Copyright (c) 1999 by Florian Klaempfl
Copyright (c) 1998-2000 by Florian Klaempfl
This program is free software; you can redistribute it and/or modify
it under the terms of the GNU General Public License as published by
@ -27,7 +27,10 @@ unit cpuasm;
end.
{
$Log$
Revision 1.1 1999-09-16 23:05:57 florian
Revision 1.2 2000-01-07 01:14:50 peter
* updated copyright to 2000
Revision 1.1 1999/09/16 23:05:57 florian
* m68k compiler is again compilable (only gas writer, no assembler reader)
}

7
compiler/m68k/cpubase.pas
View File

@ -1,6 +1,6 @@
{
$Id$
Copyright (c) 1995-98 by Florian Klaempfl, Carl Eric Codere
Copyright (c) 1998-2000 by Florian Klaempfl, Carl Eric Codere
This unit implements an types and classes specific for the
MC68000/MC68020
@ -1576,7 +1576,10 @@ unit cpubase;
end.
{
$Log$
Revision 1.1 1999-09-16 23:05:57 florian
Revision 1.2 2000-01-07 01:14:50 peter
* updated copyright to 2000
Revision 1.1 1999/09/16 23:05:57 florian
* m68k compiler is again compilable (only gas writer, no assembler reader)
Revision 1.12 1999/08/19 13:02:08 pierre

130
compiler/make.cmd
View File

@ -1,66 +1,66 @@
@echo off
rem $id: make.cmd,v $
rem
rem ************************Make batchfile for OS/2****************************
rem * Purpose: The makefile contains a lot of Unix commands. While it is *
rem * possible to install for example a bash shell under OS/2 *
rem * a batch file is much easier. *
rem * *
rem * Copyright (c) 1998 by Daniel Mantione, developer of Free Pascal *
rem ***************************************************************************
goto %1
:clean
pushd
\pp\rtl\
del /s *.ppo *.so2 *.oo2 *.ppu *.s *.o *.pp1 *.s1 *.o1>&dev\nul
popd
del *.ppo *.so2 *.oo2 *.ppu *.s *.o *.pp1 *.s1 *.o1>&dev\nul
goto eind
:prtx
pushd
\pp\rtl\os2\
iff not exist prt0.oo2 then
as -o prt0.oo2 prt0.as
endiff
iff not exist prt1.oo2 then
as -o prt1.oo2 prt1.as
endiff
iff not exist code2.oo2 then
as -o code2.oo2 code2.as
endiff
iff not exist code3.oo2 then
as -o code3.oo2 code3.as
endiff
popd
goto eind
:compiler
call make prtx
iff "%2"=="" then
ppos2 pp.pas
else
%2 pp.pas
endiff
goto eind
:remake
call make clean
call make compiler %2
goto eind
:cycle
call make remake %2
move pp.exe pp1.exe
call make remake pp1.exe
move pp.exe pp2.exe
call make remake pp2.exe
move pp.exe pp3.exe
goto eind
$log: make.cmd,v$
:eind
@echo off
rem $id: make.cmd,v $
rem
rem ************************Make batchfile for OS/2****************************
rem * Purpose: The makefile contains a lot of Unix commands. While it is *
rem * possible to install for example a bash shell under OS/2 *
rem * a batch file is much easier. *
rem * *
rem * Copyright (c) 1998-2000 by Daniel Mantione, developer of Free Pascal *
rem ***************************************************************************
goto %1
:clean
pushd
\pp\rtl\
del /s *.ppo *.so2 *.oo2 *.ppu *.s *.o *.pp1 *.s1 *.o1>&dev\nul
popd
del *.ppo *.so2 *.oo2 *.ppu *.s *.o *.pp1 *.s1 *.o1>&dev\nul
goto eind
:prtx
pushd
\pp\rtl\os2\
iff not exist prt0.oo2 then
as -o prt0.oo2 prt0.as
endiff
iff not exist prt1.oo2 then
as -o prt1.oo2 prt1.as
endiff
iff not exist code2.oo2 then
as -o code2.oo2 code2.as
endiff
iff not exist code3.oo2 then
as -o code3.oo2 code3.as
endiff
popd
goto eind
:compiler
call make prtx
iff "%2"=="" then
ppos2 pp.pas
else
%2 pp.pas
endiff
goto eind
:remake
call make clean
call make compiler %2
goto eind
:cycle
call make remake %2
move pp.exe pp1.exe
call make remake pp1.exe
move pp.exe pp2.exe
call make remake pp2.exe
move pp.exe pp3.exe
goto eind
$log: make.cmd,v$
:eind


7
compiler/messages.pas
View File

@ -1,6 +1,6 @@
{
$Id$
Copyright (c) 1998 by Peter Vreman
Copyright (c) 1998-2000 by Peter Vreman
This unit implements the message object
@ -264,7 +264,10 @@ end;
end.
{
$Log$
Revision 1.8 1999-07-18 10:19:55 florian
Revision 1.9 2000-01-07 01:14:27 peter
* updated copyright to 2000
Revision 1.8 1999/07/18 10:19:55 florian
* made it compilable with Dlephi 4 again
+ fixed problem with large stack allocations on win32

7
compiler/new/agatt.pas
View File

@ -1,6 +1,6 @@
{
$Id$
Copyright (c) 1997 by Florian Klaempfl
Copyright (c) 1998-2000 by Florian Klaempfl
This unit implements an abstract assembler write for GNU AT&T
assebler syntax
@ -606,7 +606,10 @@ unit agatt;
end.
{
$Log$
Revision 1.2 1999-09-03 13:08:36 jonas
Revision 1.3 2000-01-07 01:14:50 peter
* updated copyright to 2000
Revision 1.2 1999/09/03 13:08:36 jonas
* defined some necessary virtual helper methods
Revision 1.1 1999/08/03 13:48:50 michael

7
compiler/new/alpha/agas.pas
View File

@ -1,6 +1,6 @@
{
$Id$
Copyright (c) 1997 by Florian Klaempfl
Copyright (c) 1998-2000 by Florian Klaempfl
This unit implements an asm for the DEC Alpha
@ -113,7 +113,10 @@ end.
{
$Log$
Revision 1.4 1999-08-25 12:00:16 jonas
Revision 1.5 2000-01-07 01:14:55 peter
* updated copyright to 2000
Revision 1.4 1999/08/25 12:00:16 jonas
* changed pai386, paippc and paiapha (same for tai*) to paicpu (taicpu)
Revision 1.3 1999/08/05 15:50:31 michael

7
compiler/new/alpha/aoptcpu.pas
View File

@ -1,6 +1,6 @@
{
$Id$
Copyright (c) 1999 by Jonas Maebe, member of the Free Pascal
Copyright (c) 1998-2000 by Jonas Maebe, member of the Free Pascal
Development Team
This unit implements the Alpha optimizer object
@ -39,7 +39,10 @@ Implementation
End.
{
$Log$
Revision 1.1 1999-12-24 22:49:23 jonas
Revision 1.2 2000-01-07 01:14:55 peter
* updated copyright to 2000
Revision 1.1 1999/12/24 22:49:23 jonas
+ dummy to allow compiling
}

7
compiler/new/alpha/aoptcpub.pas
View File

@ -1,6 +1,6 @@
{
$Id$
Copyright (c) 1999 by Jonas Maebe, member of the Free Pascal
Copyright (c) 1998-2000 by Jonas Maebe, member of the Free Pascal
Development Team
This unit contains several types and constants necessary for the
@ -117,7 +117,10 @@ End.
{
$Log$
Revision 1.1 1999-11-09 22:57:09 peter
Revision 1.2 2000-01-07 01:14:55 peter
* updated copyright to 2000
Revision 1.1 1999/11/09 22:57:09 peter
* compiles again both i386,alpha both with optimizer
}

7
compiler/new/alpha/aoptcpuc.pas
View File

@ -1,6 +1,6 @@
{
$Id$
Copyright (c) 1999 by Jonas Maebe, member of the Free Pascal
Copyright (c) 1998-2000 by Jonas Maebe, member of the Free Pascal
Development Team
This unit contains the processor specific implementation of the
@ -39,7 +39,10 @@ Implementation
End.
{
$Log$
Revision 1.1 1999-11-09 22:57:09 peter
Revision 1.2 2000-01-07 01:14:55 peter
* updated copyright to 2000
Revision 1.1 1999/11/09 22:57:09 peter
* compiles again both i386,alpha both with optimizer
}

7
compiler/new/alpha/aoptcpud.pas
View File

@ -1,6 +1,6 @@
{
$Id$
Copyright (c) 1999 by Jonas Maebe, member of the Free Pascal
Copyright (c) 1998-2000 by Jonas Maebe, member of the Free Pascal
Development Team
This unit contains the processor specific implementation of the
@ -41,7 +41,10 @@ End.
{
$Log$
Revision 1.1 1999-11-09 22:57:09 peter
Revision 1.2 2000-01-07 01:14:56 peter
* updated copyright to 2000
Revision 1.1 1999/11/09 22:57:09 peter
* compiles again both i386,alpha both with optimizer
}

7
compiler/new/alpha/cgcpu.pas
View File

@ -1,6 +1,6 @@
{
$Id$
Copyright (c) 1993-98 by Florian Klaempfl
Copyright (c) 1998-2000 by Florian Klaempfl
This unit implements the code generator for the DEC Alpha
@ -200,7 +200,10 @@ end;
end.
{
$Log$
Revision 1.8 1999-09-15 20:35:47 florian
Revision 1.9 2000-01-07 01:14:56 peter
* updated copyright to 2000
Revision 1.8 1999/09/15 20:35:47 florian
* small fix to operator overloading when in MMX mode
+ the compiler uses now fldz and fld1 if possible
+ some fixes to floating point registers

7
compiler/new/alpha/cpuasm.pas
View File

@ -1,6 +1,6 @@
{
$Id$
Copyright (c) 1999 by Florian Klaempfl
Copyright (c) 1998-2000 by Florian Klaempfl
Contains the assembler object for the Alpha
@ -285,7 +285,10 @@ implementation
end.
{
$Log$
Revision 1.5 1999-08-25 12:00:18 jonas
Revision 1.6 2000-01-07 01:14:56 peter
* updated copyright to 2000
Revision 1.5 1999/08/25 12:00:18 jonas
* changed pai386, paippc and paiapha (same for tai*) to paicpu (taicpu)
Revision 1.4 1999/08/06 16:04:07 michael

7
compiler/new/alpha/cpubase.pas
View File

@ -1,6 +1,6 @@
{
$Id$
Copyright (C) 1997 by Florian Klaempfl
Copyright (C) 1998-2000 by Florian Klaempfl
this unit implements an asmlistitem class for the DEC Alpha
@ -299,7 +299,10 @@ end;
end.
{
$Log$
Revision 1.15 1999-11-09 22:57:09 peter
Revision 1.16 2000-01-07 01:14:56 peter
* updated copyright to 2000
Revision 1.15 1999/11/09 22:57:09 peter
* compiles again both i386,alpha both with optimizer
Revision 1.14 1999/08/23 23:27:55 pierre

2
compiler/new/alpha/cpuinfo.pas
View File

@ -1,7 +1,7 @@
{
$Id$
This file is part of the Free Pascal run time library.
Copyright (c) 1999 by the Free Pascal development team
Copyright (c) 1998-2000 by the Free Pascal development team
Basic Processor information

7
compiler/new/alpha/tgcpu.pas
View File

@ -1,6 +1,6 @@
{
$Id$
Copyright (C) 1993-99 by Florian Klaempfl
Copyright (C) 1998-2000 by Florian Klaempfl
This unit handles the temporary variables stuff for Alpha
@ -42,7 +42,10 @@ begin
end.
{
$Log$
Revision 1.3 1999-08-03 00:28:24 florian
Revision 1.4 2000-01-07 01:14:56 peter
* updated copyright to 2000
Revision 1.3 1999/08/03 00:28:24 florian
- removed the stuff of the last commit :)
Revision 1.2 1999/08/03 00:25:28 florian

7
compiler/new/aopt.pas
View File

@ -1,6 +1,6 @@
{
$Id$
Copyright (c) 1999 by Jonas Maebe, member of the Free Pascal
Copyright (c) 1998-2000 by Jonas Maebe, member of the Free Pascal
Development Team
This unit contains the interface routines between the code generator
@ -241,7 +241,10 @@ End.
{
$Log$
Revision 1.4 1999-11-09 22:57:08 peter
Revision 1.5 2000-01-07 01:14:51 peter
* updated copyright to 2000
Revision 1.4 1999/11/09 22:57:08 peter
* compiles again both i386,alpha both with optimizer
Revision 1.3 1999/08/18 14:32:20 jonas

7
compiler/new/aoptbase.pas
View File

@ -1,6 +1,6 @@
{
$Id$
Copyright (c) 1999 by Jonas Maebe, member of the Free Pascal
Copyright (c) 1998-2000 by Jonas Maebe, member of the Free Pascal
Development Team
This unit contains the base of all optimizer related objects
@ -263,7 +263,10 @@ End.
{
$Log$
Revision 1.4 1999-11-09 22:57:08 peter
Revision 1.5 2000-01-07 01:14:51 peter
* updated copyright to 2000
Revision 1.4 1999/11/09 22:57:08 peter
* compiles again both i386,alpha both with optimizer
Revision 1.3 1999/09/08 15:01:31 jonas

7
compiler/new/aoptcs.pas
View File

@ -1,6 +1,6 @@
{
$Id$
Copyright (c) 1999 by Jonas Maebe, member of the Free Pascal
Copyright (c) 1998-2000 by Jonas Maebe, member of the Free Pascal
Development Team
This unit contains the common subexpression elimination object of the
@ -850,7 +850,10 @@ End.
{
$Log$
Revision 1.3 1999-08-25 12:00:10 jonas
Revision 1.4 2000-01-07 01:14:51 peter
* updated copyright to 2000
Revision 1.3 1999/08/25 12:00:10 jonas
* changed pai386, paippc and paiapha (same for tai*) to paicpu (taicpu)
Revision 1.2 1999/08/23 14:41:13 jonas

7
compiler/new/aoptda.pas
View File

@ -1,6 +1,6 @@
{
$Id$
Copyright (c) 1999 by Jonas Maebe, member of the Free Pascal
Copyright (c) 1998-2000 by Jonas Maebe, member of the Free Pascal
Development Team
This unit contains the data flow analyzer object of the assembler
@ -177,7 +177,10 @@ End.
{
$Log$
Revision 1.5 1999-11-09 22:57:08 peter
Revision 1.6 2000-01-07 01:14:52 peter
* updated copyright to 2000
Revision 1.5 1999/11/09 22:57:08 peter
* compiles again both i386,alpha both with optimizer
Revision 1.4 1999/08/18 14:32:21 jonas

7
compiler/new/aoptobj.pas
View File

@ -1,6 +1,6 @@
{
$Id$
Copyright (c) 1999 by Jonas Maebe, member of the Free Pascal
Copyright (c) 1998-2000 by Jonas Maebe, member of the Free Pascal
Development Team
This unit contains the processor independent assembler optimizer
@ -791,7 +791,10 @@ End.
{
$Log$
Revision 1.7 1999-11-09 22:57:08 peter
Revision 1.8 2000-01-07 01:14:52 peter
* updated copyright to 2000
Revision 1.7 1999/11/09 22:57:08 peter
* compiles again both i386,alpha both with optimizer
Revision 1.6 1999/09/29 13:50:34 jonas

7
compiler/new/cgbase.pas
View File

@ -1,6 +1,6 @@
{
$Id$
Copyright (c) 1993-98 by Florian Klaempfl
Copyright (c) 1998-2000 by Florian Klaempfl
This units implements some code generator helper routines
@ -512,7 +512,10 @@ unit cgbase;
end.
{
$Log$
Revision 1.14 1999-12-24 22:47:42 jonas
Revision 1.15 2000-01-07 01:14:52 peter
* updated copyright to 2000
Revision 1.14 1999/12/24 22:47:42 jonas
* added OC_NONE to the compare forms (to allow unconditional jumps)
Revision 1.13 1999/12/01 12:42:33 peter

7
compiler/new/cgflw.pas
View File

@ -1,6 +1,6 @@
{
$Id$
Copyright (c) 1993-98 by Florian Klaempfl
Copyright (c) 1998-2000 by Florian Klaempfl
Generate assembler for nodes that influence the flow
@ -781,7 +781,10 @@ do_jmp:
end.
{
$Log$
Revision 1.1 1999-11-03 14:13:59 jonas
Revision 1.2 2000-01-07 01:14:52 peter
* updated copyright to 2000
Revision 1.1 1999/11/03 14:13:59 jonas
+ initial implementation

7
compiler/new/cgobj.pas
View File

@ -1,6 +1,6 @@
{
$Id$
Copyright (c) 1993-99 by Florian Klaempfl
Copyright (c) 1998-2000 by Florian Klaempfl
Member of the Free Pascal development team
This unit implements the basic code generator object
@ -1116,7 +1116,10 @@ unit cgobj;
end.
{
$Log$
Revision 1.32 1999-12-01 12:42:33 peter
Revision 1.33 2000-01-07 01:14:53 peter
* updated copyright to 2000
Revision 1.32 1999/12/01 12:42:33 peter
* fixed bug 698
* removed some notes about unused vars

7
compiler/new/convtree.pas
View File

@ -1,6 +1,6 @@
{
$Id$
Copyright (c) 1999 by Florian Klaempfl
Copyright (c) 1998-2000 by Florian Klaempfl
Converts the old tree nodes into the new OOP nodest
This unit is necessary to interface the new code generator
@ -73,7 +73,10 @@ unit convtree;
end.
{
$Log$
Revision 1.5 1999-09-14 11:16:09 florian
Revision 1.6 2000-01-07 01:14:53 peter
* updated copyright to 2000
Revision 1.5 1999/09/14 11:16:09 florian
* only small updates to work with the current compiler
Revision 1.4 1999/01/24 22:32:35 florian

7
compiler/new/i386/aoptcpu.pas
View File

@ -1,6 +1,6 @@
{
$Id$
Copyright (c) 1999 by Jonas Maebe, member of the Free Pascal
Copyright (c) 1998-2000 by Jonas Maebe, member of the Free Pascal
Development Team
This unit implements the i386 optimizer object
@ -39,7 +39,10 @@ Implementation
End.
{
$Log$
Revision 1.5 1999-08-18 14:32:24 jonas
Revision 1.6 2000-01-07 01:14:56 peter
* updated copyright to 2000
Revision 1.5 1999/08/18 14:32:24 jonas
+ compilable!
+ dataflow analyzer finished
+ start of CSE units

7
compiler/new/i386/aoptcpub.pas
View File

@ -1,6 +1,6 @@
{
$Id$
Copyright (c) 1999 by Jonas Maebe, member of the Free Pascal
Copyright (c) 1998-2000 by Jonas Maebe, member of the Free Pascal
Development Team
This unit contains several types and constants necessary for the
@ -214,7 +214,10 @@ End.
{
$Log$
Revision 1.7 1999-11-09 22:57:09 peter
Revision 1.8 2000-01-07 01:14:56 peter
* updated copyright to 2000
Revision 1.7 1999/11/09 22:57:09 peter
* compiles again both i386,alpha both with optimizer
Revision 1.6 1999/09/08 15:05:43 jonas

7
compiler/new/i386/aoptcpuc.pas
View File

@ -1,6 +1,6 @@
{
$Id$
Copyright (c) 1999 by Jonas Maebe, member of the Free Pascal
Copyright (c) 1998-2000 by Jonas Maebe, member of the Free Pascal
Development Team
This unit contains the processor specific implementation of the
@ -85,7 +85,10 @@ End;
End.
{
$Log$
Revision 1.2 1999-11-09 22:57:09 peter
Revision 1.3 2000-01-07 01:14:57 peter
* updated copyright to 2000
Revision 1.2 1999/11/09 22:57:09 peter
* compiles again both i386,alpha both with optimizer
Revision 1.1 1999/08/18 14:32:26 jonas

7
compiler/new/i386/aoptcpud.pas
View File

@ -1,6 +1,6 @@
{
$Id$
Copyright (c) 1999 by Jonas Maebe, member of the Free Pascal
Copyright (c) 1998-2000 by Jonas Maebe, member of the Free Pascal
Development Team
This unit contains the processor specific implementation of the
@ -257,7 +257,10 @@ End.
{
$Log$
Revision 1.4 1999-11-09 22:57:09 peter
Revision 1.5 2000-01-07 01:14:57 peter
* updated copyright to 2000
Revision 1.4 1999/11/09 22:57:09 peter
* compiles again both i386,alpha both with optimizer
Revision 1.3 1999/09/08 15:01:31 jonas

7
compiler/new/i386/cgcpu.pas
View File

@ -1,6 +1,6 @@
{
$Id$
Copyright (c) 1993-98 by Florian Klaempfl
Copyright (c) 1998-2000 by Florian Klaempfl
This unit implements the code generator for the i386
@ -140,7 +140,10 @@ unit cgcpu;
end.
{
$Log$
Revision 1.8 1999-11-09 22:57:09 peter
Revision 1.9 2000-01-07 01:14:57 peter
* updated copyright to 2000
Revision 1.8 1999/11/09 22:57:09 peter
* compiles again both i386,alpha both with optimizer
Revision 1.7 1999/09/15 20:35:47 florian

2
compiler/new/i386/cpuinfo.pas
View File

@ -1,7 +1,7 @@
{
$Id$
This file is part of the Free Pascal compiler
Copyright (c) 1999 by Florian Klaempfl
Copyright (c) 1998-2000 by Florian Klaempfl
Basic Processor information for i386

7
compiler/new/i386/tgcpu.pas
View File

@ -1,6 +1,6 @@
{
$Id$
Copyright (C) 1993-99 by Florian Klaempfl
Copyright (C) 1998-2000 by Florian Klaempfl
This unit handles the temporary variables stuff for i386
@ -68,7 +68,10 @@ begin
end.
{
$Log$
Revision 1.5 1999-09-15 20:35:47 florian
Revision 1.6 2000-01-07 01:14:57 peter
* updated copyright to 2000
Revision 1.5 1999/09/15 20:35:47 florian
* small fix to operator overloading when in MMX mode
+ the compiler uses now fldz and fld1 if possible
+ some fixes to floating point registers

7
compiler/new/ncon.pas
View File

@ -1,6 +1,6 @@
{
$Id$
Copyright (C) 1993-99 by Florian Klaempfl
Copyright (C) 1998-2000 by Florian Klaempfl
This unit implements load nodes etc.
@ -39,7 +39,10 @@ unit ncon;
end.
{
$Log$
Revision 1.2 1999-08-06 18:05:53 florian
Revision 1.3 2000-01-07 01:14:53 peter
* updated copyright to 2000
Revision 1.2 1999/08/06 18:05:53 florian
* implemented some stuff for assignments
Revision 1.1 1999/08/06 16:15:38 florian

7
compiler/new/nmem.pas
View File

@ -1,6 +1,6 @@
{
$Id$
Copyright (C) 1993-99 by Florian Klaempfl
Copyright (C) 1998-2000 by Florian Klaempfl
This unit implements load nodes etc.
@ -711,7 +711,10 @@ unit nmem;
end.
{
$Log$
Revision 1.15 1999-12-06 18:17:10 peter
Revision 1.16 2000-01-07 01:14:53 peter
* updated copyright to 2000
Revision 1.15 1999/12/06 18:17:10 peter
* newcg compiler compiles again
Revision 1.14 1999/10/12 21:20:46 florian

7
compiler/new/nstatmnt.pas
View File

@ -1,6 +1,6 @@
{
$Id$
Copyright (C) 1993-99 by Florian Klaempfl
Copyright (C) 1998-2000 by Florian Klaempfl
This unit implements block, statement nodes etc.
@ -146,7 +146,10 @@ unit nstatmnt;
end.
{
$Log$
Revision 1.4 1999-08-05 14:58:14 florian
Revision 1.5 2000-01-07 01:14:54 peter
* updated copyright to 2000
Revision 1.4 1999/08/05 14:58:14 florian
* some fixes for the floating point registers
* more things for the new code generator

7
compiler/new/pass_1.pas
View File

@ -1,6 +1,6 @@
{
$Id$
Copyright (c) 1996-98 by Florian Klaempfl
Copyright (c) 1998-2000 by Florian Klaempfl
This unit implements the first pass of the code generator
@ -168,7 +168,10 @@ implementation
end.
{
$Log$
Revision 1.6 1999-10-12 21:20:47 florian
Revision 1.7 2000-01-07 01:14:54 peter
* updated copyright to 2000
Revision 1.6 1999/10/12 21:20:47 florian
* new codegenerator compiles again
Revision 1.5 1999/08/04 00:23:57 florian

Some files were not shown because too many files have changed in this diff Show More