b.c (170332) | b.c (201951) |
---|---|
1/**************************************************************** 2Copyright (C) Lucent Technologies 1997 3All Rights Reserved 4 5Permission to use, copy, modify, and distribute this software and 6its documentation for any purpose and without fee is hereby 7granted, provided that the above copyright notice appear in all 8copies and that both that the copyright notice and this --- 717 unchanged lines hidden (view full) --- 726 * system i use, it's defined here. if some other locale has a richer 727 * definition of "blank", define HAS_ISBLANK and provide your own 728 * version. 729 * the parentheses here are an attempt to find a path through the maze 730 * of macro definition and/or function and/or version provided. thanks 731 * to nelson beebe for the suggestion; let's see if it works everywhere. 732 */ 733 | 1/**************************************************************** 2Copyright (C) Lucent Technologies 1997 3All Rights Reserved 4 5Permission to use, copy, modify, and distribute this software and 6its documentation for any purpose and without fee is hereby 7granted, provided that the above copyright notice appear in all 8copies and that both that the copyright notice and this --- 717 unchanged lines hidden (view full) --- 726 * system i use, it's defined here. if some other locale has a richer 727 * definition of "blank", define HAS_ISBLANK and provide your own 728 * version. 729 * the parentheses here are an attempt to find a path through the maze 730 * of macro definition and/or function and/or version provided. thanks 731 * to nelson beebe for the suggestion; let's see if it works everywhere. 732 */ 733 |
734/* #define HAS_ISBLANK */ |
|
734#ifndef HAS_ISBLANK 735 736int (isblank)(int c) 737{ 738 return c==' ' || c=='\t'; 739} 740 741#endif --- 129 unchanged lines hidden (view full) --- 871 || (k == EMPTYRE && c != 0) 872 || (k == CCL && member(c, (char *) f->re[p[i]].lval.up)) 873 || (k == NCCL && !member(c, (char *) f->re[p[i]].lval.up) && c != 0 && c != HAT)) { 874 q = f->re[p[i]].lfollow; 875 for (j = 1; j <= *q; j++) { 876 if (q[j] >= maxsetvec) { 877 maxsetvec *= 4; 878 setvec = (int *) realloc(setvec, maxsetvec * sizeof(int)); | 735#ifndef HAS_ISBLANK 736 737int (isblank)(int c) 738{ 739 return c==' ' || c=='\t'; 740} 741 742#endif --- 129 unchanged lines hidden (view full) --- 872 || (k == EMPTYRE && c != 0) 873 || (k == CCL && member(c, (char *) f->re[p[i]].lval.up)) 874 || (k == NCCL && !member(c, (char *) f->re[p[i]].lval.up) && c != 0 && c != HAT)) { 875 q = f->re[p[i]].lfollow; 876 for (j = 1; j <= *q; j++) { 877 if (q[j] >= maxsetvec) { 878 maxsetvec *= 4; 879 setvec = (int *) realloc(setvec, maxsetvec * sizeof(int)); |
879 tmpset = (int *) realloc(setvec, maxsetvec * sizeof(int)); | 880 tmpset = (int *) realloc(tmpset, maxsetvec * sizeof(int)); |
880 if (setvec == 0 || tmpset == 0) 881 overflo("cgoto overflow"); 882 } 883 if (setvec[q[j]] == 0) { 884 setcnt++; 885 setvec[q[j]] = 1; 886 } 887 } --- 66 unchanged lines hidden --- | 881 if (setvec == 0 || tmpset == 0) 882 overflo("cgoto overflow"); 883 } 884 if (setvec[q[j]] == 0) { 885 setcnt++; 886 setvec[q[j]] = 1; 887 } 888 } --- 66 unchanged lines hidden --- |