File: mz-test.e

package info (click to toggle)
entity 1.0.1-8
  • links: PTS
  • area: main
  • in suites: etch, etch-m68k
  • size: 5,604 kB
  • ctags: 5,394
  • sloc: ansic: 64,242; sh: 7,377; makefile: 776; perl: 319
file content (24 lines) | stat: -rw-r--r-- 697 bytes parent folder | download | duplicates (3)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
<object default-lang="mzscheme">
  <window ondelete="entity:exit">
  <button name="enode-test"
  	    label="Basic ENode Object Test"
  	    onclick="enode-test"/>
  <button name="newchild-test"
  	    label="Create New Child Test"
  	    onclick="newchild-test"/>
  <button name="call-test"
  	    label="Call function test"
  	    onclick="call-test"/>
  <button name="search-test"
  	    label="Node Search functions Test"
  	    onclick="search-test"/>
  <button name="xml-test"
            label="XML function test"
  	    onclick="xml-test"/>
  <button name="crash-test"
            label="Crash test"
  	    onclick="crash-test"/>
  </window>
  <include file="mz-test.scm"/>
</object>