From cf147f7a497dfedfc10e7db51ce19fc5ef5b31ab Mon Sep 17 00:00:00 2001 From: =?UTF-8?q?Micha=C3=ABl=20Van=20Canneyt?= Date: Mon, 6 Mar 2023 14:57:57 +0100 Subject: [PATCH] * Dotted filenames for package symbolic --- packages/symbolic/namespaced/System.Symbolic.pas | 3 +++ packages/symbolic/namespaces.lst | 3 +++ packages/symbolic/src/symbolic.pas | 6 ++++++ 3 files changed, 12 insertions(+) create mode 100644 packages/symbolic/namespaced/System.Symbolic.pas create mode 100644 packages/symbolic/namespaces.lst diff --git a/packages/symbolic/namespaced/System.Symbolic.pas b/packages/symbolic/namespaced/System.Symbolic.pas new file mode 100644 index 0000000000..1c5d662e8f --- /dev/null +++ b/packages/symbolic/namespaced/System.Symbolic.pas @@ -0,0 +1,3 @@ +unit System.Symbolic; +{$DEFINE FPC_DOTTEDUNITS} +{$i symbolic.pas} diff --git a/packages/symbolic/namespaces.lst b/packages/symbolic/namespaces.lst new file mode 100644 index 0000000000..893df5bcae --- /dev/null +++ b/packages/symbolic/namespaces.lst @@ -0,0 +1,3 @@ +src/symbolic.pas=namespaced/System.Symbolic.pas +{s*:src/}=namespaced/ +{i+:src/} diff --git a/packages/symbolic/src/symbolic.pas b/packages/symbolic/src/symbolic.pas index bc61213036..1adae3c27d 100644 --- a/packages/symbolic/src/symbolic.pas +++ b/packages/symbolic/src/symbolic.pas @@ -1,4 +1,6 @@ +{$IFNDEF FPC_DOTTEDUNITS} unit Symbolic; +{$ENDIF FPC_DOTTEDUNITS} { $ id: $ Copyright (c) 2000 by Marco van de Voort(marco@freepascal.org) @@ -23,7 +25,11 @@ interface {$Mode ObjFpc} {$ENDIF} +{$IFDEF FPC_DOTTEDUNITS} +Uses System.Math,System.Classes,System.SysUtils; +{$ELSE FPC_DOTTEDUNITS} Uses Math,Classes,Sysutils; +{$ENDIF FPC_DOTTEDUNITS} Const VLIWIncr = 40; { Initial size and increment of VLIW array}