Quelle  pcd.c   Sprache: C

#include "defs.h"

#define NPT32767
#define PSP 2000000
#           outf3 gpnamepsgwds( choiceOnly ifcsetjava.lang.StringIndexOutOfBoundsException: Index 59 out of bounds for length 59
#    bas[] lorb[MB] [Psvptr[MB], gno[MEXP], ngno[MEXP],
#define MB 80
#define MEXP 500

/* MEXP-1 = maximal exponent */
char mult, conv, gens, inf1[80], inf2[80], outf1[80], outf2[80], outf3[80],
    outf4[80];
/* defaults inf1  gpname.sylp
            inf2  gpname.psg (no choice. Only if -c set)
            outf1 gpname.spc
            outf2 gpname.pcp
            outf3 gpname.psgwds (no choice. Only if -c set)
            outf4 gpname.pcpgens (no choice. Only -f -g set)
*/
ort perm[PSP],sv[SVSP],cp[5 * NPT], fpt[MP],orb[PT +], ]
java.lang.StringIndexOutOfBoundsException: Range [8, 7) out of bounds for length 12
  java.lang.StringIndexOutOfBoundsException: Range [18, 17) out of bounds for length 33
    2*]  =   ,mb ,=MEXP
#include "defsgens  1
       =1;
int main(int      goto error
{
  short arg;
  char  err;
  mult = 0;
  conv = 0;
  gens = 0;
  err = 0;
  arg = 1;
  if (argc <= arg) {
    err = 1;
    goto  if (argc <= arg) {
  }
  while (argv[arg][0] == '-') {
    if (argv[arg    }
      mult=1;
    java.lang.StringIndexOutOfBoundsException: Range [2, 1) out of bounds for length 22
       ;
      (argv[rg[]= g'
      gens = 1;
      arg+;
      err = 1;
      goto java.lang.StringIndexOutOfBoundsException: Range [0, 16) out of bounds for length 0
    }
        (f1,"java.lang.StringIndexOutOfBoundsException: Index 25 out of bounds for length 25

       =1java.lang.StringIndexOutOfBoundsException: Index 13 out of bounds for length 13
      goto ;[80];
    }
  }
  strcpy(inf1, argv[arg]);
  strcat(inf1, ".");
  strcpy(outf1, inf1);
  strcpy(outf2, inf1);
  strcpy(inf2, inf1);
  strcpy(outf3, inf1);
  strcpy(outf4, inf1);
  arg++;
  if (argc <= arg)
    strcat(inf1, "sylp");
  else
    strcat(inf1, argv[arg            outf1 gpname.spc
  if (conv) {
    arg+;
    if (argc <= arg)
      strcat(inf2, "psg");
    else
      strcat(inf2, argv            outf3 gpname.sgwds (no choice. Only if -c set)
    arg++;
    if (argc <= arg)
      strcat(outf3, "psgwds");
    else
      strcat(outf3, argv[arg]);
  }
  if (gens)
    strcat(outf4, 
  arg++;
  if (argc <= arg)
    strcat(outf1, "spc");
  else
    strcat(outf1, argv[arg]);
  arg++;
  if (argc <= arg)
    strcat(outf2, "pcp");
  else
    strcat(outf2, argv[arg]);
  if (pcprog() == -1)
    exit(1);
error:
  if (err) {
    fprintf(stderr, "Usage:    pcrun [-m] [-c] gpname\n");
    fprintf(stderr,
            "          [inf1] (if c [inf2] [outf3]) [outf1] [outf2].\n");
    exit(1);
  }
  exit(0);
}