Skip to content

HTTPS clone URL

Subversion checkout URL

You can clone with HTTPS or Subversion.

Download ZIP
Browse files

niecza unfudge

  • Loading branch information...
commit 2788c08792b2a900b8f8917d30a0f6114a2a1fb4 1 parent 484d409
Will Coleda coke authored
40 S02-lexical-conventions/unicode-whitespace.t
View
@@ -32,7 +32,6 @@ is(try_eval('
my @x = <a b c>; sub y (@z) { @z[1] }; y(@x)
'), "b", "LINE TABULATION");
-#?niecza todo 'Malformed my'
is(try_eval('
my @x = <a b c>; sub y (@z) { @z[1] }; y(@x)
'), "b", "FORM FEED (FF)");
@@ -45,97 +44,78 @@ is(try_eval('
my @x = <a b c>; sub y (@z) { @z[1] }; y(@x)
'), "b", "SPACE");
-#?niecza todo 'Malformed my'
is(try_eval('
my…@x… =…<a…b…c>;…sub…y…(@z)…{…@z[1]…};…y(@x)
'), "b", "NEXT LINE (NEL)");
-#?niecza todo 'Malformed my'
is(try_eval('
my @x = <a b c>; sub y (@z) { @z[1] }; y(@x)
'), "b", "NO-BREAK SPACE");
-#?niecza todo 'Malformed my'
is(try_eval('
my @x = <a b c>; sub y (@z) { @z[1] }; y(@x)
'), "b", "OGHAM SPACE MARK");
-#?niecza todo 'Malformed my'
is(try_eval('
my᠎@x᠎=᠎<a᠎b᠎c>;᠎sub᠎y᠎(@z)᠎{᠎@z[1]᠎};᠎y(@x)
'), "b", "MONGOLIAN VOWEL SEPARATOR");
-#?niecza todo 'Malformed my'
is(try_eval('
my @x = <a b c>; sub y (@z) { @z[1] }; y(@x)
'), "b", "EN QUAD");
-#?niecza todo 'Malformed my'
is(try_eval('
my @x = <a b c>; sub y (@z) { @z[1] }; y(@x)
'), "b", "EM QUAD");
-#?niecza todo 'Malformed my'
is(try_eval('
my @x = <a b c>; sub y (@z) { @z[1] }; y(@x)
'), "b", "EN SPACE");
-#?niecza todo 'Malformed my'
is(try_eval('
my @x = <a b c>; sub y (@z) { @z[1] }; y(@x)
'), "b", "EM SPACE");
-#?niecza todo 'Malformed my'
is(try_eval('
my @x = <a b c>; sub y (@z) { @z[1] }; y(@x)
'), "b", "THREE-PER-EM SPACE");
-#?niecza todo 'Malformed my'
is(try_eval('
my @x = <a b c>; sub y (@z) { @z[1] }; y(@x)
'), "b", "FOUR-PER-EM SPACE");
-#?niecza todo 'Malformed my'
is(try_eval('
my @x = <a b c>; sub y (@z) { @z[1] }; y(@x)
'), "b", "SIX-PER-EM SPACE");
-#?niecza todo 'Malformed my'
is(try_eval('
my @x = <a b c>; sub y (@z) { @z[1] }; y(@x)
'), "b", "FIGURE SPACE");
-#?niecza todo 'Malformed my'
is(try_eval('
my @x = <a b c>; sub y (@z) { @z[1] }; y(@x)
'), "b", "PUNCTUATION SPACE");
-#?niecza todo 'Malformed my'
is(try_eval('
my @x = <a b c>; sub y (@z) { @z[1] }; y(@x)
'), "b", "THIN SPACE");
-#?niecza todo 'Malformed my'
is(try_eval('
my @x = <a b c>; sub y (@z) { @z[1] }; y(@x)
'), "b", "HAIR SPACE");
-#?niecza todo 'Malformed my'
is(try_eval('
my
@x
=
<a
b
c>;
sub
y
(@z)
{
@z[1]
};
y(@x)
'), "b", "LINE SEPARATOR");
-#?niecza todo 'Malformed my'
is(try_eval('
my
@x
=
<a
b
c>;
sub
y
(@z)
{
@z[1]
};
y(@x)
'), "b", "PARAGRAPH SEPARATOR");
-#?niecza todo 'Malformed my'
is(try_eval('
my @x = <a b c>; sub y (@z) { @z[1] }; y(@x)
'), "b", "NARROW NO-BREAK SPACE");
-#?niecza todo 'Malformed my'
is(try_eval('
my @x = <a b c>; sub y (@z) { @z[1] }; y(@x)
'), "b", "MEDIUM MATHEMATICAL SPACE");
@@ -158,47 +138,27 @@ is(try_eval('foo\ .lc'), 'a', 'long dot with CHARACTER TABULATION');
is(try_eval('foo\
.lc'), 'a', 'long dot with LINE FEED (LF)');
is(try_eval('foo\ .lc'), 'a', 'long dot with LINE TABULATION');
-#?niecza todo 'Confused'
is(try_eval('foo\ .lc'), 'a', 'long dot with FORM FEED (FF)');
is(try_eval('foo\ .lc'), 'a', 'long dot with CARRIAGE RETURN (CR)');
is(try_eval('foo\ .lc'), 'a', 'long dot with SPACE');
-#?niecza todo 'Confused'
is(try_eval('foo\….lc'), 'a', 'long dot with NEXT LINE (NEL)');
-#?niecza todo 'Confused'
is(try_eval('foo\ .lc'), 'a', 'long dot with NO-BREAK SPACE');
-#?niecza todo 'Confused'
is(try_eval('foo\ .lc'), 'a', 'long dot with OGHAM SPACE MARK');
-#?niecza todo 'Confused'
is(try_eval('foo\᠎.lc'), 'a', 'long dot with MONGOLIAN VOWEL SEPARATOR');
-#?niecza todo 'Confused'
is(try_eval('foo\ .lc'), 'a', 'long dot with EN QUAD');
-#?niecza todo 'Confused'
is(try_eval('foo\ .lc'), 'a', 'long dot with EM QUAD');
-#?niecza todo 'Confused'
is(try_eval('foo\ .lc'), 'a', 'long dot with EN SPACE');
-#?niecza todo 'Confused'
is(try_eval('foo\ .lc'), 'a', 'long dot with EM SPACE');
-#?niecza todo 'Confused'
is(try_eval('foo\ .lc'), 'a', 'long dot with THREE-PER-EM SPACE');
-#?niecza todo 'Confused'
is(try_eval('foo\ .lc'), 'a', 'long dot with FOUR-PER-EM SPACE');
-#?niecza todo 'Confused'
is(try_eval('foo\ .lc'), 'a', 'long dot with SIX-PER-EM SPACE');
-#?niecza todo 'Confused'
is(try_eval('foo\ .lc'), 'a', 'long dot with FIGURE SPACE');
-#?niecza todo 'Confused'
is(try_eval('foo\ .lc'), 'a', 'long dot with PUNCTUATION SPACE');
-#?niecza todo 'Confused'
is(try_eval('foo\ .lc'), 'a', 'long dot with THIN SPACE');
-#?niecza todo 'Confused'
is(try_eval('foo\ .lc'), 'a', 'long dot with HAIR SPACE');
-#?niecza todo 'Confused'
is(try_eval('foo\
.lc'), 'a', 'long dot with LINE SEPARATOR');
-#?niecza todo 'Confused'
is(try_eval('foo\
.lc'), 'a', 'long dot with PARAGRAPH SEPARATOR');
-#?niecza todo 'Confused'
is(try_eval('foo\ .lc'), 'a', 'long dot with NARROW NO-BREAK SPACE');
-#?niecza todo 'Confused'
is(try_eval('foo\ .lc'), 'a', 'long dot with MEDIUM MATHEMATICAL SPACE');
is(try_eval('foo\ .lc'), 'a', 'long dot with IDEOGRAPHIC SPACE');
1  S02-lexical-conventions/unicode.t
View
@@ -110,7 +110,6 @@ is((do { my $दूसरा = 2; sub टोटल ($x) { $x + 2 }; टोटल
# L<S02/Unicode Semantics/Perl can count Unicode line and paragraph separators>
#?rakudo: todo 'PS does not work to separate lines'
-#?niecza todo 'PS does not work to separate lines'
eval_lives_ok "\{ 1 \} \x2029 \{ 1 \}", "Unicode 2029 can terminate lines";
# L<S02/Bracketing Characters/If a character is already used>
Please sign in to comment.
Something went wrong with that request. Please try again.