PSGML + Emacs CVS -> 97% CPU utilization

[Jhair Tocancipa Triana]

When opening a simple .sgml file with psgml mode under CVS emacs[1],
CPU utilization rises to almost 100% and it takes several minutes
until the file is processed and displayed[2]:

 7149 jtocanci  25   0 94736  39m 9468 R 97.4  3.9   5:01.87 emacs              

When I attach gdb to emacs to see what it is doing I get the backtrace
found at the end of this email.

I don't know much about Emacs garbage collection but I suspect Emacs
is doing something related in that backtrace. Sees any expert
something suspicious in the backtrace?

If more information or a reduced test case is needed I would be happy
to prepare one.

Thanks,

(BTW, I am using psgml as distributed by Ubuntu (psgml-version's value
is "1.3.2").

$ gdb attach 7247
...
GNU gdb 6.3-debian
...
0x00000000005dffab in Fbyte_code (bytestr=7785891, vector=7786060, 
    maxdepth=40) at bytecode.c:529
529                 MAYBE_GC ();

(gdb) bt 222
#0  0x00000000005dffab in Fbyte_code (bytestr=7785891, vector=7786060, 
    maxdepth=40) at bytecode.c:529
#1  0x000000000059f85d in funcall_lambda (fun=7785812, nargs=2, 
    arg_vector=0x7fffffc1aff8) at eval.c:3088
#2  0x000000000059f1ac in Ffuncall (nargs=3, args=0x7fffffc1aff0)
    at eval.c:2947
#3  0x00000000005e05c4 in Fbyte_code (bytestr=7784931, vector=7785316, 
    maxdepth=56) at bytecode.c:694
#4  0x000000000059f85d in funcall_lambda (fun=7784868, nargs=1, 
    arg_vector=0x7fffffc1b4f8) at eval.c:3088
#5  0x000000000059f1ac in Ffuncall (nargs=2, args=0x7fffffc1b4f0)
    at eval.c:2947
#6  0x00000000005e05c4 in Fbyte_code (bytestr=7784483, vector=7784524, 
    maxdepth=16) at bytecode.c:694
#7  0x000000000059f85d in funcall_lambda (fun=7784412, nargs=1, 
    arg_vector=0x7fffffc1ba68) at eval.c:3088
#8  0x000000000059f1ac in Ffuncall (nargs=2, args=0x7fffffc1ba60)
    at eval.c:2947
#9  0x000000000059e175 in Fapply (nargs=2, args=0x7fffffc1ba60) at eval.c:2341
#10 0x000000000059e86e in apply1 (fn=7784412, arg=32929013) at eval.c:2654
#11 0x000000000059dfea in Feval (form=32929285) at eval.c:2297
#12 0x000000000059a7e0 in Fprogn (args=32928997) at eval.c:432
#13 0x000000000059f811 in funcall_lambda (fun=32928965, nargs=1, 
    arg_vector=0x7fffffc1be28) at eval.c:3081
#14 0x000000000059f251 in Ffuncall (nargs=2, args=0x7fffffc1be20)
    at eval.c:2956
#15 0x000000000059e175 in Fapply (nargs=2, args=0x7fffffc1be20) at eval.c:2341
#16 0x000000000059e86e in apply1 (fn=32928965, arg=34889205) at eval.c:2654
#17 0x000000000059dfea in Feval (form=34889221) at eval.c:2297
#18 0x000000000059a754 in Fcond (args=34889125) at eval.c:405
#19 0x000000000059dabd in Feval (form=34889349) at eval.c:2188
#20 0x000000000059a7e0 in Fprogn (args=34888997) at eval.c:432
#21 0x000000000059f811 in funcall_lambda (fun=34888981, nargs=0, 
    arg_vector=0x7fffffc1c240) at eval.c:3081
#22 0x000000000059f461 in apply_lambda (fun=34888981, args=10303889, 
    eval_flag=1) at eval.c:3010
