/[eiffelstudio]/branches/eth/eve/Src/Eiffel/API/evaluated_type/real_a.e
ViewVC logotype

Diff of /branches/eth/eve/Src/Eiffel/API/evaluated_type/real_a.e

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 83441 by jasonw, Sat Jun 5 13:52:53 2010 UTC revision 89347 by jasonw, Fri Aug 10 15:09:25 2012 UTC
# Line 12  inherit Line 12  inherit
12                  rename                  rename
13                          make as cl_make                          make as cl_make
14                  redefine                  redefine
15                          is_real_32, is_real_64, associated_class, same_as, is_numeric,                          is_real_32, is_real_64, base_class, same_as, is_numeric,
16                          process, heaviest                          process, heaviest
17                  end                  end
18    
# Line 27  feature {NONE} -- Initialization Line 27  feature {NONE} -- Initialization
27                          valid_n: n = 32 or n = 64                          valid_n: n = 32 or n = 64
28                  do                  do
29                          size := n.to_integer_8                          size := n.to_integer_8
30                          cl_make (associated_class.class_id)                          cl_make (base_class.class_id)
31                  ensure                  ensure
32                          size_set: size = n                          size_set: size = n
33                  end                  end
# Line 56  feature -- Property Line 56  feature -- Property
56    
57  feature -- Access  feature -- Access
58    
59          associated_class: CLASS_C          base_class: CLASS_C
60                          -- Class REAL                          -- Class REAL
61                  do                  do
62                          if size = 32 then                          if size = 32 then

Legend:
Removed from v.83441  
changed lines
  Added in v.89347

  ViewVC Help
Powered by ViewVC 1.1.23