/compiler/m68k/aoptcpu.pas
Pascal | 41 lines | 11 code | 7 blank | 23 comment | 0 complexity | 3cc761a5a8c9d06c180e53f0fd90d2c9 MD5 | raw file
Possible License(s): LGPL-2.0, LGPL-2.1, LGPL-3.0
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.