#23 0x000000000059e017 in Feval (form=34818485) at eval.c:2299
#24 0x000000000059a98a in Fsetq (args=34818501) at eval.c:534
#25 0x000000000059dabd in Feval (form=34818517) at eval.c:2188
#26 0x000000000059a7e0 in Fprogn (args=34818325) at eval.c:432
#27 0x000000000059b9ea in Flet (args=33386293) at eval.c:1053
#28 0x000000000059dabd in Feval (form=33386341) at eval.c:2188
#29 0x000000000059a7e0 in Fprogn (args=34818181) at eval.c:432
#30 0x000000000059f811 in funcall_lambda (fun=34818165, nargs=0, 
    arg_vector=0x7fffffc1c960) at eval.c:3081
#31 0x000000000059f461 in apply_lambda (fun=34818165, args=10303889, 
    eval_flag=1) at eval.c:3010
#32 0x000000000059e017 in Feval (form=34363349) at eval.c:2299
#33 0x000000000059db70 in Feval (form=33385525) at eval.c:2206
#34 0x000000000059db70 in Feval (form=33385557) at eval.c:2206
#35 0x000000000059a98a in Fsetq (args=33385573) at eval.c:534
#36 0x000000000059dabd in Feval (form=33385589) at eval.c:2188
#37 0x000000000059a7e0 in Fprogn (args=34363285) at eval.c:432
#38 0x000000000059baa9 in Fwhile (args=33385909) at eval.c:1075
#39 0x000000000059dabd in Feval (form=33385989) at eval.c:2188
#40 0x000000000059a7e0 in Fprogn (args=34363269) at eval.c:432
#41 0x000000000059b9ea in Flet (args=33386005) at eval.c:1053
#42 0x000000000059dabd in Feval (form=33386213) at eval.c:2188
#43 0x000000000059a7e0 in Fprogn (args=34362933) at eval.c:432
#44 0x000000000059a78e in Fcond (args=34362917) at eval.c:409
#45 0x000000000059dabd in Feval (form=33386277) at eval.c:2188
#46 0x000000000059a7e0 in Fprogn (args=34818533) at eval.c:432
#47 0x000000000059b9ea in Flet (args=33386293) at eval.c:1053
#48 0x000000000059dabd in Feval (form=33386341) at eval.c:2188
#49 0x000000000059a7e0 in Fprogn (args=34818181) at eval.c:432
#50 0x000000000059f811 in funcall_lambda (fun=34818165, nargs=0, 
    arg_vector=0x7fffffc1da50) at eval.c:3081
#51 0x000000000059f461 in apply_lambda (fun=34818165, args=10303889, 
    eval_flag=1) at eval.c:3010
#52 0x000000000059e017 in Feval (form=33386165) at eval.c:2299
#53 0x000000000059db70 in Feval (form=33386181) at eval.c:2206
#54 0x000000000059b905 in Flet (args=33386005) at eval.c:1037
#55 0x000000000059dabd in Feval (form=33386213) at eval.c:2188
#56 0x000000000059a7e0 in Fprogn (args=34362933) at eval.c:432
#57 0x000000000059a78e in Fcond (args=34362917) at eval.c:409
#58 0x000000000059dabd in Feval (form=33386277) at eval.c:2188
#59 0x000000000059a7e0 in Fprogn (args=34818533) at eval.c:432
#60 0x000000000059b9ea in Flet (args=33386293) at eval.c:1053
#61 0x000000000059dabd in Feval (form=33386341) at eval.c:2188
#62 0x000000000059a7e0 in Fprogn (args=34818181) at eval.c:432
#63 0x000000000059f811 in funcall_lambda (fun=34818165, nargs=0, 
    arg_vector=0x7fffffc1e590) at eval.c:3081
#64 0x000000000059f461 in apply_lambda (fun=34818165, args=10303889, 
    eval_flag=1) at eval.c:3010
