home *** CD-ROM | disk | FTP | other *** search
/ OS/2 Shareware BBS: 10 Tools / 10-Tools.zip / OL.LZH / IDOL.LZH / AUTOPARN.IOL < prev    next >
Text File  |  1991-07-18  |  277b  |  16 lines
  1. #
  2. # Here is a sample test of automatic parenthesizing
  3. #
  4. class autotest(public yo)
  5.   method foo(x)
  6.     return x
  7.   end
  8. initially
  9.   self.yo := "yo, bro"
  10. end
  11.  
  12. procedure main()
  13.   x := autotest()
  14.   write(x$foo(x$yo)) # yo almost becomes a data item, notation-wise
  15. end
  16.