Alexander Dinu avatar Alexander Dinu committed 7bf7a99

some todos added

Comments (0)

Files changed (1)

       (parameterize ([current-custodian cust])
         (let-values ([(in out) (tcp-connect hostname port)])
           (make-connection in out cust)))))
   (define current-connection (void))
   (define (redis-connect! . args)
   (define (redis-query . commands)
     (let ([out (connection-out (current-connection))]
           [in (connection-in (current-connection))])
+      ;; TODO: validation of command name and number of arguments
       (fprintf out (format "*~a\r\n" (length commands)))
       (fprintf out (foldr string-append ""
                           (map (lambda (command)
   (define (read-reply in)
     (match (read-bytes 1 in)
            [#"+" (read-line in 'return-linefeed)]
-           [#"-" (read-line in 'return-linefeed)]
+           [#"-" (read-line in 'return-linefeed)] ;; TODO: implement exceptions
            [#":" (string->number (read-line in 'return-linefeed))]
            [#"$" (read-bulk-reply in)]
            [#"*" (read-multi-bulk-reply in)]
Tip: Filter by directory path e.g. /media app.js to search for public/media/app.js.
Tip: Use camelCasing e.g. ProjME to search for
Tip: Filter by extension type e.g. /repo .js to search for all .js files in the /repo directory.
Tip: Separate your search with spaces e.g. /ssh pom.xml to search for src/ssh/pom.xml.
Tip: Use ↑ and ↓ arrow keys to navigate and return to view the file.
Tip: You can also navigate files with Ctrl+j (next) and Ctrl+k (previous) and view the file with Ctrl+o.
Tip: You can also navigate files with Alt+j (next) and Alt+k (previous) and view the file with Alt+o.