Add a test to cover get_source_expressions.R#L55-L61

https://github.com/jimhester/lintr/blob/01849a56cc96e55fb495ef3e259eeed6ea6ffaab/R/get_source_expressions.R#L55-L61