1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
|
local assert = require 'luassert'
local say = require("say")
local function greater_than(state, arguments)
local min, val = arguments[1], arguments[2]
return min < val
end
assert:register('assertion', 'greater_than', greater_than, 'assertion.greater_than.positive', 'assertion.greater_than.negative')
say:set_namespace("en")
say:set("assertion.greater_than.positive", "Expected %s < %s")
say:set("assertion.greater_than.negative", "Expected %s >= %s")
describe("abletonlink library", function()
local link = require 'abletonlink'
it("exports a _VERSION", function()
-- asset.is.equal('1.0.0', link._VERSION)
end)
it("can create and destroy link objects", function()
local l = link.create(120)
l:destroy()
assert.has.error(function() l:is_enabled() end)
end)
it("can be enabled and disabled", function()
local l = link.create(120)
assert.is_false(l:is_enabled())
l:enable()
assert.is_true(l:is_enabled())
l:enable(false)
assert.is_false(l:is_enabled())
l:enable(true)
assert.is_true(l:is_enabled())
end)
it("start/stop sync can be enabled and disabled", function()
local l = link.create(120)
assert.is_false(l:is_start_stop_sync_enabled())
l:enable_start_stop_sync()
assert.is_true(l:is_start_stop_sync_enabled())
l:enable_start_stop_sync(false)
assert.is_false(l:is_start_stop_sync_enabled())
l:enable_start_stop_sync(true)
assert.is_true(l:is_start_stop_sync_enabled())
end)
test("num_peers()", function()
local a, b = link.create(120), link.create(120)
assert.equal(0, a:num_peers())
assert.equal(0, b:num_peers())
a:enable()
b:enable()
-- stall a bit for connections to succeed
for i=1,10000 do
i = math.random()
end
assert.greater_than(0, a:num_peers())
assert.greater_than(0, b:num_peers())
end)
test("clock_micros()", function()
local l = link.create(120)
local last = 0
for i=1,10 do
local next = l:clock_micros()
assert.is.number(next)
assert.is.greater_than(last, next)
last = next
end
end)
describe("app state", function()
it("can be created and destroyed", function()
local s = link.create_session_state()
s:tempo()
s:destroy()
assert.has.error(function() s:tempo() end)
end)
it("can get/set tempo", function()
local s = link.create_session_state()
s:set_tempo(120, 0)
assert.is.equal(120, s:tempo())
s:set_tempo(90, 0)
assert.is.equal(90, s:tempo())
end)
end)
end)
|
