Swiss police are very relaxed when it comes to weed. Police have every right to search any person they feel looks suspicious. It does't happen to often. Mostly to young people who are looking shady. Particularly for underage drinking. I've never heard of a case foreigners being pick out for frisks.