SkipNullMembers.yqls 390 B

1234567891011121314
  1. (
  2. #comment
  3. (let config (DataSource 'config))
  4. (let res_sink (DataSink 'result))
  5. (let list (AsList
  6. (AsStruct '('key (Just (Uint32 '1))) '('value (String 'a)))
  7. (AsStruct '('key (Nothing (OptionalType (DataType 'Uint32)))) '('value (String 'a)))
  8. ))
  9. (let world (Write! world res_sink (Key) (SkipNullMembers list '('key)) '('('type))))
  10. (let world (Commit! world res_sink))
  11. (return world)
  12. )