pascal/lazarus-ccr
1
0
Fork 0
Code Issues Releases Activity

Added dbus files

Browse Source 
git-svn-id: https://svn.code.sf.net/p/lazarus-ccr/svn@12 8e941d3f-bd1b-0410-a28a-d453659cc2b4
This commit is contained in:
sekelsenmat
2006-09-06 13:33:40 +00:00
parent 4ccb6a4c31
commit 43a64e6176
19 changed files with 1815 additions and 0 deletions
Download Patch File Download Diff File Expand all files Collapse all files

54
dbus/dbus-errors.inc Normal file
View File

@ -0,0 +1,54 @@
{ -*- mode: C; c-file-style: "gnu" -*- }
{ dbus-errors.h Error reporting
*
* Copyright (C) 2002 Red Hat Inc.
* Copyright (C) 2003 CodeFactory AB
*
* Licensed under the Academic Free License version 2.1
*
* This program is free software; you can redistribute it and/or modify
* it under the terms of the GNU General Public License as published by
* the Free Software Foundation; either version 2 of the License, or
* (at your option) any later version.
*
* This program is distributed in the hope that it will be useful,
* but WITHOUT ANY WARRANTY; without even the implied warranty of
* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
* GNU General Public License for more details.
*
* You should have received a copy of the GNU General Public License
* along with this program; if not, write to the Free Software
* Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA
*
}
//#include <dbus/dbus-macros.h>
//#include <dbus/dbus-types.h>
type
PDBusError = ^DBusError;
{
* Object representing an exception.
}
DBusError = record
name: PChar; {< error name }
message: PChar; {< error message }
dummy1: cuint; //: 1; {< placeholder }
// unsigned int dummy2 : 1; {< placeholder }
// unsigned int dummy3 : 1; {< placeholder }
// unsigned int dummy4 : 1; {< placeholder }
// unsigned int dummy5 : 1; {< placeholder }
padding1: Pointer; {< placeholder }
end;
procedure dbus_error_init(error: PDBusError); cdecl; external LibDBus;
procedure dbus_error_free(error: PDBusError); cdecl; external LibDBus;
procedure dbus_set_error(error: PDBusError; const name, message: PChar; others: array of const); cdecl; external LibDBus;
procedure dbus_set_error_const(error: PDBusError; const name, message: PChar); cdecl; external LibDBus;
procedure dbus_move_error(src, dest: PDBusError); cdecl; external LibDBus;
function dbus_error_has_name(const error: PDBusError; const name: PChar): dbus_bool_t; cdecl; external LibDBus;
function dbus_error_is_set(const error: PDBusError): dbus_bool_t; cdecl; external LibDBus;