Changeset 21213 for misc/pixie/pixie_actions5

Timestamp:

07/04/08 13:39:38 (5 months ago)

Author:

pmurias

Message:

[pixie] arrays are marked in the dumps, stranger token names work more often

Files:

• misc/pixie/pixie_actions5 (modified) (2 diffs)

misc/pixie/pixie_actions5

@@ -1 +1 @@
 ### comp_unit 
 make (IRx1::CompUnit->new(statements=>$_->{statementlist}->item))
+### block 
+make (IRx1::Block->new(statements=>$_->{statementlist}->item))
 ### statementlist 
- make ([map { ref $_->item ? $_->item : '#' . $_->item } @{$_->{statement}}])
+ make ([map { ref $_->item ? $_->item : do {(my $tmp = $_->item) =~ s/^^/#todo: /mg;$tmp}} @{$_->{statement}}])
 ### statement control
 make ($_->{statement_control}->item) 
@@ -10 +12 @@
 ### statement_control:use 
 make(IRx1::Use->new(module_name=>$_->{module_name}->item))
+### statement_control:if 
+make (IRx1::Cond->new(clauses=>[EXPR($_->{EXPR}),$_->{pblock}{block}->item],default=>$_->{else} ? $_->{else}->item : undef))
 ### noun