Home | History | Annotate | Download | only in intrinsics

Lines Matching defs:arglen

51       gfc_charlen_type arglen = strlen (argv[*pos]);
52       if (arglen > val_len)
53 	arglen = val_len;
54       memcpy (val, argv[*pos], arglen);
122   gfc_charlen_type arglen = 0;
137     arglen = strlen(argv[*number]);    
149       if (arglen > value_len)
152       memcpy (value, argv[*number], arglen <= value_len ? arglen : value_len);
156     *length = arglen;
201   gfc_charlen_type arglen, tot_len = 0;
219       arglen = strlen(argv[i]);
223 	  thisarg = arglen;
230 	  else if (i != argc - 1 && tot_len + arglen == command_len)
237       tot_len += arglen;