Free Pascal supports the goto jump statement. Its prototype is
var jumpto : label ... Jumpto : Statement; ... Goto jumpto; ...The jump label must be defined in the same block as the Goto statement. To be able to use the Goto statement, you need to specify the -Sg compiler switch.