0. #lang racket
1.  
2. (struct dot (x y))
3.  
4. (define (match-element element value)
5.   (match value
6.     [(element (p)) p]))
7.  
8. (match-element dot (dot 1))

=>

eval:3:0: match: syntax error in pattern

in: (element (p))

match-element: undefined;

cannot reference an identifier before its definition

in module: 'm