--- 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 {} {