#4 sxml:merge-sort, type 'long' expected

[Oleg Paraschenko]

The code

(define tree
'(dummy (@ (name "x1"))
(dummy (@ (name "aaa")))
(dummy (@ (name "x2"))
(dummy (@ (name "aaa")))
(dummy (@ (name "x3")))
(dummy (@ (name "x4"))))
(dummy (@ (name "x5")))))
(write ((txpath ".//*[@name = following::*/@name]") tree))
(newline)

produces the error:

File "../../third_party/sxml-tools/sxpath-ext.scm",
line 170, character 6027:
# (sxml:merge-sort less-than?-pred (list-tail
lst middle)))))))
# ^
# *** ERROR:bigloo:_list-tail2873
# Type `long' expected, `real' provided -- 2.0

[Dmitry Lizorkin]

Logged In: YES
user_id=951535

I recently encountered the same bug. It occurs under
Bigloo at program runtime.

The "sxpath-ext.scm" with this bug fixed is in the SSAX
CVS.

[Oleg Paraschenko]

Logged In: YES
user_id=534833

Thanks, it word now.