* inline is only a hint to the compiler which might be ignored so throw only a hint and not a warning if subroutine cannot be inlined

git-svn-id: trunk@20626 -

compiler/msg/errorct.msg

@@ -716,9 +716,9 @@ parser_e_function_already_declared_public_forward=03120_E_La funci
 % declaration in the \var{implmentation} section.
 parser_e_not_external_and_export=03121_E_No es poden utilitzar EXPORT i EXTERNAL conjuntament
 % These two procedure directives are mutually exclusive
-parser_w_not_supported_for_inline=03123_W_Encara no es permet "$1" dins de procediment/funció inserits
+parser_h_not_supported_for_inline=03123_H_Encara no es permet "$1" dins de procediment/funció inserits
 % Inline procedures don't support this declaration.
-parser_w_inlining_disabled=03124_W_S'ha deshabilitat l'inseriment
+parser_h_inlining_disabled=03124_H_S'ha deshabilitat l'inseriment
 % Inlining of procedures is disabled.
 parser_i_writing_browser_log=03125_I_S'està escrivint el registre del navegador $1
 % When information messages are on, the compiler warns you when it

compiler/msg/errord.msg

@@ -778,9 +778,9 @@ parser_e_function_already_declared_public_forward=03120_E_Funktion ist bereits a
 % declaration in the \var{implementation} section.
 parser_e_not_external_and_export=03121_E_Kann nicht EXPORT und EXTERNAL gleichzeitig benutzen
 % These two procedure directives are mutually exclusive.
-parser_w_not_supported_for_inline=03123_W_$1 noch nicht innerhalb von inline Prozeduren/Funktionen untersttzt
+parser_h_not_supported_for_inline=03123_H_$1 noch nicht innerhalb von inline Prozeduren/Funktionen untersttzt
 % Inline procedures don't support this declaration.
-parser_w_inlining_disabled=03124_W_Inlining deaktiviert
+parser_h_inlining_disabled=03124_H_Inlining deaktiviert
 % Inlining of procedures is disabled.
 parser_i_writing_browser_log=03125_I_Schreibe Browser-Log $1
 % When information messages are on, the compiler warns you when it

compiler/msg/errorda.msg

@@ -743,9 +743,9 @@ parser_e_function_already_declared_public_forward=03120_E_Funktionen "$1" er all
 % declaration in the \var{implmentation} section.
 parser_e_not_external_and_export=03121_E_Kan ikke bruge både EXPORT og EXTERNAL
 % These two procedure directives are mutually exclusive
-parser_w_not_supported_for_inline=03123_W_Deklarationen "$1" er endnu ikke understøttet i inline procedurer/funktioner
+parser_H_not_supported_for_inline=03123_H_Deklarationen "$1" er endnu ikke understøttet i inline procedurer/funktioner
 % Inline procedures don't support this declaration.
-parser_w_inlining_disabled=03124_W_Inlining slået fra
+parser_h_inlining_disabled=03124_H_Inlining slået fra
 % Inlining of procedures is disabled.
 parser_i_writing_browser_log=03125_I_Skriver browser-log $1
 % When information messages are on, the compiler warns you when it

compiler/msg/errordu.msg

@@ -778,9 +778,9 @@ parser_e_function_already_declared_public_forward=03120_E_Funktion ist bereits a
 % declaration in the \var{implementation} section.
 parser_e_not_external_and_export=03121_E_Kann nicht EXPORT und EXTERNAL gleichzeitig benutzen
 % These two procedure directives are mutually exclusive.
-parser_w_not_supported_for_inline=03123_W_$1 noch nicht innerhalb von inline Prozeduren/Funktionen unterstützt
+parser_h_not_supported_for_inline=03123_H_$1 noch nicht innerhalb von inline Prozeduren/Funktionen unterstützt
 % Inline procedures don't support this declaration.
-parser_w_inlining_disabled=03124_W_Inlining deaktiviert
+parser_h_inlining_disabled=03124_H_Inlining deaktiviert
 % Inlining of procedures is disabled.
 parser_i_writing_browser_log=03125_I_Schreibe Browser-Log $1
 % When information messages are on, the compiler warns you when it

compiler/msg/errore.msg