#65 0x000000000059e017 in Feval (form=33388773) at eval.c:2299
#66 0x000000000059a7e0 in Fprogn (args=33388757) at eval.c:432
#67 0x000000000059f811 in funcall_lambda (fun=33388741, nargs=0, 
    arg_vector=0x7fffffc1e870) at eval.c:3081
#68 0x000000000059f461 in apply_lambda (fun=33388741, args=10303889, 
    eval_flag=1) at eval.c:3010
#69 0x000000000059e017 in Feval (form=33388549) at eval.c:2299
#70 0x000000000059a7e0 in Fprogn (args=33649621) at eval.c:432
#71 0x000000000059a78e in Fcond (args=33649605) at eval.c:409
#72 0x000000000059dabd in Feval (form=33388613) at eval.c:2188
#73 0x000000000059a7e0 in Fprogn (args=34856725) at eval.c:432
#74 0x000000000059f811 in funcall_lambda (fun=34856709, nargs=0, 
    arg_vector=0x7fffffc1ed50) at eval.c:3081
#75 0x000000000059f461 in apply_lambda (fun=34856709, args=10303889, 
    eval_flag=1) at eval.c:3010
#76 0x000000000059e017 in Feval (form=33559333) at eval.c:2299
#77 0x000000000059b6ca in FletX (args=33559061) at eval.c:989
#78 0x000000000059dabd in Feval (form=34856021) at eval.c:2188
#79 0x000000000059a7e0 in Fprogn (args=36359669) at eval.c:432
#80 0x000000000059f811 in funcall_lambda (fun=36359653, nargs=0, 
    arg_vector=0x7fffffc1f318) at eval.c:3081
#81 0x000000000059f251 in Ffuncall (nargs=1, args=0x7fffffc1f310)
    at eval.c:2956
#82 0x000000000059dbd4 in Feval (form=34573717) at eval.c:2214
#83 0x000000000059a7e0 in Fprogn (args=34573781) at eval.c:432
#84 0x000000000059a78e in Fcond (args=34573797) at eval.c:409
#85 0x000000000059dabd in Feval (form=34573509) at eval.c:2188
#86 0x000000000059a7e0 in Fprogn (args=34573909) at eval.c:432
#87 0x000000000059b715 in FletX (args=34574629) at eval.c:995
#88 0x000000000059dabd in Feval (form=34574421) at eval.c:2188
#89 0x000000000059a7e0 in Fprogn (args=34573925) at eval.c:432
#90 0x000000000059a78e in Fcond (args=34573941) at eval.c:409
#91 0x000000000059dabd in Feval (form=34576325) at eval.c:2188
#92 0x000000000059a7e0 in Fprogn (args=34574085) at eval.c:432
#93 0x000000000059a78e in Fcond (args=34572405) at eval.c:409
#94 0x000000000059dabd in Feval (form=34576101) at eval.c:2188
#95 0x000000000059a7e0 in Fprogn (args=34572517) at eval.c:432
#96 0x000000000059f811 in funcall_lambda (fun=34572533, nargs=1, 
    arg_vector=0x7fffffc1fd80) at eval.c:3081
#97 0x000000000059f461 in apply_lambda (fun=34572533, args=35435317, 
    eval_flag=1) at eval.c:3010
#98 0x000000000059e017 in Feval (form=35435365) at eval.c:2299
#99 0x000000000059a754 in Fcond (args=35435285) at eval.c:405
#100 0x000000000059dabd in Feval (form=34464869) at eval.c:2188
#101 0x000000000059a7e0 in Fprogn (args=35435205) at eval.c:432
#102 0x000000000059dabd in Feval (form=34464965) at eval.c:2188
#103 0x000000000059bab2 in Fwhile (args=35435189) at eval.c:1072
#104 0x000000000059dabd in Feval (form=34464981) at eval.c:2188
#105 0x000000000059a7e0 in Fprogn (args=35435173) at eval.c:432
#106 0x000000000059b9ea in Flet (args=34464997) at eval.c:1053
#107 0x000000000059dabd in Feval (form=34465109) at eval.c:2188
#108 0x000000000059a7e0 in Fprogn (args=35435157) at eval.c:432
#109 0x000000000059f811 in funcall_lambda (fun=35435141, nargs=0, 
    arg_vector=0x7fffffc20840) at eval.c:3081
