added minor changes for vms

qse/include/qse/cmn/fio.h

@@ -128,7 +128,7 @@ enum qse_fio_mode_t
 #elif defined(__DOS__)
 	typedef int qse_fio_hnd_t;
 #elif defined(vms) || defined(__vms)
-	typedef void* qse_fio_hnd_t; /* struct FAB* */
+	typedef void* qse_fio_hnd_t; /* struct FAB*, struct RAB* */
 #else
 	typedef int qse_fio_hnd_t;
 #endif

qse/lib/cmn/assert.c

@@ -43,6 +43,7 @@
 #elif defined(vms) || defined(__vms)
 #	include <starlet.h> /* (SYS$...) */
 #	include <ssdef.h> /* (SS$...) */
+#	include <lib$routines.h> /* (lib$...) */
 #else
 #	include "syscall.h"
 #endif
@@ -169,6 +170,9 @@ void qse_assert_failed (
 		intdos (&regs, &regs);
 	}
 #elif defined(vms) || defined(__vms)
+	lib$stop (SS$_ABORT); /* use SS$_OPCCUS instead? */
+
+	/* this won't be reached since lib$stop() terminates the process */
 	sys$exit (SS$_ABORT); /* this condition code can be shown with 
 	                       * 'show symbol $status' from the command-line. */
 #else

qse/lib/cmn/fio.c

@@ -38,6 +38,8 @@
 #	include <io.h>
 #	include <fcntl.h>
 #	include <errno.h>
+#elif defined(vms) || defined(__vms)
+#	include <starlet.h>
 #else
 #	include "syscall.h"
 #endif

qse/samples/cmn/fio01.c

@@ -1,5 +1,6 @@
 #include <qse/cmn/fio.h>
 #include <qse/cmn/mem.h>
+#include <qse/cmn/str.h>
 #include <qse/cmn/stdio.h>
 
 #include <locale.h>

qse/samples/cmn/fio02.c

@@ -1,5 +1,6 @@
 #include <qse/cmn/fio.h>
 #include <qse/cmn/mem.h>
+#include <qse/cmn/str.h>
 #include <qse/cmn/stdio.h>
 
 #define R(f) \