瀏覽代碼

* small fixes to the alpha stuff

florian 23 年之前
父節點
當前提交
4661ee3057
共有 2 個文件被更改,包括 65 次插入2 次删除
  1. 60 0
      compiler/alpha/cpunode.pas
  2. 5 2
      compiler/systems.pas

+ 60 - 0
compiler/alpha/cpunode.pas

@@ -0,0 +1,60 @@
+{
+    $Id$
+    Copyright (c) 2000-2002 by Florian Klaempfl
+
+    Imports the Alpha code generator
+
+    This program is free software; you can redistribute it and/or modify
+    it under the terms of the GNU General Public License as published by
+    the Free Software Foundation; either version 2 of the License, or
+    (at your option) any later version.
+
+    This program is distributed in the hope that it will be useful,
+    but WITHOUT ANY WARRANTY; without even the implied warranty of
+    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+    GNU General Public License for more details.
+
+    You should have received a copy of the GNU General Public License
+    along with this program; if not, write to the Free Software
+    Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
+
+ ****************************************************************************
+}
+{
+  This unit imports the Alpha code generator.
+}
+unit cpunode;
+
+{$i fpcdefs.inc}
+
+  interface
+
+  implementation
+
+    uses
+       { generic nodes }
+       ncgbas,ncgld,ncgflw,ncgcnv,ncgmem,ncgcon,ncgcal,ncgset,ncginl,
+       { to be able to only parts of the generic code,
+         the processor specific nodes must be included
+         after the generic one (FK)
+       }
+//       naxpadd,
+//       naxpcal,
+//       naxpcon,
+//       naxpflw,
+//       naxpmem,
+//       naxpset,
+//       naxpinl,
+//       nppcopt,
+       { this not really a node }
+//       naxpobj,
+//       naxpmat,
+//       naxpcnv
+       ;
+
+end.
+{
+  $Log$
+  Revision 1.1  2002-08-18 09:13:02  florian
+    * small fixes to the alpha stuff
+}

+ 5 - 2
compiler/systems.pas

@@ -648,7 +648,7 @@ begin
   {$ifdef cpualpha}
     default_target(source_info.system);
   {$else cpualpha}
-    default_target(target_alpha_linux);
+    default_target(system_alpha_linux);
   {$endif cpualpha}
 {$endif alpha}
 {$ifdef powerpc}
@@ -671,7 +671,10 @@ finalization
 end.
 {
   $Log$
-  Revision 1.52  2002-08-13 21:40:57  florian
+  Revision 1.53  2002-08-18 09:13:02  florian
+    * small fixes to the alpha stuff
+
+  Revision 1.52  2002/08/13 21:40:57  florian
     * more fixes for ppc calling conventions
 
   Revision 1.51  2002/08/12 15:08:40  carl