#110 0x000000000059f461 in apply_lambda (fun=35435141, args=10303889, 
    eval_flag=1) at eval.c:3010
#111 0x000000000059e017 in Feval (form=34582885) at eval.c:2299
#112 0x000000000059a7e0 in Fprogn (args=34582901) at eval.c:432
#113 0x000000000059a78e in Fcond (args=34582997) at eval.c:409
#114 0x000000000059dabd in Feval (form=34582709) at eval.c:2188
#115 0x000000000059a7e0 in Fprogn (args=34583013) at eval.c:432
#116 0x000000000059b9ea in Flet (args=34584037) at eval.c:1053
#117 0x000000000059dabd in Feval (form=34583973) at eval.c:2188
#118 0x000000000059a7e0 in Fprogn (args=34581957) at eval.c:432
#119 0x000000000059f811 in funcall_lambda (fun=34581973, nargs=2, 
    arg_vector=0x7fffffc20fa0) at eval.c:3081
#120 0x000000000059f461 in apply_lambda (fun=34581973, args=34585269, 
    eval_flag=1) at eval.c:3010
#121 0x000000000059e017 in Feval (form=34585237) at eval.c:2299
#122 0x000000000059a7e0 in Fprogn (args=34585317) at eval.c:432
#123 0x000000000059b9ea in Flet (args=34585173) at eval.c:1053
#124 0x000000000059dabd in Feval (form=34585141) at eval.c:2188
#125 0x000000000059a7e0 in Fprogn (args=34585381) at eval.c:432
#126 0x000000000059a78e in Fcond (args=34585397) at eval.c:409
#127 0x000000000059dabd in Feval (form=34585045) at eval.c:2188
#128 0x000000000059a7e0 in Fprogn (args=34585413) at eval.c:432
#129 0x000000000059f811 in funcall_lambda (fun=34585525, nargs=0, 
    arg_vector=0x7fffffc217e8) at eval.c:3081
#130 0x000000000059f251 in Ffuncall (nargs=1, args=0x7fffffc217e0)
    at eval.c:2956
#131 0x000000000059dbd4 in Feval (form=34573717) at eval.c:2214
#132 0x000000000059a7e0 in Fprogn (args=34573781) at eval.c:432
#133 0x000000000059a78e in Fcond (args=34573797) at eval.c:409
#134 0x000000000059dabd in Feval (form=34573509) at eval.c:2188
#135 0x000000000059a7e0 in Fprogn (args=34573909) at eval.c:432
#136 0x000000000059b715 in FletX (args=34574629) at eval.c:995
#137 0x000000000059dabd in Feval (form=34574421) at eval.c:2188
#138 0x000000000059a7e0 in Fprogn (args=34573925) at eval.c:432
#139 0x000000000059a78e in Fcond (args=34573941) at eval.c:409
#140 0x000000000059dabd in Feval (form=34576325) at eval.c:2188
#141 0x000000000059a7e0 in Fprogn (args=34574085) at eval.c:432
#142 0x000000000059a78e in Fcond (args=34572405) at eval.c:409
#143 0x000000000059dabd in Feval (form=34576101) at eval.c:2188
#144 0x000000000059a7e0 in Fprogn (args=34572517) at eval.c:432
#145 0x000000000059f811 in funcall_lambda (fun=34572533, nargs=1, 
    arg_vector=0x7fffffc22250) at eval.c:3081
#146 0x000000000059f461 in apply_lambda (fun=34572533, args=34299221, 
    eval_flag=1) at eval.c:3010
