Advertisement
Guest User

Untitled

a guest
Sep 19th, 2017
58
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 0.17 KB | None | 0 0
  1. (define (client:send id message)
  2. (if (not (null message))
  3. (for c in connections
  4. (if (and (not (null c)) (= (c:getID) id))
  5. (and (c:send message) 1)))))
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement