home *** CD-ROM | disk | FTP | other *** search
/ OS/2 Shareware BBS: 10 Tools / 10-Tools.zip / lifeos2.zip / LIFE-1.02 / TESTS / LF / LIBSTRUC.LF < prev    next >
Text File  |  1996-06-04  |  124b  |  6 lines
  1. import("structures")?
  2. import("io")?
  3.  
  4. non_strict(test)?
  5. test(X) :- nl,nl,writeln("testing: ",X),writeln("    ",evalin(X)),fail.
  6.