[BACK]Return to tests.k CVS log [TXT][DIR] Up to [local] / OpenXM / src / k097 / debug

Annotation of OpenXM/src/k097/debug/tests.k, Revision 1.1.1.1

1.1       maekawa     1:
                      2: /* 1997, 3/7 */
                      3: def foo() {
                      4:   local s;
                      5:   Println(StringToIntegerArray("abcd ABCD"));
                      6:   s = "abc ABC"; Print(s); Print(" " );
                      7:   Println(k00AreThereLeftBrace(s));
                      8:   s = "a[xc]"; Print(s); Print(" " );
                      9:   Println(k00AreThereLeftBrace(s));
                     10: }

FreeBSD-CVSweb <freebsd-cvsweb@FreeBSD.org>