paweld/fpc
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/fpc/source.git synced 2025-11-03 08:51:39 +01:00
Code Issues Packages Projects Releases Wiki Activity

* 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

Browse Source 
git-svn-id: trunk@20626 -
This commit is contained in:
florian 2012-03-25 14:19:45 +00:00
parent 5a05542ddb
commit f4af507321
24 changed files with 56 additions and 56 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
compiler/msg/errorct.msg
View File

@ -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

4
compiler/msg/errord.msg
View File

@ -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

4
compiler/msg/errorda.msg
View File

@ -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

4
compiler/msg/errordu.msg
View File

@ -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

4
compiler/msg/errore.msg
View File

@ -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

4
compiler/msg/errores.msg
View File

@ -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

4
compiler/msg/errorf.msg
View File

@ -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

4
compiler/msg/errorfi.msg
View File

@ -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

4
compiler/msg/errorhe.msg
View File

@ -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

4
compiler/msg/errorheu.msg
View File

@ -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

4
compiler/msg/errorid.msg
View File

@ -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

4
compiler/msg/erroriu.msg
View File

@ -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

4
compiler/msg/errorn.msg
View File

@ -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

4
compiler/msg/errorpl.msg
View File

@ -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<62>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<77>Ą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

4
compiler/msg/errorpli.msg
View File

@ -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

4
compiler/msg/errorpt.msg
View File

@ -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

4
compiler/msg/errorptu.msg
View File

@ -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

4
compiler/msg/errorr.msg
View File

@ -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
% Š®£¤  ¢ª«îç¥­ë ¨­ä®à¬ æ¨®­­ë¥ á®®¡é¥­¨ï, ª®¬¯¨«ïâ®à á®®¡é ¥â

4
compiler/msg/errorru.msg
View File

@ -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
% Когда включены информационные сообщения, компилятор сообщает

4
compiler/msg/errorues.msg
View File

@ -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

4
compiler/msgidx.inc
View File

@ -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;

4
compiler/msgtxt.inc
View File

@ -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+

4
compiler/pdecsub.pas
View File

@ -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;

20
compiler/psub.pas
View File

@ -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;