home *** CD-ROM | disk | FTP | other *** search
/ Power-Programmierung / CD1.mdf / qtawk / ansirsv.exp < prev    next >
Text File  |  1989-04-28  |  2KB  |  72 lines
  1. BEGIN {
  2.     #
  3.     # ANSI C reserved words
  4.     #
  5.     # expression for leader
  6.     ldr = /(^|[\s\t\*\(,])/;
  7.     # upper case letters
  8.     upr = /[A-Z]/;
  9.     # lower case letters
  10.     lwr = /[a-z]/;
  11.     # characters allowed in names
  12.     alwd = /[A-Za-z0-9_]/;
  13.     # abbreviation
  14.     f = /[fl]/;
  15.     # opening function parenthesis
  16.     o_p = /{_w}*\(/;
  17. }
  18. #
  19. #
  20. #1 <errno.h> reserved words
  21. /{ldr}E{upr}{alwd}+/ { printf("%u: %s\n",FNR,$0); next; }
  22. #
  23. #2 <ctype.h> reserved words
  24. /{ldr}(is|to){lwr}{alwd}+{o_p}/ { printf("%u: %s\n",FNR,$0); next; }
  25. #
  26. #3 <locale.h> reserved words
  27. /{ldr}LC_{upr}{alwd}/ { printf("%u: %s\n",FNR,$0); next; }
  28. #
  29. #4 <math.h> reserved words
  30. /{ldr}a(cos|sin|tan2?){f}{o_p}/ { printf("%u: %s\n",FNR,$0); next; }
  31. #
  32. #5 <math.h> reserved words
  33. /{ldr}(cos|sin|tan)h?{f}{o_p}/ { printf("%u: %s\n",FNR,$0); next; }
  34. #
  35. #6 <math.h> reserved words
  36. /{ldr}(fr|ld)?exp{f}{o_p}/ { printf("%u: %s\n",FNR,$0); next; }
  37. #
  38. #7 <math.h> reserved words
  39. /{ldr}log(10)?{f}{o_p}/ { printf("%u: %s\n",FNR,$0); next; }
  40. #
  41. #8 <math.h> reserved words
  42. /{ldr}modf{f}{o_p}/ { printf("%u: %s\n",FNR,$0); next; }
  43. #
  44. #9 <math.h> reserved words
  45. /{ldr}pow{f}{o_p}/ { printf("%u: %s\n",FNR,$0); next; }
  46. #
  47. #10 <math.h> reserved words
  48. /{ldr}sqrt{f}{o_p}/ { printf("%u: %s\n",FNR,$0); next; }
  49. #
  50. #11 <math.h> reserved words
  51. /{ldr}ceil{f}{o_p}/ { printf("%u: %s\n",FNR,$0); next; }
  52. #
  53. #12 <math.h> reserved words
  54. /{ldr}(f|l)?abs{f}{o_p}/ { printf("%u: %s\n",FNR,$0); next; }
  55. #
  56. #13 <math.h> reserved words
  57. /{ldr}f(loor|mod){f}{o_p}/ { printf("%u: %s\n",FNR,$0); next; }
  58. #
  59. #14 <signal.h> reserved words
  60. /{ldr}SIG_{upr}{alwd}+/ { printf("%u: %s\n",FNR,$0); next; }
  61. #
  62. #15 <string.h> reserved words
  63. /{ldr}(str|mem){lwr}{alwd}+{o_p}/ { printf("%u: %s\n",FNR,$0); next; }
  64. #
  65. #99 Variable Names Reserved by Committee for Standard Library
  66. #  ALL identifiers starting with '_'
  67. /{ldr}_{alwd}+/ { printf("%u: %s\n",FNR,$0); }
  68.  
  69. FINAL {
  70.     printf("Lines Scanned: %lu\n",NR);
  71. }
  72.