Inicio Explorar Ayuda
Iniciar sesión
eric
/
CocoR
1
0
Fork 0
Archivos Incidencias 0 Pull Requests 0 Wiki
Rama: master
Ramas Etiquetas
CocoR
/
Test1
/
tests
/
t_bad_caselabel.mod

t_bad_caselabel.mod 98 B
Permalink Histórico Raw

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.