The current way of setting the Roassal platform is rather clunky. For some
reason we have to pass a string:
ROPlatform setCurrent: 'athens'.
ROPlatform setCurrent: 'morphic'.
This string is then matched against a string returned by each subclass. The
platforms are stored in a dictionary that is updated in the initialize of
each subclasses. I think this is highly complicated for what it should do.
We should simply replace this with a mechanism that goes in this direction:
ROPlatform setCurrent: ROAthensPlatform new.
ROPlatform setCurrent: ROMorphicPlatform new.
"Every thing has its own flow"