mirror of
https://git.freebsd.org/ports.git
synced 2025-06-07 05:40:30 -04:00
a6e3152224
lathes, 3d printers, laser cutters, plasma cutters, robot arms, hexapods, and more. - Accepts G-code input, drives CNC machines in response. - Active user community. - Several different GUIs available. - Compatible with many popular machine control hardware interfaces. - Supports rigid tapping, cutter compensation, and many other advanced control features. WARNING: This port is simulation-only for now. WWW: http://linuxcnc.org/
54 lines
1.7 KiB
Text
54 lines
1.7 KiB
Text
--- scripts/latency-plot.orig 2016-06-25 02:19:12 UTC
|
|
+++ scripts/latency-plot
|
|
@@ -1,4 +1,4 @@
|
|
-#!/usr/bin/wish
|
|
+#!/usr/bin/env wish8.6
|
|
|
|
# Notes:
|
|
# notusing y axis title because it coredumps with X BadMatch with wish8.5
|
|
@@ -161,15 +161,15 @@ proc init_hal_timedelta {} {
|
|
} ;# init_hal_timedelta
|
|
|
|
proc check {} {
|
|
- if {[string first rtai [exec lsmod]] < 0} {
|
|
- #puts "ok -- no rtai modules currently loaded"
|
|
- } else {
|
|
- set msg "Cannot start with rtai modules loaded.\
|
|
-Stop all programs (linuxcnc) using realtime first and then run:\n\n\
|
|
-halrun -U\n"
|
|
- popup $msg
|
|
- exit 1
|
|
- }
|
|
+# if {[string first rtai [exec lsmod]] < 0} {
|
|
+# #puts "ok -- no rtai modules currently loaded"
|
|
+# } else {
|
|
+# set msg "Cannot start with rtai modules loaded.\
|
|
+#Stop all programs (linuxcnc) using realtime first and then run:\n\n\
|
|
+#halrun -U\n"
|
|
+# popup $msg
|
|
+# exit 1
|
|
+# }
|
|
switch $::sc(data,source) {
|
|
hal_timedelta {}
|
|
default {return -code error "init: unknown data,source: <$::sc(data,source)>"}
|
|
@@ -179,13 +179,13 @@ halrun -U\n"
|
|
proc mcheck {} {
|
|
# cautionary check on memory usage
|
|
# %mem "ratio of process's resident set size to the physical mem in percent"
|
|
- set mempercent [eval exec ps --no-headers --pid $::sc(pid) -o %mem]
|
|
- if {$mempercent > $::sc(mem,max,percent)} {
|
|
- set msg "Memory used is ${mempercent}%, Exiting"
|
|
- popup $msg
|
|
- exit 1
|
|
- }
|
|
- after 10000 mcheck
|
|
+# set mempercent [eval exec ps --no-headers --pid $::sc(pid) -o %mem]
|
|
+# if {$mempercent > $::sc(mem,max,percent)} {
|
|
+# set msg "Memory used is ${mempercent}%, Exiting"
|
|
+# popup $msg
|
|
+# exit 1
|
|
+# }
|
|
+# after 10000 mcheck
|
|
} ;# mcheck
|
|
|
|
proc start {} {
|