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 [email protected].
For more options, visit https://groups.google.com/d/optout.
