Advertisement
Guest User

Untitled

a guest
Aug 1st, 2018
152
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 1.09 KB | None | 0 0
  1.  
  2. cl-user> (quick-update)
  3. The most up-to-date client, version 2017-03-06, is already installed.
  4. 1 dist to check.
  5. You already have the latest version of "quicklisp": 2018-07-11.
  6. nil
  7. cl-user> (ql:quickload :cl-ftp)
  8. (defpackage :example
  9. (:use :cl
  10. :ftp))
  11. (in-package :example)
  12.  
  13. ; Works
  14. (with-ftp-connection (conn :hostname "ftp.ncdc.noaa.gov" :passive-ftp-p t)
  15. (retrieve-file "pub/data/noaa/readme.txt" "./readme.txt"))
  16.  
  17. ; Does not work - I am expecting an ftp:ftp-error in this case but instead it hangs forever
  18. (with-ftp-connection (conn :hostname "ftp.ncdc.noaa.gov" :passive-ftp-p t)
  19. (retrieve-file "pub/data/noaa/fake-file-does-not-exist.txt" "./file.txt"))
  20. To load "cl-ftp":
  21. Load 1 ASDF system:
  22. cl-ftp
  23. ; Loading "cl-ftp"
  24.  
  25. ;Compiler warnings :
  26. ; In an anonymous lambda form: In the call to retrieve-file with arguments ("pub/data/noaa/readme.txt" "./readme.txt"),
  27. ; 2 arguments were provided, but at least 3 are required
  28. ; by the current global definition of retrieve-file
  29. ; Evaluation aborted on #<ccl:no-applicable-method-exists #x302372F1BE9D>.
  30. example>
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement