Paste: Failing to run factor

rupert@hake:~/src/not-mine/factor ./factor -i=factor.image
The word <funcs> cannot be executed because it failed to compile

The input quotation to “do-callback” doesn't match its expected effect
Input                                                   Expected Got
[ dup current-callback eq? ~quotation~ ~quotation~ if ] (( -- )) (( x -- ))