@@ -774,9 +774,9 @@ parser_e_function_already_declared_public_forward=03120_E_Function is already de
 % declaration in the \var{implementation} section.
 parser_e_not_external_and_export=03121_E_Can't use both EXPORT and EXTERNAL
 % These two procedure directives are mutually exclusive.
-parser_w_not_supported_for_inline=03123_W_"$1" not yet supported inside inline procedure/function
+parser_h_not_supported_for_inline=03123_H_"$1" not yet supported inside inline procedure/function
 % Inline procedures don't support this declaration.
-parser_w_inlining_disabled=03124_W_Inlining disabled
+parser_h_inlining_disabled=03124_H_Inlining disabled
 % Inlining of procedures is disabled.
 parser_i_writing_browser_log=03125_I_Writing Browser log $1
 % When information messages are on, the compiler warns you when it

compiler/msg/errores.msg

@@ -720,9 +720,9 @@ parser_e_function_already_declared_public_forward=03120_E_La funci
 % declaration in the \var{implmentation} section.
 parser_e_not_external_and_export=03121_E_No se pueden usar ambos EXPORT y EXTERNAL
 % These two procedure directives are mutually exclusive
-parser_w_not_supported_for_inline=03123_W_"$1" aún no soportado en procedimientos/funciones inline
+parser_h_not_supported_for_inline=03123_H_"$1" aún no soportado en procedimientos/funciones inline
 % Inline procedures don't support this declaration.
-parser_w_inlining_disabled=03124_W_Inlining deshabilitado
+parser_h_inlining_disabled=03124_H_Inlining deshabilitado
 % Inlining of procedures is disabled.
 parser_i_writing_browser_log=03125_I_Escribiendo Browser log $1
 % When information messages are on, the compiler warns you when it

compiler/msg/errorf.msg

@@ -737,9 +737,9 @@ parser_e_not_external_and_export=03121_E_EXPORT et EXTERNAL sont incompatibles
 % These two procedure directives are mutually exclusive
 parser_e_name_keyword_expected=03122_E_Le mot r‚serv‚ NAME est requis ici
 % The definition of an external variable needs a \var{name} clause.
-parser_w_not_supported_for_inline=03123_W_$1 n'est pas support‚ pour des fonctions INLINE
+parser_h_not_supported_for_inline=03123_H_$1 n'est pas support‚ pour des fonctions INLINE
 % Inline procedures don't support this declaration.
-parser_w_inlining_disabled=03124_W_Inlining d‚sactiv‚
+parser_h_inlining_disabled=03124_H_Inlining d‚sactiv‚
 % Inlining of procedures is disabled.
 parser_i_writing_browser_log=03125_I_Ecriture du Browser log $1
 % When information messages are on, the compiler warns you when it

compiler/msg/errorfi.msg

@@ -748,9 +748,9 @@ parser_e_function_already_declared_public_forward=03120_E_La fonction "$1" est d
 % declaration in the \var{implmentation} section.
 parser_e_not_external_and_export=03121_E_Impossible d'utiliser à la fois EXPORT et EXTERNAL
 % These two procedure directives are mutually exclusive
-parser_w_not_supported_for_inline=03123_W_"$1" n'est pas encore supporté à l'intérieur de procédures/fonctions INLINE
+parser_h_not_supported_for_inline=03123_H_"$1" n'est pas encore supporté à l'intérieur de procédures/fonctions INLINE
 % Inline procedures don't support this declaration.
-parser_w_inlining_disabled=03124_W_Inlining désactivé
+parser_h_inlining_disabled=03124_H_Inlining désactivé
 % Inlining of procedures is disabled.
 parser_i_writing_browser_log=03125_I_Ecriture du Browser log $1
 % When information messages are on, the compiler warns you when it

compiler/msg/errorhe.msg

@@ -761,9 +761,9 @@ parser_e_function_already_declared_public_forward=03120_E_
 % declaration in the \var{implmentation} section.
 parser_e_not_external_and_export=03121_E_ìà ðéúï ìäùúîù âí á EXPORT åâí EXTERNAL
 % These two procedure directives are mutually exclusive
