Added FoldL.foldM based loop.

For the `Int` loop it ties `forLoop`, `funsafeLoopLocal`, and
`uvectorEnumFromToInt`.

For the `word32` loop it does considerable worse and is among the slowest.