🚀 go-pugleaf

In article <20372@bellcore.bellcore.com> sjs@bellcore.com (Stan Switzer) writes:
>> >"What's bigger than a toaster?"
>> >	"The source for the X-Windows version of 'Hello World'."
>> >"What's bigger than a house?"
>> >	"The source for the X-Windows version of 'Hello World'."
>> >"What's bigger than a major Interstate?"
>> >	"The source for the X-Windows version of 'Hello World'."
>> "What's bigger than the source for the X-Windows version of 'Hello World'?"
>>      "The source for the Microsoft Windows version of 'Hello World'."
>
>"What's eight lines long?"
>     "The source to the NeWS version of 'Hello World'."

"What's six lines long?"
	The source to the WINTERP version of 'Hello World'.

WINTERP is an XLISP interface to the Motif widget set. Loading the
following 6 line expression into WINTERP's lisp server contradicts the
above statements claiming that a 'Hello World' program in X windows is
large.

   (let* ((top_w (send TOP_LEVEL_SHELL_WIDGET_CLASS :new))
          (but_w (send XM_PUSH_BUTTON_WIDGET_CLASS :new :managed top_w
                       :XMN_LABEL_STRING "hello world")))
     (send but_w :add_callback :XMN_ARM_CALLBACK '()
           '((format t "hello world\n")))
     (send top_w :realize))

-------------------------------------------------------------------------------
	    Niels Mayer -- hplabs!mayer -- mayer@hplabs.hp.com
		  Human-Computer Interaction Department
		       Hewlett-Packard Laboratories
			      Palo Alto, CA.
				   *