-parser_w_not_supported_for_inline=03123_W_"$1" àéðå ðúîê òãééï áúåê ôåð÷öéú/ùâøú inline
+parser_h_not_supported_for_inline=03123_H_"$1" àéðå ðúîê òãééï áúåê ôåð÷öéú/ùâøú inline
 % Inline procedures don't support this declaration.
-parser_w_inlining_disabled=03124_W_äùéîåù äéùéø îáåèì
+parser_h_inlining_disabled=03124_H_äùéîåù äéùéø îáåèì
 % Inlining of procedures is disabled.
 parser_i_writing_browser_log=03125_I_ëåúá éåîï ãôãôï $1
 % When information messages are on, the compiler warns you when it

compiler/msg/errorheu.msg

@@ -761,9 +761,9 @@ parser_e_function_already_declared_public_forward=03120_E_הגדרת הפונק
 % declaration in the \var{implmentation} section.
 parser_e_not_external_and_export=03121_E_לא ניתן להשתמש גם ב EXPORT וגם EXTERNAL
 % These two procedure directives are mutually exclusive
-parser_w_not_supported_for_inline=03123_W_"$1" אינו נתמך עדיין בתוך פונקצית/שגרת inline
+parser_h_not_supported_for_inline=03123_H_"$1" אינו נתמך עדיין בתוך פונקצית/שגרת inline
 % Inline procedures don't support this declaration.
-parser_w_inlining_disabled=03124_W_השימוש הישיר מבוטל
+parser_h_inlining_disabled=03124_H_השימוש הישיר מבוטל
 % Inlining of procedures is disabled.
 parser_i_writing_browser_log=03125_I_כותב יומן דפדפן $1
 % When information messages are on, the compiler warns you when it

compiler/msg/errorid.msg

@@ -760,9 +760,9 @@ parser_e_function_already_declared_public_forward=03120_E_Fungsi sudah dideklara
 % \var{forward} dalam seksi \var{implmentation}.
 parser_e_not_external_and_export=03121_E_Tidak bisa menggunakan EXPORT dan EXTERNAL
 % Dua prosedur ini adalah mutual eksklusif
-parser_w_not_supported_for_inline=03123_W_"$1" belum didukung di dalam inline procedure/function
+parser_h_not_supported_for_inline=03123_H_"$1" belum didukung di dalam inline procedure/function
 % Inline procedures tidak mendukung deklarasi ini.
-parser_w_inlining_disabled=03124_W_Inlining dimatikan
+parser_h_inlining_disabled=03124_H_Inlining dimatikan
 % Inlining dari prosedur dimatikan.
 parser_i_writing_browser_log=03125_I_Menulis log Browser $1
 % Ketika pesan informasi hidup, kompilator memperingatkan anda saat ia

compiler/msg/erroriu.msg

@@ -768,9 +768,9 @@ parser_e_function_already_declared_public_forward=03120_E_La funzione
 % declaration in the \var{implementation} section.
 parser_e_not_external_and_export=03121_E_Non si possono usare sia EXPORT che EXTERNAL
 % These two procedure directives are mutually exclusive.
-parser_w_not_supported_for_inline=03123_W_"$1" non è ancora supportata all'interno di procedure o funzioni inline
+parser_h_not_supported_for_inline=03123_H_"$1" non è ancora supportata all'interno di procedure o funzioni inline
 % Inline procedures don't support this declaration.
-parser_w_inlining_disabled=03124_W_Inlining disabilitato
+parser_h_inlining_disabled=03124_H_Inlining disabilitato
 % Inlining of procedures is disabled.
 parser_i_writing_browser_log=03125_I_Scrivo il log del browser $1
 % When information messages are on, the compiler warns you when it

compiler/msg/errorn.msg

@@ -747,9 +747,9 @@ parser_e_function_already_declared_public_forward=03120_E_Functie is al publiek/
 % declaration in the \var{implmentation} section.
 parser_e_not_external_and_export=03121_E_Kan niet zowel EXPORT als EXTERNAL gebruiken
 % These two procedure directives are mutually exclusive
-parser_w_not_supported_for_inline=03123_W_$1 wordt niet ondersteund voor inline procedure/functie
+parser_h_not_supported_for_inline=03123_H_$1 wordt niet ondersteund voor inline procedure/functie
 % Inline procedures don't support this declaration.
