/[eiffelstudio]/FreeELKS/tags/EiffelSoftware/Eiffel_72/library/kernel/readable_string_8.e
ViewVC logotype

Diff of /FreeELKS/tags/EiffelSoftware/Eiffel_72/library/kernel/readable_string_8.e

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

revision 92170 by manus_eiffel, Mon Feb 4 21:05:19 2013 UTC revision 92171 by manus_eiffel, Thu Feb 7 20:27:54 2013 UTC
# Line 16  inherit Line 16  inherit
16          READABLE_STRING_GENERAL          READABLE_STRING_GENERAL
17                  rename                  rename
18                          same_string as same_string_general,                          same_string as same_string_general,
19                          plus as plus_string_general                          plus as plus_string_general,
20                            item as character_32_item
21                  redefine                  redefine
22                          copy, is_equal, out                          copy, is_equal, out
23                  end                  end
# Line 122  feature -- Access Line 123  feature -- Access
123                          Result := area.item (i - 1)                          Result := area.item (i - 1)
124                  end                  end
125    
126            character_32_item (i: INTEGER): CHARACTER_32
127                            -- Character at position `i'
128                    do
129                            Result := code (i).to_character_32
130                    end
131    
132          code (i: INTEGER): NATURAL_32          code (i: INTEGER): NATURAL_32
133                          -- Numeric code of character at position `i'                          -- Numeric code of character at position `i'
134                  do                  do

Legend:
Removed from v.92170  
changed lines
  Added in v.92171

  ViewVC Help
Powered by ViewVC 1.1.23