<!-- See available text formatting: https://gitlab.com/help/user/markdown.md --> ## Summary <!-- Summarize the bug encountered concisely --> Internal error 2015071402 occurs when building the lazarus trunk with an fpc trunk built with the "-dsymansistr" declaration. ## System Information <!-- The more information are provided the easier it is to replicate the bug --> - **Operating system:** <!-- Windows, Linux (if possible, also name the distro), FreeBSD, Android, ... -->Linux - **Processor architecture:** <!-- x86, x86-64, ARM, AARCH64, AVR, RISC-V, PowerPC, ... -->x86-64 - **Compiler version:** <!-- 3.2, 3.2.2, 3.3, trunk, beta, ... (if possible, give also the git hash) -->trunk - **Device:** <!-- Computer, Tablet, Mobile, Amiga, Microcontroller, ... -->Computer ## Steps to reproduce <!-- How one can reproduce the issue - this is very important! --> Building the lazarus trunk with an fpc trunk built with the "-dsymansistr" declaration. ## Example Project <!-- If possible, please create an example project that exhibits the problematic behavior, and link to it here in the bug report. --> ## What is the current bug behavior? <!-- What actually happens --> Lazarus build failed. ## What is the expected (correct) behavior? <!-- What you should see instead --> Lazarus build success. ## Relevant logs and/or screenshots <!-- Paste any relevant logs - please use code blocks (```) to format console output, logs, and code --> ``` /usr/bin/make -C components/lazdebuggers/lazdebuggerintf /home/vboxuser/development/fpc/bin/x86_64-linux/fpc.sh -MObjFPC -Scghi -O1 -g -gl -l -vewnhibq -Fu. -Fu../../../packager/units/x86_64-linux -Fu../../lazutils/lib/x86_64-linux -Fu/home/vboxuser/development/fpc/rtl -FE. -FUlib/x86_64-linux -Cg -Fl/usr/lib/gcc/x86_64-linux-gnu/12 -vw-n-h-l-d-u-t-p-c- -dSYN_MBCSSUPPORT -dWithSynExperimentalCharWidth -dx86_64 lazdebuggerintfpackage.pas (1002) Target OS: Linux for x86-64 (3104) Compiling lazdebuggerintfpackage.pas (3104) Compiling lazdebuggerintf.pas (3104) Compiling lazdebuggervalueconverter.pas (3104) Compiling lazdebuggertemplate.pas (3104) Compiling dbgutilstypepatternlist.pas (3104) Compiling lazdebuggerutils.pas (3104) Compiling lazdebuggerintfexcludedroutines.pas (3104) Compiling lazdebuggerintfsynchronizedlist.pas /home/vboxuser/development/lazarus/components/lazdebuggers/lazdebuggerintf/lazdebuggerintfexcludedroutines.pas(545) Fatal: Internal error 2015071402 make: *** [Makefile:3210: lazbuild] Error 2 Fatal: (1018) Compilation aborted ``` ## Possible fixes <!-- If you can, link to the line of code that might be responsible for the problem --> ```patch diff --git a/compiler/symtable.pas b/compiler/symtable.pas index 6ba0bcfd44..04c0489bc3 100644 --- a/compiler/symtable.pas +++ b/compiler/symtable.pas @@ -4402,8 +4402,16 @@ parentclassh:=classh.childof; srsymtable: tsymtable; srsym: tsym; begin + { keep in sync with the truncation performed in + TSymtable.insertsym (symbase.pas): symbol names starting with + '$' are stored truncated to maxidlen+1 characters (after + stripping the '$'). With TIDString = AnsiString (-dSYMANSISTR), + "s" is not implicitly truncated by the ShortString assignment + the way it is in a normal build, so we must truncate explicitly + here as well or a long enough name will never be found again, + triggering internalerror 2015071402. } if s[1]='$' then - found:=searchsym_in_module(current_module,copy(s,2,length(s)),srsym,srsymtable) + found:=searchsym_in_module(current_module,copy(s,2,maxidlen+1),srsym,srsymtable) else found:=searchsym_in_module(current_module,s,srsym,srsymtable); if found then ```