Singleton

// Klasa Database definiuje metodę `getInstance` która pozwala
// klientom na dostęp do tej samej instancji połączenia
// bazodanowego z dowolnego miejsca w programie.
class Database is
    // Pole służące przechowywaniu instancji singleton powinno
    // być zadeklarowane jako statyczne.
    private static field instance: Database

    // Konstruktor singletona powinien zawsze być zadeklarowany
    // jako prywatny, aby uniemożliwić wywoływanie na klasie
    // operatora `new`.
    private constructor Database() is
        // Jakiś kod inicjalizacyjny, na przykład faktyczne
        // nawiązanie połączenia z serwerem bazy danych.
        // ...

    // Statyczna metoda kontrolująca dostęp do instancji
    // singletona.
    public static method getInstance() is
        if (Database.instance == null) then
            acquireThreadLock() and then
                // Trzeba się upewnić, że instancja nie została
                // już zainicjalizowana przez inny wątek w
                // czasie gdy ten wątek oczekiwał na zwolnienie
                // blokady.
                if (Database.instance == null) then
                    Database.instance = new Database()
        return Database.instance

    // Wreszcie — każdy singleton powinien definiować jakąś
    // logikę biznesową którą można wywołać z instancji
    // singletona.
    public method query(sql) is
        // Przykładowo, wszystkie zapytania do bazy danych w
        // całej aplikacji muszą przejść przez tę metodę. Możesz
        // tu więc umieścić kod pamięci podręcznej lub kontroli
        // przepustowości.
        // ...

class Application is
    method main() is
        Database foo = Database.getInstance()
        foo.query("SELECT ...")
        // ...
        Database bar = Database.getInstance()
        bar.query("SELECT ...")
        // Zmienna `bar` będzie zawierała ten sam obiekt, co
        // zmienna `foo`.