added dumpstack for inconsistency check

git-svn-id: trunk@15793 -
This commit is contained in:
mattias 2008-07-16 19:19:03 +00:00
parent f70b98cbb8
commit 6d0aceeba0
8 changed files with 33 additions and 35 deletions

View File

@ -9,19 +9,19 @@ msgstr ""
"Content-Type: text/plain; charset=UTF-8\n"
"Content-Transfer-Encoding: 8bit\n"
#: h2passtrconsts:h2pcheaderfileconverter
#: h2passtrconsts.h2pcheaderfileconverter
msgid "C header file converter"
msgstr "C-Header-Dateikonverter"
#: h2passtrconsts:h2pcreateunitsfromcheaderfiles
#: h2passtrconsts.h2pcreateunitsfromcheaderfiles
msgid "Create units from C header files"
msgstr "Units aus C-Headerdateien erzeugen"
#: h2passtrconsts:h2ph2pas
#: h2passtrconsts.h2ph2pas
msgid "H2Pas"
msgstr "HPas"
#: h2passtrconsts:h2ph2pastool
#: h2passtrconsts.h2ph2pastool
msgid "H2PasTool"
msgstr "HPasTool"

View File

@ -9,19 +9,19 @@ msgstr ""
"Content-Type: text/plain; charset=UTF-8\n"
"Content-Transfer-Encoding: 8bit\n"
#: h2passtrconsts:h2pcheaderfileconverter
#: h2passtrconsts.h2pcheaderfileconverter
msgid "C header file converter"
msgstr "Konvertern file header C"
#: h2passtrconsts:h2pcreateunitsfromcheaderfiles
#: h2passtrconsts.h2pcreateunitsfromcheaderfiles
msgid "Create units from C header files"
msgstr "Buat unit dari file header C"
#: h2passtrconsts:h2ph2pas
#: h2passtrconsts.h2ph2pas
msgid "H2Pas"
msgstr "H2Pas"
#: h2passtrconsts:h2ph2pastool
#: h2passtrconsts.h2ph2pastool
msgid "H2PasTool"
msgstr "H2PasTool"

View File

@ -10,19 +10,19 @@ msgstr ""
"MIME-Version: 1.0\n"
"Plural-Forms: nplurals=3; plural=(n%10==1 && n%100!=11 ? 0 : n%10>=2 && (n%100<10 || n%100>=20) ? 1 : 2);\n"
#: h2passtrconsts:h2pcheaderfileconverter
#: h2passtrconsts.h2pcheaderfileconverter
msgid "C header file converter"
msgstr "C antraštės failo konverteris"
#: h2passtrconsts:h2pcreateunitsfromcheaderfiles
#: h2passtrconsts.h2pcreateunitsfromcheaderfiles
msgid "Create units from C header files"
msgstr "Kurti modulius pagal C antraštės failus"
#: h2passtrconsts:h2ph2pas
#: h2passtrconsts.h2ph2pas
msgid "H2Pas"
msgstr "H2Pas"
#: h2passtrconsts:h2ph2pastool
#: h2passtrconsts.h2ph2pastool
msgid "H2PasTool"
msgstr "H2PasTool"

View File

@ -1,19 +1,19 @@
msgid ""
msgstr ""
msgstr "Content-Type: text/plain; charset=UTF-8"
#: h2passtrconsts:h2pcheaderfileconverter
#: h2passtrconsts.h2pcheaderfileconverter
msgid "C header file converter"
msgstr "Conversor de cabecalho C"
#: h2passtrconsts:h2pcreateunitsfromcheaderfiles
#: h2passtrconsts.h2pcreateunitsfromcheaderfiles
msgid "Create units from C header files"
msgstr "Criar unidades de arquivos de cabecalho C"
#: h2passtrconsts:h2ph2pas
#: h2passtrconsts.h2ph2pas
msgid "H2Pas"
msgstr "H para Pas"
#: h2passtrconsts:h2ph2pastool
#: h2passtrconsts.h2ph2pastool
msgid "H2PasTool"
msgstr "Ferramenta H para Pas"

View File

@ -11,19 +11,19 @@ msgstr ""
"X-Poedit-Language: Polish\n"
"X-Poedit-Country: POLAND\n"
#: h2passtrconsts:h2pcheaderfileconverter
#: h2passtrconsts.h2pcheaderfileconverter
msgid "C header file converter"
msgstr ""
#: h2passtrconsts:h2pcreateunitsfromcheaderfiles
#: h2passtrconsts.h2pcreateunitsfromcheaderfiles
msgid "Create units from C header files"
msgstr ""
#: h2passtrconsts:h2ph2pas
#: h2passtrconsts.h2ph2pas
msgid "H2Pas"
msgstr "H2Pas"
#: h2passtrconsts:h2ph2pastool
#: h2passtrconsts.h2ph2pastool
msgid "H2PasTool"
msgstr ""

View File

@ -4,23 +4,19 @@ msgstr ""
"Content-Type: text/plain; charset=UTF-8\n"
"Content-Transfer-Encoding: 8bit\n"
#: h2passtrconsts:bla
msgid ""
msgstr ""
#: h2passtrconsts:h2pcheaderfileconverter
#: h2passtrconsts.h2pcheaderfileconverter
msgid "C header file converter"
msgstr ""
#: h2passtrconsts:h2pcreateunitsfromcheaderfiles
#: h2passtrconsts.h2pcreateunitsfromcheaderfiles
msgid "Create units from C header files"
msgstr ""
#: h2passtrconsts:h2ph2pas
#: h2passtrconsts.h2ph2pas
msgid "H2Pas"
msgstr ""
#: h2passtrconsts:h2ph2pastool
#: h2passtrconsts.h2ph2pastool
msgid "H2PasTool"
msgstr ""

View File

@ -9,19 +9,19 @@ msgstr ""
"Content-Type: text/plain; charset=utf-8\n"
"Content-Transfer-Encoding: 8bit\n"
#: h2passtrconsts:h2pcheaderfileconverter
#: h2passtrconsts.h2pcheaderfileconverter
msgid "C header file converter"
msgstr "Ковертер файлов заголовков C"
#: h2passtrconsts:h2pcreateunitsfromcheaderfiles
#: h2passtrconsts.h2pcreateunitsfromcheaderfiles
msgid "Create units from C header files"
msgstr "Создать модули из файлов заголовков C"
#: h2passtrconsts:h2ph2pas
#: h2passtrconsts.h2ph2pas
msgid "H2Pas"
msgstr "H2Pas"
#: h2passtrconsts:h2ph2pastool
#: h2passtrconsts.h2ph2pastool
msgid "H2PasTool"
msgstr "H2PasTool"

View File

@ -8292,10 +8292,11 @@ begin
+Flags*[sfCheckAmbiguousFiles];
AnUnitInfo:=Project1.UnitWithEditorIndex(i);
if AnUnitInfo = nil
then
then begin
{$NOTE ToDo: EditorIndex/Source editor inconsistency: fix the real bug, see http://bugs.freepascal.org/view.php?id=10171}
DumpStack;
DebugLn('TMainIDE.DoSaveProject - unit not found for page %d', [i])
else
end else begin
if AnUnitInfo.IsVirtual
then begin
if (sfSaveToTestDir in Flags) then
@ -8303,6 +8304,7 @@ begin
else
continue;
end;
end;
Result:=DoSaveEditorFile(i,SaveFileFlags);
if Result=mrAbort then exit;
end;