home *** CD-ROM | disk | FTP | other *** search
/ OS/2 Shareware BBS: 10 Tools / 10-Tools.zip / lifeos2.zip / LIFE-1.02 / TESTS / IN / GLOBAL.IN < prev    next >
Text File  |  1996-06-04  |  432b  |  32 lines
  1. global(<-(q),a<-23+23)?
  2. write(q,a)?
  3. global(q,a<-23+23)?
  4. write(q,a)?
  5.  
  6. global(b<-a+a)?
  7.  
  8. write(b)?
  9.  
  10. global(c<-d+d,d<-2)?
  11. global(d<-2,c<-d+d)?
  12. global(d<-2)?
  13. global(c<-d+d)?
  14.  
  15. write(c,d)?
  16.  
  17. global(c<-d)?
  18. write(c,d)?
  19.  
  20. global(e<-f, f)? % global(e<-f,f<-e)?
  21. write(e,f)?
  22. .
  23. global((+),(*))?
  24. write((+),(*))?
  25. global(int,"s")?
  26. global(1,2,3,4,5)?
  27. global(q1,q2,q3,q4,5,q6,q7,q8)?
  28. write(q1,q2,q3,q4,q5,q6,q7,q8)?
  29. global(global)?
  30. listing(a,b,c,d,e)?
  31.  
  32.