0. #lang racket
1.  
2. (define fish%
3.   (class object%
4.     (init [a-color color])
5.  
6.     (define color a-color)
7.  
8.     (super-new)
9.  
10.     (define/public (get-color)
11.       color)))
12.  
13. (define a-fish (new fish% [color "blue"]))

=>

color: undefined;

cannot use field before initialization