Paste: upload fail

Author: doublec
Mode: factor
Date: Fri, 6 Feb 2009 05:42:22
Plain Text |
Type check error
Object:
T{ mime-variable f ~hashtable~ "__s" "5879298752556944886" }
Object type:
mime-variable
Expected type:
bignum

[ call -> stop ]
[ swap >c call -> c> drop ]
[ [ compose ~quotation~ curry recover ] [ drop ] 2bi -> call ]
[ [ 2keep ] dip -> call ]
[ [ call ] 2dip -> ]
[ swap >c call -> c> drop ]
[ H{ } clone >n call -> ndrop ]
[ H{ } clone >n call -> ndrop ]
[ [ compose ~quotation~ curry recover ] [ drop ] 2bi -> call ]
[ [ 2keep ] dip -> call ]
[ [ call ] 2dip -> ]
[ swap >c call -> c> drop ]
[
64 1024 * stream-throws limit-input ?refresh-all
[ read-request ] ?benchmark [ do-request ] ?benchmark ->
[ do-response ] ?benchmark
]
[ swap >c call -> c> drop ]
[ iterate-step -> iterate-next (each-integer) ]
[ swap [ 2dup 2slip ] dip -> swap ]
[ [ call ] 2dip -> ]
[
sessions set request-session -> [ begin-session ] unless*
existing-session put-session-cookie
]
request-session
select-tuple
do-select
bind-statement
sqlite-statement=>low-level-bind
sqlite-bind-int64
sqlite3_bind_int64
[
63 getenv error-thread set-global
continuation -> error-continuation set-global rethrow
]

New Annotation

Summary:
Author:
Mode:
Body: