blob: 3a5f7c70aaea5dff6801ced320604e98d0572bd3 (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
|
o<change_min> sub
(debug, change_min: loaded tool=#<current_tool> selected_pocket=#<selected_pocket>)
; show aborting a change on tool 2 by returning a negative value
; o100 if [#<tool> EQ 2]
; o100 return [-1]
; o100 endif
; succeed by returning a positive value
; which will inspected by the epilog handler
o<change_min> endsub [1]
m2
|