RosettaCodeData/Task/Singleton/Objeck/singleton.objeck

class Singleton {
  @singleton : static : Singleton;

  New : private () {
  }

  function : GetInstance() ~ Singleton {
    if(@singleton <> Nil) {
      @singleton := Singleton->New();
    };

    return @singleton;
  }

  method : public : DoStuff() ~ Nil {
    ...
  }
}