* another old test added

git-svn-id: trunk@5161 -

.gitattributes

@@ -6319,6 +6319,7 @@ tests/test/tclass6.pp svneol=native#text/plain
 tests/test/tclass7.pp svneol=native#text/plain
 tests/test/tclass8.pp svneol=native#text/plain
 tests/test/tclrprop.pp svneol=native#text/plain
+tests/test/tendian1.pp svneol=native#text/plain
 tests/test/tenum1.pp svneol=native#text/plain
 tests/test/testcmem.pp svneol=native#text/plain
 tests/test/testda1.pp svneol=native#text/plain

tests/test/tendian1.pp

@@ -0,0 +1,10 @@
+var
+  l : dword;
+begin
+  l:=$deadbeef;
+  if SwapEndian(l)=l then
+    halt(1);
+  if SwapEndian(SwapEndian(l))<>l then
+    halt(1);
+  writeln('ok');
+end.