How to flatten list of lists with boost:mpl

typedef boost::mpl::list<int, char> l1;
typedef boost::mpl::list<std::string, long> l2;

I want to flatten them into a single list l3 which contains

boost::mpl::list<int, char, string,long>.

How do I do this using boost::mpl ?