diff options
| author | Jed Barber <jjbarber@y7mail.com> | 2019-01-12 00:38:45 +1100 |
|---|---|---|
| committer | Jed Barber <jjbarber@y7mail.com> | 2019-01-12 00:38:45 +1100 |
| commit | dc3078a06b5ee52751cfb6fd6cf13b3790632ac4 (patch) | |
| tree | 25187b953479f943947e919b7acc1f4a3ca41fe6 /test/ratnest.adb | |
| parent | 554d2ab14921c48d628b0ffa86cc7492836477ac (diff) | |
Packrat.Lexer.Combinators specs and tests complete
Diffstat (limited to 'test/ratnest.adb')
| -rw-r--r-- | test/ratnest.adb | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/test/ratnest.adb b/test/ratnest.adb index 8d1493c..d063b41 100644 --- a/test/ratnest.adb +++ b/test/ratnest.adb @@ -19,7 +19,7 @@ package body Ratnest is Failed_Count : Natural := 0; begin for T of To_Run loop - if T.Func.all = Failure then + if T.Func.all = Fail then Put_Line ("Failed test " & (-T.Name)); Failed_Count := Failed_Count + 1; end if; |