Guest User

Untitled

a guest
Jun 24th, 2018
116
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 0.55 KB | None | 0 0
  1. (require 'epc)
  2. (eval-when-compile (require 'cl))
  3.  
  4. (message "Start EPC")
  5.  
  6. (defvar my-epc-server-py
  7. (expand-file-name "server.py"
  8. (file-name-directory
  9. (or load-file-name buffer-file-name))))
  10.  
  11. (defvar my-epc (epc:start-epc (or (getenv "PYTHON") "python")
  12. (list my-epc-server-py)))
  13.  
  14. (message "Start request")
  15.  
  16. (deferred:$
  17. (epc:call-deferred my-epc 'add '(10))
  18. (deferred:nextc it
  19. (lambda (x) (message "Return : %S" x))))
  20.  
  21.  
  22. (message "Return : %S" (epc:call-sync my-epc 'add '(10 40)))
Add Comment
Please, Sign In to add comment