- "-X" , A.Unit O.clear, help_X;
- "-g" , A.Unit set_g, help_g;
- "-i" , A.Unit out_i, help_i;
- "-p" , A.Unit set_p, help_p;
+ "-L" , A.Set O.debug_lexer, help_L;
+ "-X" , A.Unit clear , help_X;
+ "-b" , A.String out_b , help_b;
+ "-f" , A.Unit out_f , help_f;
+ "-g" , A.Unit set_g , help_g;
+ "-i" , A.Unit set_i , help_i;
+ "-oc", A.Unit out_oc, help_oc;