Revision 26749
- Date:
- 2009/05/10 10:43:14
- Files:
Legend:
- Added
- Removed
- Modified
-
t/spec/S02-whitespace_and_comments/unicode-whitespace.t
137 137 #Long dot whitespace tests 138 138 #These currently get different results than the above 139 139 140 class Str is also { 141 method id() { self } 142 } 143 144 #This makes 'foo.id' and 'foo .id' mean different things 140 #This makes 'foo.lc' and 'foo .lc' mean different things 145 141 multi foo() { 'a' } 146 142 multi foo($x) { $x } 147 143 148 144 $_ = 'b'; 149 145 150 146 # L<S02/"Lexical Conventions"/"Unicode horizontal whitespace"> 151 is(eval('foo\ .id'), 'a', 'long dot with CHARACTER TABULATION'); 147 is(eval('foo\ .lc'), 'a', 'long dot with CHARACTER TABULATION'); 152 148 is(eval('foo\ 153 .id'), 'a', 'long dot with LINE FEED (LF)'); 154 is(eval('foo\.id'), 'a', 'long dot with LINE TABULATION'); 155 is(eval('foo\.id'), 'a', 'long dot with FORM FEED (FF)'); 149 .lc'), 'a', 'long dot with LINE FEED (LF)'); 150 is(eval('foo\.lc'), 'a', 'long dot with LINE TABULATION'); 151 is(eval('foo\.lc'), 'a', 'long dot with FORM FEED (FF)'); 156 152 is(eval('foo\ -.id'), 'a', 'long dot with CARRIAGE RETURN (CR)'); 157 is(eval('foo\ .id'), 'a', 'long dot with SPACE'); 158 is(eval('foo\ .id'), 'a', 'long dot with NEXT LINE (NEL)'); 159 is(eval('foo\ .id'), 'a', 'long dot with NO-BREAK SPACE'); 160 is(eval('foo\ .id'), 'a', 'long dot with OGHAM SPACE MARK'); 161 is(eval('foo\.id'), 'a', 'long dot with MONGOLIAN VOWEL SEPARATOR'); 162 is(eval('foo\ .id'), 'a', 'long dot with EN QUAD'); 163 is(eval('foo\ .id'), 'a', 'long dot with EM QUAD'); 164 is(eval('foo\ .id'), 'a', 'long dot with EN SPACE'); 165 is(eval('foo\ .id'), 'a', 'long dot with EM SPACE'); 166 is(eval('foo\ .id'), 'a', 'long dot with THREE-PER-EM SPACE'); 167 is(eval('foo\ .id'), 'a', 'long dot with FOUR-PER-EM SPACE'); 168 is(eval('foo\ .id'), 'a', 'long dot with SIX-PER-EM SPACE'); 169 is(eval('foo\ .id'), 'a', 'long dot with FIGURE SPACE'); 170 is(eval('foo\ .id'), 'a', 'long dot with PUNCTUATION SPACE'); 171 is(eval('foo\ .id'), 'a', 'long dot with THIN SPACE'); 172 is(eval('foo\ .id'), 'a', 'long dot with HAIR SPACE'); 173 is(eval('foo\ .id'), 'a', 'long dot with LINE SEPARATOR'); 174 is(eval('foo\ .id'), 'a', 'long dot with PARAGRAPH SEPARATOR'); 175 is(eval('foo\ .id'), 'a', 'long dot with NARROW NO-BREAK SPACE'); 176 is(eval('foo\ .id'), 'a', 'long dot with MEDIUM MATHEMATICAL SPACE'); 177 is(eval('foo\ .id'), 'a', 'long dot with IDEOGRAPHIC SPACE'); 153 .lc'), 'a', 'long dot with CARRIAGE RETURN (CR)'); 154 is(eval('foo\ .lc'), 'a', 'long dot with SPACE'); 155 is(eval('foo\ .lc'), 'a', 'long dot with NEXT LINE (NEL)'); 156 is(eval('foo\ .lc'), 'a', 'long dot with NO-BREAK SPACE'); 157 is(eval('foo\ .lc'), 'a', 'long dot with OGHAM SPACE MARK'); 158 is(eval('foo\.lc'), 'a', 'long dot with MONGOLIAN VOWEL SEPARATOR'); 159 is(eval('foo\ .lc'), 'a', 'long dot with EN QUAD'); 160 is(eval('foo\ .lc'), 'a', 'long dot with EM QUAD'); 161 is(eval('foo\ .lc'), 'a', 'long dot with EN SPACE'); 162 is(eval('foo\ .lc'), 'a', 'long dot with EM SPACE'); 163 is(eval('foo\ .lc'), 'a', 'long dot with THREE-PER-EM SPACE'); 164 is(eval('foo\ .lc'), 'a', 'long dot with FOUR-PER-EM SPACE'); 165 is(eval('foo\ .lc'), 'a', 'long dot with SIX-PER-EM SPACE'); 166 is(eval('foo\ .lc'), 'a', 'long dot with FIGURE SPACE'); 167 is(eval('foo\ .lc'), 'a', 'long dot with PUNCTUATION SPACE'); 168 is(eval('foo\ .lc'), 'a', 'long dot with THIN SPACE'); 169 is(eval('foo\ .lc'), 'a', 'long dot with HAIR SPACE'); 170 is(eval('foo\ .lc'), 'a', 'long dot with LINE SEPARATOR'); 171 is(eval('foo\ .lc'), 'a', 'long dot with PARAGRAPH SEPARATOR'); 172 is(eval('foo\ .lc'), 'a', 'long dot with NARROW NO-BREAK SPACE'); 173 is(eval('foo\ .lc'), 'a', 'long dot with MEDIUM MATHEMATICAL SPACE'); 174 is(eval('foo\ .lc'), 'a', 'long dot with IDEOGRAPHIC SPACE'); 175 176 # vim: ft=perl6