File: qa-broadcast

package info (click to toggle)
newlisp 10.7.5-3
  • links: PTS, VCS
  • area: main
  • in suites: forky, sid
  • size: 6,292 kB
  • sloc: ansic: 33,280; lisp: 4,181; sh: 609; makefile: 215
file content (3 lines) | stat: -rw-r--r-- 198 bytes parent folder | download | duplicates (5) 
1
2
3
 
newlisp -e '(net-receive (net-listen 3000 "" "udp") buff 10) (if (= buff "hello") "broadcast Ok" "broadcast Problem")' &
newlisp -e '(net-send (net-connect "10.0.0.255" 3000 "broadcast") "hello")'