What causes "error: label `nonlocal_exit_18' not set"

What causes this? error: label `nonlocal_exit_18' not set It's happening right after the declaration of a procedure in a unit. Jerry