diff --git a/tests/ts/ts010022.pp b/tests/ts/ts010022.pp
index c3264d4671..7a96624682 100644
--- a/tests/ts/ts010022.pp
+++ b/tests/ts/ts010022.pp
@@ -41,6 +41,6 @@ begin
    readln(f,st);
    if st<>'Alone test' then halt(1);
    readln(f,st);
-   if st<>'Invalid opcode' then halt(1);
+   if st<>'Invalid Opcode' then halt(1);
    close(f);
-end.
+end.
\ No newline at end of file