suzanne.soy/gui
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

commited a test

Browse Source 
original commit: c3eb3402545c5e15c214ce09f51cd1a36e6accc0
This commit is contained in:
Mike MacHenry 2004-10-13 19:56:16 +00:00
parent 484185bce3
commit 1366d41313
1 changed files with 8 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

8
collects/embedded-gui/private/tests/target-not-object.ss Normal file
View File

@ -0,0 +1,8 @@
(require
(lib "class.ss")
(lib "embedded-gui.ss" "embedded-gui"))
(let* ([pb (new aligned-pasteboard%)]
[interactions (new vertical-alignment% (parent pb))])
(send interactions map-to-list (lambda (x) x))
#t)