blob: cf2253c9bc3d39dc801c94932582599e26064553 (
plain) (
blame)
1
2
3
4
5
6
7
8
9
10
11
12
13
|
(
#comment
(let config (DataSource 'config))
(let world (Configure! world config 'PureDataSource 'yt))
(let row1 (AsStruct '('key (String 'key1)) '('subkey (String '.)) '('value (String 'value1))))
(let row2 (AsStruct '('key (String 'key2)) '('subkey (String '.)) '('value (String 'value2))))
(let table1 (AsList row1 row2))
(let res_sink (DataSink 'result))
(let world (Write! world res_sink (Key) table1 '('('columns '('value 'subkey 'key)) '('type))))
(let world (Commit! world res_sink))
(return world)
)
|
