(KEYWORD "subroutine")
(TOKEN "identifier" g)
(TOKEN "(")
(TOKEN ")")
(TOKEN "identifier" r)
(NEWLINE)
(KEYWORD "integer")
(TOKEN "::")
(TOKEN "identifier" x)
(NEWLINE)
(TOKEN "identifier" x)
(TOKEN "=")
(TOKEN "integer" 1)
(NEWLINE)
(KEYWORD "end subroutine")
(NEWLINE)
(EOF)
