[CRASH] In compact_string_chars() using pgnus-0.66, 21.2-b5

That seems to be to old modeline crash: compact_string_chars() line 3961 + 3 bytes gc_sweep() line 4198 garbage_collect_1() line 4506 Feval(Lisp_Object {...}) line 2911 Fprogn(Lisp_Object {...}) line 761 + 9 bytes Fsave_restriction(Lisp_Object {...}) line 2143 + 9 bytes Feval(Lisp_Object {...}) line 2959 + 13 bytes Fprogn(Lisp_Object {...}) line 761 + 9 bytes Fsave_excursion(Lisp_Object {...}) line 404 + 9 bytes Feval(Lisp_Object {...}) line 2959 + 13 bytes Fprogn(Lisp_Object {...}) line 761 + 9 bytes Flet(Lisp_Object {...}) line 926 + 9 bytes Feval(Lisp_Object {...}) line 2959 + 13 bytes Fprogn(Lisp_Object {...}) line 761 + 9 bytes funcall_lambda(Lisp_Object {...}, int 0x00000002, Lisp_Object * 0x0082ae78) line 3508 + 9 bytes Feval(Lisp_Object {...}) line 3092 + 20 bytes Fprogn(Lisp_Object {...}) line 761 + 9 bytes Feval(Lisp_Object {...}) line 2959 + 13 bytes Fprogn(Lisp_Object {...}) line 761 + 9 bytes Fsave_current_buffer(Lisp_Object {...}) line 429 + 9 bytes Feval(Lisp_Object {...}) line 2959 + 13 bytes Feval(Lisp_Object {...}) line 3066 + 34 bytes Funwind_protect(Lisp_Object {...}) line 1485 + 21 bytes Feval(Lisp_Object {...}) line 2959 + 13 bytes Fprogn(Lisp_Object {...}) line 761 + 9 bytes Flet(Lisp_Object {...}) line 926 + 9 bytes Feval(Lisp_Object {...}) line 2959 + 13 bytes Feval(Lisp_Object {...}) line 3066 + 34 bytes Fprogn(Lisp_Object {...}) line 761 + 9 bytes Flet(Lisp_Object {...}) line 926 + 9 bytes Feval(Lisp_Object {...}) line 2959 + 13 bytes Fprogn(Lisp_Object {...}) line 761 + 9 bytes funcall_lambda(Lisp_Object {...}, int 0x00000001, Lisp_Object * 0x0082bccc) line 3508 + 9 bytes Ffuncall(int 0x00000002, Lisp_Object * 0x0082bcc8) line 3229 + 17 bytes Feval(Lisp_Object {...}) line 3013 + 20 bytes Feval(Lisp_Object {...}) line 3081 + 12 bytes Fsetq(Lisp_Object {...}) line 974 + 9 bytes Feval(Lisp_Object {...}) line 2959 + 13 bytes Fprogn(Lisp_Object {...}) line 761 + 9 bytes Feval(Lisp_Object {...}) line 2959 + 13 bytes Funwind_protect(Lisp_Object {...}) line 1485 + 21 bytes Feval(Lisp_Object {...}) line 2959 + 13 bytes Fprogn(Lisp_Object {...}) line 761 + 9 bytes Flet(Lisp_Object {...}) line 926 + 9 bytes Feval(Lisp_Object {...}) line 2959 + 13 bytes Fprogn(Lisp_Object {...}) line 761 + 9 bytes funcall_lambda(Lisp_Object {...}, int 0x00000003, Lisp_Object * 0x0082c73c) line 3508 + 9 bytes Feval(Lisp_Object {...}) line 3092 + 20 bytes Fprogn(Lisp_Object {...}) line 761 + 9 bytes Feval(Lisp_Object {...}) line 2959 + 13 bytes Fsetq(Lisp_Object {...}) line 974 + 9 bytes Feval(Lisp_Object {...}) line 2959 + 13 bytes Fprogn(Lisp_Object {...}) line 761 + 9 bytes Feval(Lisp_Object {...}) line 2959 + 13 bytes Fand(Lisp_Object {...}) line 656 + 9 bytes Feval(Lisp_Object {...}) line 2959 + 13 bytes Fprogn(Lisp_Object {...}) line 761 + 9 bytes Fwhile(Lisp_Object {...}) line 943 + 9 bytes Feval(Lisp_Object {...}) line 2959 + 13 bytes condition_case_1(Lisp_Object {...}, Lisp_Object (Lisp_Object)* 0x010589a6 Feval(Lisp_Object), Lisp_Object {...}, Lisp_Object (Lisp_Object, Lisp_Object)* 0x010562de run_condition_case_handlers(Lisp_Object, Lisp_Object), Lisp_Object {...}) line 1640 + 7 bytes condition_case_3(Lisp_Object {...}, Lisp_Object {...}, Lisp_Object {...}) line 1721 + 27 bytes Fcondition_case(Lisp_Object {...}) line 1764 + 17 bytes Feval(Lisp_Object {...}) line 2959 + 13 bytes Fprogn(Lisp_Object {...}) line 761 + 9 bytes Fwhile(Lisp_Object {...}) line 943 + 9 bytes Feval(Lisp_Object {...}) line 2959 + 13 bytes Fprogn(Lisp_Object {...}) line 761 + 9 bytes Fsave_excursion(Lisp_Object {...}) line 404 + 9 bytes Feval(Lisp_Object {...}) line 2959 + 13 bytes Fprogn(Lisp_Object {...}) line 761 + 9 bytes Flet(Lisp_Object {...}) line 926 + 9 bytes Feval(Lisp_Object {...}) line 2959 + 13 bytes Fprogn(Lisp_Object {...}) line 761 + 9 bytes funcall_lambda(Lisp_Object {...}, int 0x00000005, Lisp_Object * 0x0082d968) line 3508 + 9 bytes Feval(Lisp_Object {...}) line 3092 + 20 bytes Fif(Lisp_Object {...}) line 677 + 9 bytes Feval(Lisp_Object {...}) line 2959 + 13 bytes Fsetq(Lisp_Object {...}) line 974 + 9 bytes Feval(Lisp_Object {...}) line 2959 + 13 bytes Fprogn(Lisp_Object {...}) line 761 + 9 bytes Fcond(Lisp_Object {...}) line 738 + 9 bytes Feval(Lisp_Object {...}) line 2959 + 13 bytes Fprogn(Lisp_Object {...}) line 761 + 9 bytes FletX(Lisp_Object {...}) line 860 + 9 bytes Feval(Lisp_Object {...}) line 2959 + 13 bytes Fprogn(Lisp_Object {...}) line 761 + 9 bytes funcall_lambda(Lisp_Object {...}, int 0x00000003, Lisp_Object * 0x0082e24c) line 3508 + 9 bytes Feval(Lisp_Object {...}) line 3092 + 20 bytes Fand(Lisp_Object {...}) line 656 + 9 bytes Feval(Lisp_Object {...}) line 2959 + 13 bytes FletX(Lisp_Object {...}) line 852 + 21 bytes Feval(Lisp_Object {...}) line 2959 + 13 bytes Fprogn(Lisp_Object {...}) line 761 + 9 bytes funcall_lambda(Lisp_Object {...}, int 0x00000006, Lisp_Object * 0x0082e794) line 3508 + 9 bytes Feval(Lisp_Object {...}) line 3092 + 20 bytes For(Lisp_Object {...}) line 637 + 9 bytes Feval(Lisp_Object {...}) line 2959 + 13 bytes Fprogn(Lisp_Object {...}) line 761 + 9 bytes Flet(Lisp_Object {...}) line 926 + 9 bytes Feval(Lisp_Object {...}) line 2959 + 13 bytes Fsetq(Lisp_Object {...}) line 974 + 9 bytes Feval(Lisp_Object {...}) line 2959 + 13 bytes Feval(Lisp_Object {...}) line 2974 + 12 bytes Fand(Lisp_Object {...}) line 656 + 9 bytes Feval(Lisp_Object {...}) line 2959 + 13 bytes Fwhile(Lisp_Object {...}) line 940 + 9 bytes Feval(Lisp_Object {...}) line 2959 + 13 bytes Fprogn(Lisp_Object {...}) line 761 + 9 bytes Flet(Lisp_Object {...}) line 926 + 9 bytes Feval(Lisp_Object {...}) line 2959 + 13 bytes Fprogn(Lisp_Object {...}) line 761 + 9 bytes funcall_lambda(Lisp_Object {...}, int 0x00000007, Lisp_Object * 0x0082f590) line 3508 + 9 bytes Feval(Lisp_Object {...}) line 3092 + 20 bytes Fprogn(Lisp_Object {...}) line 761 + 9 bytes Flet(Lisp_Object {...}) line 926 + 9 bytes Feval(Lisp_Object {...}) line 2959 + 13 bytes Fprogn(Lisp_Object {...}) line 761 + 9 bytes funcall_lambda(Lisp_Object {...}, int 0x00000001, Lisp_Object * 0x0082fa44) line 3508 + 9 bytes Ffuncall(int 0x00000002, Lisp_Object * 0x0082fa40) line 3229 + 17 bytes Fcall_interactively(Lisp_Object {...}, Lisp_Object {...}, Lisp_Object {...}) line 949 + 22 bytes Fcommand_execute(Lisp_Object {...}, Lisp_Object {...}, Lisp_Object {...}) line 2623 + 17 bytes execute_command_event(command_builder * 0x1016cd00, Lisp_Object {...}) line 4345 + 25 bytes Fdispatch_event(Lisp_Object {...}) line 4644 + 71 bytes Fcommand_loop_1() line 578 + 9 bytes command_loop_1(Lisp_Object {...}) line 494 condition_case_1(Lisp_Object {...}, Lisp_Object (Lisp_Object)* 0x0103a7be command_loop_1(Lisp_Object), Lisp_Object {...}, Lisp_Object (Lisp_Object, Lisp_Object)* 0x0103a24b cmd_error(Lisp_Object, Lisp_Object), Lisp_Object {...}) line 1640 + 7 bytes command_loop_3() line 255 + 35 bytes command_loop_2(Lisp_Object {...}) line 267 internal_catch(Lisp_Object {...}, Lisp_Object (Lisp_Object)* 0x0103a3b3 command_loop_2(Lisp_Object), Lisp_Object {...}, int * volatile 0x00000000) line 1315 + 7 bytes initial_command_loop(Lisp_Object {...}) line 304 + 25 bytes STACK_TRACE_EYE_CATCHER(int 0x00000001, char * * 0x10105680, char * * 0x10208100, int 0x00000000) line 1715 + 9 bytes main(int 0x00000001, char * * 0x10105680, char * * 0x10208100) line 2144 + 21 bytes XEMACS! mainCRTStartup + 180 bytes _start() line 165 KERNEL32! Auto variables inside compact_string_chars(): - from_s_chars->string 0x70756f72 - lheader {...} type CXX0030: Error: expression cannot be evaluated mark CXX0030: Error: expression cannot be evaluated pure CXX0030: Error: expression cannot be evaluated size CXX0030: Error: expression cannot be evaluated data CXX0030: Error: expression cannot be evaluated - plist {...} - gu {...} type CXX0030: Error: expression cannot be evaluated val CXX0030: Error: expression cannot be evaluated - s {...} bits CXX0030: Error: expression cannot be evaluated val CXX0030: Error: expression cannot be evaluated - u {...} bits CXX0030: Error: expression cannot be evaluated val CXX0030: Error: expression cannot be evaluated ui CXX0030: Error: expression cannot be evaluated i CXX0030: Error: expression cannot be evaluated v CXX0017: Error: symbol "nosuchstruct" not found cv CXX0017: Error: symbol "nosuchstruct" not found - string 0x70756f72 - lheader {...} type CXX0030: Error: expression cannot be evaluated mark CXX0030: Error: expression cannot be evaluated pure CXX0030: Error: expression cannot be evaluated size CXX0030: Error: expression cannot be evaluated data CXX0030: Error: expression cannot be evaluated - plist {...} - gu {...} type CXX0030: Error: expression cannot be evaluated val CXX0030: Error: expression cannot be evaluated - s {...} bits CXX0030: Error: expression cannot be evaluated val CXX0030: Error: expression cannot be evaluated - u {...} bits CXX0030: Error: expression cannot be evaluated val CXX0030: Error: expression cannot be evaluated ui CXX0030: Error: expression cannot be evaluated i CXX0030: Error: expression cannot be evaluated v CXX0017: Error: symbol "nosuchstruct" not found cv CXX0017: Error: symbol "nosuchstruct" not found Crash is caused by indicated assert in alloc.c at line 3961: if (FREE_STRUCT_P (from_s_chars)) { fullsize = ((struct unused_string_chars *) from_s_chars)->fullsize; from_pos += fullsize; continue; } string = from_s_chars->string; => assert (!(FREE_STRUCT_P (string))); size = string_length (string); fullsize = STRING_FULLSIZE (size); -- Adrian Aichner European Design Center Teradyne GmbH Semiconductor Test Group Telephone +49/89/41861(0)-208 Dingolfinger Strasse 2 Fax +49/89/41861-217 (What is a Fax?) D-81673 MUENCHEN E-mail adrian.aichner(a)teradyne.com