define warning( in SWI emulation: just a stub for now.

packages/PLStream/pl-incl.h

@@ -626,6 +626,7 @@ extern word lookupAtom(const char *s, size_t len);
 extern atom_t	lookupUCSAtom(const pl_wchar_t *s, size_t len);
 extern int toIntegerNumber(Number n, int flags);
 extern int get_atom_ptr_text(Atom a, PL_chars_t *text);
+extern int warning(const char *fm, ...);
 
 /**** stuff from pl-files.c ****/
 void initFiles(void);

packages/PLStream/pl-yap.c

@@ -596,3 +596,15 @@ X_API int PL_handle_signals(void)
   return 0;
 }
 
+/* just a stub for now */
+int
+warning(const char *fm, ...)
+{  va_list args;
+
+  va_start(args, fm);
+  fprintf(stderr,"warning: %s\n", fm);
+  va_end(args);
+
+  return TRUE;
+}
+