close
  • favorite

    2 Like

    ericbuijs , Timothée Jaussoin

  • 1 Comments

  • 10 April Timothée Jaussoin

    Clean install !

10 Reasons Huawei Science and Technology Is Going to Be Big in [Year]

Huawei's founder and CEO Ren Cheng stressed the need for openness and cooperation in the fields of science and technology, noting that 5G technology can accelerate the arrival of the world of artificial intelligence, which will help to significantly improve the efficiency of production and social wealth.

#huawei #research #6g #mobilenetwork #network #networking #CEO #renzhengfei #generation #dailyaddaa #dailyaddaanews #data #dataspeeds #china #trending #technology #founder #mobile

https://www.turkeycelebs.com/2019/11/10-reasons-huawei-science-and.html
  • chevron_right

    A minimal hello world in USOCKET

    Michał "phoe" Herda · Sunday, 23 December, 2018 - 12:04

(This is a repost of an old blog post of mine from Teknik.)

#common-lisp #usocket #networking

CL-USER> (ql:quickload :usocket)
To load "usocket":
  Load 1 ASDF system:
    usocket
; Loading "usocket"
[package usocket]..........
(:USOCKET)
CL-USER> (use-package :usocket)
T
CL-USER> (defvar *server* (socket-listen "127.0.0.1" 65432))
*SERVER*
CL-USER> (defvar *client-1* (socket-connect "127.0.0.1" 65432))
*CLIENT-1*
CL-USER> (defvar *client-2* (socket-accept *server*))
*CLIENT-2*
CL-USER> (print "hello world!" (socket-stream *client-1*))
"hello world!"
CL-USER> (finish-output (socket-stream *client-1*))
NIL
CL-USER> (read-line (socket-stream *client-2*))
""
NIL
CL-USER> (socket-close *client-1*)
T
CL-USER> (socket-close *client-2*)
T
CL-USER> (socket-close *server*)
T