← Back to branch summary

~ubuntu-branches/debian/lenny/fpc/lenny

« back to all changes in this revision

Viewing changes to packages/extra/palmunits/localize.pp

  • Committer: Bazaar Package Importer
  • Author(s): Mazen Neifer, Torsten Werner, Mazen Neifer
  • Date: 2008-05-17 17:12:11 UTC
  • mfrom: (3.1.9 intrepid)
  • Revision ID: james.westby@ubuntu.com-20080517171211-9qi33xhd9evfa0kg
Tags: 2.2.0-dfsg1-9
http://bugs.debian.org/477743
[ Torsten Werner ]
* Add Mazen Neifer to Uploaders field.

[ Mazen Neifer ]
* Moved FPC sources into a version dependent directory from /usr/share/fpcsrc
  to /usr/share/fpcsrc/${FPCVERSION}. This allow installing more than on FPC
  release.
* Fixed far call issue in compiler preventing building huge binearies.
  (closes: #477743)
* Updated building dependencies, recomennded and suggested packages.
* Moved fppkg to fp-utils as it is just a helper tool and is not required by
  compiler.

Show diffs side-by-side

added added

removed removed

Lines of Context:
packages/extra/palmunits/localize.pp
1
 
(******************************************************************************
2
 
 *
3
 
 * Copyright (c) 1996-2000 Palm, Inc. or its subsidiaries.
4
 
 * All rights reserved.
5
 
 *
6
 
 * File: Localize.h
7
 
 *
8
 
 * Release: Palm OS SDK 4.0 (63220)
9
 
 *
10
 
 * Description:
11
 
 *    Functions to localize data.
12
 
 *
13
 
 * History:
14
 
 *    8/28/96  Roger - Initial version
15
 
 *
16
 
 *****************************************************************************)
17
 
 
18
 
unit localize;
19
 
 
20
 
interface
21
 
 
22
 
uses palmos, coretraps;
23
 
 
24
 
// The number format (thousands separator and decimal point).  This defines
25
 
// how numbers are formatted and not neccessarily currency numbers (i.e. Switzerland).
26
 
type
27
 
  NumberFormatType = Enum;
28
 
 
29
 
const
30
 
  nfCommaPeriod = 0;
31
 
  nfPeriodComma = Succ(nfCommaPeriod);
32
 
  nfSpaceComma = Succ(nfPeriodComma);
33
 
  nfApostrophePeriod = Succ(nfSpaceComma);
34
 
  nfApostropheComma = Succ(nfApostrophePeriod);
35
 
 
36
 
procedure LocGetNumberSeparators(numberFormat: NumberFormatType; thousandSeparator, decimalSeparator: PChar); syscall sysTrapLocGetNumberSeparators;
37
 
 
38
 
implementation
39
 
 
40
 
end.
 
 
b'\\ No newline at end of file'