Changeset 23023 for src

Timestamp:

11/15/08 13:43:33 (8 weeks ago)

Author:

azawawi

Message:

[STD_syntax_highlight] highlight scalar, array and hash variables

Location:

src/perl6

Files:

• STD_syntax_highlight (modified) (3 diffs)
• STD_syntax_highlight.ansi (modified) (1 diff)
• STD_syntax_highlight.css (modified) (1 diff)

src/perl6/STD_syntax_highlight

@@ -5 +5 @@
 use warnings;
 use utf8;
-use feature qw(say);
+use feature qw(say switch);
 use English;
 use Getopt::Long;
@@ -445 +445 @@
     my ($process_buffer,%colors) = @ARG;
 
-    my ($last_tree,$buffer) = ("","");
+    my ($last_tree,$buffer, $last_type) = ("","","");
     for my $i (0 .. @loc-1) {
         next unless defined $loc[$i];
@@ -474 +474 @@
                     } elsif($parser->is_routine($buffer)) {
                         $rule_to_color = '_routine';
-                    } 
-                }              
+                    } elsif($last_type ne '') {
+                        $rule_to_color = $last_type;
+                        $last_type = '';
+                    }
+                } elsif($last_tree =~ /sigil/) {
+                    given($buffer) {
+                        when ('$') { $last_type = '_scalar'; }
+                        when ('@') { $last_type = '_array'; }
+                        when ('%') { $last_type = '_hash'; }
+                        default { $last_type = ''; }
+                    }      
+                    $rule_to_color = $last_type if $last_type ne ''; 
+                }             
             }
             #now delegate printing to a callback

src/perl6/STD_syntax_highlight.ansi

@@ -19 +19 @@
 _routine=bold red
 _type=bold blue
+_scalar=bold blue
+_array=bold magenta
+_hash=bold yellow
 _comment=bold green

src/perl6/STD_syntax_highlight.css

@@ -19 +19 @@
 ._routine { color: DarkRed; font-weight: bold; }
 ._type { color: DarkBlue; font-weight: bold; }
+._scalar { color: DarkBlue; font-weight: bold; }
+._array { color: Brown; font-weight: bold; }
+._hash { color: DarkOrange; font-weight: bold; }
 ._comment { color: DarkGreen; font-weight: bold; }