-parser_w_inlining_disabled=03124_W_Inlining uitgeschakeld
+parser_h_inlining_disabled=03124_H_Inlining uitgeschakeld
 % Inlining of procedures is disabled.
 parser_i_writing_browser_log=03125_I_Schrijven van browser logfile $1
 % When information messages are on, the compiler warns you when it

compiler/msg/errorpl.msg

@@ -723,9 +723,9 @@ parser_e_function_already_declared_public_forward=03120_E_Funkcja jest ju
 % declaration in the \var{implmentation} section.
 parser_e_not_external_and_export=03121_E_Nie mo¾na u¾y† jednocze˜nie EXPORT i EXTERNAL
 % These two procedure directives are mutually exclusive
-parser_w_not_supported_for_inline=03123_W_$1 nieobsˆugiwane w procedurze/funkcji inline
+parser_h_not_supported_for_inline=03123_H_$1 nieobsˆugiwane w procedurze/funkcji inline
 % Inline procedures don't support this declaration.
-parser_w_inlining_disabled=03124_W_Inline wyˆ¥czone
+parser_h_inlining_disabled=03124_H_Inline wyˆ¥czone
 % Inlining of procedures is disabled.
 parser_i_writing_browser_log=03125_I_Zapisywanie logu przegl¥darki $1
 % When information messages are on, the compiler warns you when it

compiler/msg/errorpli.msg

@@ -723,9 +723,9 @@ parser_e_function_already_declared_public_forward=03120_E_Funkcja jest ju
 % declaration in the \var{implmentation} section.
 parser_e_not_external_and_export=03121_E_Nie mo¿na u¿yæ jednocze¶nie EXPORT i EXTERNAL
 % These two procedure directives are mutually exclusive
-parser_w_not_supported_for_inline=03123_W_$1 nieobs³ugiwane w procedurze/funkcji inline
+parser_h_not_supported_for_inline=03123_H_$1 nieobs³ugiwane w procedurze/funkcji inline
 % Inline procedures don't support this declaration.
-parser_w_inlining_disabled=03124_W_Inline wy³±czone
+parser_h_inlining_disabled=03124_H_Inline wy³±czone
 % Inlining of procedures is disabled.
 parser_i_writing_browser_log=03125_I_Zapisywanie logu przegl±darki $1
 % When information messages are on, the compiler warns you when it

compiler/msg/errorpt.msg

@@ -772,9 +772,9 @@ parser_e_function_already_declared_public_forward=03120_E_Fun
 % declaration in the \var{implementation} section.
 parser_e_not_external_and_export=03121_E_Imposs¡vel usar ambos EXPORT e EXTERNAL
 % These two procedure directives are mutually exclusive.
-parser_w_not_supported_for_inline=03123_W_"$1" nÆo suportado ainda dentro procedimento/fun‡Æo em linha
+parser_h_not_supported_for_inline=03123_H_"$1" nÆo suportado ainda dentro procedimento/fun‡Æo em linha
 % Inline procedures don't support this declaration.
-parser_w_inlining_disabled=03124_W_Procedimentos em linha desabilitados
+parser_h_inlining_disabled=03124_H_Procedimentos em linha desabilitados
 % Inlining of procedures is disabled.
 parser_i_writing_browser_log=03125_I_Gravando hist¢rio Navegador $1
 % When information messages are on, the compiler warns you when it

compiler/msg/errorptu.msg

@@ -772,9 +772,9 @@ parser_e_function_already_declared_public_forward=03120_E_Função já declarada
 % declaration in the \var{implementation} section.
 parser_e_not_external_and_export=03121_E_Impossível usar ambos EXPORT e EXTERNAL
 % These two procedure directives are mutually exclusive.
-parser_w_not_supported_for_inline=03123_W_"$1" não suportado ainda dentro procedimento/função em linha
+parser_h_not_supported_for_inline=03123_H_"$1" não suportado ainda dentro procedimento/função em linha
 % Inline procedures don't support this declaration.
-parser_w_inlining_disabled=03124_W_Procedimentos em linha desabilitados
+parser_h_inlining_disabled=03124_H_Procedimentos em linha desabilitados
 % Inlining of procedures is disabled.
 parser_i_writing_browser_log=03125_I_Gravando histório Navegador $1
 % When information messages are on, the compiler warns you when it

