repositories
/
clean-tests.git
/ blob
commit
grep
author
committer
pickaxe
?
search:
re
98f7d23477e36eca52157b52cca90f5c431f1c7f
[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{|*|}