/src/lib/parse/eiffel/untyped_eiffel_image.e

http://github.com/tybor/Liberty · Specman e · 46 lines · 19 code · 4 blank · 23 comment · 0 complexity · 78f549bb73cbc22e40a69fbcc8c8587b MD5 · raw file

  1. -- This file is part of a Liberty Eiffel library.
  2. -- See the full copyright at the end.
  3. --
  4. class UNTYPED_EIFFEL_IMAGE
  5. inherit
  6. EIFFEL_IMAGE
  7. creation {EIFFEL_GRAMMAR}
  8. make
  9. feature {}
  10. make (a_image: like image; a_blanks: like blanks; a_position: like position) is
  11. require
  12. a_image /= Void
  13. do
  14. image := a_image
  15. blanks := a_blanks
  16. position := a_position
  17. ensure
  18. image = a_image
  19. blanks = a_blanks
  20. position = a_position
  21. end
  22. end -- class UNTYPED_EIFFEL_IMAGE
  23. --
  24. -- Copyright (c) 2009 by all the people cited in the AUTHORS file.
  25. --
  26. -- Permission is hereby granted, free of charge, to any person obtaining a copy
  27. -- of this software and associated documentation files (the "Software"), to deal
  28. -- in the Software without restriction, including without limitation the rights
  29. -- to use, copy, modify, merge, publish, distribute, sublicense, and/or sell
  30. -- copies of the Software, and to permit persons to whom the Software is
  31. -- furnished to do so, subject to the following conditions:
  32. --
  33. -- The above copyright notice and this permission notice shall be included in
  34. -- all copies or substantial portions of the Software.
  35. --
  36. -- THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR
  37. -- IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY,
  38. -- FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE
  39. -- AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER
  40. -- LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM,
  41. -- OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN
  42. -- THE SOFTWARE.