-++$a;
-is($c, 2, 'set : increment');
-is($a, $n + 1, 'set : increment correctly');
+check { $a = $n } { set => 1 }, 'assign';
+is $a, $n, 'set: assign correctly';
+
+check { ++$a } { set => 1 }, 'increment';
+is $a, $n + 1, 'set: increment correctly';