【サーバー各所】ActiveBasicその11【冬眠中】

【サーバー各所】ActiveBasicその11【冬眠中】 at TECH

■コピペモード
□スレを通常表示
□オプションモード
□このｽﾚｯﾄﾞのURL
■項目テキスト

400:デフォルトの名無しさん
 09/09/12 21:56:12 
  case 'D': 
   /* get macro definition */ 
   s = name; 
   while ((c = *p++) != '\0' && c != '=') 
    *s++ = c; 
   *s = '\0'; 
   if (c == '\0') 
    p = "1"; 
   install(name, p, -1); 
  Case 'i': 
   fprintf(stderr, "cpp: Warning: -i is obsolete; use -I\n"); 
  /* fall thru */ 
  case 'I': 
   /* include directory */ 
   if (inc >= MAXDIR) 
    fprintf(stderr, "too many -i\n"), exit(1); 
   Incdir[inc++] = p; 
  Case 's': 
   NoSharp = YES; 
  Case 'o': 
   if (*p != '\0') 
    outf = p; 
   else if (++argv, --argc != 0) 
    outf = *argv; 
   else 
    fprintf(stderr, usage), exit(1); 
  Case 'j': 
   Jap = *p - '0'; 
  Case 'c': 
   CommNest = YES;

401:デフォルトの名無しさん
 09/09/12 21:56:57 
  Case 'y': 
   Charcode = *p; 
   if (Charcode != 0 && Charcode != '0' && Charcode != '1' && Charcode != '2') 
    goto err; 
  Default: 
  err: 
   fprintf(stderr, usage), exit(1); 
  } 
 } 
 Incdir[inc] = NULL; 
 if (outf == NULL) 
  Ofp = stdout; 
 else 
  Ofp = efopen(outf, "w"); 
 if (argc == 0) { 
  pushFile("", ' ', stdin); 
  do_cpp(); 
 } else { 
  for (i = 0; i < argc; i++) { 
   pushFile(argv[i], ' ', NULL); 
   do_cpp(); 
  } 
 } 
 efclose(Ofp); 
 exit(Errcode); 
}

次ページ