99c99
< 
---
> let record_call ?(accumulate = false) name f = f ()