projects
/
pintos-anon
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
Add "memory" as clobber to the asm used by barrier().
[pintos-anon]
/
src
/
tests
/
make-grade
diff --git
a/src/tests/make-grade
b/src/tests/make-grade
index e6c4b9cdaad627eec2f2ab46612f7b3c43b987ce..5f60fa3d1fe7edddbed270886228e6bd5881548a 100755
(executable)
--- a/
src/tests/make-grade
+++ b/
src/tests/make-grade
@@
-110,6
+110,9
@@
foreach my $name (keys (%verdicts)) {
}
}
push (@overall, sprintf ("TOTAL TESTING SCORE: %.1f%%", $pct_actual));
}
}
push (@overall, sprintf ("TOTAL TESTING SCORE: %.1f%%", $pct_actual));
+if (sprintf ("%.1f", $pct_actual) eq sprintf ("%.1f", $pct_possible)) {
+ push (@overall, "ALL TESTED PASSED -- PERFECT SCORE");
+}
my (@divider) = ('', '- ' x 38, '');
my (@divider) = ('', '- ' x 38, '');
@@
-132,13
+135,17
@@
for my $test (@failures) {
if (open (OUTPUT, '<', "$test.output")) {
print "\nOUTPUT FROM $test:\n\n";
if (open (OUTPUT, '<', "$test.output")) {
print "\nOUTPUT FROM $test:\n\n";
- my ($panics
) = 0
;
+ my ($panics
, $boots) = (0, 0)
;
while (<OUTPUT>) {
if (/PANIC/ && ++$panics > 2) {
print "[...details of additional panic(s) omitted...]\n";
last;
}
print;
while (<OUTPUT>) {
if (/PANIC/ && ++$panics > 2) {
print "[...details of additional panic(s) omitted...]\n";
last;
}
print;
+ if (/Pintos booting/ && ++$boots > 1) {
+ print "[...details of reboot(s) omitted...]\n";
+ last;
+ }
}
close (OUTPUT);
}
}
close (OUTPUT);
}