diff --git a/tutorial/Wmml.pmod b/tutorial/Wmml.pmod
index 2482595634000dd5cd4077f924e5281f5f2c1f32..c4eafe57d4f488d90f480ec982b51705412f065d 100644
--- a/tutorial/Wmml.pmod
+++ b/tutorial/Wmml.pmod
@@ -344,7 +344,8 @@ object(Tag) parse_pike_code(string x,
       if(x[e+1..e+1]=="*")
       {
 	p=e++;
-	while(x[e..e+1]!="*/") e++;
+	while(!(< "", "*/" >)[x[e..e+1]])
+	  e++;
 	e++;
 	ret+=({ Tag("ex_comment",([]), pos+e, ({ x[p..e]}) ) }); 
 	break;