home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Amiga ISO Collection
/
AmigaUtilCD2.iso
/
Programming
/
E
/
TFF-A32R.LZX
/
AmigaE3.2a
/
Src
/
Guide
/
tree-use.e
< prev
next >
Encoding:
Amiga
Atari
Commodore
DOS
FM Towns/JPY
Macintosh
Macintosh JP
NeXTSTEP
RISC OS/Acorn
UTF-8
Wrap
Text File
|
1994-12-14
|
313 b
|
20 lines
MODULE '*tree'
PROC main()
DEF t:PTR TO integer_tree
NEW t.create(10)
t.add(-10)
t.add(3)
t.add(5)
t.add(-1)
t.add(1)
WriteF('t has \d nodes, with \d leaves: ',
t.nodes(), t.leaves())
t.leaves(TRUE)
WriteF('\n')
WriteF('Contents of t: ')
t.print()
WriteF('\n')
END t
ENDPROC