chiark - git - mdw - mLib-python/blob - report.pyx

   1 ### -*-pyrex-*-
   2 ###
   3 ### Error reporting and stuff
   4 ###
   5 ### (c) 2005 Straylight/Edgeware
   6 ###
   7
   8 ###----- Licensing notice ---------------------------------------------------
   9 ###
  10 ### This file is part of the Python interface to mLib.
  11 ###
  12 ### mLib/Python is free software; you can redistribute it and/or modify
  13 ### it under the terms of the GNU General Public License as published by
  14 ### the Free Software Foundation; either version 2 of the License, or
  15 ### (at your option) any later version.
  16 ###
  17 ### mLib/Python is distributed in the hope that it will be useful,
  18 ### but WITHOUT ANY WARRANTY; without even the implied warranty of
  19 ### MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  20 ### GNU General Public License for more details.
  21 ###
  22 ### You should have received a copy of the GNU General Public License
  23 ### along with mLib/Python; if not, write to the Free Software Foundation,
  24 ### Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA.
  25
  26 quis = '<UNNAMED>'
  27 cdef char *_progstring
  28 _progstring = NULL
  29
  30 def ego(char *prog):
  31   global quis, _progstring
  32   if _progstring:
  33     xfree(_progstring)
  34   _progstring = xstrdup(prog)
  35   _ego(_progstring)
  36   quis = _quis()
  37
  38 def moan(char *msg):
  39   _moan('%s', msg)
  40 def die(char *msg, rc = 126):
  41   _moan('%s', msg)
  42   raise SystemExit, rc
  43
  44 ###----- That's all, folks --------------------------------------------------