chiark
/
gitweb
/
~ian
/
secnet.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
mtest: Break out diff-output
[secnet.git]
/
mtest
/
common.tcl
diff --git
a/mtest/common.tcl
b/mtest/common.tcl
index 4fc27e7fff590dfd06a74ba85b470e30aef3ed18..e3b67c40a55242d6430266e6bd704d983fff44e9 100644
(file)
--- a/
mtest/common.tcl
+++ b/
mtest/common.tcl
@@
-17,9
+17,20
@@
proc run-mss-userv {user group args} {
proc run-mss {args} { eval [list exec] [mss-program] $args }
proc run-mss {args} { eval [list exec] [mss-program] $args }
+proc diff-output {expected got suffix} {
+ global seddery
+ global tmp
+ exec bash -c "
+ diff -u <($seddery mtest/$expected$suffix) \\
+ <($seddery $tmp/$got$suffix )
+ "
+}
+
file mkdir $tmp/groupfiles
set env(PYTHONHASHSEED) 0
set env(PYTHONBYTECODEBASE) 0
file mkdir $tmp/groupfiles
set env(PYTHONHASHSEED) 0
set env(PYTHONBYTECODEBASE) 0
+set seddery { sed -n 's/^[ \t]*//; /^[^#]/p' }
+
prefix_some_path PYTHONPATH .
prefix_some_path PYTHONPATH .