From 61df26bf0c8b00dcbecf6af484ac7b385e8532b2 Mon Sep 17 00:00:00 2001 From: pierre Date: Wed, 29 Jun 2011 15:07:08 +0000 Subject: [PATCH] * Avoid string constants array elements longer than type git-svn-id: trunk@17873 - --- compiler/mips/cpuinfo.pas | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/compiler/mips/cpuinfo.pas b/compiler/mips/cpuinfo.pas index 1f9b40f108..ddf0494b9c 100644 --- a/compiler/mips/cpuinfo.pas +++ b/compiler/mips/cpuinfo.pas @@ -58,11 +58,11 @@ Const pocall_cppdecl ]; - cputypestr : array[tcputype] of string[5] = ('', + cputypestr : array[tcputype] of string[6] = ('', 'MIPS32' ); - fputypestr : array[tfputype] of string[6] = ('', + fputypestr : array[tfputype] of string[9] = ('', 'SOFT', 'FPU_MIPS2','FPU_MIPS3' );