tp_plus 0.0.87 → 0.0.88
This diff represents the content of publicly available package versions that have been released to one of the supported registries. The information contained in this diff is provided for informational purposes only and reflects changes between package versions as they appear in their respective public registries.
- checksums.yaml +4 -4
- data/README.md +87 -87
- data/Rakefile +35 -35
- data/bin/tpp +92 -92
- data/lib/tp_plus/interpreter.rb +153 -152
- data/lib/tp_plus/namespace.rb +66 -66
- data/lib/tp_plus/nodes/abort_node.rb +9 -9
- data/lib/tp_plus/nodes/acc_node.rb +24 -19
- data/lib/tp_plus/nodes/address_node.rb +22 -22
- data/lib/tp_plus/nodes/argument_node.rb +20 -20
- data/lib/tp_plus/nodes/assignment_node.rb +52 -52
- data/lib/tp_plus/nodes/base_node.rb +9 -9
- data/lib/tp_plus/nodes/call_node.rb +34 -34
- data/lib/tp_plus/nodes/case_condition_node.rb +26 -26
- data/lib/tp_plus/nodes/case_node.rb +33 -33
- data/lib/tp_plus/nodes/comment_node.rb +18 -18
- data/lib/tp_plus/nodes/conditional_node.rb +60 -60
- data/lib/tp_plus/nodes/definition_node.rb +22 -22
- data/lib/tp_plus/nodes/digit_node.rb +22 -22
- data/lib/tp_plus/nodes/empty_stmt_node.rb +9 -9
- data/lib/tp_plus/nodes/eval_node.rb +13 -13
- data/lib/tp_plus/nodes/expression_node.rb +71 -68
- data/lib/tp_plus/nodes/for_node.rb +20 -20
- data/lib/tp_plus/nodes/header_node.rb +27 -27
- data/lib/tp_plus/nodes/indirect_node.rb +27 -27
- data/lib/tp_plus/nodes/inline_conditional_node.rb +36 -36
- data/lib/tp_plus/nodes/io_method_node.rb +55 -55
- data/lib/tp_plus/nodes/io_node.rb +31 -31
- data/lib/tp_plus/nodes/jpos_node.rb +13 -13
- data/lib/tp_plus/nodes/jump_node.rb +23 -23
- data/lib/tp_plus/nodes/label_definition_node.rb +21 -21
- data/lib/tp_plus/nodes/lpos_node.rb +13 -13
- data/lib/tp_plus/nodes/motion_node.rb +62 -62
- data/lib/tp_plus/nodes/namespace_node.rb +16 -16
- data/lib/tp_plus/nodes/namespaced_var_node.rb +38 -38
- data/lib/tp_plus/nodes/numreg_node.rb +26 -26
- data/lib/tp_plus/nodes/offset_node.rb +27 -27
- data/lib/tp_plus/nodes/operator_node.rb +78 -80
- data/lib/tp_plus/nodes/paren_expression_node.rb +17 -17
- data/lib/tp_plus/nodes/pause_node.rb +9 -9
- data/lib/tp_plus/nodes/position_data_node.rb +66 -66
- data/lib/tp_plus/nodes/position_node.rb +26 -26
- data/lib/tp_plus/nodes/posreg_node.rb +64 -64
- data/lib/tp_plus/nodes/raise_node.rb +13 -13
- data/lib/tp_plus/nodes/real_node.rb +27 -27
- data/lib/tp_plus/nodes/return_node.rb +9 -9
- data/lib/tp_plus/nodes/set_skip_node.rb +14 -14
- data/lib/tp_plus/nodes/skip_node.rb +22 -22
- data/lib/tp_plus/nodes/speed_node.rb +29 -29
- data/lib/tp_plus/nodes/string_node.rb +13 -13
- data/lib/tp_plus/nodes/string_register_node.rb +26 -26
- data/lib/tp_plus/nodes/termination_node.rb +29 -23
- data/lib/tp_plus/nodes/terminator_node.rb +16 -16
- data/lib/tp_plus/nodes/time_node.rb +24 -24
- data/lib/tp_plus/nodes/timer_method_node.rb +33 -33
- data/lib/tp_plus/nodes/timer_node.rb +16 -16
- data/lib/tp_plus/nodes/unary_expression_node.rb +40 -39
- data/lib/tp_plus/nodes/units_node.rb +20 -20
- data/lib/tp_plus/nodes/use_node.rb +21 -21
- data/lib/tp_plus/nodes/user_alarm_node.rb +16 -16
- data/lib/tp_plus/nodes/var_method_node.rb +23 -23
- data/lib/tp_plus/nodes/var_node.rb +39 -39
- data/lib/tp_plus/nodes/vision_register_node.rb +22 -22
- data/lib/tp_plus/nodes/wait_for_node.rb +57 -50
- data/lib/tp_plus/nodes/wait_until_node.rb +61 -61
- data/lib/tp_plus/nodes/while_node.rb +40 -40
- data/lib/tp_plus/parser.rb +1749 -1749
- data/lib/tp_plus/scanner.rb +295 -295
- data/lib/tp_plus/token.rb +101 -101
- data/lib/tp_plus/version.rb +3 -3
- data/lib/tp_plus.rb +72 -72
- data/test/test_helper.rb +5 -5
- data/test/tp_plus/test_interpreter.rb +1378 -1372
- data/test/tp_plus/test_parser.rb +502 -502
- data/test/tp_plus/test_scanner.rb +591 -591
- data/tp_plus.gemspec +31 -31
- metadata +4 -3
@@ -1,50 +1,57 @@
|
|
1
|
-
module TPPlus
|
2
|
-
module Nodes
|
3
|
-
class WaitForNode < BaseNode
|
4
|
-
def initialize(time, units)
|
5
|
-
@time = time
|
6
|
-
@units = units
|
7
|
-
end
|
8
|
-
|
9
|
-
def units_valid?
|
10
|
-
["s","ms"].include?(@units)
|
11
|
-
end
|
12
|
-
|
13
|
-
# 2 decimal places and remove leading 0s
|
14
|
-
def time(context)
|
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
|
-
|
1
|
+
module TPPlus
|
2
|
+
module Nodes
|
3
|
+
class WaitForNode < BaseNode
|
4
|
+
def initialize(time, units)
|
5
|
+
@time = time
|
6
|
+
@units = units
|
7
|
+
end
|
8
|
+
|
9
|
+
def units_valid?
|
10
|
+
["s","ms"].include?(@units)
|
11
|
+
end
|
12
|
+
|
13
|
+
# 2 decimal places and remove leading 0s
|
14
|
+
def time(context)
|
15
|
+
case @time
|
16
|
+
when DigitNode, RealNode
|
17
|
+
case @units
|
18
|
+
when "s"
|
19
|
+
return ("%.2f(sec)" % @time.eval(context)).sub(/^0+/, "")
|
20
|
+
when "ms"
|
21
|
+
return ("%.2f(sec)" % (@time.eval(context).to_f / 1000)).sub(/^0+/, "")
|
22
|
+
end
|
23
|
+
when VarNode
|
24
|
+
case @units
|
25
|
+
when "s"
|
26
|
+
if @time.constant?
|
27
|
+
return ("%.2f(sec)" % @time.eval(context)).sub(/^0+/, "")
|
28
|
+
else
|
29
|
+
return @time.eval(context)
|
30
|
+
end
|
31
|
+
else
|
32
|
+
raise "Indirect values can only use seconds ('s') as the units argument"
|
33
|
+
end
|
34
|
+
else
|
35
|
+
raise "PANIC"
|
36
|
+
end
|
37
|
+
end
|
38
|
+
|
39
|
+
def expression
|
40
|
+
case @units
|
41
|
+
when "s"
|
42
|
+
@time
|
43
|
+
when "ms"
|
44
|
+
e = ExpressionNode.new(@time,"/",DigitNode.new(1000))
|
45
|
+
e.grouped = true
|
46
|
+
e
|
47
|
+
end
|
48
|
+
end
|
49
|
+
|
50
|
+
def eval(context)
|
51
|
+
raise "Invalid units" unless units_valid?
|
52
|
+
|
53
|
+
"WAIT #{time(context)}"
|
54
|
+
end
|
55
|
+
end
|
56
|
+
end
|
57
|
+
end
|
@@ -1,61 +1,61 @@
|
|
1
|
-
module TPPlus
|
2
|
-
module Nodes
|
3
|
-
class WaitUntilNode < BaseNode
|
4
|
-
def initialize(expression, timeout_options)
|
5
|
-
@expression = expression
|
6
|
-
@timeout_options = timeout_options || {}
|
7
|
-
end
|
8
|
-
|
9
|
-
def timeout(context)
|
10
|
-
return "" if @timeout_options[:label].nil?
|
11
|
-
|
12
|
-
" TIMEOUT,LBL[#{context.labels[@timeout_options[:label].to_sym]}]"
|
13
|
-
end
|
14
|
-
|
15
|
-
def val(context)
|
16
|
-
value_node = @timeout_options[:timeout][0]
|
17
|
-
units = @timeout_options[:timeout][1]
|
18
|
-
|
19
|
-
if value_node.is_a?(VarNode)
|
20
|
-
value = value_node.eval(context)
|
21
|
-
|
22
|
-
case units
|
23
|
-
when "s"
|
24
|
-
value = "#{value}*100"
|
25
|
-
when "ms"
|
26
|
-
value = "#{value}*.1"
|
27
|
-
else
|
28
|
-
raise "invalid units"
|
29
|
-
end
|
30
|
-
else
|
31
|
-
value = value_node.eval(context).to_i
|
32
|
-
|
33
|
-
case units
|
34
|
-
when "s"
|
35
|
-
value = (value * 100).to_i
|
36
|
-
when "ms"
|
37
|
-
value = (value * 0.1).to_i
|
38
|
-
else
|
39
|
-
raise "invalid units"
|
40
|
-
end
|
41
|
-
end
|
42
|
-
|
43
|
-
value
|
44
|
-
end
|
45
|
-
|
46
|
-
def wait_timeout(context)
|
47
|
-
return "" if @timeout_options[:timeout].nil?
|
48
|
-
|
49
|
-
"$WAITTMOUT=(#{val(context)}) ;\n"
|
50
|
-
end
|
51
|
-
|
52
|
-
def string_value(context)
|
53
|
-
"(#{@expression.eval(context)})"
|
54
|
-
end
|
55
|
-
|
56
|
-
def eval(context)
|
57
|
-
"#{wait_timeout(context)}WAIT #{string_value(context)}#{timeout(context)}"
|
58
|
-
end
|
59
|
-
end
|
60
|
-
end
|
61
|
-
end
|
1
|
+
module TPPlus
|
2
|
+
module Nodes
|
3
|
+
class WaitUntilNode < BaseNode
|
4
|
+
def initialize(expression, timeout_options)
|
5
|
+
@expression = expression
|
6
|
+
@timeout_options = timeout_options || {}
|
7
|
+
end
|
8
|
+
|
9
|
+
def timeout(context)
|
10
|
+
return "" if @timeout_options[:label].nil?
|
11
|
+
|
12
|
+
" TIMEOUT,LBL[#{context.labels[@timeout_options[:label].to_sym]}]"
|
13
|
+
end
|
14
|
+
|
15
|
+
def val(context)
|
16
|
+
value_node = @timeout_options[:timeout][0]
|
17
|
+
units = @timeout_options[:timeout][1]
|
18
|
+
|
19
|
+
if value_node.is_a?(VarNode)
|
20
|
+
value = value_node.eval(context)
|
21
|
+
|
22
|
+
case units
|
23
|
+
when "s"
|
24
|
+
value = "#{value}*100"
|
25
|
+
when "ms"
|
26
|
+
value = "#{value}*.1"
|
27
|
+
else
|
28
|
+
raise "invalid units"
|
29
|
+
end
|
30
|
+
else
|
31
|
+
value = value_node.eval(context).to_i
|
32
|
+
|
33
|
+
case units
|
34
|
+
when "s"
|
35
|
+
value = (value * 100).to_i
|
36
|
+
when "ms"
|
37
|
+
value = (value * 0.1).to_i
|
38
|
+
else
|
39
|
+
raise "invalid units"
|
40
|
+
end
|
41
|
+
end
|
42
|
+
|
43
|
+
value
|
44
|
+
end
|
45
|
+
|
46
|
+
def wait_timeout(context)
|
47
|
+
return "" if @timeout_options[:timeout].nil?
|
48
|
+
|
49
|
+
"$WAITTMOUT=(#{val(context)}) ;\n"
|
50
|
+
end
|
51
|
+
|
52
|
+
def string_value(context)
|
53
|
+
"(#{@expression.eval(context)})"
|
54
|
+
end
|
55
|
+
|
56
|
+
def eval(context)
|
57
|
+
"#{wait_timeout(context)}WAIT #{string_value(context)}#{timeout(context)}"
|
58
|
+
end
|
59
|
+
end
|
60
|
+
end
|
61
|
+
end
|
@@ -1,40 +1,40 @@
|
|
1
|
-
module TPPlus
|
2
|
-
module Nodes
|
3
|
-
class WhileNode < BaseNode
|
4
|
-
def initialize(condition_node, block)
|
5
|
-
@condition_node = condition_node
|
6
|
-
@block = block.flatten.reject {|n| n.is_a?(TerminatorNode) }
|
7
|
-
end
|
8
|
-
|
9
|
-
def top_label(context)
|
10
|
-
@top_label ||= context.next_label
|
11
|
-
end
|
12
|
-
|
13
|
-
def bottom_label(context)
|
14
|
-
@bottom_label ||= context.next_label
|
15
|
-
end
|
16
|
-
|
17
|
-
def parens(s, context)
|
18
|
-
return s unless @condition_node.requires_mixed_logic?(context)
|
19
|
-
|
20
|
-
"(#{s})"
|
21
|
-
end
|
22
|
-
|
23
|
-
def if_statement(context)
|
24
|
-
"IF #{parens(condition(context), context)},JMP LBL[#{bottom_label(context)}] ;\n"
|
25
|
-
end
|
26
|
-
|
27
|
-
def condition(context)
|
28
|
-
@condition_node.eval(context, opposite: true)
|
29
|
-
end
|
30
|
-
|
31
|
-
def block(context)
|
32
|
-
@block.inject("") {|s,n| s << "#{n.eval(context)} ;\n" }
|
33
|
-
end
|
34
|
-
|
35
|
-
def eval(context)
|
36
|
-
"LBL[#{top_label(context)}] ;\n#{if_statement(context)}#{block(context)}JMP LBL[#{top_label(context)}] ;\nLBL[#{bottom_label(context)}]"
|
37
|
-
end
|
38
|
-
end
|
39
|
-
end
|
40
|
-
end
|
1
|
+
module TPPlus
|
2
|
+
module Nodes
|
3
|
+
class WhileNode < BaseNode
|
4
|
+
def initialize(condition_node, block)
|
5
|
+
@condition_node = condition_node
|
6
|
+
@block = block.flatten.reject {|n| n.is_a?(TerminatorNode) }
|
7
|
+
end
|
8
|
+
|
9
|
+
def top_label(context)
|
10
|
+
@top_label ||= context.next_label
|
11
|
+
end
|
12
|
+
|
13
|
+
def bottom_label(context)
|
14
|
+
@bottom_label ||= context.next_label
|
15
|
+
end
|
16
|
+
|
17
|
+
def parens(s, context)
|
18
|
+
return s unless @condition_node.requires_mixed_logic?(context)
|
19
|
+
|
20
|
+
"(#{s})"
|
21
|
+
end
|
22
|
+
|
23
|
+
def if_statement(context)
|
24
|
+
"IF #{parens(condition(context), context)},JMP LBL[#{bottom_label(context)}] ;\n"
|
25
|
+
end
|
26
|
+
|
27
|
+
def condition(context)
|
28
|
+
@condition_node.eval(context, opposite: true)
|
29
|
+
end
|
30
|
+
|
31
|
+
def block(context)
|
32
|
+
@block.inject("") {|s,n| s << "#{n.eval(context)} ;\n" }
|
33
|
+
end
|
34
|
+
|
35
|
+
def eval(context)
|
36
|
+
"LBL[#{top_label(context)}] ;\n#{if_statement(context)}#{block(context)}JMP LBL[#{top_label(context)}] ;\nLBL[#{bottom_label(context)}]"
|
37
|
+
end
|
38
|
+
end
|
39
|
+
end
|
40
|
+
end
|