File: variables_block.block

package info (click to toggle)
msc-generator 8.6.4-2
  • links: PTS, VCS
  • area: main
  • in suites: forky, sid
  • size: 180,484 kB
  • sloc: cpp: 129,931; yacc: 23,655; ansic: 7,464; sh: 5,026; makefile: 948
file content (21 lines) | stat: -rw-r--r-- 327 bytes parent folder | download | duplicates (3) 
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
 
defproc proba($c){
    box $$ {
        box $a;    
        box c;
        $a->c;
        set $b = b;
        box $b;
        $a->$b;
        if $c<>$a then
            box $c;
        $c->$a;
    }
    
}
use label="\*", margin=10;
set $a=a;
set $a;
set $a=;
replay proba(cc);
set $a=d;
replay proba($a);