* added missing "end." (fixup for r46904)

git-svn-id: trunk@46906 -

tests/tbs/tb0676a.pp

@@ -18,3 +18,4 @@ begin
   Writeln(HexStr(Value, 4));
   v := swapendian(Value);
   Writeln(HexStr(v, 4));
+end.