compiler/msg/errorr.msg

@@ -710,9 +710,9 @@ parser_e_function_already_declared_public_forward=03120_E_
 % ¢ ᥪ樨 \var{implmentation}.
 parser_e_not_external_and_export=03121_E_H¥«ì§ï ¨á¯®«ì§®¢ âì EXPORT ᮢ¬¥áâ­® á EXTERNAL
 % ⨠¤¢¥ ¤¨à¥ªâ¨¢ë ïîâáï ¢§ ¨¬®¨áª«îç î騬¨
-parser_w_not_supported_for_inline=03123_W_"$1" ­¥ ¯®¤¤¥p¦¨¢ ¥âáï ¢­yâp¨ INLINE ¯p®æ¥¤ypë/äy­ªæ¨¨
+parser_h_not_supported_for_inline=03123_H_"$1" ­¥ ¯®¤¤¥p¦¨¢ ¥âáï ¢­yâp¨ INLINE ¯p®æ¥¤ypë/äy­ªæ¨¨
 % ‚áâà ¨¢ ¥¬ë¥ ¯à®æ¥¤ãàë ­¥ ¯®¤¤¥à¦¨¢ îâ íâ®â ⨯ ®¡ê¥­¨ï.
-parser_w_inlining_disabled=03124_W_‚áâà ¨¢ ­¨¥ (INLINE) ®âª«î祭®
+parser_h_inlining_disabled=03124_H_‚áâà ¨¢ ­¨¥ (INLINE) ®âª«î祭®
 % ‚áâà ¨¢ ­¨¥ ¯à®æ¥¤ãà ®âª«î祭®.
 parser_i_writing_browser_log=03125_I_‡ ¯¨á뢠¥¬ «®£ ¡p y§¥p  $1
 % Š®£¤  ¢ª«îç¥­ë ¨­ä®à¬ æ¨®­­ë¥ á®®¡é¥­¨ï, ª®¬¯¨«ïâ®à á®®¡é ¥â

compiler/msg/errorru.msg

@@ -710,9 +710,9 @@ parser_e_function_already_declared_public_forward=03120_E_Функция "$1" у
 % в секции \var{implmentation}.
 parser_e_not_external_and_export=03121_E_Hельзя использовать EXPORT совместно с EXTERNAL
 % Эти две директивы являются взаимоисключающими
-parser_w_not_supported_for_inline=03123_W_"$1" не поддеpживается внyтpи INLINE пpоцедypы/фyнкции
+parser_h_not_supported_for_inline=03123_H_"$1" не поддеpживается внyтpи INLINE пpоцедypы/фyнкции
 % Встраиваемые процедуры не поддерживают этот тип объявления.
-parser_w_inlining_disabled=03124_W_Встраивание (INLINE) отключено
+parser_h_inlining_disabled=03124_H_Встраивание (INLINE) отключено
 % Встраивание процедур отключено.
 parser_i_writing_browser_log=03125_I_Записываем лог бpаyзеpа $1
 % Когда включены информационные сообщения, компилятор сообщает

compiler/msg/errorues.msg

@@ -714,9 +714,9 @@ parser_e_function_already_declared_public_forward=03120_E_La función esta actua
 % declaration in the \var{implmentation} section.
 parser_e_not_external_and_export=03121_E_No se pueden usar ambos EXPORT y EXTERNAL
 % These two procedure directives are mutually exclusive
-parser_w_not_supported_for_inline=03123_W_"$1" aún no soportado en procedimientos/funciones inline
+parser_h_not_supported_for_inline=03123_H_"$1" aún no soportado en procedimientos/funciones inline
 % Inline procedures don't support this declaration.
-parser_w_inlining_disabled=03124_W_Inlining deshabilitado
+parser_h_inlining_disabled=03124_H_Inlining deshabilitado
 % Inlining of procedures is disabled.
 parser_i_writing_browser_log=03125_I_Escribiendo Browser log $1
 % When information messages are on, the compiler warns you when it

compiler/msgidx.inc

@@ -221,8 +221,8 @@ const
   parser_e_proc_dir_not_allowed_in_procvar=03119;
   parser_e_function_already_declared_public_forward=03120;
   parser_e_not_external_and_export=03121;
