Re: serialization of math/array

Here's one hack.

#lang racket/base

(require
  math/array
 (prefix-in rkt: racket/serialize))

(define secret-key 'array)

(define (serialize val)
  (if (array? val)
    (rkt:serialize (cons secret-key (array->list val)))
    (rkt:serialize val)))

(define (deserialize val)
  (define d (rkt:deserialize val))
  (if (and (pair? d) (eq? secret-key (car d)))
    (list->array (cdr d))
    d))

(define arr (array #[0 1 2]))
(serialize arr)
(deserialize (serialize arr))

(Part of the issue serializing math/array is that it represents arrays as
functions under the hood)

-- 
You received this message because you are subscribed to the Google Groups "Racket Users" group.
To unsubscribe from this group and stop receiving emails from it, send an email to racket-users+unsubscribe-/JYPxA39Uh5TLH3MbocFF+G/[email protected]
For more options, visit https://groups.google.com/d/optout.