/compiler/m68k/aoptcpu.pas

 1{
 2    Copyright (c) 1998-2004 by Jonas Maebe
 3
 4    This unit calls the optimization procedures to optimize the assembler
 5    code for sparc
 6
 7    This program is free software; you can redistribute it and/or modify
 8    it under the terms of the GNU General Public License as published by
 9    the Free Software Foundation; either version 2 of the License, or
10    (at your option) any later version.
11
12    This program is distributed in the hope that it will be useful,
13    but WITHOUT ANY WARRANTY; without even the implied warranty of
14    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
15    GNU General Public License for more details.
16
17    You should have received a copy of the GNU General Public License
18    along with this program; if not, write to the Free Software
19    Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
20
21 ****************************************************************************
22}
23
24unit aoptcpu;
25
26{$i fpcdefs.inc}
27
28  Interface
29
30    uses
31      cpubase, aoptobj, aoptcpub, aopt;
32
33    Type
34      TCpuAsmOptimizer = class(TAsmOptimizer)
35      End;
36
37  Implementation
38
39begin
40  casmoptimizer:=TCpuAsmOptimizer;
41end.