### ----------------------------------------------------
### -- OO::Monitors
### -- Licenses: Artistic-2.0
### -- Authors: Jonathan Worthington
### -- File: t/lib/Test/Counter.rakumod
### ----------------------------------------------------
use OO::Monitors;

class TheExceptionWeExpect is Exception { }

monitor Test::Counter {
    has $!a = 0;

    method inc() {
        $!a++;
    }
    
    method current() {
        $!a
    }

    method deadly() {
        die TheExceptionWeExpect.new;
    }
}

# vim: expandtab shiftwidth=4


