Import LinuxCNC source tree

tests/interp/m98m99/14-o-expression-call/expected

@@ -0,0 +1,18 @@
+    1 N..... USE_LENGTH_UNITS(CANON_UNITS_MM)
+    2 N..... SET_G5X_OFFSET(1, 0.0000, 0.0000, 0.0000, 0.0000, 0.0000, 0.0000)
+    3 N..... SET_G92_OFFSET(0.0000, 0.0000, 0.0000, 0.0000, 0.0000, 0.0000)
+    4 N..... SET_XY_ROTATION(0.0000)
+    5 N..... SET_FEED_REFERENCE(CANON_XYZ)
+    6 N..... ON_RESET()
+In sub 100
+In sub 200
+    7 N..... SET_G5X_OFFSET(1, 0.0000, 0.0000, 0.0000, 0.0000, 0.0000, 0.0000)
+    8 N..... SET_XY_ROTATION(0.0000)
+    9 N..... SET_FEED_MODE(0, 0)
+   10 N..... SET_FEED_RATE(0.0000)
+   11 N..... STOP_SPINDLE_TURNING(0)
+   12 N..... SET_SPINDLE_MODE(0 0.0000)
+   13 N..... PALLET_SHUTTLE()
+   14 N..... PROGRAM_END()
+   15 N..... ON_RESET()
+   16 N..... ON_RESET()

tests/interp/m98m99/14-o-expression-call/test.ngc

@@ -0,0 +1,21 @@
+%
+; test calling subprograms with expressions
+
+; call sub O100:  use variable in expression with rs274ngc O-sub
+#2 = 10
+O[#2 * 10] call
+
+; call sub O200:  use expression in M98 P-word
+M98 P[5 * 5 * 2 * 2 + 100]
+
+M30
+
+O100 sub ; rs274ngc subroutine
+(print,In sub 100)
+O100 endsub
+
+O200     ; numbered subprogram
+(print,In sub 200)
+M99
+
+%

tests/interp/m98m99/14-o-expression-call/test.sh

@@ -0,0 +1,2 @@
+#!/bin/bash -e
+rs274 -g test.ngc