← Back to branch summary

~ubuntu-branches/ubuntu/lucid/fpc/lucid-proposed

« back to all changes in this revision

Viewing changes to fpcsrc/packages/base/winunits/jwarpcnterr.pas

  • Committer: Bazaar Package Importer
  • Author(s): Mazen Neifer, Torsten Werner, Mazen Neifer
  • Date: 2008-10-09 23:29:00 UTC
  • mfrom: (4.1.1 sid)
  • Revision ID: james.westby@ubuntu.com-20081009232900-553f61m37jkp6upv
Tags: 2.2.2-4
http://bugs.debian.org/498882
[ Torsten Werner ]
* Update ABI version in fpc-depends automatically.
* Remove empty directories from binary package fpc-source.

[ Mazen Neifer ]
* Removed leading path when calling update-alternatives to remove a Linitian
  error.
* Fixed clean target.
* Improved description of packages. (Closes: #498882)

Show diffs side-by-side

added added

removed removed

Lines of Context:
fpcsrc/packages/base/winunits/jwarpcnterr.pas
1
 
{******************************************************************************}
2
 
{                                                                              }
3
 
{ RPC Error Codes  API interface Unit for Object Pascal                        }
4
 
{                                                                              }
5
 
{ Portions created by Microsoft are Copyright (C) 1995-2001 Microsoft          }
6
 
{ Corporation. All Rights Reserved.                                            }
7
 
{                                                                              }
8
 
{ The original file is: rpcnterr.h, released June 2000. The original Pascal    }
9
 
{ code is: RpcNtErr.pas, released December 2000. The initial developer of the  }
10
 
{ Pascal code is Marcel van Brakel (brakelm att chello dott nl).               }
11
 
{                                                                              }
12
 
{ Portions created by Marcel van Brakel are Copyright (C) 1999-2001            }
13
 
{ Marcel van Brakel. All Rights Reserved.                                      }
14
 
{                                                                              }
15
 
{ Obtained through: Joint Endeavour of Delphi Innovators (Project JEDI)        }
16
 
{                                                                              }
17
 
{ You may retrieve the latest version of this file at the Project JEDI         }
18
 
{ APILIB home page, located at http://jedi-apilib.sourceforge.net              }
19
 
{                                                                              }
20
 
{ The contents of this file are used with permission, subject to the Mozilla   }
21
 
{ Public License Version 1.1 (the "License"); you may not use this file except }
22
 
{ in compliance with the License. You may obtain a copy of the License at      }
23
 
{ http://www.mozilla.org/MPL/MPL-1.1.html                                      }
24
 
{                                                                              }
25
 
{ Software distributed under the License is distributed on an "AS IS" basis,   }
26
 
{ WITHOUT WARRANTY OF ANY KIND, either express or implied. See the License for }
27
 
{ the specific language governing rights and limitations under the License.    }
28
 
{                                                                              }
29
 
{ Alternatively, the contents of this file may be used under the terms of the  }
30
 
{ GNU Lesser General Public License (the  "LGPL License"), in which case the   }
31
 
{ provisions of the LGPL License are applicable instead of those above.        }
32
 
{ If you wish to allow use of your version of this file only under the terms   }
33
 
{ of the LGPL License and not to allow others to use your version of this file }
34
 
{ under the MPL, indicate your decision by deleting  the provisions above and  }
35
 
{ replace  them with the notice and other provisions required by the LGPL      }
36
 
{ License.  If you do not delete the provisions above, a recipient may use     }
37
 
{ your version of this file under either the MPL or the LGPL License.          }
38
 
{                                                                              }
39
 
{ For more information about the LGPL: http://www.gnu.org/copyleft/lesser.html }
40
 
{                                                                              }
41
 
{******************************************************************************}
42
 
 
43
 
// $Id: JwaRpcNtErr.pas,v 1.7 2005/09/06 16:36:50 marquardt Exp $
44
 
 
45
 
{$IFNDEF JWA_INCLUDEMODE}
46
 
 
47
 
unit JwaRpcNtErr;
48
 
 
49
 
{$WEAKPACKAGEUNIT}
50
 
 
51
 
{$I jediapilib.inc}
52
 
 
53
 
interface
54
 
 
55
 
{$ENDIF !JWA_INCLUDEMODE}
56
 
 
57
 
{$IFNDEF JWARPC_PAS}
58
 
uses
59
 
  JwaWinError, JwaWinType;
60
 
{$ENDIF !JWARPC_PAS}
61
 
 
62
 
{$IFDEF JWA_INTERFACESECTION}
63
 
 
64
 
{$HPPEMIT ''}
65
 
{$HPPEMIT '#include "RpcNtErr.h"'}
66
 
{$HPPEMIT ''}
67
 
 
68
 
{*********************************************************/
69
 
/**               Microsoft LAN Manager                 **/
70
 
/**       Copyright(c) Microsoft Corp., 1987-1999       **/
71
 
/**                                                     **/
72
 
/**     Rpc Error Codes from the compiler and runtime   **/
73
 
/**                                                     **/
74
 
/*********************************************************}
75
 
 
76
 
const
77
 
  RPC_S_OK                         = ERROR_SUCCESS;
78
 
  {$EXTERNALSYM RPC_S_OK}
79
 
  RPC_S_INVALID_ARG                = ERROR_INVALID_PARAMETER;
80
 
  {$EXTERNALSYM RPC_S_INVALID_ARG}
81
 
  RPC_S_OUT_OF_MEMORY              = ERROR_OUTOFMEMORY;
82
 
  {$EXTERNALSYM RPC_S_OUT_OF_MEMORY}
83
 
  RPC_S_OUT_OF_THREADS             = ERROR_MAX_THRDS_REACHED;
84
 
  {$EXTERNALSYM RPC_S_OUT_OF_THREADS}
85
 
  RPC_S_INVALID_LEVEL              = ERROR_INVALID_PARAMETER;
86
 
  {$EXTERNALSYM RPC_S_INVALID_LEVEL}
87
 
  RPC_S_BUFFER_TOO_SMALL           = ERROR_INSUFFICIENT_BUFFER;
88
 
  {$EXTERNALSYM RPC_S_BUFFER_TOO_SMALL}
89
 
  RPC_S_INVALID_SECURITY_DESC      = ERROR_INVALID_SECURITY_DESCR;
90
 
  {$EXTERNALSYM RPC_S_INVALID_SECURITY_DESC}
91
 
  RPC_S_ACCESS_DENIED              = ERROR_ACCESS_DENIED;
92
 
  {$EXTERNALSYM RPC_S_ACCESS_DENIED}
93
 
  RPC_S_SERVER_OUT_OF_MEMORY       = ERROR_NOT_ENOUGH_SERVER_MEMORY;
94
 
  {$EXTERNALSYM RPC_S_SERVER_OUT_OF_MEMORY}
95
 
  RPC_S_ASYNC_CALL_PENDING         = ERROR_IO_PENDING;
96
 
  {$EXTERNALSYM RPC_S_ASYNC_CALL_PENDING}
97
 
  RPC_S_UNKNOWN_PRINCIPAL          = ERROR_NONE_MAPPED;
98
 
  {$EXTERNALSYM RPC_S_UNKNOWN_PRINCIPAL}
99
 
  RPC_S_TIMEOUT                    = ERROR_TIMEOUT;
100
 
  {$EXTERNALSYM RPC_S_TIMEOUT}
101
 
 
102
 
  RPC_X_NO_MEMORY                  = RPC_S_OUT_OF_MEMORY;
103
 
  {$EXTERNALSYM RPC_X_NO_MEMORY}
104
 
  RPC_X_INVALID_BOUND              = RPC_S_INVALID_BOUND;
105
 
  {$EXTERNALSYM RPC_X_INVALID_BOUND}
106
 
  RPC_X_INVALID_TAG                = RPC_S_INVALID_TAG;
107
 
  {$EXTERNALSYM RPC_X_INVALID_TAG}
108
 
  RPC_X_ENUM_VALUE_TOO_LARGE       = RPC_X_ENUM_VALUE_OUT_OF_RANGE;
109
 
  {$EXTERNALSYM RPC_X_ENUM_VALUE_TOO_LARGE}
110
 
  RPC_X_SS_CONTEXT_MISMATCH        = ERROR_INVALID_HANDLE;
111
 
  {$EXTERNALSYM RPC_X_SS_CONTEXT_MISMATCH}
112
 
  RPC_X_INVALID_BUFFER             = ERROR_INVALID_USER_BUFFER;
113
 
  {$EXTERNALSYM RPC_X_INVALID_BUFFER}
114
 
  RPC_X_PIPE_APP_MEMORY            = ERROR_OUTOFMEMORY;
115
 
  {$EXTERNALSYM RPC_X_PIPE_APP_MEMORY}
116
 
  RPC_X_INVALID_PIPE_OPERATION     = RPC_X_WRONG_PIPE_ORDER;
117
 
  {$EXTERNALSYM RPC_X_INVALID_PIPE_OPERATION}
118
 
 
119
 
{$ENDIF JWA_INTERFACESECTION}
120
 
 
121
 
{$IFNDEF JWA_INCLUDEMODE}
122
 
implementation
123
 
{$ENDIF !JWA_INCLUDEMODE}
124
 
 
125
 
{$IFDEF JWA_IMPLEMENTATIONSECTION}
126
 
{$ENDIF JWA_IMPLEMENTATIONSECTION}
127
 
 
128
 
{$IFNDEF JWA_INCLUDEMODE}
129
 
end.
130
 
{$ENDIF !JWA_INCLUDEMODE}