OpenXM/src/k097/debug/tests.k - view

Return to tests.k CVS log

Up to [local] / OpenXM / src / k097 / debug

File: [local] / OpenXM / src / k097 / debug / tests.k (download)

Revision 1.1.1.1 (vendor branch), Fri Oct 8 02:12:15 1999 UTC (24 years, 8 months ago) by maekawa
Branch: OpenXM
CVS Tags: maekawa-ipv6, RELEASE_20000124, RELEASE_1_1_3, RELEASE_1_1_2, ALPHA
Changes since 1.1: +0 -0 lines

o import OpenXM sources

/* 1997, 3/7 */
def foo() {
  local s;
  Println(StringToIntegerArray("abcd ABCD"));
  s = "abc ABC"; Print(s); Print(" " );
  Println(k00AreThereLeftBrace(s));
  s = "a[xc]"; Print(s); Print(" " );
  Println(k00AreThereLeftBrace(s));
}