static int myvalue = 0;
-
+static void test_opts(int* argc, char **argv[]){
+ int found = 0, ret;
+ static struct option long_options[] = {
+ {"long", no_argument, 0, 0 },
+ {0, 0, 0, 0 }
+ };
+ while (1) {
+ ret = getopt_long_only(*argc, *argv, "s",
+ long_options, NULL);
+ if(ret==-1)
+ break;
+
+ switch (ret) {
+ case 0:
+ found++;
+ break;
+ case 's':
+ found ++;
+ break;
+ default:
+ printf("option %s", long_options[0].name);
+ break;
+ }
+ }
+ if (found!=2){
+ printf("(smpi_)getopt_long_only failed ! \n");
+ }
+}
int main(int argc, char **argv)
{
int me;
MPI_Init(&argc, &argv);
+ /* test getopt_long function */
+ test_opts(&argc, &argv);
MPI_Comm_rank(MPI_COMM_WORLD, &me);