#147 0x000000000059e017 in Feval (form=34299173) at eval.c:2299
#148 0x000000000059a67c in Fand (args=34299237) at eval.c:353
#149 0x000000000059dabd in Feval (form=34299157) at eval.c:2188
#150 0x000000000059a620 in For (args=34299301) at eval.c:328
#151 0x000000000059dabd in Feval (form=34299077) at eval.c:2188
#152 0x000000000059a7e0 in Fprogn (args=34299317) at eval.c:432
#153 0x000000000059dabd in Feval (form=34298981) at eval.c:2188
#154 0x000000000059bab2 in Fwhile (args=34299333) at eval.c:1072
#155 0x000000000059dabd in Feval (form=34298965) at eval.c:2188
#156 0x000000000059a7e0 in Fprogn (args=34753797) at eval.c:432
#157 0x000000000059dabd in Feval (form=34748469) at eval.c:2188
#158 0x000000000059c04b in Funwind_protect (args=34748485) at eval.c:1316
#159 0x000000000059dabd in Feval (form=34748501) at eval.c:2188
#160 0x000000000059a7e0 in Fprogn (args=34748517) at eval.c:432
#161 0x000000000059b9ea in Flet (args=34748549) at eval.c:1053
#162 0x000000000059dabd in Feval (form=34748565) at eval.c:2188
#163 0x000000000059dff2 in Feval (form=34298949) at eval.c:2297
#164 0x000000000059a7e0 in Fprogn (args=34297893) at eval.c:432
#165 0x000000000059b9ea in Flet (args=34298933) at eval.c:1053
#166 0x000000000059dabd in Feval (form=34300773) at eval.c:2188
#167 0x000000000059a7e0 in Fprogn (args=34297909) at eval.c:432
#168 0x000000000059f811 in funcall_lambda (fun=34296853, nargs=0, 
    arg_vector=0x7fffffc23600) at eval.c:3081
#169 0x000000000059f461 in apply_lambda (fun=34296853, args=10303889, 
    eval_flag=1) at eval.c:3010
#170 0x000000000059e017 in Feval (form=34304757) at eval.c:2299
#171 0x000000000059a7e0 in Fprogn (args=34304773) at eval.c:432
#172 0x000000000058d9cf in Fsave_excursion (args=34304773) at editfns.c:988
#173 0x000000000059dabd in Feval (form=34304741) at eval.c:2188
#174 0x000000000059a7e0 in Fprogn (args=34304789) at eval.c:432
#175 0x000000000059a78e in Fcond (args=34304805) at eval.c:409
#176 0x000000000059dabd in Feval (form=34305989) at eval.c:2188
#177 0x000000000059a7e0 in Fprogn (args=34304821) at eval.c:432
#178 0x000000000059f811 in funcall_lambda (fun=34304837, nargs=0, 
    arg_vector=0x7fffffc23cc0) at eval.c:3081
#179 0x000000000059f461 in apply_lambda (fun=34304837, args=10303889, 
    eval_flag=1) at eval.c:3010
#180 0x000000000059e017 in Feval (form=34305477) at eval.c:2299
#181 0x000000000059a7e0 in Fprogn (args=34305493) at eval.c:432
#182 0x000000000059a713 in Fif (args=34305413) at eval.c:381
#183 0x000000000059dabd in Feval (form=34305397) at eval.c:2188
#184 0x000000000059a7e0 in Fprogn (args=34723477) at eval.c:432
#185 0x000000000059dabd in Feval (form=34723541) at eval.c:2188
#186 0x000000000059a6f4 in Fif (args=34723573) at eval.c:380
#187 0x000000000059dabd in Feval (form=34723589) at eval.c:2188
#188 0x000000000059dff2 in Feval (form=34305029) at eval.c:2297
#189 0x000000000059a7e0 in Fprogn (args=34305525) at eval.c:432
#190 0x000000000059f811 in funcall_lambda (fun=34305813, nargs=0, 
    arg_vector=0x7fffffc24660) at eval.c:3081
