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

* changed to $APPTYPE TOOL on MacOS

Browse Source
This commit is contained in:
olle 2004-04-25 13:42:11 +00:00
parent 03f034fedf
commit a51e035ecc
8 changed files with 62 additions and 6 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

11
tests/test/units/system/tabs.pp
View File

@ -5,7 +5,13 @@ program tabs;
{$ifdef VER1_0} {$ifdef VER1_0}
{$define SKIP_CURRENCY_TEST} {$define SKIP_CURRENCY_TEST}
{$endif } {$endif }
{$ifndef MACOS}
{$APPTYPE CONSOLE} {$APPTYPE CONSOLE}
{$else}
{$APPTYPE TOOL}
{$endif}
{$R+} {$R+}
{$Q+} {$Q+}
@ -276,7 +282,10 @@ end.
{ {
$Log$ $Log$
Revision 1.2 2002-10-15 10:26:36 pierre Revision 1.3 2004-04-25 13:42:11 olle
* changed to $APPTYPE TOOL on MacOS
Revision 1.2 2002/10/15 10:26:36 pierre
* add code to remember that currency is only implemented in 1.1 compiler * add code to remember that currency is only implemented in 1.1 compiler
Revision 1.1 2002/09/18 18:30:30 carl Revision 1.1 2002/09/18 18:30:30 carl

9
tests/test/units/system/tround.pp
View File

@ -5,7 +5,11 @@ program tround;
{$define SKIP_CURRENCY_TEST} {$define SKIP_CURRENCY_TEST}
{$endif } {$endif }
{$ifndef MACOS}
{$APPTYPE CONSOLE} {$APPTYPE CONSOLE}
{$else}
{$APPTYPE TOOL}
{$endif}
const const
RESULT_ONE = 1235; RESULT_ONE = 1235;
@ -229,7 +233,10 @@ end.
{ {
$Log$ $Log$
Revision 1.3 2002-10-15 10:26:36 pierre Revision 1.4 2004-04-25 13:42:11 olle
* changed to $APPTYPE TOOL on MacOS
Revision 1.3 2002/10/15 10:26:36 pierre
* add code to remember that currency is only implemented in 1.1 compiler * add code to remember that currency is only implemented in 1.1 compiler
Revision 1.2 2002/09/18 18:30:30 carl Revision 1.2 2002/09/18 18:30:30 carl

10
tests/test/units/system/tsetstr.pp
View File

@ -6,7 +6,12 @@
program tsetstr; program tsetstr;
{$R+} {$R+}
{$Q+} {$Q+}
{$ifndef MACOS}
{$APPTYPE CONSOLE} {$APPTYPE CONSOLE}
{$else}
{$APPTYPE TOOL}
{$endif}
{$ifdef fpc} {$ifdef fpc}
{$ifndef ver1_0} {$ifndef ver1_0}
@ -168,7 +173,10 @@ end.
{ {
$Log$ $Log$
Revision 1.3 2003-03-04 18:19:48 jonas Revision 1.4 2004-04-25 13:42:11 olle
* changed to $APPTYPE TOOL on MacOS
Revision 1.3 2003/03/04 18:19:48 jonas
* adapted tests to fixed implementation * adapted tests to fixed implementation
Revision 1.2 2002/12/16 20:40:36 peter Revision 1.2 2002/12/16 20:40:36 peter

11
tests/test/units/system/tsetstr2.pp
View File

@ -9,7 +9,13 @@
program tsetstr; program tsetstr;
{$R+} {$R+}
{$Q+} {$Q+}
{$ifndef MACOS}
{$APPTYPE CONSOLE} {$APPTYPE CONSOLE}
{$else}
{$APPTYPE TOOL}
{$endif}
{$H+} {$H+}
{$ifdef fpc} {$ifdef fpc}
@ -172,7 +178,10 @@ end.
{ {
$Log$ $Log$
Revision 1.2 2003-03-04 18:19:48 jonas Revision 1.3 2004-04-25 13:42:11 olle
* changed to $APPTYPE TOOL on MacOS
Revision 1.2 2003/03/04 18:19:48 jonas
* adapted tests to fixed implementation * adapted tests to fixed implementation
Revision 1.1 2002/10/21 09:02:25 pierre Revision 1.1 2002/10/21 09:02:25 pierre

5
tests/test/units/system/tstring.pp
View File

@ -5,7 +5,12 @@
program tstring; program tstring;
{$R+} {$R+}
{$Q+} {$Q+}
{$ifndef MACOS}
{$APPTYPE CONSOLE} {$APPTYPE CONSOLE}
{$else}
{$APPTYPE TOOL}
{$endif}
{$ifdef fpc} {$ifdef fpc}
{$ifndef ver1_0} {$ifndef ver1_0}

9
tests/test/units/system/ttrunc.pp
View File

@ -5,7 +5,11 @@ program ttrunc;
{$define SKIP_CURRENCY_TEST} {$define SKIP_CURRENCY_TEST}
{$endif } {$endif }
{$ifndef MACOS}
{$APPTYPE CONSOLE} {$APPTYPE CONSOLE}
{$else}
{$APPTYPE TOOL}
{$endif}
const const
RESULT_ONE = 1234; RESULT_ONE = 1234;
@ -228,7 +232,10 @@ end.
{ {
$Log$ $Log$
Revision 1.3 2002-10-15 10:26:36 pierre Revision 1.4 2004-04-25 13:42:11 olle
* changed to $APPTYPE TOOL on MacOS
Revision 1.3 2002/10/15 10:26:36 pierre
* add code to remember that currency is only implemented in 1.1 compiler * add code to remember that currency is only implemented in 1.1 compiler
Revision 1.2 2002/09/18 18:30:30 carl Revision 1.2 2002/09/18 18:30:30 carl

5
tests/webtbs/tw2065.pp
View File

@ -3,7 +3,12 @@
{ e-mail: thomas.lavergne@laposte.net } { e-mail: thomas.lavergne@laposte.net }
program test; program test;
{$ifndef MACOS}
{$APPTYPE CONSOLE} {$APPTYPE CONSOLE}
{$else}
{$APPTYPE TOOL}
{$endif}
{$LONGSTRINGS ON} {$LONGSTRINGS ON}
type type

8
tests/webtbs/tw2594.pp
View File

@ -1,7 +1,13 @@
{ Source provided for Free Pascal Bug Report 2594 } { Source provided for Free Pascal Bug Report 2594 }
{ Submitted by "Pavel V. Ozerski" on 2003-07-24 } { Submitted by "Pavel V. Ozerski" on 2003-07-24 }
{ e-mail: ozerski@list.ru } { e-mail: ozerski@list.ru }
{$apptype console}
{$ifndef MACOS}
{$APPTYPE CONSOLE}
{$else}
{$APPTYPE TOOL}
{$endif}
{$ifdef fpc} {$ifdef fpc}
{$mode delphi} {$mode delphi}
{$endif} {$endif}