diff options
Diffstat (limited to 'win/tclWinPipe.c')
| -rw-r--r-- | win/tclWinPipe.c | 2 |
1 files changed, 2 insertions, 0 deletions
diff --git a/win/tclWinPipe.c b/win/tclWinPipe.c index 74021e9..b9b881c 100644 --- a/win/tclWinPipe.c +++ b/win/tclWinPipe.c @@ -1136,6 +1136,8 @@ TclpCreateProcess( Tcl_AppendResult(interp, "DOS application process not supported on this platform", (char *) NULL); + Tcl_SetErrorCode(interp, "TCL", "OPERATION", "EXEC", "DOS_APP", + NULL); goto end; } } |