Главная Обзор Помощь
Вход
eric
/
CocoR
1
0
Ответвить 0
Файлы Задачи 0 Запросы на слияние 0 Вики
Ветка: master
Ветки Метки
CocoR
/
Test1
/
tests
/
t_bad_caselabel.mod

t_bad_caselabel.mod 98 B
Постоянная ссылка История Исходник

1234 
  1. MODULE TCase;
    2. 

  2. VAR b : BOOLEAN; x : INTEGER;
    3. 

  3. BEGIN CASE b OF 1 : x := 1 ELSE x := 2 END
    4. 

  4. END TCase.
    5.