Lines Matching defs:cp

642 	const char *cp;
659 cp = skipcomment(tline);
661 if (*cp == '#') {
664 cp = skipcomment(cp + 1);
665 } else if (*cp != '\0')
669 keyword = tline + (cp - tline);
670 cp = skipsym(cp);
671 kwlen = cp - keyword;
673 if (strncmp(cp, "\\\r\n", 3) == 0 ||
674 strncmp(cp, "\\\n", 2) == 0)
678 cp = skipcomment(cp);
679 if ((cursym = findsym(cp)) < 0)
691 cp = skipsym(cp);
693 retval = ifeval(&cp);
695 retval = ifeval(&cp) - LT_IF + LT_ELIF;
704 cp = skipcomment(cp);
705 if (*cp != '\0') {
722 size_t len = cp - tline;
726 cp += strlen(newline);
734 while (*cp != '\0')
735 cp = skipcomment(cp + 1);
827 const char *cp;
833 cp = skipcomment(*cpp);
834 if (*cp == '!') {
836 cp++;
837 lt = eval_unary(ops, valp, &cp);
844 } else if (*cp == '(') {
845 cp++;
847 lt = eval_table(eval_ops, valp, &cp);
850 cp = skipcomment(cp);
851 if (*cp++ != ')')
853 } else if (isdigit((unsigned char)*cp)) {
855 *valp = strtol(cp, &ep, 0);
856 if (ep == cp)
859 cp = skipsym(cp);
860 } else if (strncmp(cp, "defined", 7) == 0 && endsym(cp[7])) {
861 cp = skipcomment(cp+7);
863 if (*cp == '(') {
864 cp = skipcomment(cp+1);
869 sym = findsym(cp);
876 cp = skipsym(cp);
877 cp = skipcomment(cp);
878 if (defparen && *cp++ != ')')
881 } else if (!endsym(*cp)) {
883 sym = findsym(cp);
884 cp = skipsym(cp);
887 cp = skipargs(cp);
896 cp = skipargs(cp);
904 *cpp = cp;
916 const char *cp;
921 cp = *cpp;
922 lt = ops->inner(ops+1, valp, &cp);
926 cp = skipcomment(cp);
928 if (strncmp(cp, op->str, strlen(op->str)) == 0)
932 cp += strlen(op->str);
934 rt = ops->inner(ops+1, &val, &cp);
940 *cpp = cp;
972 skipcomment(const char *cp)
975 for (; isspace((unsigned char)*cp); cp++)
976 if (*cp == '\n')
978 return (cp);
980 while (*cp != '\0')
982 if (strncmp(cp, "\\\r\n", 3) == 0)
983 cp += 3;
984 else if (strncmp(cp, "\\\n", 2) == 0)
985 cp += 2;
988 if (strncmp(cp, "/\\\r\n", 4) == 0) {
990 cp += 4;
991 } else if (strncmp(cp, "/\\\n", 3) == 0) {
993 cp += 3;
994 } else if (strncmp(cp, "/*", 2) == 0) {
996 cp += 2;
997 } else if (strncmp(cp, "//", 2) == 0) {
999 cp += 2;
1000 } else if (strncmp(cp, "\'", 1) == 0) {
1003 cp += 1;
1004 } else if (strncmp(cp, "\"", 1) == 0) {
1007 cp += 1;
1008 } else if (strncmp(cp, "\n", 1) == 0) {
1010 cp += 1;
1011 } else if (strchr(" \r\t", *cp) != NULL) {
1012 cp += 1;
1014 return (cp);
1017 if (strncmp(cp, "\n", 1) == 0) {
1021 cp += 1;
1025 if ((incomment == CHAR_LITERAL && cp[0] == '\'') ||
1026 (incomment == STRING_LITERAL && cp[0] == '\"')) {
1028 cp += 1;
1029 } else if (cp[0] == '\\') {
1030 if (cp[1] == '\0')
1031 cp += 1;
1033 cp += 2;
1034 } else if (strncmp(cp, "\n", 1) == 0) {
1040 cp += 1;
1043 if (strncmp(cp, "*\\\r\n", 4) == 0) {
1045 cp += 4;
1046 } else if (strncmp(cp, "*\\\n", 3) == 0) {
1048 cp += 3;
1049 } else if (strncmp(cp, "*/", 2) == 0) {
1051 cp += 2;
1053 cp += 1;
1056 if (*cp == '*') {
1058 cp += 1;
1059 } else if (*cp == '/') {
1061 cp += 1;
1068 if (*cp == '/') {
1070 cp += 1;
1077 return (cp);
1084 skipargs(const char *cp)
1086 const char *ocp = cp;
1088 cp = skipcomment(cp);
1089 if (*cp != '(')
1090 return (cp);
1092 if (*cp == '(')
1094 if (*cp == ')')
1096 cp = skipcomment(cp+1);
1097 } while (level != 0 && *cp != '\0');
1099 return (cp);
1109 skipsym(const char *cp)
1111 while (!endsym(*cp))
1112 ++cp;
1113 return (cp);
1123 const char *cp;
1126 cp = skipsym(str);
1127 if (cp == str)
1135 (int)(cp-str), str,
1141 if (strlcmp(symname[symind], str, cp-str) == 0) {