general {
    funcon-term: 
      initialise-giving
      initialise-binding
      sequential(
        check-true is-equal(match(not true,pattern-any), map()),
        check-true is-equal(match([42],pattern-any), map()),
        check-true is-equal(match(abstraction null-value,pattern-any), map()),
        check-true is-equal(match(list(42),pattern-any), map()),
        check-true is-equal(match(tuple(42),pattern-any), map()),
        print"OK")
        ;
}

tests {
    result-term: null-value;
    standard-out: ["OK"];
}