added fromResultTIO

This was missing.

@charleso @markhibberd ?