(library
 (public_name flesh)
 (libraries
   lwt
   portal)
 (preprocess (pps ppx_deriving.show)))