From a6d3f4fd829ec4cb88c9cb3616718c03e428f5c7 Mon Sep 17 00:00:00 2001 From: Jesse Luehrs Date: Thu, 27 Sep 2012 15:28:56 -0500 Subject: debugging --- lib/Text/Xslate/Syntax/Handlebars.pm | 33 +++++++++++++++++++++++++++++++++ 1 file changed, 33 insertions(+) (limited to 'lib') diff --git a/lib/Text/Xslate/Syntax/Handlebars.pm b/lib/Text/Xslate/Syntax/Handlebars.pm index 4fb230c..40aba9b 100644 --- a/lib/Text/Xslate/Syntax/Handlebars.pm +++ b/lib/Text/Xslate/Syntax/Handlebars.pm @@ -175,6 +175,39 @@ sub led_dot { return $dot; } +if (0) { + require Devel::STDERR::Indent; + my @stack; + for my $method (qw(statements statement expression_list expression)) { + before $method => sub { + warn "entering $method"; + push @stack, Devel::STDERR::Indent::indent(); + }; + after $method => sub { + pop @stack; + warn "leaving $method"; + }; + } + after advance => sub { + my $self = shift; + warn $self->token->id; + }; + around parse => sub { + my $orig = shift; + my $self = shift; + my $ast = $self->$orig(@_); + use Data::Dump; ddx($ast); + return $ast; + }; + around preprocess => sub { + my $orig = shift; + my $self = shift; + my $code = $self->$orig(@_); + warn $code; + return $code; + }; +} + __PACKAGE__->meta->make_immutable; no Any::Moose; -- cgit v1.2.3-54-g00ecf