| 1 | #ifndef __chicken_chickenkw_swg__ |
| 2 | #define __chicken_chickenkw_swg__ |
| 3 | |
| 4 | /* Warnings for certain CHICKEN keywords. From Section 7.1.1 of |
| 5 | Revised^5 Report on the Algorithmic Language Scheme */ |
| 6 | #define CHICKENKW(x) %namewarn("314:" #x " is a R^5RS syntatic keyword") #x |
| 7 | |
| 8 | CHICKENKW(else); |
| 9 | CHICKENKW(=>); |
| 10 | CHICKENKW(define); |
| 11 | CHICKENKW(unquote); |
| 12 | CHICKENKW(unquote-splicing); |
| 13 | CHICKENKW(quote); |
| 14 | CHICKENKW(lambda); |
| 15 | CHICKENKW(if); |
| 16 | CHICKENKW(set!); |
| 17 | CHICKENKW(begin); |
| 18 | CHICKENKW(cond); |
| 19 | CHICKENKW(and); |
| 20 | CHICKENKW(or); |
| 21 | CHICKENKW(case); |
| 22 | CHICKENKW(let); |
| 23 | CHICKENKW(let*); |
| 24 | CHICKENKW(letrec); |
| 25 | CHICKENKW(do); |
| 26 | CHICKENKW(delay); |
| 27 | CHICKENKW(quasiquote); |
| 28 | |
| 29 | #undef CHICKENKW |
| 30 | |
| 31 | #endif //__chicken_chickenkw_swg__ |