alv-lib/string.moon


1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17

import PureOp, Constant, Input, T, val, evt from require 'alv.base'

any = val! / evt!

str = Constant.meta
  meta:
    name: 'str'
    summary: "Concatenate/stringify values."
    examples: { '(.. v1 [v2…])', '(str v1 [v2…])' }
  value: class extends PureOp
    pattern: any\rep 1, nil
    type: T.str
    tick: => @out\set table.concat [tostring i! for i in *@inputs]

{
  :str, '..': str
}