-  parser_w_not_supported_for_inline=03123;
-  parser_w_inlining_disabled=03124;
+  parser_h_not_supported_for_inline=03123;
+  parser_h_inlining_disabled=03124;
   parser_i_writing_browser_log=03125;
   parser_h_maybe_deref_caret_missing=03126;
   parser_f_assembler_reader_not_supported=03127;

compiler/msgtxt.inc

@@ -251,8 +251,8 @@ const msgtxt : array[0..000262,1..240] of char=(
   '03119_E_Procedure directive "$1" not allowed in procvar declaration'#000+
   '03120_E_Function is already declared Public/Forward "$1"'#000+
   '03121_E_Can'#039't use both EXPORT and EXTERNAL'#000+
-  '03123_W_"$1" not yet supported inside inline procedure/function'#000+
-  '0','3124_W_Inlining disabled'#000+
+  '03123_H_"$1" not yet supported inside inline procedure/function'#000+
+  '0','3124_H_Inlining disabled'#000+
   '03125_I_Writing Browser log $1'#000+
   '03126_H_may be pointer dereference is missing'#000+
   '03127_F_Selected assembler reader not supported'#000+

compiler/pdecsub.pas

@@ -2893,11 +2893,11 @@ const
                not(cs_do_inline in current_settings.localswitches) then
               begin
                 { Give an error if inline is not supported by the compiler mode,
-                  otherwise only give a warning that this procedure will not be inlined }
+                  otherwise only give a hint that this procedure will not be inlined }
                 if not(m_default_inline in current_settings.modeswitches) then
                   Message(parser_e_proc_inline_not_supported)
                 else
-                  Message(parser_w_inlining_disabled);
+                  Message(parser_h_inlining_disabled);
                 exclude(pd.procoptions,po_inline);
               end;
 

compiler/psub.pas

@@ -1352,8 +1352,8 @@ implementation
         result := false;
         if (pi_has_assembler_block in current_procinfo.flags) then
           begin
-            Message1(parser_w_not_supported_for_inline,'assembler');
-            Message(parser_w_inlining_disabled);
+            Message1(parser_h_not_supported_for_inline,'assembler');
+            Message(parser_h_inlining_disabled);
             exit;
           end;
         for i:=0 to procdef.paras.count-1 do
@@ -1364,8 +1364,8 @@ implementation
                 begin
                   if (currpara.varspez in [vs_out,vs_var,vs_const,vs_constref]) then
                     begin
-                      Message1(parser_w_not_supported_for_inline,'formal parameter');
-                      Message(parser_w_inlining_disabled);
+                      Message1(parser_h_not_supported_for_inline,'formal parameter');
+                      Message(parser_h_inlining_disabled);
                       exit;
                     end;
                 end;
@@ -1374,8 +1374,8 @@ implementation
                   if is_array_of_const(currpara.vardef) or
                      is_variant_array(currpara.vardef) then
                     begin
-                      Message1(parser_w_not_supported_for_inline,'array of const');
-                      Message(parser_w_inlining_disabled);
+                      Message1(parser_h_not_supported_for_inline,'array of const');
+                      Message(parser_h_inlining_disabled);
                       exit;
                     end;
                   { open arrays might need re-basing of the index, i.e. if you pass
@@ -1383,8 +1383,8 @@ implementation
                     if you directly inline it }
                   if is_open_array(currpara.vardef) then
                     begin
-                      Message1(parser_w_not_supported_for_inline,'open array');
-                      Message(parser_w_inlining_disabled);
+                      Message1(parser_h_not_supported_for_inline,'open array');
+                      Message(parser_h_inlining_disabled);
                       exit;
                     end;
                 end;
@@ -1610,8 +1610,8 @@ implementation
             else
              if (po_inline in current_procinfo.procdef.procoptions) then
               begin
-                Message1(parser_w_not_supported_for_inline,'nested procedures');
-                Message(parser_w_inlining_disabled);
+                Message1(parser_h_not_supported_for_inline,'nested procedures');
+                Message(parser_h_inlining_disabled);
                 exclude(current_procinfo.procdef.procoptions,po_inline);
               end;
           end;