Преглед на файлове

* FPC_SHORTSTR_APPEND_SHORTSTR public added

peter преди 22 години
родител
ревизия
84f2b74142
променени са 2 файла, в които са добавени 10 реда и са изтрити 2 реда
  1. 5 1
      rtl/i386/i386.inc
  2. 5 1
      rtl/inc/generic.inc

+ 5 - 1
rtl/i386/i386.inc

@@ -888,6 +888,7 @@ end;
 
 {$ifdef hascompilerproc}
 procedure fpc_shortstr_append_shortstr(var s1:shortstring;const s2:shortstring);compilerproc;
+    [public,alias:'FPC_SHORTSTR_APPEND_SHORTSTR'];
 begin
   asm
         movl    s1,%edi
@@ -1255,7 +1256,10 @@ end;
 
 {
   $Log$
-  Revision 1.43  2003-05-26 19:36:46  peter
+  Revision 1.44  2003-05-26 21:18:13  peter
+    * FPC_SHORTSTR_APPEND_SHORTSTR public added
+
+  Revision 1.43  2003/05/26 19:36:46  peter
     * fpc_shortstr_concat is now the same for all targets
     * fpc_shortstr_append_shortstr added for optimized code generation
 

+ 5 - 1
rtl/inc/generic.inc

@@ -574,6 +574,7 @@ end;
 {$ifndef FPC_SYSTEM_HAS_FPC_SHORTSTR_APPEND_SHORTSTR}
 
 procedure fpc_shortstr_append_shortstr(var s1:shortstring;const s2:shortstring);{$ifdef hascompilerproc} compilerproc; {$endif}
+    [public,alias:'FPC_SHORTSTR_APPEND_SHORTSTR'];
 var
   s1l, s2l : byte;
 begin
@@ -974,7 +975,10 @@ end;
 
 {
   $Log$
-  Revision 1.58  2003-05-26 19:36:46  peter
+  Revision 1.59  2003-05-26 21:18:13  peter
+    * FPC_SHORTSTR_APPEND_SHORTSTR public added
+
+  Revision 1.58  2003/05/26 19:36:46  peter
     * fpc_shortstr_concat is now the same for all targets
     * fpc_shortstr_append_shortstr added for optimized code generation