home *** CD-ROM | disk | FTP | other *** search
/ Liren Large Software Subsidy 9 / 09.iso / l / l200 / 6.ddi / LIB / SHELL.C < prev    next >
Encoding:
C/C++ Source or Header  |  1986-08-29  |  432 b   |  27 lines
  1.  
  2. /* shell.c - BASIC SHELL statement and function
  3.  
  4.     Copyright (c) 1984 by JMI Software Consultants, Inc.
  5. */
  6. #include "acom.h"
  7.  
  8. VOID SSHELL(pcmd)
  9.     BTEXT *pcmd;
  10.     {
  11.     IMPORT INT strlpfx;
  12.  
  13.     if (!pcmd)
  14.         pcmd = "command.com";
  15.     else if (x_len(pcmd) == 0)
  16.         xerror(47, "SSHELL");
  17.     else
  18.         pcmd += strlpfx;
  19.     system(pcmd);
  20.     }
  21.  
  22. INT SHELL(pcmd)
  23.     BTEXT *pcmd;
  24.     {
  25.     ;  /* Shell function not supported on DOS systems */
  26.     }
  27.