lexer-02.testie

COPE the first practical network coding scheme which is developped on click

%info
Check lexical scoping of formals
%script

click-flatten A.click > AO_TOOL
click -qo- A.click > AO_USERLEVEL

click-flatten B.click > BO_TOOL
click -qo- B.click > BO_USERLEVEL

%file A.click
elementclass Foo {
$a |
   DriverManager($a);
}
elementclass Far {
$a, $b |
   Foo($b);
}
Far(wait_stop stop, stop);

%expect AO_TOOL AO_USERLEVEL
Far@1/Foo@1/DriverManager@1 :: DriverManager(stop);

%file B.click
elementclass Foo {
$a |
   elementclass Bar {
   $b |
      DriverManager($a);
   }
   elementclass Baz {
   $a |
      Idle; Bar($a);
   }
   Baz(fuckola);
}
Foo(stop);

%expect BO_TOOL BO_USERLEVEL
Foo@1/Baz@1/Idle@1 :: Idle;
Foo@1/Baz@1/Bar@2/DriverManager@1 :: DriverManager(stop);

%ignore
#.*