cl-ipp

Internet Printing Protocol (IPP) for Common Lisp
git clone https://logand.com/git/cl-ipp.git/
Log | Files | Refs

commit 5b0516797f2357922f67c2506409ae53784a1395
parent b637f2779d1bf89abf77307df38f431e8b9f33c2
Author: Tomas Hlavaty <tom@logand.com>
Date:   Sat, 10 Aug 2013 22:27:00 +0200

error for #-ccl

Diffstat:
Mipp.lisp | 6++++--
1 file changed, 4 insertions(+), 2 deletions(-)

diff --git a/ipp.lisp b/ipp.lisp @@ -28,10 +28,12 @@ (in-package :ipp) (defun string-to-octets (x) ;; TODO encoding - (ccl:encode-string-to-octets x)) + #+ccl(ccl:encode-string-to-octets x) + #-ccl(error "TODO port IPP::STRING-TO-OCTETS")) (defun octets-to-string (x) ;; TODO encoding - (ccl:decode-string-from-octets x)) + #+ccl(ccl:decode-string-from-octets x) + #-ccl(error "TODO port IPP::OCTETS-TO-STRING")) (defun tag (x) (let ((tags '((#x01 . :operation-attributes-tag)