Searched refs:deparsed (Results 1 - 2 of 2) sorted by relevance

/osnet-11/usr/src/cmd/perl/5.8.4/distrib/ext/B/t/
H A Ddeparse.t56 my $deparsed = $deparse->coderef2text( $coderef );
63 my $ok = ($deparsed =~ /^\{\s*$regex\s*\}$/);
71 $deparsed =~ s/^/# /mg;
72 print "$deparsed\n";
/osnet-11/usr/src/cmd/perl/5.8.4/distrib/ext/B/B/
H A DDeparse.pm107 # output is just the deparsed code. (a change to O.pm in fact)
159 # op/taint 29 - "use re 'taint'" deparsed in the wrong place wrt. block open
160 # op/tiehandle compile - "use strict" deparsed in the wrong place
201 # CV for current sub (or main program) being deparsed
209 # COP for statement being deparsed
212 # name of the current package for deparsed code
223 # deparsed (or at least put into subs_todo)
230 # Keeps track of fully qualified names of all deparsed subs.
1079 # any subroutine declarations to the deparsed ops, otherwise we
4207 deparsed a
[all...]

Completed in 31 milliseconds