Languages with GOTO

Is there a modern programming language which has GOTO function in it? I know basic from a millenia ago and recently learned java, and well I hated OOP, but I could live with it if I had goto.

>>45
for(tok=getToken();reduceTok(tok);if(shiftTok(tok))tok=getToken());