← Back to branch summary

~ubuntu-branches/ubuntu/dapper/fpc/dapper

« back to all changes in this revision

Viewing changes to utils/bin2obj.pp

  • Committer: Bazaar Package Importer
  • Author(s): Carlos Laviola
  • Date: 2004-08-12 16:29:37 UTC
  • mfrom: (1.2.1 upstream) (2.1.1 warty)
  • Revision ID: james.westby@ubuntu.com-20040812162937-moo8ulvysp1ln771
Tags: 1.9.4-5
http://bugs.debian.org/265265
fp-compiler: needs ld, adding dependency on binutils.  (Closes: #265265)

Show diffs side-by-side

added added

removed removed

Lines of Context:
utils/bin2obj.pp
1
1
program bin2obj;
2
2
{
3
 
    $Id: bin2obj.pp,v 1.1 2000/07/13 10:16:21 michael Exp $
 
3
    $Id: bin2obj.pp,v 1.5 2002/09/07 15:40:30 peter Exp $
4
4
    This file is part of the Free Pascal run time library.
5
5
    Copyright (c) 1999-2000 by Michael Van Canneyt, member of the
6
6
    Free Pascal development team
18
18
 
19
19
{$mode objfpc}
20
20
 
21
 
uses classes,getopts, iostream,zstream,idea,sysutils
22
 
{$ifdef linux}
23
 
  ,linux
24
 
{$else}
25
 
  ,dos
26
 
{$endif}
27
 
;
 
21
uses classes,getopts, iostream,zstream,idea,sysutils,dos;
28
22
 
29
23
var
30
24
  ConstName,
173
167
  Procedure WriteStrLn(Const St : String);
174
168
 
175
169
  Const
176
 
  {$ifdef linux}
 
170
  {$ifdef unix}
177
171
     Eoln : String = #10;
178
172
  {$else}
179
173
     Eoln : String = #13#10;
246
240
Procedure CompileTheUNit;
247
241
 
248
242
begin
249
 
{$ifdef linux}
250
 
  Shell('ppc386 -Un '+UnitName);
251
 
{$else}
252
243
  Exec('ppc386',' -Un '+UnitName);
253
 
{$endif}
254
244
end;
255
245
 
256
246
begin
263
253
 
264
254
{
265
255
  $Log: bin2obj.pp,v $
266
 
  Revision 1.1  2000/07/13 10:16:21  michael
267
 
  + Initial import
268
 
 
269
 
  Revision 1.4  2000/07/04 19:05:54  peter
270
 
    * be optimistic: version 1.00 for some utils
271
 
 
272
 
  Revision 1.3  2000/02/07 13:42:39  peter
273
 
    * fixed notes
274
 
 
275
 
  Revision 1.2  2000/01/07 16:46:01  daniel
276
 
    * copyright 2000
277
 
 
278
 
  Revision 1.1  1999/12/08 23:11:20  michael
279
 
  + Initial implementation
 
256
  Revision 1.5  2002/09/07 15:40:30  peter
 
257
    * old logs removed and tabs fixed
280
258
 
281
259
}