repositories
/
clean-tests.git
/ blob
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
history
|
raw
|
HEAD
a9
[clean-tests.git]
/
gen
/
test.icl
1
module test
2
3
import StdEnv
4
import StdGeneric
5
6
generic gen a :: a
7
8
gen{|Int|} = 0
9
gen{|OBJECT|} fa = OBJECT fa
10
11
:: BI =: BI Int
12
derive gen BI
13
14
//Start w = startEngine (viewInformation "" [ViewAs (\t->TtTag [] [Text t])] "bork") w
15
Start :: BI
16
Start = gen{|*|}