folkert/simh-testsetgenerator
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions 1

Added do command default file extension for file being opened of '.sim'

Browse source
This commit is contained in:
Mark Pizzolato 2012-03-26 12:17:07 -07:00
parent 0dd5185099
commit 7ea8831c7b
1 changed files with 9 additions and 6 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

15
scp.c
View file

@ -994,12 +994,15 @@ for (nargs = 0; nargs < 10; ) { /* extract arguments */
if ((nargs <= 0) || (do_arg [0] == NULL)) /* need at least 1 */ if ((nargs <= 0) || (do_arg [0] == NULL)) /* need at least 1 */
return SCPE_2FARG; return SCPE_2FARG;
if ((fpin = fopen (do_arg[0], "r")) == NULL) { /* file failed to open? */ if ((fpin = fopen (do_arg[0], "r")) == NULL) { /* file failed to open? */
if (flag == 0) /* cmd line file? */ strcat (strcpy (cbuf, do_arg[0]), ".sim"); /* try again with .sim extension */
fprintf (stderr, "Can't open file %s\n", do_arg[0]); if ((fpin = fopen (cbuf, "r")) == NULL) { /* failed a second time? */
if (flag > 1) if (flag == 0) /* cmd line file? */
return SCPE_OPENERR | SCPE_DOFAILED; /* return failure with flag */ fprintf (stderr, "Can't open file %s\n", do_arg[0]);
else if (flag > 1)
return SCPE_OPENERR; /* return failure */ return SCPE_OPENERR | SCPE_DOFAILED; /* return failure with flag */
else
return SCPE_OPENERR; /* return failure */
}
} }
if (flag < 1) /* start at level 1 */ if (flag < 1) /* start at level 1 */
flag = 1; flag = 1;