* remove $Log

git-svn-id: trunk@231 -

compiler/alpha/aasmcpu.pas

@@ -279,9 +279,3 @@ implementation
 
 
     end.
-{
-  $Log: aasmcpu.pas,v $
-  Revision 1.5  2005/02/14 17:13:09  peter
-    * truncate log
-
-}

compiler/arm/armreg.dat

@@ -1,6 +1,4 @@
 ;
-; $Id: armreg.dat,v 1.3 2004/06/16 20:07:10 florian Exp $
-;
 ; ARM registers
 ;
 ; layout
@@ -84,19 +82,3 @@ D14,$03,$00,d14,0,0
 S30,$03,$00,s20,0,0
 S31,$03,$00,s21,0,0
 D15,$03,$00,d15,0,0
-
-;
-; $Log: armreg.dat,v $
-; Revision 1.3  2004/06/16 20:07:10  florian
-;   * dwarf branch merged
-;
-; Revision 1.2.2.1  2004/06/12 17:01:01  florian
-;   * fixed compilation of arm compiler
-;
-; Revision 1.2  2003/09/09 12:53:39  florian
-;   * some assembling problems fixed
-;   * improved loadaddr_ref_reg
-;
-; Revision 1.1  2003/09/04 00:15:29  florian
-;   * first bunch of adaptions of arm compiler for new register type
-;

compiler/compinnr.inc

@@ -104,9 +104,3 @@ const
 
    { SSE }
 
-{
-  $Log: compinnr.inc,v $
-  Revision 1.16  2005/02/14 17:13:06  peter
-    * truncate log
-
-}

compiler/fpcdefs.inc

@@ -93,23 +93,3 @@
 {$DEFINE MACOS_USE_FAKE_SYSUTILS}
 {$ENDIF MACOS}
 
-{
-  $Log: fpcdefs.inc,v $
-  Revision 1.51  2005/03/20 21:41:29  florian
-    * USECMOV activated
-
-  Revision 1.50  2005/02/26 01:26:59  jonas
-    * fixed generic jumps optimizer and enabled it for ppc (the label table
-      was not being initialised -> getfinaldestination always failed, which
-      caused wrong optimizations in some cases)
-    * changed the inverse_cond into a function, because tasmcond is a record
-      on ppc
-    + added a compare_conditions() function for the same reason
-
-  Revision 1.49  2005/02/14 17:13:06  peter
-    * truncate log
-
-  Revision 1.48  2005/02/08 22:33:51  olle
-    * fixed compilation on MacOS
-
-}

compiler/i386/cpubase.inc

@@ -167,12 +167,3 @@
       std_param_align = 4;
 
 
-{
-  $Log: cpubase.inc,v $
-  Revision 1.18  2005/02/14 17:13:09  peter
-    * truncate log
-
-  Revision 1.17  2005/01/20 16:38:45  peter
-    * load jmp_buf_size from system unit
-
-}

compiler/m68k/m68kreg.dat

@@ -1,6 +1,4 @@
 ;
-; $Id: m68kreg.dat,v 1.4 2004/05/06 22:01:54 florian Exp $
-;
 ; Motorola 680x0 registers
 ;
 ; layout
@@ -44,18 +42,3 @@ A4,$06,$04,a4,%a4,12
 A5,$06,$05,a5,%a5,13
 A6,$06,$06,a6,%a6,14
 SP,$06,$07,sp,%sp,15
-
-;
-;  $Log: m68kreg.dat,v $
-;  Revision 1.4  2004/05/06 22:01:54  florian
-;    * register numbers for address registers fixed
-;
-;  Revision 1.3  2004/04/26 11:05:28  florian
-;    + gas registers
-;
-;  Revision 1.2  2004/04/25 21:26:16  florian
-;    * some m68k stuff fixed
-;
-;  Revision 1.1  2003/12/10 02:30:58  karoly
-;    * initial revision
-;

compiler/mips/mipsreg.dat

@@ -1,6 +1,4 @@
 ;
-; $Id: mipsreg.dat,v 1.1 2005/02/13 18:56:44 florian Exp $
-;
 ; MIPS registers
 ;
 ; layout
@@ -83,11 +81,3 @@ FCR25,$05,$05,FCR25,fcr25,72,72
 FCR26,$05,$06,FCR26,fcr26,73,73
 FCR28,$05,$07,FCR28,fcr28,74,74
 FCSR,$05,$08,FCSR,fcsr,75,75
-
-;
-; $Log: mipsreg.dat,v $
-; Revision 1.1  2005/02/13 18:56:44  florian
-;   + basic mips stuff
-;
-;
-;

compiler/msg/errorct.msg

@@ -2354,4 +2354,3 @@ P*2WT_Especifica aplicaci
 
 #
 # The End...
-#

compiler/msg/errore.msg

@@ -2367,4 +2367,3 @@ P*2WT_Specify tool type application (MPW tool, MacOS only)
 
 #
 # The End...
-#

compiler/msg/errores.msg

@@ -2366,4 +2366,3 @@ P*2WT_Especifica aplicación de tipo herramienta (herramienta MPW, MacOS sólo)
 
 #
 # The End...
-#

compiler/msg/errorf.msg

