From 7c98848cb278abb2ba323d26a15f211af3faf504 Mon Sep 17 00:00:00 2001
From: florian <florian@freepascal.org>
Date: Sat, 20 Mar 2004 22:57:42 +0000
Subject: [PATCH]   + cpu2str added

---
 compiler/systems.pas | 9 ++++++++-
 1 file changed, 8 insertions(+), 1 deletion(-)

diff --git a/compiler/systems.pas b/compiler/systems.pas
index 11d4b17d7f..bc81d0faf9 100644
--- a/compiler/systems.pas
+++ b/compiler/systems.pas
@@ -293,6 +293,10 @@ interface
        { alias for supported_target field in tasminfo }
        system_any = system_none;
 
+       cpu2str : array[TSystemCpu] of string =
+            ('','i386','m68k','alpha','powerpc','sparc','vm','ia64','x86_64',
+             'mips','arm');
+
     var
        targetinfos   : array[tsystem] of psysteminfo;
        arinfos       : array[tar] of parinfo;
@@ -690,7 +694,10 @@ finalization
 end.
 {
   $Log$
-  Revision 1.86  2004-02-22 16:51:50  peter
+  Revision 1.87  2004-03-20 22:57:42  florian
+    + cpu2str added
+
+  Revision 1.86  2004/02/22 16:51:50  peter
     * tf_need_symbol_size added
 
   Revision 1.85  2004/02/19 20:40:15  olle