Browse Source

* Extended the test for m68k.

git-svn-id: trunk@28253 -
sergei 11 years ago
parent
commit
4e9500fee8
1 changed files with 10 additions and 1 deletions
  1. 10 1
      tests/webtbs/tw11563.pp

+ 10 - 1
tests/webtbs/tw11563.pp

@@ -17,6 +17,9 @@ program ExecStack;
 {$endif}
 {$ifdef cpumips}
     ret: array[0..1] of longword;
+{$endif}
+{$ifdef cpum68k}
+    ret: word;
 {$endif}
     DoNothing: proc;
 
@@ -51,7 +54,13 @@ program ExecStack;
     ret[1]:=0;                   { delay slot }
     DoNothing:=proc(@ret);
     DoNothing;
-{$endif}
+{$endif cpumips}
+{$ifdef cpum68k}
+    ret:=$4E74;
+    DoNothing:=proc(@ret);
+    DoNothing;
+{$endif cpum68k}
+
   end;
 begin
   DoIt;