@@ -1897,4 +1897,3 @@ option_help_pages=11025_[
 
 #
 # The End...
-#

compiler/msg/errorhe.msg

@@ -2360,4 +2360,3 @@ P*2WT_Specify tool type application (MPW tool, MacOS only)
 
 #
 # The End...
-#

compiler/msg/errorn.msg

@@ -1934,4 +1934,3 @@ option_help_pages=11025_[
 
 #
 # The End...
-#

compiler/msg/errorpl.msg

@@ -2233,4 +2233,3 @@ P*2Tmacos_MacOS (classic) na PowerPC
 
 #
 # The End...
-#

compiler/msg/errorpli.msg

@@ -2232,4 +2232,3 @@ P*2Tmacos_MacOS (classic) na PowerPC
 
 #
 # The End...
-#

compiler/msg/errorr.msg

@@ -2013,4 +2013,3 @@ option_help_pages=11025_[
 ]
 #
 # The End
-#

compiler/msg/errorrw.msg

@@ -2013,4 +2013,3 @@ option_help_pages=11025_[
 ]
 #
 # The End
-#

compiler/powerpc/ppcins.dat

@@ -1,6 +1,5 @@
 ;****************************************************************************
 ;
-;   $Id: ppcins.dat,v 1.1 2002/07/13 21:50:34 florian Exp $
 ;   Copyright (c) 2002 by Florian Klaempfl
 ;
 ;   Instruction template table for the PowerPC
@@ -67,10 +66,3 @@ cmp       crfD,L,rA,rB          opcode=31,op21=0,reserved=$80000200
 cmpi      crfD,L,rA,SIMM        opcode=11,reserved=$00000200
 cmpl      crfD,L,rA,rB          opcode=31,op21=32,reserved=$80000200
 cmpli     crfD,L,rA,UIMM        opcode=10,reserved=$00000200
-
-;
-; $Log: ppcins.dat,v $
-; Revision 1.1  2002/07/13 21:50:34  florian
-;   + initial version, a lot of instructions need to be added
-;
-;

compiler/powerpc/ppcreg.dat

@@ -1,6 +1,4 @@
 ;
-; $Id: ppcreg.dat,v 1.6 2004/06/17 16:55:46 peter Exp $
-;
 ; PowerPC registers
 ;
 ; layout
@@ -120,25 +118,3 @@ XER,$05,$09,XER,xer,xer,XER,76,76
 LR,$05,$0a,LR,lr,lr,LR,65,65
 CTR,$05,$0b,CTR,ctr,ctr,CTR,66,66
 FPSCR,$05,$0c,FPSCR,fpscr,fpscr,FPSCR,-1,-1
-
-;
-; $Log: ppcreg.dat,v $
-; Revision 1.6  2004/06/17 16:55:46  peter
-;   * powerpc compiles again
-;
-; Revision 1.5  2003/12/10 22:19:27  florian
-;   + short gas register names for smartlinking added
-;
-; Revision 1.4  2003/09/04 21:07:03  florian
-;   * ARM compiler compiles again
-;
-; Revision 1.3  2003/09/03 19:35:24  peter
-;   * powerpc compiles again
-;
-; Revision 1.2  2003/09/03 15:55:01  peter
-;   * NEWRA branch merged
-;
-; Revision 1.1.2.1  2003/09/02 20:48:22  peter
-;   * powerpc registers
-;
-;

compiler/ppc.dpr

@@ -155,20 +155,3 @@ begin
 { Call the compiler with empty command, so it will take the parameters }
   Halt(compiler.Compile(''));
 end.
-{
-  $Log: ppc.dpr,v $
-  Revision 1.6  2002/10/05 12:43:27  carl
-    * fixes for Delphi 6 compilation
-     (warning : Some features do not work under Delphi)
-
-  Revision 1.5  2002/09/07 15:25:07  peter
-    * old logs removed and tabs fixed
-
-  Revision 1.4  2002/08/12 15:08:40  carl
-    + stab register indexes for powerpc (moved from gdb to cpubase)
-    + tprocessor enumeration moved to cpuinfo
-    + linker in target_info is now a class
-    * many many updates for m68k (will soon start to compile)
-    - removed some ifdef or correct them for correct cpu
-
-}

compiler/sparc/opcode.inc

@@ -71,12 +71,3 @@ A_FMOVd,
 A_FABSd,
 A_FABSq
 
-{
-        $Log: opcode.inc,v $
-        Revision 1.17  2005/02/14 17:13:10  peter
-          * truncate log
-
-        Revision 1.16  2005/01/07 16:22:54  florian
-          + implemented abi compliant handling of strucutured functions results on sparc platform
-
-}

compiler/sparc/spreg.dat

@@ -1,6 +1,4 @@
 ;
-; $Id: spreg.dat,v 1.6 2004/09/21 17:25:13 peter Exp $
-;
 ; Sparc registers
 ;
 ; layout
@@ -154,34 +152,3 @@ ASR28,$04,$00,$1c,%asr28,32,32
 ASR29,$04,$00,$1d,%asr29,32,32
 ASR30,$04,$00,$1e,%asr30,32,32
 ASR31,$04,$00,$1f,%asr31,32,32
-
-;
-; $Log: spreg.dat,v $
-; Revision 1.6  2004/09/21 17:25:13  peter
-;   * paraloc branch merged
-;
-; Revision 1.5.4.1  2004/09/20 20:42:38  peter
-;   * use R_SUBD for all int registers instead of R_SUBNONE
-;
-; Revision 1.5  2004/06/16 20:07:11  florian
-;   * dwarf branch merged
-;
-; Revision 1.4.2.1  2004/05/11 19:34:57  peter
-;   * dwarf added
-;
-; Revision 1.4  2004/01/12 16:39:41  peter
-;   * sparc updates, mostly float related
-;
-; Revision 1.3  2003/09/03 16:29:37  peter
-;   * superregisters also from .dat file
-;
-; Revision 1.2  2003/09/03 15:55:01  peter
-;   * NEWRA branch merged
-;
-; Revision 1.1.2.2  2003/09/02 17:49:17  peter
-;   * newra updates
-;
-; Revision 1.1.2.1  2003/08/31 21:08:16  peter
-;   * first batch of sparc fixes
-;
-;

compiler/sparc/strinst.inc

@@ -67,12 +67,3 @@
           { internal instructions }
           'fmovd',
           'fabsd','fabsq'
-{
-        $Log: strinst.inc,v $
-        Revision 1.16  2005/02/14 17:13:10  peter
-          * truncate log
-
-        Revision 1.15  2005/01/07 16:22:54  florian
-          + implemented abi compliant handling of strucutured functions results on sparc platform
-
-}

compiler/utils/fpc.pp

@@ -205,15 +205,3 @@ program fpc;
        error(ppcbin+' returned an error exitcode (normal if you did not specify a source file to be compiled)');
      halt(errorvalue);
   end.
-{
-  $Log: fpc.pp,v $
-  Revision 1.20  2005/05/08 19:56:59  marco
-   * typo fixed
-
-  Revision 1.19  2005/02/14 17:13:10  peter
-    * truncate log
-
-  Revision 1.18  2005/01/14 21:04:44  armin
-  * added .nlm extension for netware
-
-}

compiler/x86/x86ins.dat

@@ -1,6 +1,4 @@
 ;
-; $Id: x86ins.dat,v 1.11 2004/06/16 20:07:11 florian Exp $
-;
 ; Table of assembler instructions for Free Pascal
 ; adapted from Netwide Assembler by Peter Vreman
 ;
@@ -3420,61 +3418,3 @@ reg64,reg32           \321\301\1\x63\110              X86_64
 [CDO,cqto]
 (Ch_MRAX, Ch_WRDX, Ch_None)
 void                  \321\1\x99                      X86_64
-
-;
-; $Log: x86ins.dat,v $
-; Revision 1.11  2004/06/16 20:07:11  florian
-;   * dwarf branch merged
-;
-; Revision 1.10.2.4  2004/04/24 21:18:33  florian
-;   * integer -> int64 and shortint -> int64 type cast for x86-64 fixed
-;
-; Revision 1.10.2.3  2004/04/24 16:28:23  florian
-;   * fixed cqto opcode
-;
-; Revision 1.10.2.2  2004/04/24 16:02:19  florian
-;   * sign extension for int div int fixed
-;
-; Revision 1.10.2.1  2004/04/22 19:59:48  florian
-;   * longint loading fixed
-;
-; Revision 1.10  2004/04/08 16:49:42  peter
-;   * MOVSL fixed
-;
-; Revision 1.9  2004/02/09 22:14:17  peter
-;   * more x86_64 parameter fixes
-;   * tparalocation.lochigh is now used to indicate if registerhigh
-;     is used and what the type is
-;
-; Revision 1.8  2004/02/03 16:53:37  peter
-; *** empty log message ***
-;
-; Revision 1.7  2004/01/15 14:01:32  florian
-;   + x86 instruction tables for x86-64 extended
-;
-; Revision 1.6  2003/12/25 12:01:35  florian
-;   + possible sse2 unit usage for double calculations
-;   * some sse2 assembler issues fixed
-;
-; Revision 1.5  2003/11/22 00:35:42  jonas
-;   * fixed properties for MOVSB
-;
-; Revision 1.4  2003/11/13 18:54:22  jonas
-; * fixed XSTORE instruction info
-;
-; Revision 1.3  2003/09/09 12:54:45  florian
-;   * x86 instruction table updated to nasm 0.98.37:
-;       - sse3 aka prescott support
-;       - small fixes
-;
-; Revision 1.2  2003/09/03 15:55:02  peter
-;   * NEWRA branch merged
-;
-; Revision 1.1.2.1  2003/08/27 19:55:54  peter
-;   * first tregister patch
-;
-; Revision 1.7  2003/01/05 13:36:53  florian
-;   * x86-64 compiles
-;   + very basic support for float128 type (x86-64 only)
-;
-;

compiler/x86/x86reg.dat

@@ -1,6 +1,4 @@
 ;
-; $Id: x86reg.dat,v 1.6 2005/02/06 00:05:56 florian Exp $
-;
 ; x86 registers
 ;
 ; layout

compiler/x86_64/cpubase.inc

@@ -144,9 +144,3 @@ const
       }
       std_param_align = 8;
 
-{
-  $Log: cpubase.inc,v $
-  Revision 1.17  2005/02/14 17:13:10  peter
-    * truncate log
-
-}

demo/graph/ftrisgr.inc

@@ -147,9 +147,3 @@ BEGIN
    OutTextXY(300,440,'Score :'+S);
 END;
 
-{
-  $Log: ftrisgr.inc,v $
-  Revision 1.3  2002/09/07 15:06:35  peter
-    * old logs removed and tabs fixed
-
-}

demo/graph/ftristxt.inc

@@ -237,12 +237,3 @@ BEGIN
    Write('Score :',Score);
 END;
 
-{
-  $Log: ftristxt.inc,v $
-  Revision 1.4  2002/09/07 15:06:35  peter
-    * old logs removed and tabs fixed
-
-  Revision 1.3  2002/06/02 09:49:17  marco
-   * Renamefest
-
-}

demo/netware/Makefile.fpc

@@ -11,4 +11,4 @@ fpcdir=../..
 [rules]
 nutmon.nlm: nutmon.pp nutconnection.pp
 
-nuttest.nlm: nuttest.pp ../netwlibc/nuttest.pp
+nuttest.nlm: nuttest.pp ../netwlibc/nuttest.pp

demo/os2/pmdemo1.h

@@ -6,7 +6,7 @@
 #define ID_ClientWindow	1
 
 /*
-  $Log: pmdemo1.h,v $
+
   Revision 1.2  2002/09/07 15:06:35  peter
     * old logs removed and tabs fixed
 

demo/os2/pmdemo1.pp

@@ -74,9 +74,3 @@ program pmdemo1;
     WinDestroyMsgQueue(mq);
     WinTerminate(ab);
  end.
-{
-  $Log: pmdemo1.pp,v $
-  Revision 1.2  2002/09/07 15:06:35  peter
-    * old logs removed and tabs fixed
-
-}

demo/os2/pmdemo1.rc

@@ -17,7 +17,7 @@ MENU    ID_ClientWindow
        END
   END
 /*
-  $Log: pmdemo1.rc,v $
+
   Revision 1.2  2002/09/07 15:06:35  peter
     * old logs removed and tabs fixed
 

demo/text/eratos.pp

@@ -58,12 +58,3 @@ program eratosthenes;
      eratos;
   end.
 
-{
-  $Log: eratos.pp,v $
-  Revision 1.3  2005/05/14 11:11:33  olle
-    * Smaller arrray sizes for macos
-
-  Revision 1.2  2002/09/07 15:06:35  peter
-    * old logs removed and tabs fixed
-
-}

demo/text/hello.pp

@@ -19,12 +19,3 @@ program hello;
      writeln('Hello world');
   end.
 
-{
-    $Log: hello.pp,v $
-    Revision 1.3  2002/09/07 15:06:35  peter
-      * old logs removed and tabs fixed
-
-    Revision 1.2  2002/02/22 21:46:25  carl
-    + fixed log problems
-
-}

demo/text/lines.pp

@@ -72,9 +72,3 @@ program count_lines;
      gotoxy(1,wherey);
      if lines=1 then writeln('1 Line') else writeln(lines,' Lines');
   end.
-{
-  $Log: lines.pp,v $
-  Revision 1.2  2002/09/07 15:06:35  peter
-    * old logs removed and tabs fixed
-
-}

fcl/amiga/eventlog.inc

@@ -19,10 +19,4 @@
 
 {$i felog.inc}
 
-{
-  $Log: eventlog.inc,v $
-  Revision 1.2  2005/02/14 17:13:11  peter
-    * truncate log
-
-}
 

fcl/amiga/ezcgi.inc

@@ -7,9 +7,3 @@ Function Getenv (Var EnvVar  : AnsiString): AnsiString;
 begin
   Result:=Dos.Getenv(EnvVar);
 end;
-{
-  $Log: ezcgi.inc,v $
-  Revision 1.2  2005/02/14 17:13:11  peter
-    * truncate log
-
-}

fcl/amiga/pipes.inc

@@ -20,9 +20,3 @@ Function CreatePipeHandles (Var Inhandle,OutHandle : Longint) : Boolean;
 begin
   Result := False;
 end;
-{
-  $Log: pipes.inc,v $
-  Revision 1.2  2005/02/14 17:13:11  peter
-    * truncate log
-
-}

fcl/amiga/thread.inc

@@ -90,9 +90,3 @@ begin
 end;
 
 
-{
-  $Log: thread.inc,v $
-  Revision 1.2  2005/02/14 17:13:11  peter
-    * truncate log
-
-}

fcl/beos/eventlog.inc

@@ -19,10 +19,4 @@
 
 {$i felog.inc}
 
-{
-  $Log: eventlog.inc,v $
-  Revision 1.2  2005/02/14 17:13:11  peter
-    * truncate log
-
-}
 

fcl/beos/ezcgi.inc

@@ -7,9 +7,3 @@ Function Getenv (Var EnvVar  : AnsiString): AnsiString;
 begin
   Result:=Dos.Getenv(EnvVar);
 end;
-{
-  $Log: ezcgi.inc,v $
-  Revision 1.3  2005/02/14 17:13:11  peter
-    * truncate log
-
-}

fcl/beos/pipes.inc

@@ -20,9 +20,3 @@ Function CreatePipeHandles (Var Inhandle,OutHandle : Longint) : Boolean;
 begin
   Result := False;
 end;
-{
-  $Log: pipes.inc,v $
-  Revision 1.3  2005/02/14 17:13:11  peter
-    * truncate log
-
-}

fcl/beos/thread.inc

@@ -90,9 +90,3 @@ begin
 end;
 
 
-{
-  $Log: thread.inc,v $
-  Revision 1.4  2005/02/14 17:13:11  peter
-    * truncate log
-
-}

fcl/db/database.inc

@@ -518,15 +518,3 @@ begin
 end;
 
 
-{
-  $Log: database.inc,v $
-  Revision 1.12  2005/04/26 16:37:44  michael
-  + Added TCustomConnection by Uberto Barbini
-
-  Revision 1.11  2005/04/24 19:21:28  joost
-  - some fixes in assignment of transactions and databases
-
-  Revision 1.10  2005/02/14 17:13:12  peter
-    * truncate log
-
-}

fcl/db/dataset.inc

@@ -1869,35 +1869,3 @@ begin
   FDataSources.Remove(ADataSource);
 end;
 
-{
-  $Log: dataset.inc,v $
-  Revision 1.36  2005/04/13 22:08:16  joost
-  - fixed mem-leak in TDataset.SetBufListSize
-
-  Revision 1.35  2005/04/10 22:18:43  joost
-  Patch from Alexandrov Alexandru
-  - implemented TDataset.BindFields
-  - master-detail relation implemented
-  - improved variant-support for fields
-  - implemented TField.Assign and TField.AssignValue
-
-  Revision 1.34  2005/04/10 18:26:27  joost
-  - implemented TDataset.Locate
-
-  Revision 1.33  2005/03/29 10:07:34  michael
-  + fix for activerecord, bof false after append.
-
-  Revision 1.32  2005/02/14 17:13:12  peter
-    * truncate log
-
-  Revision 1.31  2005/02/07 11:19:27  joost
-    - Fixed insertion at buffer-limit
-    - Added TDataset.InternalInsert
-    - The deDatasetScrollEvent was not always raised
-    - Changed resync-order in AppendRecord
-
-  Revision 1.30  2005/01/12 10:27:57  michael
-    * Patch from Joost Van der Sluis:
-    - implemented ControlsDisabled
-
-}

fcl/db/dsparams.inc

@@ -695,18 +695,3 @@ begin
   end;
 end;
 
-{
-  $Log: dsparams.inc,v $
-  Revision 1.6  2005/04/10 18:27:39  joost
-  - removed TParam.FNull
-
-  Revision 1.5  2005/03/24 20:54:53  michael
-  + Fix in params from Luk Vandelaer
-
-  Revision 1.4  2005/02/14 17:13:12  peter
-    * truncate log
-
-  Revision 1.3  2005/02/01 09:05:52  marco
-   * delete fix
-
-}

fcl/db/fields.inc

@@ -2485,73 +2485,3 @@ begin
   Changed;
 end;
 
-{
-  $Log: fields.inc,v $
-  Revision 1.34  2005/05/12 18:52:32  michael
-    - Patch from Jesus Reyes:
-    * TFloatField.SetAsString doesn't look at DecimalSeparator for
-      converting a string into a Float
-    * TBooleanField.SetAsString won't accept an empty string as a valid
-      value, also the patch allows strings as T, F or any starting
-      substring of DisplayValues to be accepted.
-
-  Revision 1.33  2005/04/26 16:48:58  michael
-   * Some patches from Uberto Barbini
-     + TLoginEvent more Delphi compatible (D5 and bigger).
-     * AsCurrency Property for TField.
-
-  Revision 1.32  2005/04/26 15:45:30  michael
-  + Patch from Sergey Smirnov to fix TTimeField.AsString
-
-  Revision 1.31  2005/04/16 10:02:13  michael
-  + Patch to show/enter alternate charsets in grid editor.
-
-  Revision 1.30  2005/04/10 22:18:43  joost
-  Patch from Alexandrov Alexandru
-  - implemented TDataset.BindFields
-  - master-detail relation implemented
-  - improved variant-support for fields
-  - implemented TField.Assign and TField.AssignValue
-
-  Revision 1.29  2005/04/04 07:30:51  michael
-  + Patch from Jesus reyes to notify changes to DisplayFormat
-
-  Revision 1.28  2005/03/23 08:17:51  michael
-  + Several patches from Jose A. Rimon
-  # Prevents "field not found" error, when use a query without the primary key
-  Set SQLlen of different data types
-   Use AliasName instead of SQLname to avoid "duplicate field name" error, for
-  example when using "coalesce" more than once
-  use SQLScale in ftLargeInt to get actual values
-   Send query to server with different lines. Provides line info in sqlErrors
-  and allows single line comments
-
-  Revision 1.27  2005/03/15 22:44:22  michael
-    * Patch from Luiz Americo
-      - fixes a memory leak in TBlobField.GetAsString
-
-  Revision 1.26  2005/03/01 14:00:53  joost
-  - Fix to avoid scientific format in TDBCFields from Jesus Reyes
-
-  Revision 1.25  2005/02/28 16:19:07  joost
-  - Boolean fields are wordbool's now
-
-  Revision 1.24  2005/02/16 09:31:58  michael
-  - Remove TTimeField and TDateField GetDataSize functions since both are exactly
-    equal to their ancestor: TDateTimeField.GetDataSize
-  - TAutoInc fields are set to ReadyOnly on create
-  - In TFieldDef.CreateField the presence of faReadyOnly in Attributes is respected
-
-  Revision 1.23  2005/02/14 17:13:12  peter
-    * truncate log
-
-  Revision 1.22  2005/02/07 11:22:23  joost
-    - Implemented TField.DisplayName
-
-  Revision 1.21  2005/01/12 10:29:54  michael
-   * Patch from Joost Van der Sluis:
-     - removed some duplicate definitions
-     - restructured SetDataset
-     - implemented UpdateMode, ProviderFlags
-
-}

fcl/go32v2/eventlog.inc

@@ -19,10 +19,4 @@
 
 {$i felog.inc}
 
-{
-  $Log: eventlog.inc,v $
-  Revision 1.2  2005/02/14 17:13:12  peter
-    * truncate log
-
-}
 

fcl/go32v2/ezcgi.inc

@@ -7,9 +7,3 @@ Function Getenv (Var EnvVar  : AnsiString): AnsiString;
 begin
   Result:=Dos.Getenv(EnvVar);
 end;
-{
-  $Log: ezcgi.inc,v $
-  Revision 1.5  2005/02/14 17:13:12  peter
-    * truncate log
-
-}

fcl/go32v2/pipes.inc

@@ -20,9 +20,3 @@ Function CreatePipeHandles (Var Inhandle,OutHandle : Longint) : Boolean;
 begin
   Result := False;
 end;
-{
-  $Log: pipes.inc,v $
-  Revision 1.5  2005/02/14 17:13:12  peter
-    * truncate log
-
-}

fcl/inc/felog.inc

@@ -61,9 +61,3 @@ begin
   Result:=0;
 end;
 
-{
-  $Log: felog.inc,v $
-  Revision 1.4  2005/02/14 17:13:15  peter
-    * truncate log
-
-}

fcl/inc/regdef.inc

@@ -62,9 +62,3 @@ Type
   HKEY = Cardinal;
   PHKEY = ^HKEY;
 
-{
-  $Log: regdef.inc,v $
-  Revision 1.4  2005/02/14 17:13:15  peter
-    * truncate log
-
-}

fcl/inc/rtfdata.inc

@@ -766,9 +766,3 @@ Const rtfKey : Array [0..281] of TRTFKey =
 ( rtfKMajor: 0; rtfKMinor:              -1; rtfKstr : ''; rtfkHash : 0)
 );
 
-{
-  $Log: rtfdata.inc,v $
-  Revision 1.5  2005/02/14 17:13:15  peter
-    * truncate log
-
-}

fcl/netware/eventlog.inc

@@ -20,10 +20,4 @@
 
 {$i felog.inc}
 
-{
-  $Log: eventlog.inc,v $
-  Revision 1.2  2005/02/14 17:13:15  peter
-    * truncate log
-
-}
 

fcl/netware/ezcgi.inc

@@ -29,9 +29,3 @@ begin
     GetEnv := strpas (P);
 end;
 
-{
-  $Log: ezcgi.inc,v $
-  Revision 1.2  2005/02/14 17:13:15  peter
-    * truncate log
-
-}

fcl/netware/pipes.inc

@@ -20,9 +20,3 @@ begin
   Result := false;  {dont know how to do that with netware clib}
 end;
 
-{
-  $Log: pipes.inc,v $
-  Revision 1.2  2005/02/14 17:13:16  peter
-    * truncate log
-
-}

fcl/netwlibc/custapp.inc

@@ -38,10 +38,4 @@ begin
     end;
 end;
 
-{
-  $Log: custapp.inc,v $
-  Revision 1.2  2005/02/14 17:13:16  peter
-    * truncate log
-
-}
 

fcl/netwlibc/eventlog.inc

@@ -20,10 +20,4 @@
 
 {$i felog.inc}
 
-{
-  $Log: eventlog.inc,v $
-  Revision 1.2  2005/02/14 17:13:16  peter
-    * truncate log
-
-}
 

fcl/netwlibc/ezcgi.inc

@@ -29,9 +29,3 @@ begin
     GetEnv := strpas (P);
 end;
 
-{
-  $Log: ezcgi.inc,v $
-  Revision 1.2  2005/02/14 17:13:16  peter
-    * truncate log
-
-}

fcl/netwlibc/pipes.inc

@@ -20,9 +20,3 @@ begin
   Result := false;  {todo}
 end;
 
-{
-  $Log: pipes.inc,v $
-  Revision 1.2  2005/02/14 17:13:16  peter
-    * truncate log
-
-}

fcl/netwlibc/resolve.inc

@@ -2,10 +2,4 @@
 {use win32 implementation based on winsock}
 {$include ../win32/resolve.inc}
 
-{
-  $Log: resolve.inc,v $
-  Revision 1.2  2005/02/14 17:13:16  peter
-    * truncate log
-
-}
 

fcl/os2/eventlog.inc

@@ -255,9 +255,3 @@ begin
     Result := ord (EventType);
 end;
 
-{
-  $Log: eventlog.inc,v $
-  Revision 1.5  2005/02/14 17:13:16  peter
-    * truncate log
-
-}

fcl/os2/ezcgi.inc

@@ -25,9 +25,3 @@ begin
  if DosScanEnv (PChar (EnvVar), P) = 0 then GetEnv := P else GetEnv := '';
 end;
 
-{
-  $Log: ezcgi.inc,v $
-  Revision 1.8  2005/02/14 17:13:16  peter
-    * truncate log
-
-}

fcl/os2/pipes.inc

@@ -24,9 +24,3 @@ Function CreatePipeHandles (Var Inhandle,OutHandle : Longint) : Boolean;
 begin
   CreatePipeHandles := DosCreatePipe (InHandle, OutHandle, PipeBufSize) = 0;
 end;
-{
-  $Log: pipes.inc,v $
-  Revision 1.6  2005/02/14 17:13:16  peter
-    * truncate log
-
-}

fcl/posix/ezcgi.inc

@@ -7,9 +7,3 @@ Function Getenv (Var EnvVar  : AnsiString): AnsiString;
 begin
   Result:=Dos.Getenv(EnvVar);
 end;
-{
-  $Log: ezcgi.inc,v $
-  Revision 1.3  2005/02/14 17:13:17  peter
-    * truncate log
-
-}

fcl/posix/pipes.inc

@@ -20,9 +20,3 @@ Function CreatePipeHandles (Var Inhandle,OutHandle : Longint) : Boolean;
 begin
   Result := False;
 end;
-{
-  $Log: pipes.inc,v $
-  Revision 1.3  2005/02/14 17:13:17  peter
-    * truncate log
-
-}

fcl/posix/thread.inc

@@ -90,9 +90,3 @@ begin
 end;
 
 
-{
-  $Log: thread.inc,v $
-  Revision 1.3  2005/02/14 17:13:17  peter
-    * truncate log
-
-}

fcl/qnx/eventlog.inc

@@ -19,10 +19,4 @@
 
 {$i felog.inc}
 
-{
-  $Log: eventlog.inc,v $
-  Revision 1.2  2005/02/14 17:13:17  peter
-    * truncate log
-
-}
 

fcl/shedit/drawing.inc

@@ -256,9 +256,3 @@ begin
 end;
 
 
-{
-  $Log: drawing.inc,v $
-  Revision 1.4  2005/02/14 17:13:17  peter
-    * truncate log
-
-}

fcl/shedit/keys.inc

@@ -488,9 +488,3 @@ begin
 end;
 
 
-{
-  $Log: keys.inc,v $
-  Revision 1.4  2005/02/14 17:13:17  peter
-    * truncate log
-
-}

fcl/shedit/undo.inc

@@ -133,9 +133,3 @@ begin
 end;
 
 
-{
-  $Log: undo.inc,v $
-  Revision 1.4  2005/02/14 17:13:17  peter
-    * truncate log
-
-}

fcl/sunos/eventlog.inc

@@ -19,10 +19,4 @@
 
 {$i felog.inc}
 
-{
-  $Log: eventlog.inc,v $
-  Revision 1.2  2005/02/14 17:13:17  peter
-    * truncate log
-
-}
 

fcl/template/footer

@@ -1,6 +0,0 @@
-{
-  $Log: footer,v $
-  Revision 1.2  2002/09/07 15:15:28  peter
-    * old logs removed and tabs fixed
-
-}

fcl/template/thread.inc

@@ -92,9 +92,3 @@ begin
 end;
 
 
-{
-  $Log: thread.inc,v $
-  Revision 1.5  2005/02/14 17:13:18  peter
-    * truncate log
-
-}

fcl/tests/README

@@ -59,4 +59,4 @@ tstelgtk.pp  Test of eventlog unit, FPGTK version. Not built by default. (MVC)
 testur.pp    Test of TURIParser class. (MVC)
 testapp.pp   Test of TCustomApplication. (MVC)
 testcgi.pp   Test of TCGIApplication class. (MVC)
-testbs.pp    Test of TBufStream buffered stream (MVC)
+testbs.pp    Test of TBufStream buffered stream (MVC)

fcl/tests/dparser.pp

@@ -34,8 +34,4 @@ begin
       InFile.Free;
     end;
   end;
-end.  $Log: dparser.pp,v $
-end.  Revision 1.4  2005/02/14 17:13:18  peter
-end.    * truncate log
 end.
-}

fcl/tests/list.pp

@@ -96,14 +96,4 @@ begin
   Writeln ('Freeing list.');
   List.Free;
   DumpMem;
-end.  $Log: list.pp,v $
-end.  Revision 1.6  2005/03/20 12:46:55  marco
-end.   * sb removed legacymem. Fixed with getfpcheapstatus. Now 1.9.9 only
 end.
-end.  Revision 1.5  2005/03/16 13:30:17  marco
-end.   * fixed with legacymem (I hope)
-end.
-end.  Revision 1.4  2005/02/14 17:13:18  peter
-end.    * truncate log
-end.
-}

fcl/tests/restest.pp

@@ -22,8 +22,5 @@ begin
   Writeln(First);
   Writeln(Second);
   Writeln(Third);
-end.  $Log: restest.pp,v $
-end.  Revision 1.4  2005/02/14 17:13:18  peter
-end.    * truncate log
+
 end.
-}

fcl/tests/showver.pp

@@ -28,8 +28,4 @@ begin
       Writeln (VersionCategories[I],'=',VersionStrings[i]);
     free;
     end;
-end.  $Log: showver.pp,v $
-end.  Revision 1.4  2005/02/14 17:13:18  peter
-end.    * truncate log
 end.
-}

fcl/tests/testcgi.html

@@ -23,4 +23,4 @@ Select a category:
 <INPUT TYPE="reset" VALUE="Clear values">
 </FORM>
 </BODY>
-<HTML>
+<HTML>

fcl/tests/testz.pp

@@ -31,8 +31,4 @@ begin
    writeln ('End of Read');
    D.Free;
    writeln ('freed CompressionStream');
-end.  $Log: testz.pp,v $
-end.  Revision 1.4  2005/02/14 17:13:18  peter
-end.    * truncate log
 end.
-}

fcl/tests/tidea.pp

@@ -37,8 +37,4 @@ begin
     end;
   Writeln ('Position after Reading : ',DS.Position);
   DS.destroy;
-end.  $Log: tidea.pp,v $
-end.  Revision 1.4  2005/02/14 17:13:18  peter
-end.    * truncate log
 end.
-}

fcl/unix/asyncio.inc

@@ -156,9 +156,3 @@ begin
     Result := WriteNotifies[AHandle].Method;
 end;
 
-{
-  $Log: asyncio.inc,v $
-  Revision 1.4  2005/02/14 17:13:18  peter
-    * truncate log
-
-}

fcl/unix/asyncioh.inc

@@ -28,9 +28,3 @@ Type
     ReadMap, WriteMap: TFDSet;
     end;
 
-{
-  $Log: asyncioh.inc,v $
-  Revision 1.6  2005/02/14 17:13:18  peter
-    * truncate log
-
-}

fcl/unix/ezcgi.inc

@@ -35,9 +35,3 @@ begin
      getenv:='';
 end;
 
-{
-  $Log: ezcgi.inc,v $
-  Revision 1.8  2005/02/14 17:13:18  peter
-    * truncate log
-
-}

fcl/unix/pipes.inc

@@ -31,9 +31,3 @@ begin
 {$endif}
 end;
 
-{
-  $Log: pipes.inc,v $
-  Revision 1.8  2005/02/14 17:13:18  peter
-    * truncate log
-
-}

fcl/win32/ezcgi.inc

@@ -32,9 +32,3 @@ begin
      end;
    FreeEnvironmentStrings(p);
 end;
-{
-  $Log: ezcgi.inc,v $
-  Revision 1.5  2005/02/14 17:13:18  peter
-    * truncate log
-
-}

fcl/win32/pipes.inc

@@ -33,9 +33,3 @@ Function CreatePipeHandles (Var Inhandle,OutHandle : Longint) : Boolean;
 begin
   Result := CreatePipe (@Inhandle,@OutHandle,@piInheritablePipe,PipeBufSize);
 end;
-{
-  $Log: pipes.inc,v $
-  Revision 1.5  2005/02/14 17:13:18  peter
-    * truncate log
-
-}

fv/go32smsg.inc

@@ -91,9 +91,3 @@ begin
     end;
 end;
 
-{
-  $Log: go32smsg.inc,v $
-  Revision 1.2  2005/02/14 17:13:18  peter
-    * truncate log
-
-}

fv/platform.inc

@@ -399,13 +399,4 @@ FOR FPC THESE ARE THE TRANSLATIONS
 {$ENDIF}
 
 
-{
- $Log: platform.inc,v $
- Revision 1.16  2005/04/04 16:16:58  peter
-   * $mode fpc
-
- Revision 1.15  2005/02/14 17:13:18  peter
-   * truncate log
-
-}
 

fv/test/platform.inc

@@ -366,10 +366,4 @@ FOR FPC THESE ARE THE TRANSLATIONS
 {$ENDIF}
 
 
-{
- $Log: platform.inc,v $
- Revision 1.3  2005/02/14 17:13:18  peter
-   * truncate log
-
-}
 

fv/unixsmsg.inc

@@ -124,9 +124,3 @@ begin
     end;
 end;
 
-{
-  $Log: unixsmsg.inc,v $
-  Revision 1.8  2005/02/14 17:13:18  peter
-    * truncate log
-
-}

fv/w32smsg.inc

@@ -188,9 +188,3 @@ begin
   LeaveCriticalSection(ChangeSystemEvents);
 end;
 
-{
-  $Log: w32smsg.inc,v $
-  Revision 1.4  2005/02/14 17:13:18  peter
-    * truncate log
-
-}

ide/Makefile.fpc

@@ -181,60 +181,3 @@ endif
 clean_compiler:
         $(MAKE) -C compiler clean
         $(MAKE) -C ../compiler ppuclean
-
-#
-# $Log: Makefile.fpc,v $
-# Revision 1.32  2005/05/05 12:59:59  peter
-#   * 2.0.0
-#
-# Revision 1.31  2005/02/15 22:28:29  peter
-#   * 1.9.8
-#
-# Revision 1.30  2005/01/10 22:49:56  armin
-# * updated makefile.fpc versions to 1.9.7, regenerated makefiles
-#
-# Revision 1.29  2004/12/30 20:57:39  hajny
-#   * version 1.9.6
-#
-# Revision 1.28  2004/12/20 18:58:46  peter
-#   * UnixHier
-#
-# Revision 1.27  2004/11/11 15:20:52  florian
-#   * applied Peter's patch from yesterday
-#
-# Revision 1.26  2004/11/05 19:10:18  peter
-#   * report where libgdb.a is found
-#
-# Revision 1.25  2004/11/05 13:25:10  peter
-# libgdb now will be search in fpcdir
-#
-# Revision 1.24  2004/11/05 12:48:45  peter
-# finding of libgdb.a updated
-#
-# Revision 1.23  2004/11/02 09:14:09  peter
-#   * fix build with gdb
-#
-# Revision 1.22  2004/10/30 12:36:43  peter
-#   * units are now created in separate directory units/cpu-os/
-#   * distclean uses cleanall rule and removes units dir
-#   * cross compile support fixed, it is now possible to cycle a ppcsparc
-#     without deleting ppc386
-#   * bintutilsperfix defaults to cpu-os-
-#
-# Revision 1.21  2004/05/30 09:15:35  florian
-#   * first part of version number update
-#
-# Revision 1.20  2004/04/12 18:16:15  florian
-#   * i386 compilation on debian biarch fixed
-#
-# Revision 1.19  2004/01/05 23:29:35  marco
-#  * fixed a few makefiles version numbers
-#
-# Revision 1.18  2003/11/01 22:45:29  marco
-#  * updated package version
-#
-# Revision 1.17  2003/10/03 17:29:13  florian
-#   + id and log added
-#
-#
-

ide/fpmansi.inc

@@ -82,9 +82,3 @@ begin
   PopStatus;
 end;
 
-{
-  $Log: fpmansi.inc,v $
-  Revision 1.5  2005/02/14 17:13:18  peter
-    * truncate log
-
-}

ide/fpmcomp.inc

@@ -111,9 +111,3 @@ begin
   CompilerMessageWindow^.MakeFirst;
 end;
 
-{
-  $Log: fpmcomp.inc,v $
-  Revision 1.5  2005/02/14 17:13:18  peter
-    * truncate log
-
-}

ide/fpmdebug.inc

@@ -280,19 +280,3 @@ begin
 end;
 {$endif NODEBUG}
 
-{
-  $Log: fpmdebug.inc,v $
-  Revision 1.10  2005/04/04 03:59:13  marco
-   * fix for 3194: Use mouse to exit output screen
-
-  Revision 1.9  2005/02/14 17:13:18  peter
-    * truncate log
-
-  Revision 1.8  2005/01/08 11:43:18  florian
-    + vector unit window
-
-  Revision 1.7  2005/01/07 21:52:23  florian
-    * proper stepping in disassembler window now possible
-    + disassembler window to menu added
-
-}

ide/fpmedit.inc

@@ -19,9 +19,3 @@ begin
   ClipboardWindow^.Focus;
 end;
 
-{
-  $Log: fpmedit.inc,v $
-  Revision 1.3  2005/02/14 17:13:18  peter
-    * truncate log
-
-}

ide/fpmfile.inc

@@ -222,9 +222,3 @@ begin
   GetDir(0,StartUpDir);
 end;
 
-{
-  $Log: fpmfile.inc,v $
-  Revision 1.10  2005/02/14 17:13:18  peter
-    * truncate log
-
-}