* Fixed fpc_write_text_enum on ARM. TTypeInfo is packed record.

git-svn-id: trunk@10768 -

rtl/inc/text.inc

@@ -704,7 +704,7 @@ End;
 procedure fpc_write_text_enum(typinfo,ord2strindex:pointer;len:sizeint;var t:text;ordinal:longint); iocheck; [Public,Alias:'FPC_WRITE_TEXT_ENUM']; compilerproc;
 
 type  Ptypeinfo=^Ttypeinfo;
-      Ttypeinfo=record
+      Ttypeinfo=packed record
         kind:byte;
         name:shortstring;
        end;