Changeset ec0f36 in git
- Timestamp:
- Sep 7, 1999, 10:36:09 AM (25 years ago)
- Branches:
- (u'spielwiese', 'fe61d9c35bf7c61f2b6cbf1b56e25e2f08d536cc')
- Children:
- 4ab486bf26f9b0c90a2120392b3c72e42ca107d8
- Parents:
- 49c75e65b2d38627254b0873106fecffe28f9d61
- Location:
- Singular
- Files:
-
- 2 edited
Legend:
- Unmodified
- Added
- Removed
-
Singular/emacs.cc
r49c75e rec0f36 2 2 * Computer Algebra System SINGULAR * 3 3 ****************************************/ 4 /* $Id: emacs.cc,v 1. 6 1999-09-07 08:23:04Singular Exp $ */4 /* $Id: emacs.cc,v 1.7 1999-09-07 08:36:09 Singular Exp $ */ 5 5 /* 6 6 * ABSTRACT: Esingular main file … … 64 64 #include "feResource.cc" 65 65 #include "feCmdLineOptions.cc" 66 extern "C" {67 #include "getopt.c"68 }69 66 70 67 int main(int argc, char** argv) -
Singular/getopt.c
r49c75e rec0f36 2 2 * Computer Algebra System SINGULAR * 3 3 ****************************************/ 4 /* $Id: getopt.c,v 1. 3 1998-09-22 14:15:03Singular Exp $ */4 /* $Id: getopt.c,v 1.4 1999-09-07 08:36:09 Singular Exp $ */ 5 5 6 6 /* Getopt for GNU. … … 179 179 extern char *getenv(const char *name); 180 180 extern int strcmp (const char *s1, const char *s2); 181 extern int strncmp(const char *s1, const char *s2, int n); 181 /*extern int strncmp(const char *s1, const char *s2, int n);*/ 182 182 183 183 static int my_strlen(const char *s); … … 187 187 #endif 188 188 189 static int 190 my_strlen (str) 191 const char *str; 189 static int my_strlen (const char *str) 192 190 { 193 191 int n = 0; … … 197 195 } 198 196 199 static char * 200 my_index (str, chr) 201 const char *str; 202 int chr; 197 static char * my_index (const char *str, int chr) 203 198 { 204 199 while (*str) … … 245 240 #endif 246 241 247 static void 248 exchange (argv) 249 char **argv; 242 static void exchange (char **argv) 250 243 { 251 244 char *temp, **first, **last; … … 330 323 long-named options. */ 331 324 332 int 333 _getopt_internal (argc, argv, optstring, longopts, longind, long_only) 334 int argc; 335 char *const *argv; 336 const char *optstring; 337 const struct option *longopts; 338 int *longind; 339 int long_only; 325 int _getopt_internal ( 326 int argc, 327 char *const *argv, 328 const char *optstring, 329 const struct option *longopts, 330 int *longind, 331 int long_only) 340 332 { 341 333 int option_index; … … 664 656 } 665 657 666 int 667 getopt (argc, argv, optstring) 668 int argc; 669 char *const *argv; 670 const char *optstring; 658 int getopt ( 659 int argc, 660 char *const *argv, 661 const char *optstring) 671 662 { 672 663 return _getopt_internal (argc, argv, optstring, … … 676 667 } 677 668 678 int 679 getopt_long (argc, argv, options, long_options, opt_index) 680 int argc; 681 char *const *argv; 682 const char *options; 683 const struct option *long_options; 684 int *opt_index; 669 int getopt_long ( 670 int argc, 671 char *const *argv, 672 const char *options, 673 const struct option *long_options, 674 int *opt_index) 685 675 { 686 676 return _getopt_internal (argc, argv, options, long_options, opt_index, 0); … … 694 684 the above definition of `getopt'. */ 695 685 696 int 697 main (argc, argv) 698 int argc; 699 char **argv; 686 int main (int argc, char **argv) 700 687 { 701 688 int c;
Note: See TracChangeset
for help on using the changeset viewer.