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

« back to all changes in this revision

Viewing changes to packages/base/libc/localeh.inc

  • 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
fp-compiler: needs ld, adding dependency on binutils.  (Closes: #265265)

Show diffs side-by-side

added added

removed removed

Lines of Context:
 
1
 
 
2
const
 
3
  __LC_CTYPE    = 0;
 
4
  __LC_NUMERIC  = 1;
 
5
  __LC_TIME     = 2;
 
6
  __LC_COLLATE  = 3;
 
7
  __LC_MONETARY = 4;
 
8
  __LC_MESSAGES = 5;
 
9
  __LC_ALL      = 6;
 
10
  __LC_PAPER    = 7;
 
11
  __LC_NAME     = 8;
 
12
  __LC_ADDRESS  = 9;
 
13
  __LC_TELEPHONE = 10;
 
14
  __LC_MEASUREMENT = 11;
 
15
  __LC_IDENTIFICATION = 12;
 
16
 
 
17
  LC_CTYPE = __LC_CTYPE;
 
18
  LC_NUMERIC = __LC_NUMERIC;
 
19
  LC_TIME = __LC_TIME;
 
20
  LC_COLLATE = __LC_COLLATE;
 
21
  LC_MONETARY = __LC_MONETARY;
 
22
  LC_MESSAGES = __LC_MESSAGES;
 
23
  LC_ALL = __LC_ALL;
 
24
  LC_PAPER = __LC_PAPER;
 
25
  LC_NAME = __LC_NAME;
 
26
  LC_ADDRESS = __LC_ADDRESS;
 
27
  LC_TELEPHONE = __LC_TELEPHONE;
 
28
  LC_MEASUREMENT = __LC_MEASUREMENT;
 
29
  LC_IDENTIFICATION = __LC_IDENTIFICATION;
 
30
 
 
31
type
 
32
   Plconv = ^lconv;
 
33
   lconv = record
 
34
        decimal_point : Pchar;
 
35
        thousands_sep : Pchar;
 
36
        grouping : Pchar;
 
37
        int_curr_symbol : Pchar;
 
38
        currency_symbol : Pchar;
 
39
        mon_decimal_point : Pchar;
 
40
        mon_thousands_sep : Pchar;
 
41
        mon_grouping : Pchar;
 
42
        positive_sign : Pchar;
 
43
        negative_sign : Pchar;
 
44
        int_frac_digits : char;
 
45
        frac_digits : char;
 
46
        p_cs_precedes : char;
 
47
        p_sep_by_space : char;
 
48
        n_cs_precedes : char;
 
49
        n_sep_by_space : char;
 
50
        p_sign_posn : char;
 
51
        n_sign_posn : char;
 
52
        int_p_cs_precedes : char;
 
53
        int_p_sep_by_space : char;
 
54
        int_n_cs_precedes : char;
 
55
        int_n_sep_by_space : char;
 
56
        int_p_sign_posn : char;
 
57
        int_n_sign_posn : char;
 
58
        __int_p_cs_precedes : char;
 
59
        __int_p_sep_by_space : char;
 
60
        __int_n_cs_precedes : char;
 
61
        __int_n_sep_by_space : char;
 
62
        __int_p_sign_posn : char;
 
63
        __int_n_sign_posn : char;
 
64
     end;
 
65
 
 
66
 
 
67
function setlocale(__category:longint; __locale:Pchar):Pchar;cdecl;external clib name 'setlocale';
 
68
function localeconv:Plconv;cdecl;external clib name 'localeconv';
 
69
function __newlocale(__category_mask:longint; __locale:Pchar; __base:__locale_t):__locale_t;cdecl;external clib name '__newlocale';
 
70
function __duplocale(__dataset:__locale_t):__locale_t;cdecl;external clib name '__duplocale';
 
71
procedure __freelocale(__dataset:__locale_t);cdecl;external clib name '__freelocale';
 
72
 
 
73
{ ---------------------------------------------------------------------
 
74
    Borland compatibility types
 
75
  ---------------------------------------------------------------------}
 
76
 
 
77
Type  
 
78
  TLConv = lconv;
 
79
  _lconv = lconv;
 
 
b'\\ No newline at end of file'