diff options
author | bscan <10503608+bscan@users.noreply.github.com> | 2023-10-08 12:29:54 -0400 |
---|---|---|
committer | bscan <10503608+bscan@users.noreply.github.com> | 2023-10-08 12:29:54 -0400 |
commit | b10cf7b92e4cd133acf8e117f891f2bbfe759589 (patch) | |
tree | 6aeca8b40fce8b878ee0f06b37b142e94fcf04a4 /testWorkspace | |
parent | 103e8f3ae76ccfe7dc47ebba82f36bc2f8fca4e3 (diff) | |
download | PerlNavigator-b10cf7b92e4cd133acf8e117f891f2bbfe759589.zip |
Large refactor. Moving tagging from Perl to TypeScript. Leverages TextMate instead of Text::Balanced for finding scopes
Diffstat (limited to 'testWorkspace')
-rw-r--r-- | testWorkspace/mainTest.pl | 15 |
1 files changed, 14 insertions, 1 deletions
diff --git a/testWorkspace/mainTest.pl b/testWorkspace/mainTest.pl index 1720b26..491fdaf 100644 --- a/testWorkspace/mainTest.pl +++ b/testWorkspace/mainTest.pl @@ -52,6 +52,7 @@ print %my_hash; print $hash_ref->{"Five"}; print $$hash_ref{"Five"}; # print $üτfⅷ; + print MYCONSTANT; INIT { @@ -115,7 +116,7 @@ my $otherObj = MyLib::MyOtherClass->new(); $otherObj->unique_method_name(); $otherObj->duplicate_method_name(); -my $unknownObj = $otherObj; # Type hints: $unknownObj isa MyLib::MyOtherClass +my $unknownObj = $otherObj; # Type hints: $unknownObj2 isa MyLib::MyOtherClass $unknownObj->duplicate_method_name(); my $mooObj = MyLib::MooClass->new(); @@ -161,6 +162,18 @@ sub same_file_package_sub { print "In same_file_package_sub\n"; } +package ParseTest { + my $foo ; # Unmatched } + $foo = " + Quoted multiline } + "; + $foo =~ s/\}//g; # Regexed } + + sub ParseSubTest { + + } + +} package Foo { use Moo; |