/test/language/unclassified/uw/aux_uw01preferred_language.e

http://github.com/tybor/Liberty · Specman e · 130 lines · 91 code · 20 blank · 19 comment · 0 complexity · 15e4b31fc2159bed82e3686177261db3 MD5 · raw file

  1. note
  2. description:
  3. "preferred language (German)"
  4. status:
  5. "See notice at end of class"
  6. author:
  7. "Ulrich Windl <Ulrich.Windl@rz.uni-regensburg.de>"
  8. version:
  9. "$Revision$"
  10. last_modification:
  11. "$Date$"
  12. class AUX_UW01PREFERRED_LANGUAGE
  13. inherit
  14. AUX_UW01LANGUAGE
  15. redefine s1, s2, s3, s4, s5, s6, s7, s8, s9, s10, s11, s12, s13, s14, s15, s16, yes_character, no_character
  16. end
  17. feature {ANY} -- strings
  18. s1: STRING
  19. once
  20. Result := "animal_action (is it a ..)%N"
  21. end
  22. s2: STRING
  23. once
  24. Result := "Erraten!%N"
  25. end
  26. s3: STRING
  27. once
  28. Result := "Dieses Tier kenne ich nicht!%N"
  29. end
  30. s4: STRING
  31. once
  32. Result := "Ist es ein "
  33. end
  34. s5: STRING
  35. once
  36. Result := " ? "
  37. end
  38. s6: STRING
  39. once
  40. Result := "(j/n): "
  41. end
  42. s7: STRING
  43. once
  44. Result := "Nochmal ? "
  45. end
  46. s8: STRING
  47. once
  48. Result := "Für ein `"
  49. end
  50. s9: STRING
  51. once
  52. Result := "' ist die Antwort auf die Frage%N`"
  53. end
  54. s10: STRING
  55. once
  56. Result := "'? (j/n): "
  57. end
  58. s11: STRING
  59. once
  60. Result := "Welche Frage unterscheidet "
  61. end
  62. s12: STRING
  63. once
  64. Result := " von "
  65. end
  66. s13: STRING
  67. once
  68. Result := "?%N"
  69. end
  70. s14: STRING
  71. once
  72. Result := "question_action (Question: ..)%N"
  73. end
  74. s15: STRING
  75. once
  76. Result := "Tier eingeben: "
  77. end
  78. s16: STRING
  79. once
  80. Result := "Frage eingeben: "
  81. end
  82. feature {ANY} -- magic characters
  83. yes_character: CHARACTER
  84. -- character used for positive replies
  85. once
  86. Result := 'j'
  87. end
  88. no_character: CHARACTER
  89. -- character used for negative replies
  90. once
  91. Result := 'n'
  92. end
  93. end -- class AUX_UW01PREFERRED_LANGUAGE
  94. -- Copyright (C) 1998-2017: by Ulrich Windl
  95. -- Copyright (C) 1998-2017: by Klinikum der Universität Regensburg,
  96. -- D-93042 Regensburg
  97. --
  98. -- This program is free software; you can redistribute it and/or modify
  99. -- it under the terms of the GNU General Public License as published by
  100. -- the Free Software Foundation; either version 2 of the License, or
  101. -- (at your option) any later version.
  102. --
  103. -- This program is distributed in the hope that it will be useful,
  104. -- but WITHOUT ANY WARRANTY; without even the implied warranty of
  105. -- MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
  106. -- GNU General Public License for more details.
  107. --
  108. -- You should have received a copy of the GNU General Public License
  109. -- along with this program; if not, write to the Free Software
  110. -- Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301, USA