#191 0x000000000059f461 in apply_lambda (fun=34305813, args=10303889, 
    eval_flag=1) at eval.c:3010
#192 0x000000000059e017 in Feval (form=30179381) at eval.c:2299
#193 0x000000000059a7e0 in Fprogn (args=34275269) at eval.c:432
#194 0x000000000059dabd in Feval (form=34275285) at eval.c:2188
#195 0x000000000059c2eb in internal_lisp_condition_case (var=10303889, 
    bodyform=34275285, handlers=20434293) at eval.c:1418
#196 0x000000000059c0ab in Fcondition_case (args=34273301) at eval.c:1359
#197 0x000000000059dabd in Feval (form=34273317) at eval.c:2188
#198 0x000000000059dff2 in Feval (form=30179365) at eval.c:2297
#199 0x000000000059a7e0 in Fprogn (args=34275125) at eval.c:432
#200 0x000000000059dabd in Feval (form=34275157) at eval.c:2188
#201 0x000000000059a6f4 in Fif (args=34275189) at eval.c:380
#202 0x000000000059dabd in Feval (form=34275205) at eval.c:2188
#203 0x000000000059dff2 in Feval (form=30181013) at eval.c:2297
#204 0x000000000059a7e0 in Fprogn (args=30179477) at eval.c:432
#205 0x000000000059f811 in funcall_lambda (fun=30179573, nargs=0, 
    arg_vector=0x7fffffc255f8) at eval.c:3081
#206 0x000000000059f251 in Ffuncall (nargs=1, args=0x7fffffc255f0)
    at eval.c:2956
#207 0x000000000059e654 in run_hook_with_args (nargs=1, args=0x7fffffc255f0, 
    cond=to_completion) at eval.c:2564
#208 0x000000000059e3de in Frun_hooks (nargs=1, args=0x7fffffc256e8)
    at eval.c:2427
#209 0x000000000059edb5 in Ffuncall (nargs=2, args=0x7fffffc256e0)
    at eval.c:2882
#210 0x000000000059e8d9 in call1 (fn=10434001, arg1=10367105) at eval.c:2686
#211 0x0000000000506dca in safe_run_hooks_1 (hook=140737484314544)
    at keyboard.c:2036
#212 0x000000000059c47e in internal_condition_case (
    bfun=0x506dab <safe_run_hooks_1>, handlers=10303985, 
    hfun=0x506dcc <safe_run_hooks_error>) at eval.c:1473
#213 0x0000000000506e6f in safe_run_hooks (hook=10367105) at keyboard.c:2064
#214 0x0000000000505d81 in command_loop_1 () at keyboard.c:1810
#215 0x000000000059c47e in internal_condition_case (
    bfun=0x5045cc <command_loop_1>, handlers=10398049, 
    hfun=0x504057 <cmd_error>) at eval.c:1473
#216 0x000000000050442b in command_loop_2 () at keyboard.c:1328
#217 0x000000000059bdfa in internal_catch (tag=10375745, 
    func=0x504411 <command_loop_2>, arg=10303889) at eval.c:1211
#218 0x00000000005043e5 in command_loop () at keyboard.c:1307
#219 0x0000000000503d5d in recursive_edit_1 () at keyboard.c:1000
#220 0x0000000000503eca in Frecursive_edit () at keyboard.c:1061
#221 0x0000000000502425 in main (argc=1, argv=0x7fffffc263a8) at emacs.c:1789

______________ 
[1] GNU Emacs 22.0.50.1 (x86_64-unknown-linux-gnu, GTK+ Version 2.8.6) of 
2006-04-01 on golem

[2] GNU Emacs 21.4.1 (x86_64-pc-linux-gnu, X toolkit, Xaw3d scroll bars) of 
2005-05-03 on king, modified by Debian, has no problems displaying the file

-- 
--Jhair