blob: 16cbb40fc0d474c11f1b01613b2884350e5ba05a (
plain)
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
|
#
# Test application
#
# Copyright © 2026 Samuel Lidén Borell <samuel@kodafritt.se>
#
# SPDX-License-Identifier: EUPL-1.2+ OR LGPL-2.1-or-later
#
CommandMain "app"
giveme
int number = param_with_default "-n" 1 "Some number"
MessageReporter! mr
end
main
# TODO report undefined classes
SomeClass sc = new
sc.voidfunc
sc.param_i 1234
OtherClass oc = new_with_number 123
assert oc.get_number == 123
oc.set_number 456
assert oc.get_number == 456
mr.begin_message "The number is: {}"
mr.add_int number
mr.report
end
|