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

« back to all changes in this revision

Viewing changes to fpcsrc/packages/extra/gtk2/atk/atkdocument.inc

  • 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
[ 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:
 
1
// included by atk.pp
 
2
 
 
3
{
 
4
   The AtkDocument interface should be supported by any anObject that has an
 
5
   associated document anObject model (DOM). This interface provides the
 
6
   standard mechanism allowing an assistive technology access to the DOM.
 
7
  }
 
8
 
 
9
 
 
10
{$IFDEF read_forward_definitions}
 
11
{$ENDIF read_forward_definitions}
 
12
 
 
13
//------------------------------------------------------------------------------
 
14
 
 
15
{$IFDEF read_interface_types}
 
16
   PAtkDocumentIface = ^TAtkDocumentIface;
 
17
   TAtkDocumentIface = record
 
18
        parent : TGTypeInterface;
 
19
        get_document_type : function (document:PAtkDocument):Pgchar; cdecl;
 
20
        get_document : function (document:PAtkDocument):gpointer; cdecl;
 
21
        pad1 : TAtkFunction;
 
22
        pad2 : TAtkFunction;
 
23
        pad3 : TAtkFunction;
 
24
        pad4 : TAtkFunction;
 
25
        pad5 : TAtkFunction;
 
26
        pad6 : TAtkFunction;
 
27
        pad7 : TAtkFunction;
 
28
        pad8 : TAtkFunction;
 
29
     end;
 
30
 
 
31
{$ENDIF read_interface_types}
 
32
 
 
33
//------------------------------------------------------------------------------
 
34
 
 
35
{$IFDEF read_interface_rest}
 
36
function ATK_TYPE_DOCUMENT : GType;
 
37
function ATK_IS_DOCUMENT(obj: pointer) : boolean;
 
38
function ATK_DOCUMENT(obj: pointer) : PAtkDocument;
 
39
function ATK_DOCUMENT_GET_IFACE(obj: pointer) : PAtkDocumentIface;
 
40
 
 
41
 
 
42
function atk_document_get_type:GType; cdecl; external atklib;
 
43
function atk_document_get_document_type(document:PAtkDocument):Pgchar; cdecl; external atklib;
 
44
function atk_document_get_document(document:PAtkDocument):gpointer; cdecl; external atklib;
 
45
{$ENDIF read_interface_rest}
 
46
 
 
47
//------------------------------------------------------------------------------
 
48
 
 
49
{$IFDEF read_implementation}
 
50
function ATK_TYPE_DOCUMENT : GType;
 
51
begin
 
52
   ATK_TYPE_DOCUMENT:=atk_document_get_type;
 
53
end;
 
54
 
 
55
function ATK_IS_DOCUMENT(obj: pointer) : boolean;
 
56
begin
 
57
   ATK_IS_DOCUMENT:=G_TYPE_CHECK_INSTANCE_TYPE(obj,ATK_TYPE_DOCUMENT);
 
58
end;
 
59
 
 
60
function ATK_DOCUMENT(obj: pointer) : PAtkDocument;
 
61
begin
 
62
   ATK_DOCUMENT:=PAtkDocument(G_TYPE_CHECK_INSTANCE_CAST(obj,ATK_TYPE_DOCUMENT));
 
63
end;
 
64
 
 
65
function ATK_DOCUMENT_GET_IFACE(obj: pointer) : PAtkDocumentIface;
 
66
begin
 
67
   ATK_DOCUMENT_GET_IFACE:=PAtkDocumentIface(G_TYPE_INSTANCE_GET_INTERFACE(obj,ATK_TYPE_DOCUMENT));
 
68
end;
 
69
 
 
70
{$ENDIF read_implementation}
 
71