/src/wrappers/gtk/library/gtk_store_setters.e

http://github.com/tybor/Liberty · Specman e · 120 lines · 98 code · 15 blank · 7 comment · 2 complexity · d73b74d51b640ed30c63e0bcccbe8a2c MD5 · raw file

  1. indexing
  2. description: "."
  3. copyright: "[
  4. Copyright (C) 2006 Paolo Redaelli,
  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 hopeOA 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_STORE_SETTERS
  19. insert
  20. ANY
  21. undefine
  22. copy,
  23. is_equal
  24. end
  25. feature -- Easy to use setters
  26. -- Note: wrapping gtk_list/tree_store_set is problematic since it's
  27. -- a variadic function but also its not-variadic variant
  28. -- (gtk_list_store_set_valist) is not easy to use from within
  29. -- ewg-wrapped libraries since currently it's not easy/possible to
  30. -- wrap va_list-using functions. Using the plain
  31. -- gtk_list_store_set_value can be an answer but I haven't checked
  32. -- its performance (2005-05-16 Paolo)
  33. set_string (an_iterator: GTK_TREE_ITER; a_column: INTEGER; a_string: STRING) is
  34. require
  35. a_column_contains_a_string: -- TODO
  36. valid_iterator: an_iterator/=Void
  37. local a_value: G_VALUE
  38. do
  39. create a_value.from_string (a_string)
  40. set_value (an_iterator, a_column, a_value)
  41. end
  42. set_natural (an_iterator: GTK_TREE_ITER; a_column: INTEGER; a_natural: INTEGER) is
  43. require
  44. a_column_contains_a_natural: -- TODO
  45. valid_natural: a_natural >= 0
  46. valid_iterator: an_iterator/=Void
  47. local a_value: G_VALUE
  48. do
  49. create a_value.from_natural (a_natural)
  50. set_value (an_iterator, a_column, a_value)
  51. end
  52. set_integer (an_iterator: GTK_TREE_ITER; a_column: INTEGER; an_integer: INTEGER) is
  53. require
  54. a_column_contains_a_integer: -- TODO
  55. valid_iterator: an_iterator/=Void
  56. local a_value: G_VALUE
  57. do
  58. create a_value.from_integer (an_integer)
  59. set_value (an_iterator, a_column, a_value)
  60. end
  61. set_real (an_iterator: GTK_TREE_ITER; a_column: INTEGER; a_real: REAL) is
  62. require
  63. a_column_contains_a_double: -- TODO
  64. valid_iterator: an_iterator/=Void
  65. local
  66. a_value: G_VALUE
  67. do
  68. create a_value.from_real (a_real)
  69. set_value (an_iterator, a_column, a_value)
  70. end
  71. set_boolean (an_iterator: GTK_TREE_ITER; a_column: INTEGER; a_boolean: BOOLEAN) is
  72. require
  73. valid_iterator: an_iterator/=Void
  74. a_column_contains_a_boolean: -- TODO
  75. local
  76. a_value: G_VALUE
  77. do
  78. create a_value.from_boolean (a_boolean)
  79. set_value (an_iterator, a_column, a_value)
  80. end
  81. set_object (an_iterator: GTK_TREE_ITER; a_column: INTEGER; an_object: G_OBJECT) is
  82. require
  83. valid_iterator: an_iterator/=Void
  84. a_column_contains_an_object: -- TODO
  85. local
  86. a_value: G_VALUE
  87. do
  88. create a_value.from_object (an_object)
  89. set_value (an_iterator, a_column, a_value)
  90. end
  91. set_pointer (an_iterator: GTK_TREE_ITER; a_column: INTEGER; a_pointer: POINTER) is
  92. require
  93. valid_iterator: an_iterator/=Void
  94. a_column_contains_an_object: -- TODO
  95. local
  96. a_value: G_VALUE
  97. do
  98. create a_value.from_pointer (a_pointer)
  99. set_value (an_iterator, a_column, a_value)
  100. end
  101. feature -- Generic setter
  102. set_value (an_iterator: GTK_TREE_ITER; a_column: INTEGER; a_value: G_VALUE) is
  103. deferred
  104. end
  105. end -- class GTK_STORE_SETTERS