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

* Move inlcude platform.inc before

Browse Source 
interface, so that global switches are allowed

git-svn-id: trunk@5885 -
This commit is contained in:
pierre 2007-01-11 12:23:29 +00:00
parent d2711a7013
commit f9e00ff2d9
2 changed files with 3 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
fv/memory.pas
View File

@ -45,12 +45,12 @@
UNIT Memory;
{====Include file to sort compiler platform out =====================}
{$I Platform.inc}
{<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>}
INTERFACE
{<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>}
{====Include file to sort compiler platform out =====================}
{$I Platform.inc}
{====================================================================}
{==== Compiler directives ===========================================}

2
fv/tabs.pas
View File

@ -21,6 +21,7 @@
****************************************************************************}
unit tabs;
{$I platform.inc} (* Multi-platform support defines *)
{$CODEPAGE cp437}
interface
@ -28,7 +29,6 @@ interface
uses
objects, drivers, views, fvconsts;
{$I platform.inc} (* Multi-platform support defines *)
type
PTabItem = ^TTabItem;