| 1 | #ifndef __ocaml_ocamlkw_swg__ |
| 2 | #define __ocaml_ocamlkw_swg__ |
| 3 | |
| 4 | /* Warnings for Ocaml keywords */ |
| 5 | #define OCAMLKW(x) %namewarn("314:" #x " is a ocaml keyword") #x |
| 6 | |
| 7 | /* |
| 8 | from |
| 9 | http://caml.inria.fr/ocaml/htmlman/manual044.html |
| 10 | */ |
| 11 | |
| 12 | |
| 13 | OCAMLKW(and); |
| 14 | OCAMLKW(as); |
| 15 | OCAMLKW(assert); |
| 16 | OCAMLKW(begin); |
| 17 | OCAMLKW(class); |
| 18 | OCAMLKW(constraint); |
| 19 | OCAMLKW(do); |
| 20 | OCAMLKW(done); |
| 21 | OCAMLKW(downto); |
| 22 | OCAMLKW(else); |
| 23 | OCAMLKW(end); |
| 24 | OCAMLKW(exception); |
| 25 | OCAMLKW(external); |
| 26 | OCAMLKW(false); |
| 27 | OCAMLKW(for); |
| 28 | OCAMLKW(fun); |
| 29 | OCAMLKW(function); |
| 30 | OCAMLKW(functor); |
| 31 | OCAMLKW(if); |
| 32 | OCAMLKW(in); |
| 33 | OCAMLKW(include); |
| 34 | OCAMLKW(inherit); |
| 35 | OCAMLKW(initializer); |
| 36 | OCAMLKW(lazy); |
| 37 | OCAMLKW(let); |
| 38 | OCAMLKW(match); |
| 39 | OCAMLKW(method); |
| 40 | OCAMLKW(module); |
| 41 | OCAMLKW(mutable); |
| 42 | OCAMLKW(new); |
| 43 | OCAMLKW(object); |
| 44 | OCAMLKW(of); |
| 45 | OCAMLKW(open); |
| 46 | OCAMLKW(or); |
| 47 | OCAMLKW(private); |
| 48 | OCAMLKW(rec); |
| 49 | OCAMLKW(sig); |
| 50 | OCAMLKW(struct); |
| 51 | OCAMLKW(then); |
| 52 | OCAMLKW(to); |
| 53 | OCAMLKW(true); |
| 54 | OCAMLKW(try); |
| 55 | OCAMLKW(type); |
| 56 | OCAMLKW(val); |
| 57 | OCAMLKW(virtual); |
| 58 | OCAMLKW(when); |
| 59 | OCAMLKW(while); |
| 60 | OCAMLKW(with); |
| 61 | |
| 62 | #undef OCAMLKW |
| 63 | |
| 64 | #endif //__ocaml_ocamlkw_swg__ |