tton alt-button other-button)
    (#/release title)
    (#/release msg)
    (#/release default-button)
    (#/release other-button)))
    </pre>

    <p>Now we can create an instance of the Greeter class and use it
    as the button's target:</p>

    <pre>
(setf my-greeter (#/init (#/alloc greeter)))
#&lt;GREETER &lt;Greeter: 0x136c58e0&gt; (#x136C58E0)&gt;

(#/setTarget: my-button my-greeter)
NIL

(#/setAction: my-button (@SELECTOR "greet:"))
NIL
    </pre>

    <p>Now, if you click the button, an Alert p