From 1ff67adf10f7a5571a2a3fed8870cc81f04242c2 Mon Sep 17 00:00:00 2001 From: "R. Tyler Croy" Date: Thu, 29 Dec 2011 23:53:54 -0800 Subject: [PATCH] Turn the test green again --- src/wasrun.adb | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/src/wasrun.adb b/src/wasrun.adb index 60fe462..a93c778 100644 --- a/src/wasrun.adb +++ b/src/wasrun.adb @@ -6,7 +6,7 @@ use Ada.Text_IO; package body WasRun is procedure Test_Method (T : in out Testa.TestCase'Class) is - WTest : WTestCase := WTestCase (T); + WTest : WTestCase renames WTestCase (T); begin WTest.WasRun := True; end Test_Method;