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

3
scp.c
View file

@ -994,6 +994,8 @@ 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? */
strcat (strcpy (cbuf, do_arg[0]), ".sim"); /* try again with .sim extension */
if ((fpin = fopen (cbuf, "r")) == NULL) { /* failed a second time? */
if (flag == 0) /* cmd line file? */ if (flag == 0) /* cmd line file? */
fprintf (stderr, "Can't open file %s\n", do_arg[0]); fprintf (stderr, "Can't open file %s\n", do_arg[0]);
if (flag > 1) if (flag > 1)
@ -1001,6 +1003,7 @@ if ((fpin = fopen (do_arg[0], "r")) == NULL) { /* file failed to open?
else else
return SCPE_OPENERR; /* return failure */ return SCPE_OPENERR; /* return failure */
} }
}
if (flag < 1) /* start at level 1 */ if (flag < 1) /* start at level 1 */
flag = 1; flag = 1;
++sim_do_depth; ++sim_do_depth;