src/windows/leashdll/lshcallb.c

   1 #include <windows.h>
   2
   3 int (*Lcom_err)(LPSTR,long,LPSTR,...);
   4 LPSTR (*Lerror_message)(long);
   5 LPSTR (*Lerror_table_name)(long);
   6
   7 void Leash_load_com_err_callback(FARPROC ce,
   8                                  FARPROC em,
   9                                  FARPROC etn)
  10 {
  11     (FARPROC)Lcom_err=ce;
  12     (FARPROC)Lerror_message=em;
  13     (FARPROC)Lerror_table_name=etn;
  14 }