2004-06-10 Stefan Jones <stefan.jones@multigig.com>

* include/ngspice.h:
	Print perror to the Tk console

ChangeLog

@@ -1,5 +1,8 @@
 2004-06-10 Stefan Jones <stefan.jones@multigig.com>
 
+	* include/ngspice.h:
+	Print perror to the Tk console
+	
 	* src/tclspice.c:
 	test for FILE in tcl_printf being stdout/stderr
 	Could be more than one fd for stdout/stderr

src/include/ngspice.h

@@ -183,6 +183,9 @@ extern int tcl_fprintf(FILE *f, const char *format, ...);
 #undef fprintf
 #define fprintf tcl_fprintf
 
+#undef perror
+#define perror(string) fprintf(stderr,"%s: %s\n",string,sys_errlist[errno])
+
 #endif
 
 #ifdef __MINGW32__