From 5e8f5ebaf371c95d898e2d46c5fd99fda5a5e157 Mon Sep 17 00:00:00 2001 From: Andy Wingo Date: Fri, 4 Apr 2014 16:49:59 +0200 Subject: [PATCH] Fix coverage expectations * test-suite/tests/coverage.test ("line-execution-counts"): Update expectations. Since there's nothing to do at the loop header and the renaming of X happens at the end of the loops, the compiled code only sees the loop header once. --- test-suite/tests/coverage.test | 6 +++--- 1 file changed, 3 insertions(+), 3 deletions(-) diff --git a/test-suite/tests/coverage.test b/test-suite/tests/coverage.test index 33b839ab6..822d06e9d 100644 --- a/test-suite/tests/coverage.test +++ b/test-suite/tests/coverage.test @@ -1,6 +1,6 @@ ;;;; coverage.test --- Code coverage. -*- mode: scheme; coding: utf-8; -*- ;;;; -;;;; Copyright (C) 2010, 2011, 2012, 2013 Free Software Foundation, Inc. +;;;; Copyright (C) 2010, 2011, 2012, 2013, 2014 Free Software Foundation, Inc. ;;;; ;;;; This library is free software; you can redistribute it and/or ;;;; modify it under the terms of the GNU Lesser General Public @@ -107,8 +107,8 @@ (let ((line (car line+count)) (count (cdr line+count))) (case line - ((0 1) (= count 1)) - ((2 3) (= count 78)) + ((0 1 2) (= count 1)) + ((3) (= count 78)) ((4 5 6) (= count 77)) ((7) (= count 1)) ((8) (= count 0))