transpose-regions

[martin rudalics <rudalics@gmx.at>]

I'm quite frequently harassed by reports like

Debugger entered--Lisp error: (wrong-type-argument listp 4297150)
   transpose-regions(44516 44561 44561 44599)

Debugger entered--Lisp error: (wrong-type-argument listp 4479113)
   transpose-regions(64984 65044 65044 65059)

Debugger entered--Lisp error: (wrong-type-argument listp 4626696)
   transpose-regions(130041 130061 130061 130225)

Erratically and unreproducible.  Apparently, the transposed regions are
always adjacent, I don't see a common pattern as far as their sizes are
concerned.

Breaking at Fsignal gave:

#0  Fsignal (error_symbol=23761593, data=24130861) at eval.c:1620
#1  0x0100cd68 in xsignal (error_symbol=23761593, data=24130861) at eval.c:1722
#2  0x0100cfb7 in xsignal2 () at eval.c:1746
#3  0x01004620 in pure_write_error () at data.c:121
#4  0x0107e521 in Flength (sequence=35483205) at fns.c:185
#5  0x0107f1e0 in concat (nargs=1, args=0xd2f280, target_type=Lisp_Cons, last_special=0) at fns.c:608
#6  0x0107f873 in Fcopy_sequence (arg=35483205) at fns.c:537
#7  0x0111ac12 in copy_properties (source=0x21db988, target=0x1eb79c0) at intervals.c:106
#8  0x0111be5f in graft_intervals_into_buffer (source=0x21db9f8, position=4778, length=322, buffer=0x20a2a00, inherit=0) at intervals.c:1842
#9  0x0108f6fb in Ftranspose_regions (startr1=38216, endr1=40792, startr2=40792, endr2=40800, leave_markers=23697409) at editfns.c:4214
#10 0x0100c87b in Ffuncall (nargs=5, args=0xd2f590) at eval.c:3011
#11 0x0110f83f in Fbyte_code (bytestr=33408387, vector=33639812, maxdepth=40) at bytecode.c:679
#12 0x0100bdcd in Feval (form=33251485) at eval.c:2334
#13 0x0100e1da in internal_lisp_condition_case (var=23697409, bodyform=33251485, handlers=33250773) at eval.c:1426
#14 0x0110ffe0 in Fbyte_code (bytestr=33408403, vector=33639684, maxdepth=24) at bytecode.c:869
#15 0x0100c274 in funcall_lambda (fun=33034660, nargs=0, arg_vector=0xd2f924) at eval.c:3184
#16 0x0100c6c6 in Ffuncall (nargs=1, args=0xd2f920) at eval.c:3054
#17 0x0100df03 in apply1 (fn=33611281, arg=23697409) at eval.c:2738
#18 0x0110e61c in Fcall_interactively (function=33611281, record_flag=23697409, keys=23756804) at callint.c:406
#19 0x01057506 in Fcommand_execute (cmd=33611281, record_flag=23697409, keys=23697409, special=23697409) at keyboard.c:10013
#20 0x0105e2bd in command_loop_1 () at keyboard.c:1873
#21 0x0100aa24 in internal_condition_case (bfun=0x105df60 <command_loop_1>, handlers=23761545, hfun=0x1057f40 <cmd_error>) at eval.c:1481
#22 0x01051f6e in command_loop_2 () at keyboard.c:1329
#23 0x0100a949 in internal_catch (tag=23755777, func=0x1051f40 <command_loop_2>, arg=23697409) at eval.c:1222
#24 0x01051d7e in command_loop () at keyboard.c:1308
#25 0x01051e1f in recursive_edit_1 () at keyboard.c:1006
#26 0x01051f1c in Frecursive_edit () at keyboard.c:1067
#27 0x01002a75 in main (argc=1, argv=0x19a06a0) at emacs.c:1761
#28 0x010011e7 in _end__ ()
#29 0x01001238 in mainCRTStartup ()
#30 0xbff7b9e4 in _libwinspool_a_iname ()
#31 0xbff7b896 in _libwinspool_a_iname ()
#32 0xbff7a24f in _libwinspool_a_iname ()