home *** CD-ROM | disk | FTP | other *** search
/ OpenStep 3.3J / os33j.iso / NextLibrary / TeX / tex / src / dvips / vms / vmscli.c < prev   
Encoding:
Text File  |  1993-01-27  |  1.6 KB  |  50 lines
  1.  
  2.     status = cli$present(&qual31);
  3.     if(status == CLI$_PRESENT | status==CLI$_DEFAULTED) cropmarks = 1;
  4.  
  5.     status = cli$present(&qual32);
  6.      if(status == CLI$_PRESENT)
  7.      {status = cli$get_value(&qual32,&dumdum,&length);
  8. #ifdef SHORTINT
  9.             if (sscanf(&dummy[0], "%ld", &maxsecsize)==0)
  10. #else    /* ~SHORTINT */
  11.             if (sscanf(&dummy[0], "%d", &maxsecsize)==0)
  12. #endif    /* ~SHORTINT */
  13.                error("! Bad section size arg (/SEC_SIZE).") ;
  14.      }
  15.  
  16.     status = cli$present(&qual33);
  17.      if(status == CLI$_PRESENT)
  18.      {  (void)fprintf(stderr, banner) ;
  19.         help() ;
  20.      }
  21.  
  22.     status = cli$present(&qual34);
  23.     if(status == CLI$_NEGATED) dontmakefont = 1;
  24. /*-----------------------------------------------------------------------
  25.  * Currently one uses /PSIZE="5mm,10mm" This way CASE is preserved
  26.  * Should I convert the PSIZE to allow a LIST => /PSIZE=(5mm,10mm) and
  27.  * convert the case back to lowercase in here.
  28.  *-----------------------------------------------------------------------*/
  29.     status = cli$present(&qual35);
  30.      if(status == CLI$_PRESENT) {
  31.        status = cli$get_value(&qual35,&dumdum,&length);
  32.        dummy[length] = '\0';
  33.        handlepapersize(&dummy[0], &hpapersize, &vpapersize) ;
  34.        if (landscape) {
  35.           error("both landscape and papersize specified; ignoring landscape") ;
  36.           landscape = 0 ;
  37.        }
  38.      }
  39.  
  40.     status = cli$present(&qual36);
  41.      if(status == CLI$_PRESENT) {
  42.        status = cli$get_value(&qual36,&dumdum,&length);
  43.        dummy[length] = '\0';
  44.        handlepapersize(&dummy[0], &hoff, &voff) ;
  45.      }
  46.  
  47. }
  48.  
  49. /* end of file */
  50.