PageRenderTime 19ms CodeModel.GetById 13ms app.highlight 1ms RepoModel.GetById 2ms app.codeStats 0ms

/tutorial/backtracking/logigram/exprs/expr_abs.e

http://github.com/tybor/Liberty
Specman e | 33 lines | 11 code | 4 blank | 18 comment | 0 complexity | 3fc2d14990e9a8c1e3d88fd4b0983e9f MD5 | raw file
 1-- See the Copyright notice at the end of this file.
 2--
 3class EXPR_ABS
 4
 5inherit
 6	EXPR_UNARY
 7
 8creation {ANY}
 9	make
10
11feature {ANY}
12	to_integer: INTEGER is
13		do
14			Result := expr.to_integer.abs
15		end
16
17end -- class EXPR_ABS
18--
19-- ------------------------------------------------------------------------------------------------------------------------------
20-- Copyright notice below. Please read.
21--
22-- This file is free software, which comes along with SmartEiffel. This software is distributed in the hope that it will be
23-- useful, but WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.
24-- You can modify it as you want, provided this footer is kept unaltered, and a notification of the changes is added.
25-- You are allowed to redistribute it and sell it, alone or as a part of another product.
26--
27-- Copyright(C) 1994-2002: INRIA - LORIA (INRIA Lorraine) - ESIAL U.H.P.       - University of Nancy 1 - FRANCE
28-- Copyright(C) 2003-2005: INRIA - LORIA (INRIA Lorraine) - I.U.T. Charlemagne - University of Nancy 2 - FRANCE
29--
30-- Authors: Dominique COLNET, Philippe RIBET, Cyril ADRIAN, Vincent CROIZIER, Frederic MERIZEN
31--
32-- http://SmartEiffel.loria.fr - SmartEiffel@loria.fr
33-- ------------------------------------------------------------------------------------------------------------------------------