wangdequan/linuxcncAllWasm
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

Import LinuxCNC source tree

Browse Source
This commit is contained in:
Wang Dequan
2026-08-20 06:17:39 +08:00
commit 2c814634c3
9429 changed files with 10556013 additions and 0 deletions
Download Patch File Download Diff File Expand all files Collapse all files

1
tests/oword/sub.0/README Normal file
View File

@@ -0,0 +1 @@
Test for bug reported in http://sourceforge.net/tracker/index.php?func=detail&aid=1772411&group_id=6744&atid=106744

21
tests/oword/sub.0/expected Normal file
View File

@@ -0,0 +1,21 @@
N..... USE_LENGTH_UNITS(CANON_UNITS_MM)
N..... SET_G5X_OFFSET(1, 0.0000, 0.0000, 0.0000, 0.0000, 0.0000, 0.0000)
N..... SET_G92_OFFSET(0.0000, 0.0000, 0.0000, 0.0000, 0.0000, 0.0000)
N..... SET_XY_ROTATION(0.0000)
N..... SET_FEED_REFERENCE(CANON_XYZ)
N..... ON_RESET()
N..... COMMENT("DUMMY SUBROUTINE")
N..... COMMENT("MAIN SUBROUTINE")
N..... COMMENT("MAIN")
N..... STRAIGHT_TRAVERSE(1.0000, 2.0000, 3.0000, 0.0000, 0.0000, 0.0000)
N..... COMMENT("#1 #2 and #3 are now corrupted upon return from dummy subroutine")
N..... STRAIGHT_TRAVERSE(1.0000, 2.0000, 3.0000, 0.0000, 0.0000, 0.0000)
N..... SET_G5X_OFFSET(1, 0.0000, 0.0000, 0.0000, 0.0000, 0.0000, 0.0000)
N..... SET_XY_ROTATION(0.0000)
N..... SET_FEED_MODE(0, 0)
N..... SET_FEED_RATE(0.0000)
N..... STOP_SPINDLE_TURNING(0)
N..... SET_SPINDLE_MODE(0 0.0000)
N..... PROGRAM_END()
N..... ON_RESET()
N..... ON_RESET()

17
tests/oword/sub.0/test.ngc Normal file
View File

@@ -0,0 +1,17 @@
(DUMMY SUBROUTINE)
O100 sub
O100 return
O100 endsub
(MAIN SUBROUTINE)
O200 sub
G00 X#1 Y#2 Z#3
O100 call
(#1 #2 and #3 are now corrupted upon return from dummy subroutine)
G00 X#1 Y#2 Z#3
O200 endsub
(MAIN)
O200 call [1] [2] [3]
M02

3
tests/oword/sub.0/test.sh Normal file
View File

@@ -0,0 +1,3 @@
#!/bin/bash
rs274 -g test.ngc | awk '{$1=""; print}'
exit "${PIPESTATUS[0]}"

10
tests/oword/while.0/README Normal file
View File

@@ -0,0 +1,10 @@
Test for bug introduced by mah http://git.mah.priv.at/gitweb/emc2-dev.git commit 02773f918e4f0e997df2d1cfeef22113b3973bfd
Fixed in http://git.mah.priv.at/gitweb/emc2-dev.git db0ddce1fbf6b41f9c222f10e4755e8decf178a2
Michael Haberler (who blushes at the thought of making those commits public ;-)
Bug would break oword while handling like so:
Unknown oword number
O<x Zustellung> while [[#<foo>] LT 1]

15
tests/oword/while.0/expected Normal file
View File

@@ -0,0 +1,15 @@
N..... USE_LENGTH_UNITS(CANON_UNITS_MM)
N..... SET_G5X_OFFSET(1, 0.0000, 0.0000, 0.0000, 0.0000, 0.0000, 0.0000)
N..... SET_G92_OFFSET(0.0000, 0.0000, 0.0000, 0.0000, 0.0000, 0.0000)
N..... SET_XY_ROTATION(0.0000)
N..... SET_FEED_REFERENCE(CANON_XYZ)
N..... ON_RESET()
N..... SET_G5X_OFFSET(1, 0.0000, 0.0000, 0.0000, 0.0000, 0.0000, 0.0000)
N..... SET_XY_ROTATION(0.0000)
N..... SET_FEED_MODE(0, 0)
N..... SET_FEED_RATE(0.0000)
N..... STOP_SPINDLE_TURNING(0)
N..... SET_SPINDLE_MODE(0 0.0000)
N..... PROGRAM_END()
N..... ON_RESET()
N..... ON_RESET()

10
tests/oword/while.0/test.ngc Normal file
View File

@@ -0,0 +1,10 @@
o<brokenwhile> sub
#<foo> = 0
O<x Zustellung> while [[#<foo>] LT 1]
#<foo> = [[#<foo>] +1]
O<x Zustellung> endwhile
o<brokenwhile> endsub
o <brokenwhile> call
M2

3
tests/oword/while.0/test.sh Executable file
View File

@@ -0,0 +1,3 @@
#!/bin/bash
rs274 -g test.ngc | awk '{$1=""; print}'
exit "${PIPESTATUS[0]}"