Home Explore Help
Sign In
pascal
/
freepascal.compiler
mirror of https://gitlab.com/freepascal.org/fpc/source.git
2
0
Fork 0
Files Issues 0 Wiki
Browse Source

* also assume register calling convention for m68k

git-svn-id: trunk@35352 -
svenbarth 8 years ago
parent
4d41decd5d
commit
c2d68e35b5
1 changed files with 1 additions and 1 deletions
Unified View Show Diff Stats
  1. 1 1
      tests/test/trtti15.pp

+ 1 - 1
tests/test/trtti15.pp
View File 

@@ -162,7 +162,7 @@ begin
 
 end;
 
 end;
 
 
 
 const
 
 const
 
-{$if defined(CPUI386) or defined(CPUI8086) or defined(CPUX86_64)}
 
+{$if defined(CPUI386) or defined(CPUI8086) or defined(CPUX86_64) or defined(CPUM68K)}
 
   DefaultCallingConvention = ccReg;
 
   DefaultCallingConvention = ccReg;
 
 {$else}
 
 {$else}
 
   DefaultCallingConvention = ccStdCall;
 
   DefaultCallingConvention = ccStdCall;