for ( s = 0; s < splen; ++s ) {
                pname = spatterns[ s ];
                pattern = ppatterns[ pname ];
                // check if pattern exists
                if ( ! pattern ) continue;