patch c074e25fdf925ae76c798e8303f50d1509e2ac79

Author: Enrique D. Bosch <presidev@AT@gmail.com>

Date: Thu Sep 7 00:08:44 CEST 2017

* Simplify or, and procs

-proc and args { set a 1; foreach b $args { set a [ expr $a && $b ]; if { !$a } { return 0 } }; return $a }

-proc or args { set a 0; foreach b $args { set a [ expr $a || $b ]; if { $a } { return 1 } }; return $a }

+proc or args { foreach x $args { if { $x } { return 1 } }; return 0 }

+proc and args { foreach x $args { if { $x } continue { return 0 } }; return 1 }