diff --git a/bson/reader/reader.factor b/bson/reader/reader.factor index 7e81fd5e25..ad0f8fdff8 100644 --- a/bson/reader/reader.factor +++ b/bson/reader/reader.factor @@ -41,7 +41,7 @@ GENERIC: element-read ( type -- cont? ) GENERIC: element-data-read ( type -- object ) GENERIC: element-binary-read ( length type -- object ) -: byte-arrary>number ( seq -- number ) +: byte-array>number ( seq -- number ) byte-array>bignum >integer ; inline : get-state ( -- state ) @@ -203,4 +203,4 @@ PRIVATE> : stream>assoc ( exemplar -- assoc bytes-read ) dup state [ read-int32 >>size read-elements ] with-variable - [ result>> ] [ read>> ] bi ; inline + [ result>> ] [ read>> ] bi ;