v4.0/src/CMD/COMMAND/TPARSE.ASM

   1  page 80,132
   2 ;       SCCSID = @(#)tparse.asm 4.1 87/04/28
   3 ;       SCCSID = @(#)tparse.asm 4.1 87/04/28
   4 TITLE   COMMAND interface to SYSPARSE
   5
   6 .xlist
   7 .xcref
   8         INCLUDE comseg.asm              ;AN000;
   9 .list
  10 .cref
  11
  12 TRANSPACE       SEGMENT PUBLIC BYTE     ;AN000;
  13
  14         CmpxSW  equ     0               ;AN000; do not check complex list
  15         KeySW   equ     0               ;AN000; do not support keywords
  16         Val2SW  equ     0               ;AN000; do not Support value definition 2
  17         IncSW   equ     0               ;AN000; do not include psdata.inc
  18         QusSW   equ     0               ;AN025; do not include quoted string
  19         LFEOLSW equ     0               ;AN044; do not use 0ah as line terminator
  20
  21 .xlist
  22 .xcref
  23
  24 include psdata.inc                      ;AN000;
  25
  26 .list
  27 .cref
  28
  29 TRANSPACE       ENDS                    ;AN000;
  30
  31 TRANCODE        SEGMENT PUBLIC BYTE     ;AN000;
  32
  33 ASSUME  CS:TRANGROUP,DS:NOTHING,ES:NOTHING,SS:NOTHING    ;AN054;
  34
  35 ; ****************************************************************
  36 ; *
  37 ; * ROUTINE:     CMD_PARSE
  38 ; *
  39 ; * FUNCTION:    Interface for transient COMMAND to invoke
  40 ; *              SYSPARSE.
  41 ; *
  42 ; * INPUT:       inputs to SYSPARSE
  43 ; *
  44 ; * OUTPUT:      outputs from SYSPARSE
  45 ; *
  46 ; ****************************************************************
  47
  48         public  Cmd_parse               ;AN000;
  49
  50 .xlist
  51 .xcref
  52         INCLUDE parse.asm               ;AN000;
  53 .list
  54 .cref
  55
  56 Cmd_parse       Proc  near              ;AN000;
  57
  58         call    sysparse                ;AN000;
  59
  60         ret                             ;AN000;
  61
  62 Cmd_parse       endp                    ;AN000;
  63
  64         public  Append_parse            ;AN010;
  65
  66 Append_parse    Proc  Far               ;AN010;
  67
  68         call    sysparse                ;AN010;
  69
  70         ret                             ;AN010;
  71
  72 Append_parse    endp                    ;AN010;
  73
  74 trancode    ends                        ;AN000;
  75             end                         ;AN000;
  76 \1a