QuerySignal.st
changeset 1734 c05da5185472
parent 1534 3aac2f9ef96c
child 1954 05b137a75c75
equal deleted inserted replaced
1733:2cc88c50db99 1734:c05da5185472
   258        |q|
   258        |q|
   259 
   259 
   260        q := QuerySignal new.
   260        q := QuerySignal new.
   261 
   261 
   262        q answer:false do:[
   262        q answer:false do:[
   263           Transcript showCR:'query answers: ' , (q raise printString).
   263           Transcript showCR:'first query answers: ' , (q raise printString).
   264           q answer:true in:[
   264           q answer:true do:[
   265               Transcript showCR:'query answers: ' , (q raise printString).
   265               Transcript showCR:'second query answers: ' , (q raise printString).
   266           ]
   266           ]
   267        ]
   267        ]
   268       "
   268       "
   269 
   269 
   270     "Modified: 10.7.1996 / 15:05:56 / cg"
       
   271     "Created: 10.7.1996 / 15:08:20 / cg"
   270     "Created: 10.7.1996 / 15:08:20 / cg"
       
   271     "Modified: 14.10.1996 / 16:59:18 / cg"
   272 ! !
   272 ! !
   273 
   273 
   274 !QuerySignal  class methodsFor:'documentation'!
   274 !QuerySignal  class methodsFor:'documentation'!
   275 
   275 
   276 version
   276 version
   277     ^ '$Header: /cvs/stx/stx/libbasic/QuerySignal.st,v 1.14 1996-07-10 13:08:44 cg Exp $'
   277     ^ '$Header: /cvs/stx/stx/libbasic/QuerySignal.st,v 1.15 1996-10-14 15:59:28 cg Exp $'
   278 ! !
   278 ! !