This is an automated email from the git hooks/post-receive script.
js pushed a commit to annotated tag debian/0.019-1
in repository libattean-perl.
commit f37383fe63aa20f350df58a7585dbbf81258c4f3
Author: Gregory Todd Williams <g...@evilfunhouse.com>
Date: Sat Jun 11 20:54:56 2016 -0700
Added tests for turtle parser escape handling (#55).
---
t/parser-turtle.t | 14 ++++++++++++++
1 file changed, 14 insertions(+)
diff --git a/t/parser-turtle.t b/t/parser-turtle.t
index e850e67..cc36cb5 100644
--- a/t/parser-turtle.t
+++ b/t/parser-turtle.t
@@ -73,6 +73,20 @@ subtest 'parse_term_from_bytes' => sub {
is($term->language, 'en');
};
+subtest 'turtle numeric u escaping' => sub {
+ open(my $fh, '<', \q['\\u006F']);
+ my $l = AtteanX::Parser::Turtle::Lexer->new($fh);
+ my $t = $l->get_token;
+ is($t->value, 'o');
+};
+
+subtest 'turtle numeric U escaping' => sub {
+ open(my $fh, '<', \q['\\U0000006F']);
+ my $l = AtteanX::Parser::Turtle::Lexer->new($fh);
+ my $t = $l->get_token;
+ is($t->value, 'o');
+};
+
done_testing();
sub expect {
--
Alioth's /usr/local/bin/git-commit-notice on
/srv/git.debian.org/git/pkg-perl/packages/libattean-perl.git
_______________________________________________
Pkg-perl-cvs-commits mailing list
Pkg-perl-cvs-commits@lists.alioth.debian.org
http://lists.alioth.debian.org/cgi-bin/mailman/listinfo/pkg-perl-cvs-commits
