Home
last modified time | relevance | path

Searched refs:canon_source_file (Results 1 – 4 of 4) sorted by relevance

/netbsd-src/external/gpl3/gcc.old/dist/gcc/fortran/
H A Doptions.c259 const char *filename = *pfilename, *canon_source_file = NULL; in gfc_post_options() local
316 gfc_source_file = gfc_read_orig_filename (filename, &canon_source_file); in gfc_post_options()
325 if (canon_source_file == NULL) in gfc_post_options()
326 canon_source_file = gfc_source_file; in gfc_post_options()
330 i = strlen (canon_source_file); in gfc_post_options()
331 while (i > 0 && !IS_DIR_SEPARATOR (canon_source_file[i])) in gfc_post_options()
337 memcpy (source_path, canon_source_file, i); in gfc_post_options()
344 if (canon_source_file != gfc_source_file) in gfc_post_options()
345 free (CONST_CAST (char *, canon_source_file)); in gfc_post_options()
H A Dscanner.c2808 gfc_read_orig_filename (const char *filename, const char **canon_source_file) in gfc_read_orig_filename() argument
2867 *canon_source_file = p; in gfc_read_orig_filename()
/netbsd-src/external/gpl3/gcc/dist/gcc/fortran/
H A Doptions.cc252 const char *filename = *pfilename, *canon_source_file = NULL; in gfc_post_options() local
325 gfc_source_file = gfc_read_orig_filename (filename, &canon_source_file); in gfc_post_options()
334 if (canon_source_file == NULL) in gfc_post_options()
335 canon_source_file = gfc_source_file; in gfc_post_options()
339 i = strlen (canon_source_file); in gfc_post_options()
340 while (i > 0 && !IS_DIR_SEPARATOR (canon_source_file[i])) in gfc_post_options()
346 memcpy (source_path, canon_source_file, i); in gfc_post_options()
356 if (canon_source_file != gfc_source_file) in gfc_post_options()
357 free (CONST_CAST (char *, canon_source_file)); in gfc_post_options()
H A Dscanner.cc2838 gfc_read_orig_filename (const char *filename, const char **canon_source_file) in gfc_read_orig_filename() argument
2897 *canon_source_file = p; in gfc_read_orig_filename()