home *** CD-ROM | disk | FTP | other *** search
/ ftp.cs.arizona.edu / ftp.cs.arizona.edu.tar / ftp.cs.arizona.edu / icon / historic / v941.tgz / icon.v941src.tar / icon.v941src / ipl / packs / idol / autoparn.iol < prev    next >
Text File  |  2000-07-29  |  262b  |  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.