--- libaitio/src/aitio.c	2016/08/10 13:59:44	1.17.8.1
+++ libaitio/src/aitio.c	2016/08/10 14:01:51	1.17.8.2
@@ -3,7 +3,7 @@
 *  by Michael Pounov <misho@elwix.org>
 *
 * $Author: misho $
-* $Id: aitio.c,v 1.17.8.1 2016/08/10 13:59:44 misho Exp $
+* $Id: aitio.c,v 1.17.8.2 2016/08/10 14:01:51 misho Exp $
 *
 **************************************************************************
 The ELWIX and AITNET software is distributed under the following
@@ -121,7 +121,11 @@ ioPromptRead(int *h, const char *csPrompt, char * __re
 		memset(szLine, 0, BUFSIZ);
 		if (!fgets(szLine, BUFSIZ, inp)) {
 			clearerr(inp);
+#ifdef HAVE_FPURGE
 			fpurge(out);
+#else
+			__fpurge(out);
+#endif
 			fflush(out);
 			return 0;
 		}