/src/wrappers/gtk/library/gtk_unit.e

http://github.com/tybor/Liberty · Specman e · 58 lines · 44 code · 10 blank · 4 comment · 2 complexity · 3a91a0288291eaf5ae667bcbfef77df7 MD5 · raw file

  1. indexing
  2. description: "enum GtkUnit"
  3. copyright: "[
  4. Copyright (C) 2007 Paolo Redaelli, GTK+ team
  5. This library is free software; you can redistribute it and/or
  6. modify it under the terms of the GNU Lesser General Public License
  7. as published by the Free Software Foundation; either version 2.1 of
  8. the License, or (at your option) any later version.
  9. This library is distributed in the hope that it will be useful, but
  10. WITHOUT ANY WARRANTY; without even the implied warranty of
  11. MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
  12. Lesser General Public License for more details.
  13. You should have received a copy of the GNU Lesser General Public
  14. License along with this library; if not, write to the Free Software
  15. Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA
  16. 02110-1301 USA
  17. ]"
  18. deferred class GTK_UNIT
  19. inherit ANY undefine is_equal, copy end
  20. feature -- enum
  21. is_valid_gtk_unit (a_unit: INTEGER): BOOLEAN is
  22. do
  23. Result:=((a_unit = gtk_unit_pixel) or else
  24. (a_unit = gtk_unit_points) or else
  25. (a_unit = gtk_unit_inch) or else
  26. (a_unit = gtk_unit_mm))
  27. end
  28. gtk_unit_pixel: INTEGER is
  29. -- GTK_UNIT_PIXEL
  30. external "C macro use <gtk/gtk.h>"
  31. alias "GTK_UNIT_PIXEL"
  32. end
  33. gtk_unit_points: INTEGER is
  34. -- GTK_UNIT_POINTS
  35. external "C macro use <gtk/gtk.h>"
  36. alias "GTK_UNIT_POINTS"
  37. end
  38. gtk_unit_inch: INTEGER is
  39. -- GTK_UNIT_INCH
  40. external "C macro use <gtk/gtk.h>"
  41. alias "GTK_UNIT_INCH"
  42. end
  43. gtk_unit_mm: INTEGER is
  44. -- GTK_UNIT_MM
  45. external "C macro use <gtk/gtk.h>"
  46. alias "GTK_UNIT_MM"
  47. end
  48. end