# ext_all gets tcindex mask and shift order right -----------------------------
tcc -xif:err 2>&1 -Xx,all | egrep 'action|match'
dsmark (indices 4) {
    class (0) if raw[0] == 0;
    class (1) if raw[0] == 1;
    class (2) if raw[0] == 2;
    class (3) if raw[0] == 3;
    prio {
	tcindex (mask 2,shift 1) {
	    class on (0) {
		prio {
		    tcindex (mask 1,shift 0) {
			class on (0);
			class on (1);
		    }
		}
	    }
	    class on (1) {
		prio {
		    tcindex (mask 1,shift 0) {
			class on (0);
			class on (1);
		    }
		}
	    }
	}
    }
}
EOF
action 4 = unspec
action 3 = class 1:3,2:2,4:2
action 2 = class 1:2,2:2,4:1
action 1 = class 1:1,2:1,3:2
action 0 = class 1:0,2:1,3:1
match 0:0:8=0x00 action 0
match 0:0:8=0x01 action 1
match 0:0:8=0x02 action 2
match 0:0:8=0x03 action 3
match action 4
# tcc/param.c:param_print survives childless elements -------------------------
tcc -xif:err 2>&1 -Xx,all | grep '^qdisc'
dsmark (indices 1) {
    fifo (limit 5p);
}
EOF
qdisc 2 = fifo plimit 5
qdisc 1 = dsmark indices 1
