/[eiffelstudio]/trunk/eweasel/tests/unicode006/test_manifest_with_bom.e
ViewVC logotype

Contents of /trunk/eweasel/tests/unicode006/test_manifest_with_bom.e

Parent Directory Parent Directory | Revision Log Revision Log


Revision 90727 - (show annotations)
Fri Jan 18 18:35:19 2013 UTC (7 years ago) by manus
File size: 1703 byte(s)
Merged `test_string_32' and `test_string_8' in `test_string' in `test_manifest_with_bom.e'. Because the compiler does not allow conversions from STRING_32 to STRING_8 anymore and thus having extra VJAR errors is not that helpful for testing.

1 class
2 TEST
3
4 create
5 make
6
7 feature -- Make
8
9 make
10 do
11 end
12
13 feature -- Run time
14
15 test_char
16 local
17 l_char_8: CHARACTER_8
18 l_char_32: CHARACTER_32
19 do
20 -- iso-8859-1 no compatible unicode
21 l_char_8 := {CHARACTER_8}'测' -- Error
22 l_char_8 := {CHARACTER_32}'测' -- Error
23 l_char_8 := '测' -- Error
24
25 -- iso-8859-1
26 l_char_8 := {CHARACTER_8}'a'
27 l_char_8 := {CHARACTER_32}'a' -- Error
28 l_char_8 := 'a'
29
30 -- iso-8859-1 compatible unicode
31 l_char_8 := {CHARACTER_8}'é'
32 l_char_8 := {CHARACTER_32}'é' -- Error
33 l_char_8 := 'é'
34
35 -- Unicode point numbers
36 l_char_8 := {CHARACTER_8}'%/35797/' -- Error
37 l_char_8 := {CHARACTER_32}'%/35797/' -- Error
38 l_char_8 := '%/35797/' -- Error
39
40 -- iso-8859-1 no compatible unicode
41 l_char_32 := {CHARACTER_8}'测' -- Error
42 l_char_32 := {CHARACTER_32}'测'
43 l_char_32 := '测'
44
45 -- iso-8859-1
46 l_char_32 := {CHARACTER_8}'a'
47 l_char_32 := {CHARACTER_32}'a'
48 l_char_32 := 'a'
49
50 -- iso-8859-1 compatible unicode
51 l_char_32 := {CHARACTER_8}'é'
52 l_char_32 := {CHARACTER_32}'é'
53 l_char_32 := 'é'
54
55 -- Unicode point numbers
56 l_char_32 := {CHARACTER_8}'%/35797/' -- Error
57 l_char_32 := {CHARACTER_32}'%/35797/'
58 l_char_32 := '%/35797/'
59 end
60
61 test_string
62 local
63 l_str: STRING_32
64 l_str_8: STRING_8
65 do
66 l_str := {STRING_32} "测试"
67 l_str := {STRING_32} "%/27979/%/35797/"
68 l_str := {STRING_32}
69 "[
70 测试
71 ]"
72
73 l_str := (once {STRING_32} "测试")
74
75 l_str_8 := "测试" -- Error
76 l_str_8 := "%/27979/%/35797/" -- Error
77 l_str_8 := -- Error
78 "[
79 测试
80 ]"
81
82 l_str_8 := (once "测试") -- Error
83 end
84
85 end

Properties

Name Value
svn:eol-style native
svn:keywords Author Date Id Revision

  ViewVC Help
Powered by ViewVC 1.1.23