runtime_make_code.sql 516 B

123456789101112131415
  1. /* postgres can not */
  2. /* syntax version 1 */
  3. select FormatCode(
  4. ListCode(
  5. AtomCode("1"),
  6. AsList(AtomCode("2"),AtomCode("3")),
  7. FuncCode("Func",
  8. AtomCode("4"),
  9. AsList(AtomCode("5"),AtomCode("6"))),
  10. LambdaCode(()->{ return AtomCode("7") }),
  11. LambdaCode(($x)->{ return FuncCode("-",$x) }),
  12. LambdaCode(($x,$y)->{ return FuncCode("*",$x,$y) }),
  13. LambdaCode(2, ($args)->{ return FuncCode("+",Unwrap($args[0]),Unwrap($args[1])) }),
  14. )
  15. );