Paste: Factor UI bug on Linux x68 non-SSE2

Compiled and bootstrapped last stable source (0.94).

=== OS ===
Linux, Ubuntu 9.10 (karmic).

$ uname -a
Linux utapau 2.6.31-23-386 #74-Ubuntu SMP Mon Feb 28 23:39:12 UTC 2011 i686 GNU/Linux

=== CPU ===

$ cat /proc/cpuinfo 
processor	: 0
vendor_id	: AuthenticAMD
cpu family	: 6
model		: 8
model name	: AMD Sempron(tm) 2600+
stepping	: 1
cpu MHz		: 1839.592
cache size	: 256 KB
fdiv_bug	: no
hlt_bug		: no
f00f_bug	: no
coma_bug	: no
fpu		: yes
fpu_exception	: yes
cpuid level	: 1
wp		: yes
flags		: fpu vme de pse tsc msr pae mce cx8 apic mtrr pge mca cmov pat pse36 mmx fxsr sse syscall mp mmxext 3dnowext 3dnow up
bogomips	: 3679.18
clflush size	: 32
power management: ts


=== Factor run and debug info ===

$ ./factor -run=listener
( scratchpad ) USE: ui.tools.listener listener-window
Invalid array size: 17592186044416
Maximum: 67108863

Type :help for debugging help.
( scratchpad ) :c
(U) Quotation: [ c-to-factor -> ]
    Word: c-to-factor
(U) Quotation: [ swap >c call -> c> drop ]
(U) Quotation: [
        (command-line) parse-command-line
        load-vocab-roots run-user-init "e" get script get or
        [ "e" get ~quotation~ when* script get ~quotation~ when* ]
        [ "run" get run ] if -> output-stream get
        [ stream-flush ] when* 0 exit
    ]
(O) Word: listener
(O) Word: (listener)
(U) Quotation: [
        [ ~quotation~ dip swap ~quotation~ dip ] dip swap
        [ call datastack ] dip -> swap [ set-datastack ] dip
    ]
(U) Quotation: [ call -> datastack ]
(O) Method: M\ x11-ui-backend (with-ui)
(O) Word: start-ui
(U) Quotation: [ listener-window* -> drop ]
(O) Word: open-world-window
(O) Word: pref-dim
(O) Method: M\ track pref-dim*
(O) Word: track-pref-dims-1
(O) Word: pref-dims
(O) Word: pref-dim
(O) Method: M\ pango-renderer string-dim
(O) Method: M\ pango-renderer string-dim
(O) Word: cached-layout
(O) Word: <layout>
(O) Word: draw-layout
(O) Word: <bitmap-image>
(O) Word: memory>byte-array
(U) Quotation: [
        B{
            112 114 105 109 105 116 105 118 101 95 117 110 105 110
            105 116 105 97 108 105 122 101 100 95 98 121 116 101 95
            97 114 114 97 121 0
        } do-primitive ->
    ]
    Word: (byte-array)
(U) Quotation: [
        63 special-object error-thread set-global
        continuation -> error-continuation set-global
        [ original-error set-global ] [ rethrow ] bi
    ]
( scratchpad ) :s
T{ listener-gadget f ~array~ ~array~ f ~world~ ~vector~ ~array~...
T{ world f ~array~ ~array~ f f ~vector~ ~array~...
T{ layout f f f ~font~ " " f ALIEN: 9561808 ~metrics~ ~rect~...
{ "kernel-error" 6 17592186044416 67108864 }
( scratchpad ) :r
{ }
T{ world f ~array~ ~array~ f f ~vector~ ~array~...
T{ world f ~array~ ~array~ f f ~vector~ ~array~...
T{ world f ~array~ ~array~ f f ~vector~ ~array~...
V{ ~listener-gadget~ ~label-control~ }
V{ ~array~ f }
V{ ~listener-gadget~ ~label-control~ }
V{ ~array~ f }
2
1
V{ ~array~ f }
1
T{ label-control f ~array~ ~array~ f ~world~ f ~array~ f t t f...
T{ cache-assoc f f f H{ } 10 }
{ ~font~ " " }
{ -2097152 -2097152 }
17592186044416
ALIEN: 9561488
( scratchpad )