tracks/perl6/exercises/clock/example.yaml in trackler-2.1.0.33 vs tracks/perl6/exercises/clock/example.yaml in trackler-2.1.0.34

@@ -21,7 +21,24 @@
         }
         when %*ENV<EXERCISM>.so { bail-out "no case for property '$case<property>'" }
       }
     }
   }
+  
   todo 'optional test' unless %*ENV<EXERCISM>;
   is ::($exercise).new(:0hour,:0minute).?add-minutes(65).?time, '01:05', 'add-minutes method can be chained';
+
+unit: class
+example: |
+  has Int:D $.hour = 0;
+  has Int:D $.minute = 0;
+  
+  method time {
+    sprintf '%02d:%02d', ($!hour + $!minute div 60) % 24, $!minute % 60;
+  }
+  
+  method add-minutes (Int:D $min) {
+    $!minute += $min and return self;
+  }
+stub: |
+  has $.hour;
+  has $.minute;