home *** CD-ROM | disk | FTP | other *** search
/ Solo Programadores 22 / SOLO_22.iso / packages / win32ada / data.z / win32-strings.ads < prev    next >
Encoding:
Text File  |  1996-03-15  |  16.0 KB  |  341 lines
  1. -- $Source: /home/harp/1/proto/monoBANK/winnt/win32-strings.ads,v $ 
  2. -- $Revision: 1.8 $ $Date: 96/03/15 12:56:11 $ $Author: stm $ 
  3. -- See end of file for Copyright (c) information.
  4.  
  5. with Interfaces.C;
  6.  
  7. package Win32.Strings is
  8.  
  9.     subtype size_t is Interfaces.C.size_t;                  -- string.h:44
  10.  
  11.     function memccpy(dest : Win32.PVOID;
  12.                      src  : Win32.PCVOID;
  13.                      ch   : Win32.INT;
  14.                      count: Win32.UINT)
  15.                          return Win32.PVOID;                -- string.h:68
  16.  
  17.     function memchr(buf  : Win32.PCVOID;
  18.                     ch   : Win32.INT;
  19.                     count: size_t)
  20.                         return Win32.PVOID;                 -- string.h:69
  21.  
  22.     function memcmp(buf1 : Win32.PCVOID;
  23.                     buf2 : Win32.PCVOID;
  24.                     count: size_t)
  25.                         return Win32.INT;                   -- string.h:70
  26.  
  27.     function memicmp(buf1 : Win32.PCVOID;
  28.                      buf2 : Win32.PCVOID;
  29.                      count: Win32.UINT)
  30.                          return Win32.INT;                  -- string.h:71
  31.  
  32.     function memcpy(dest : Win32.PVOID;
  33.                     src  : Win32.PCVOID;
  34.                     count: size_t)
  35.                         return Win32.PVOID;                 -- string.h:72
  36.  
  37.     function memmove(dest : Win32.PVOID;
  38.                      src  : Win32.PCVOID;
  39.                      count: size_t)
  40.                          return Win32.PVOID;                -- string.h:73
  41.  
  42.     function memset(dest: Win32.PVOID;
  43.                     c: Win32.INT;
  44.                     count: size_t)
  45.                         return Win32.PVOID;                 -- string.h:74
  46.  
  47.     function strcat(string1: Win32.PSTR;
  48.                     string2: Win32.PCSTR)
  49.                         return Win32.PSTR;                  -- string.h:75
  50.  
  51.     function strchr(string1: Win32.PCSTR;
  52.                     c      : Win32.INT)
  53.                         return Win32.PSTR;                  -- string.h:76
  54.  
  55.     function strcmp(string1: Win32.PCSTR;
  56.                     string2: Win32.PCSTR)
  57.                         return Win32.INT;                   -- string.h:77
  58.  
  59.     function strcmpi(string1: Win32.PCSTR;
  60.                      string2: Win32.PCSTR)
  61.                          return Win32.INT;                  -- string.h:78
  62.  
  63.     function stricmp(string1: Win32.PCSTR;
  64.                      string2: Win32.PCSTR)
  65.                          return Win32.INT;                  -- string.h:79
  66.  
  67.     function strcoll(string1: Win32.PCSTR;
  68.                      string2: Win32.PCSTR)
  69.                          return Win32.INT;                  -- string.h:80
  70.  
  71.     function stricoll(string1: Win32.PCSTR;
  72.                       string2: Win32.PCSTR)
  73.                           return Win32.INT;                 -- string.h:85
  74.  
  75.     function strcpy(string1: Win32.PSTR;
  76.                     string2: Win32.PCSTR)
  77.                         return Win32.PSTR;                  -- string.h:86
  78.  
  79.     function strcspn(string1: Win32.PCSTR;
  80.                      string2: Win32.PCSTR)
  81.                          return size_t;                     -- string.h:87
  82.  
  83.     function strdup(string1: Win32.PCSTR) return Win32.PSTR;-- string.h:88
  84.  
  85.     function strerror(string1: Win32.PCSTR) return Win32.PSTR;
  86.                                                             -- string.h:89
  87.  
  88.     function strerror_c0(errnum: Win32.INT) return Win32.PSTR;
  89.                                                             -- string.h:90
  90.  
  91.     function strlen(string1: Win32.PCSTR) return size_t;    -- string.h:91
  92.  
  93.     function strlwr(string1: Win32.PSTR) return Win32.PSTR; -- string.h:92
  94.  
  95.     function strncat(string1: Win32.PSTR;
  96.                      string2: Win32.PCSTR;
  97.                      count  : size_t)
  98.                          return Win32.PSTR;                 -- string.h:93
  99.  
  100.     function strncmp(string1: Win32.PCSTR;
  101.                      string2: Win32.PCSTR;
  102.                      count  : size_t)
  103.                          return Win32.INT;                  -- string.h:94
  104.  
  105.     function strnicmp(string1: Win32.PCSTR;
  106.                       string2: Win32.PCSTR;
  107.                       count  : size_t)
  108.                           return Win32.INT;                 -- string.h:95
  109.  
  110.     function strncpy(string1: Win32.PSTR;
  111.                      string2: Win32.PCSTR;
  112.                      count  : size_t)
  113.                          return Win32.PSTR;                 -- string.h:96
  114.         
  115.     function strnset(string1: Win32.PSTR;        
  116.                      c      : Win32.INT;           
  117.                      count  : size_t)        
  118.                          return Win32.PSTR;                 -- string.h:97
  119.         
  120.     function strpbrk(string1: Win32.PCSTR;        
  121.                      string2: Win32.PCSTR)        
  122.                          return Win32.PSTR;                 -- string.h:98
  123.  
  124.     function strrchr(string1: Win32.PCSTR;
  125.                      c      : Win32.INT)
  126.                          return Win32.PSTR;                 -- string.h:99
  127.  
  128.     function strrev(string1: Win32.PSTR) return Win32.PSTR; -- string.h:100
  129.  
  130.     function strset(string1: Win32.PSTR;
  131.                     c      : Win32.INT)
  132.                         return Win32.PSTR;                  -- string.h:101
  133.  
  134.     function strspn(string1: Win32.PCSTR;
  135.                     string2: Win32.PCSTR)
  136.                         return size_t;                      -- string.h:102
  137.  
  138.     function strstr(string1: Win32.PCSTR;
  139.                     string2: Win32.PCSTR)
  140.                         return Win32.PSTR;                  -- string.h:103
  141.  
  142.     function strtok(string1: Win32.PSTR;
  143.                     string2: Win32.PCSTR)
  144.                         return Win32.PSTR;                  -- string.h:104
  145.  
  146.     function strupr(string1: Win32.PSTR) return Win32.PSTR; -- string.h:105
  147.  
  148.     function strxfrm(string1: Win32.PSTR;
  149.                      string2: Win32.PCSTR;
  150.                      count  : size_t)
  151.                          return size_t;                     -- string.h:106
  152.  
  153.     function wcscat(string1: Win32.PWSTR;
  154.                     string2: Win32.PCWSTR)
  155.                         return Win32.PWSTR;                 -- string.h:109
  156.  
  157.     function wcschr(string1: Win32.PCWSTR;
  158.                     c      : Win32.wchar_t)
  159.                         return Win32.PWSTR;                 -- string.h:110
  160.  
  161.     function wcscmp(string1: Win32.PCWSTR;
  162.                     string2: Win32.PCWSTR)
  163.                         return Win32.INT;                   -- string.h:111
  164.  
  165.     function wcscpy(string1: Win32.PWSTR;
  166.                     string2: Win32.PCWSTR)
  167.                         return Win32.PWSTR;                 -- string.h:112
  168.  
  169.     function wcscspn(string1: Win32.PCWSTR;
  170.                      string2: Win32.PCWSTR)
  171.                          return size_t;                     -- string.h:113
  172.  
  173.     function wcslen(string1: Win32.PCWSTR) return size_t;   -- string.h:114
  174.  
  175.     function wcsncat(string1: Win32.PWSTR;
  176.                      string2: Win32.PCWSTR;
  177.                      count  : size_t)
  178.                          return Win32.PWSTR;                -- string.h:115
  179.  
  180.     function wcsncmp(string1: Win32.PCWSTR;
  181.                      string2: Win32.PCWSTR;
  182.                      count  : size_t)
  183.                          return Win32.INT;                  -- string.h:116
  184.  
  185.     function wcsncpy(string1: Win32.PWSTR;
  186.                      string2: Win32.PCWSTR;
  187.                      count  : size_t)
  188.                          return Win32.PWSTR;                -- string.h:117
  189.         
  190.     function wcspbrk(string1: Win32.PCWSTR;           
  191.                      string2: Win32.PCWSTR)           
  192.                          return Win32.PWSTR;                -- string.h:118
  193.         
  194.     function wcsrchr(string1: Win32.PCWSTR;           
  195.                      c      : Win32.wchar_t)           
  196.                          return Win32.PWSTR;                -- string.h:119
  197.  
  198.     function wcsspn(string1: Win32.PCWSTR;
  199.                     string2: Win32.PCWSTR)
  200.                         return size_t;                      -- string.h:120
  201.  
  202.     function wcsstr(string1: Win32.PCWSTR;
  203.                     string2: Win32.PCWSTR)
  204.                         return Win32.PWSTR;                 -- string.h:121
  205.  
  206.     function wcswcs(string1: Win32.PCWSTR;
  207.                     string2: Win32.PCWSTR)
  208.                         return Win32.PWSTR
  209.                         renames wcsstr;                     -- string.h:121
  210.  
  211.     function wcstok(string1: Win32.PWSTR;
  212.                     string2: Win32.PCWSTR)
  213.                         return Win32.PWSTR;                 -- string.h:122
  214.  
  215.     function wcsdup(string1: Win32.PCWSTR) return Win32.PWSTR;
  216.                                                             -- string.h:124
  217.  
  218.     function wcsicmp(string1: Win32.PCWSTR;
  219.                      string2: Win32.PCWSTR)
  220.                          return Win32.INT;                  -- string.h:125
  221.  
  222.     function wcsnicmp(string1: Win32.PCWSTR;
  223.                       string2: Win32.PCWSTR;
  224.                       count  : size_t)
  225.                           return Win32.INT;                 -- string.h:126
  226.  
  227.     function wcsnset(string1: Win32.PWSTR;
  228.                      c      : Win32.wchar_t;
  229.                      count  : size_t)
  230.                          return Win32.PWSTR;                -- string.h:127
  231.         
  232.     function wcsrev(string1: Win32.PWSTR) return Win32.PWSTR;
  233.                                                             -- string.h:128
  234.         
  235.     function wcsset(string1: Win32.PWSTR;           
  236.                     count  : Win32.wchar_t)           
  237.                         return Win32.PWSTR;                 -- string.h:129
  238.         
  239.     function wcslwr(string1: Win32.PWSTR) return Win32.PWSTR;
  240.                                                             -- string.h:131
  241.         
  242.     function wcsupr(string1: Win32.PWSTR) return Win32.PWSTR;
  243.                                                             -- string.h:132
  244.  
  245.     function wcsxfrm(string1: Win32.PWSTR;
  246.                      string2: Win32.PCWSTR;
  247.                      count  : size_t)
  248.                          return size_t;                     -- string.h:133
  249.  
  250.     function wcscoll(string1: Win32.PCWSTR;
  251.                      string2: Win32.PCWSTR)
  252.                          return Win32.INT;                  -- string.h:134
  253.  
  254.     function wcsicoll(string1: Win32.PCWSTR;
  255.                       string2: Win32.PCWSTR)
  256.                           return Win32.INT;                 -- string.h:135
  257.  
  258. private
  259.  
  260.     pragma Import(C, memccpy, "_memccpy");                  -- string.h:68
  261.     pragma Import(C, memchr, "memchr");                     -- string.h:69
  262.     pragma Import(C, memcmp, "memcmp");                     -- string.h:70
  263.     pragma Import(C, memicmp, "_memicmp");                  -- string.h:71
  264.     pragma Import(C, memcpy, "memcpy");                     -- string.h:72
  265.     pragma Import(C, memmove, "memmove");                   -- string.h:73
  266.     pragma Import(C, memset, "memset");                     -- string.h:74
  267.     pragma Import(C, strcat, "strcat");                     -- string.h:75
  268.     pragma Import(C, strchr, "strchr");                     -- string.h:76
  269.     pragma Import(C, strcmp, "strcmp");                     -- string.h:77
  270.     pragma Import(C, strcmpi, "_strcmpi");                  -- string.h:78
  271.     pragma Import(C, stricmp, "_stricmp");                  -- string.h:79
  272.     pragma Import(C, strcoll, "strcoll");                   -- string.h:80
  273.     pragma Import(C, stricoll, "_stricoll");                -- string.h:85
  274.     pragma Import(C, strcpy, "strcpy");                     -- string.h:86
  275.     pragma Import(C, strcspn, "strcspn");                   -- string.h:87
  276.     pragma Import(C, strdup, "_strdup");                    -- string.h:88
  277.     pragma Import(C, strerror, "_strerror");                -- string.h:89
  278.     pragma Import(C, strerror_c0, "strerror");              -- string.h:90
  279.     pragma Import(C, strlen, "strlen");                     -- string.h:91
  280.     pragma Import(C, strlwr, "_strlwr");                    -- string.h:92
  281.     pragma Import(C, strncat, "strncat");                   -- string.h:93
  282.     pragma Import(C, strncmp, "strncmp");                   -- string.h:94
  283.     pragma Import(C, strnicmp, "_strnicmp");                -- string.h:95
  284.     pragma Import(C, strncpy, "strncpy");                   -- string.h:96
  285.     pragma Import(C, strnset, "_strnset");                  -- string.h:97
  286.     pragma Import(C, strpbrk, "strpbrk");                   -- string.h:98
  287.     pragma Import(C, strrchr, "strrchr");                   -- string.h:99
  288.     pragma Import(C, strrev, "_strrev");                    -- string.h:100
  289.     pragma Import(C, strset, "_strset");                    -- string.h:101
  290.     pragma Import(C, strspn, "strspn");                     -- string.h:102
  291.     pragma Import(C, strstr, "strstr");                     -- string.h:103
  292.     pragma Import(C, strtok, "strtok");                     -- string.h:104
  293.     pragma Import(C, strupr, "_strupr");                    -- string.h:105
  294.     pragma Import(C, strxfrm, "strxfrm");                   -- string.h:106
  295.     pragma Import(C, wcscat, "wcscat");                     -- string.h:109
  296.     pragma Import(C, wcschr, "wcschr");                     -- string.h:110
  297.     pragma Import(C, wcscmp, "wcscmp");                     -- string.h:111
  298.     pragma Import(C, wcscpy, "wcscpy");                     -- string.h:112
  299.     pragma Import(C, wcscspn, "wcscspn");                   -- string.h:113
  300.     pragma Import(C, wcslen, "wcslen");                     -- string.h:114
  301.     pragma Import(C, wcsncat, "wcsncat");                   -- string.h:115
  302.     pragma Import(C, wcsncmp, "wcsncmp");                   -- string.h:116
  303.     pragma Import(C, wcsncpy, "wcsncpy");                   -- string.h:117
  304.     pragma Import(C, wcspbrk, "wcspbrk");                   -- string.h:118
  305.     pragma Import(C, wcsrchr, "wcsrchr");                   -- string.h:119
  306.     pragma Import(C, wcsspn, "wcsspn");                     -- string.h:120
  307.     pragma Import(C, wcsstr, "wcsstr");                     -- string.h:121
  308.     pragma Import(C, wcstok, "wcstok");                     -- string.h:122
  309.     pragma Import(C, wcsdup, "_wcsdup");                    -- string.h:124
  310.     pragma Import(C, wcsicmp, "_wcsicmp");                  -- string.h:125
  311.     pragma Import(C, wcsnicmp, "_wcsnicmp");                -- string.h:126
  312.     pragma Import(C, wcsnset, "_wcsnset");                  -- string.h:127
  313.     pragma Import(C, wcsrev, "_wcsrev");                    -- string.h:128
  314.     pragma Import(C, wcsset, "_wcsset");                    -- string.h:129
  315.     pragma Import(C, wcslwr, "_wcslwr");                    -- string.h:131
  316.     pragma Import(C, wcsupr, "_wcsupr");                    -- string.h:132
  317.     pragma Import(C, wcsxfrm, "wcsxfrm");                   -- string.h:133
  318.     pragma Import(C, wcscoll, "wcscoll");                   -- string.h:134
  319.     pragma Import(C, wcsicoll, "_wcsicoll");                -- string.h:135
  320.  
  321. -------------------------------------------------------------------------------
  322. --
  323. -- THIS FILE AND ANY ASSOCIATED DOCUMENTATION IS PROVIDED WITHOUT CHARGE
  324. -- "AS IS" WITHOUT WARRANTY OF ANY KIND, EITHER EXPRESS OR IMPLIED, INCLUDING
  325. -- BUT NOT LIMITED TO THE IMPLIED WARRANTIES OF MERCHANTABILITY AND/OR
  326. -- FITNESS FOR A PARTICULAR PURPOSE.  The user assumes the entire risk as to
  327. -- the accuracy and the use of this file.  This file may be used, copied,
  328. -- modified and distributed only by licensees of Microsoft Corporation's
  329. -- WIN32 Software Development Kit in accordance with the terms of the 
  330. -- licensee's End-User License Agreement for Microsoft Software for the
  331. -- WIN32 Development Kit.
  332. --
  333. -- Copyright (c) Intermetrics, Inc. 1995
  334. -- Portions (c) 1985-1994 Microsoft Corporation with permission.
  335. -- Microsoft is a registered trademark and Windows and Windows NT are
  336. -- trademarks of Microsoft Corporation.
  337. --
  338. -------------------------------------------------------------------------------
  339.  
  340. end Win32.Strings;
  341.