devres.c only better....

devres.rkt

(with-handlers
  ([cant-alloc -> NULL]
   [cant-remap -> (devres-free the-box) NULL])
  (define the-box (devres-alloc devm-ioremap-release, GFP_KERNEL))
  (define remapped (ioremap-prot offset size flags))
  (set-box! the-box remapped)
  (devres-add dev the-box)
  addr)