1
0
mirror of https://github.com/simh/simh.git synced 2026-04-15 16:11:13 +00:00

Cleanup for build on VMS

This commit is contained in:
Mark Pizzolato
2013-03-16 11:44:34 -07:00
parent c45a377c71
commit de483074e6
4 changed files with 14 additions and 8 deletions

View File

@@ -1732,8 +1732,8 @@ if (status != SS$_NORMAL) {
}
if (devsts & UCB$M_BSY)
return 0; /* Would block */
status = sys$qio (0, port, IO$_WRITELBLK | IO$M_NOFORMAT,
NULL, 0, 0, buffer, count, 0, 0, 0, 0);
status = sys$qiow (0, port, IO$_WRITELBLK | IO$M_NOFORMAT,
NULL, 0, 0, buffer, count, 0, 0, 0, 0);
if (status != SS$_NORMAL) {
sim_error_serial ("write", status); /* report unexpected error */
return -1;