diff --git a/Test11.obn b/Test11.obn
index 847fddfb9dcdf2b6a41579d0e2b995af2861f581..aba8cb4bae1d18d664dc202f963784ab443d51d2 100644 (file)
--- a/Test11.obn
+++ b/Test11.obn
Out.Real(pi, 0); Out.Ln;
- IF 5 IN set THEN
- Out.String("SET: Ok"); Out.Ln;
- ELSE
- Out.String("INVALID SET"); Out.Ln;
- HALT(1);
- END;
-
- IF bol THEN
- Out.String("BOOLEAN: Ok"); Out.Ln;
- ELSE
- Out.String("INVALID BOOLEAN"); Out.Ln;
- HALT(1);
- END;
+ ASSERT(5 IN set);
+ ASSERT(bol);
END Test11.
Проверка свёртки констант.