diff --git a/miscellaneous/suckless-conf/examples/pm/m1.ss b/miscellaneous/suckless-conf/examples/pm/m1.ss
index 5a90006b..726b2a96 100644
--- a/miscellaneous/suckless-conf/examples/pm/m1.ss
+++ b/miscellaneous/suckless-conf/examples/pm/m1.ss
@@ -48,3 +48,25 @@
   ( _ (print "whatever") )
 )
 
+(newline)
+
+(match 100
+  ( [int? _] (print okay) )
+  ( _  (print not-okay) )
+)
+
+(newline)
+
+(match 100
+  ( [? a [int? _] ] (print okay :: a) )
+  ( _  (print not-okay) )
+)
+
+(newline)
+
+(match :aaa
+  ( [? a [int? _] ] (print not-okay :: a) )
+  ( _  (print okay) )
+)
+
+