and block_comment = parse
| CC { () }
| OC { block_comment lexbuf; block_comment lexbuf }
| LC { line_comment lexbuf; block_comment lexbuf }
| _ { block_comment lexbuf }
and block_comment = parse
| CC { () }
| OC { block_comment lexbuf; block_comment lexbuf }
| LC { line_comment lexbuf; block_comment lexbuf }
| _ { block_comment lexbuf }