2011-07-07  Pierre Vittet  <piervit@pvittet.com>

	* melt/warmelt-base.melt (register_pragma_handler ): new function.