← Back to branch summary

~ubuntu-branches/ubuntu/intrepid/libgtkada2/intrepid

« back to all changes in this revision

Viewing changes to src/pango-font.ads

  • Committer: Bazaar Package Importer
  • Author(s): Luca Falavigna
  • Date: 2008-08-11 09:46:51 UTC
  • mfrom: (6.1.1 squeeze)
  • Revision ID: james.westby@ubuntu.com-20080811094651-9mjd6acwa98ffw5c
Tags: 2.12.0-2ubuntu1
Add lpia to supported architectures.

Show diffs side-by-side

added added

removed removed

Lines of Context:
src/pango-font.ads
1
1
-----------------------------------------------------------------------
2
2
--              GtkAda - Ada95 binding for Gtk+/Gnome                --
3
3
--                                                                   --
 
4
--                Copyright (C) 2001-2008, AdaCore                   --
4
5
--                                                                   --
5
6
-- This library is free software; you can redistribute it and/or     --
6
7
-- modify it under the terms of the GNU General Public               --
256
256
 
257
257
   pragma Import (C, Get_Type, "pango_font_description_get_type");
258
258
 
259
 
   function Internal_Copy (F : Pango_Font_Description) return System.Address;
260
 
   pragma Import (C, Internal_Copy, "pango_font_description_copy");
 
259
   function To_Address
 
260
     (F : Pango_Font_Description; Add : System.Address) return System.Address;
261
261
 
262
262
   package Desc_Properties is new Generic_Internal_Boxed_Property
263
 
     (Pango_Font_Description, Get_Type, Internal_Copy);
 
263
     (Pango_Font_Description, Get_Type, To_Address);
264
264
 
265
265
   type Property_Font_Description is new Desc_Properties.Property;
266
266