¿Cómo abortar la evaluación de una secuencia de entradas?

Por defecto presionando Alt+. o llamando aAbort[] dentro de la evaluación provoca la cancelación de la entrada de evaluación actual. Pero cuando trabajamos en FrontEnd, generalmente enviamos al núcleo una secuencia de entradas. Por ejemplo, si escribimos las siguientes tres expresiones en líneas separadas en unaCell y luego presioneCambi+Entra obtenemos una evaluación infinita:

f := CheckAbort[Pause[.1], Abort[]]
While[True, f]
While[True, f]
While[True, f]

Para detener esta evaluación infinita debemos presionar Alt+. tres veces

Cómo definir la funciónf en el ejemplo anterior de tal manera que al presionar Alt+. una ve abortará la evaluación de la secuencia completa de entradassin salir del kernel?

EDITA

Creo que si FrontEnd crea una cola de entrada para MathKernel, probablemente también pueda cancelar esta cola.

Respuestas a la pregunta(3)

Su respuesta a la pregunta