Initial import

[factor.git] / vm / io.h

diff --git a/vm/io.h b/vm/io.h
index a0a69a4efcc06b1f9267c8bd5f4e98cf70301253..d8cc2a057814f5a9883cc3e1532cef92bfbd15b8 100644 (file)
--- a/vm/io.h
+++ b/vm/io.h
@@ -1,8 +1,17 @@
-int err_no(void);
 void init_c_io(void);
 void io_error(void);
-void primitive_fopen(void);
-void primitive_fwrite(void);
-void primitive_fflush(void);
-void primitive_fclose(void);
-void primitive_fgetc(void);
+int err_no(void);
+
+DECLARE_PRIMITIVE(fopen);
+DECLARE_PRIMITIVE(fwrite);
+DECLARE_PRIMITIVE(fflush);
+DECLARE_PRIMITIVE(fclose);
+DECLARE_PRIMITIVE(fgetc);
+DECLARE_PRIMITIVE(fread);
+
+/* Platform specific primitives */
+DECLARE_PRIMITIVE(open_file);
+DECLARE_PRIMITIVE(stat);
+DECLARE_PRIMITIVE(read_dir);
+DECLARE_PRIMITIVE(cwd);
+DECLARE_PRIMITIVE(cd);