Cross Reference: /src/usr.bin/fsplit/fsplit.c

Lines Matching refs:look
98 static const char *look(const char *, const char *);
150 		 * Look for a temp file that doesn't correspond to an
164 			/* look for an 'end' statement */
362 	if ((ptr = look(line, "subroutine")) != NULL ||
363 	    (ptr = look(line, "function")) != NULL ||
369 	} else if ((ptr = look(line, "program")) != NULL) {
375 	} else if ((ptr = look(line, "blockdata")) != NULL) {
427  * look for typed functions such as: real*8 function,
435         if ((ptr = look(p, "character")) != NULL ||
436 	    (ptr = look(p, "logical")) != NULL ||
437 	    (ptr = look(p, "real")) != NULL ||
438 	    (ptr = look(p, "integer")) != NULL ||
439 	    (ptr = look(p, "doubleprecision")) != NULL ||
440 	    (ptr = look(p, "complex")) != NULL ||
441 	    (ptr = look(p, "doublecomplex")) != NULL) {
447 		ptr = look(ptr, "function");
482 look(const char *s, const char *m)
OpenGrok
