Прилегающие отрезки A и B склеиваются. Результат может прилегать к следующему отрезку -- это склеивание не выполняется.
## Код:
```
(*^Q"DevCompiler.CompileOpt('@')"*)
MODULE Mod;
   PROCEDURE Proc (ch: CHAR);
   BEGIN
      CASE ch OF
      | "A", "C", "B":
      ELSE
      END;
   END Proc;
END Mod.

MODULE Mod

   PROCEDURE Proc
      VAR ch: CHAR
   BEGIN
      CASE ch OF
      | 65..66, 67:
      END;
   END Proc

BEGIN
CLOSE
END Mod
```
