version
authorPascal Packaging Team <pkg-pascal-devel@lists.alioth.debian.org>
Sun, 22 Apr 2018 14:10:23 +0000 (15:10 +0100)
committerAbou Al Montacir <abou.almontacir@sfr.fr>
Sun, 22 Apr 2018 14:10:23 +0000 (15:10 +0100)
This patch adds Debian build version to compiler full version.

Gbp-Pq: Name version.diff

fpcsrc/compiler/version.pas

index 31e47d9df0d6d2782fdc0981a5f599e8f36636b5..0e859683792e8db4f0b4d1d59cd8c542325aadfa 100644 (file)
@@ -84,6 +84,9 @@ function full_version_string:string;
 
 implementation
 
+const
+  FullVersionString={$INCLUDE version.inc};
+
 function version_string:string;
 begin
   version_string := version_nr+'.'+release_nr+'.'+patch_nr;
@@ -92,11 +95,7 @@ end;
 
 function full_version_string:string;
 begin
-  full_version_string := version_nr+'.'+release_nr+'.'+patch_nr+minorpatch
-{$ifdef REVINC}
-  +'-r'+{$i revision.inc}
-{$endif REVINC}
-  ;
+  full_version_string := FullVersionString;
 end;
 
 end.