12 lines
145 B
Plaintext
12 lines
145 B
Plaintext
(program
|
|
(struct Foo
|
|
[(:= color float4)])
|
|
|
|
(struct Bar
|
|
[(:= t Foo)])
|
|
|
|
(fun vertex vs_main
|
|
[]
|
|
(:= f Foo)
|
|
(:= b Bar)
|
|
(= b.t f))) |