memory statistics via an API ?

[Tim Docker]

The "+RTS -s" runtime arguments give some useful details the memory 
usage of a program on exit. eg:

          102,536 bytes allocated in the heap
            2,620 bytes copied during GC
           36,980 bytes maximum residency (1 sample(s))
           28,556 bytes maximum slop
                1 MB total memory in use (0 MB lost due to fragmentation)

Is there any means of obtaining this information at runtime, via some 
API? It would be useful for monitoring a long running server process.

Tim