Update of /cvsroot/pure-data/pd/src In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv3658
Modified Files: Tag: devel_0_37 m_pd.h s_loader.c Log Message: better error messages
Index: s_loader.c =================================================================== RCS file: /cvsroot/pure-data/pd/src/s_loader.c,v retrieving revision 1.1.1.2 retrieving revision 1.1.1.2.2.1 diff -C2 -d -r1.1.1.2 -r1.1.1.2.2.1 *** s_loader.c 9 May 2003 16:03:44 -0000 1.1.1.2 --- s_loader.c 16 Sep 2004 13:52:40 -0000 1.1.1.2.2.1 *************** *** 117,123 **** if (!ntdll) { ! post("%s: couldn't load", filename); ! class_set_extern_dir(&s_); ! return (0); } makeout = (t_xxx)GetProcAddress(ntdll, symname); --- 117,137 ---- if (!ntdll) { ! LPVOID lpMsgBuf; ! DWORD dw = GetLastError(); ! FormatMessage( ! FORMAT_MESSAGE_ALLOCATE_BUFFER | ! FORMAT_MESSAGE_FROM_SYSTEM, ! NULL, ! dw, ! MAKELANGID(LANG_NEUTRAL, SUBLANG_DEFAULT), ! (LPTSTR) &lpMsgBuf, ! 0, NULL ); ! ! post("%s load failed with error %d: %s", ! filename, dw, lpMsgBuf); ! ! LocalFree(lpMsgBuf); ! class_set_extern_dir(&s_); ! return (0); } makeout = (t_xxx)GetProcAddress(ntdll, symname);
Index: m_pd.h =================================================================== RCS file: /cvsroot/pure-data/pd/src/m_pd.h,v retrieving revision 1.1.1.4.2.16 retrieving revision 1.1.1.4.2.17 diff -C2 -d -r1.1.1.4.2.16 -r1.1.1.4.2.17 *** m_pd.h 31 Aug 2004 01:05:07 -0000 1.1.1.4.2.16 --- m_pd.h 16 Sep 2004 13:52:40 -0000 1.1.1.4.2.17 *************** *** 22,26 **** #endif
! #ifdef MSW /* #pragma warning( disable : 4091 ) */ #pragma warning( disable : 4305 ) /* uncast const double to float */ --- 22,26 ---- #endif
! #if defined(MSW) && !defined (__GNUC__) /* #pragma warning( disable : 4091 ) */ #pragma warning( disable : 4305 ) /* uncast const double to float */