src/impossible.h

   1 import qualified HTTP as HTTP_
   2 import qualified Darcs.Bug as Bug_
   3
   4 #define darcsBug (\imp_funny_name -> imp_funny_name (__FILE__,__LINE__,__TIME__,__DATE__))
   5
   6 #define bug        (darcsBug (Bug_._bug HTTP_.fetchUrl))
   7 #define impossible (darcsBug (Bug_._impossible HTTP_.fetchUrl))
   8 #define fromJust   (darcsBug (Bug_._fromJust HTTP_.fetchUrl))
   9 #define bugDoc     (darcsBug (Bug_._bugDoc HTTP_.fetchUrl))