[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.2

1.1       maekawa     1:
                      2: /* 1997, 3/7 */
                      3: def foo() {
                      4:   local s;
1.2     ! takayama    5:   Println(StringToAsciiArray("abcd ABCD"));
1.1       maekawa     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>