; Auto-generated. Do not edit!


(in-package test_rospy-srv)


;//! \htmlinclude ListReturn-request.msg.html

(defclass <ListReturn-request> (ros-message)
  ((a
    :reader a-val
    :initarg :a
    :type integer
    :initform 0)
   (b
    :reader b-val
    :initarg :b
    :type integer
    :initform 0)
   (c
    :reader c-val
    :initarg :c
    :type integer
    :initform 0)
   (d
    :reader d-val
    :initarg :d
    :type integer
    :initform 0))
)
(defmethod serialize ((msg <ListReturn-request>) ostream)
  "Serializes a message object of type '<ListReturn-request>"
    (write-byte (ldb (byte 8 0) (slot-value msg 'a)) ostream)
  (write-byte (ldb (byte 8 8) (slot-value msg 'a)) ostream)
  (write-byte (ldb (byte 8 16) (slot-value msg 'a)) ostream)
  (write-byte (ldb (byte 8 24) (slot-value msg 'a)) ostream)
    (write-byte (ldb (byte 8 0) (slot-value msg 'b)) ostream)
  (write-byte (ldb (byte 8 8) (slot-value msg 'b)) ostream)
  (write-byte (ldb (byte 8 16) (slot-value msg 'b)) ostream)
  (write-byte (ldb (byte 8 24) (slot-value msg 'b)) ostream)
    (write-byte (ldb (byte 8 0) (slot-value msg 'c)) ostream)
  (write-byte (ldb (byte 8 8) (slot-value msg 'c)) ostream)
  (write-byte (ldb (byte 8 16) (slot-value msg 'c)) ostream)
  (write-byte (ldb (byte 8 24) (slot-value msg 'c)) ostream)
    (write-byte (ldb (byte 8 0) (slot-value msg 'd)) ostream)
  (write-byte (ldb (byte 8 8) (slot-value msg 'd)) ostream)
  (write-byte (ldb (byte 8 16) (slot-value msg 'd)) ostream)
  (write-byte (ldb (byte 8 24) (slot-value msg 'd)) ostream)
)
(defmethod deserialize ((msg <ListReturn-request>) istream)
  "Deserializes a message object of type '<ListReturn-request>"
  (setf (ldb (byte 8 0) (slot-value msg 'a)) (read-byte istream))
  (setf (ldb (byte 8 8) (slot-value msg 'a)) (read-byte istream))
  (setf (ldb (byte 8 16) (slot-value msg 'a)) (read-byte istream))
  (setf (ldb (byte 8 24) (slot-value msg 'a)) (read-byte istream))
  (setf (ldb (byte 8 0) (slot-value msg 'b)) (read-byte istream))
  (setf (ldb (byte 8 8) (slot-value msg 'b)) (read-byte istream))
  (setf (ldb (byte 8 16) (slot-value msg 'b)) (read-byte istream))
  (setf (ldb (byte 8 24) (slot-value msg 'b)) (read-byte istream))
  (setf (ldb (byte 8 0) (slot-value msg 'c)) (read-byte istream))
  (setf (ldb (byte 8 8) (slot-value msg 'c)) (read-byte istream))
  (setf (ldb (byte 8 16) (slot-value msg 'c)) (read-byte istream))
  (setf (ldb (byte 8 24) (slot-value msg 'c)) (read-byte istream))
  (setf (ldb (byte 8 0) (slot-value msg 'd)) (read-byte istream))
  (setf (ldb (byte 8 8) (slot-value msg 'd)) (read-byte istream))
  (setf (ldb (byte 8 16) (slot-value msg 'd)) (read-byte istream))
  (setf (ldb (byte 8 24) (slot-value msg 'd)) (read-byte istream))
  msg
)
(defmethod ros-datatype ((msg (eql '<ListReturn-request>)))
  "Returns string type for a service object of type '<ListReturn-request>"
  "test_rospy/ListReturnRequest")
(defmethod md5sum ((type (eql '<ListReturn-request>)))
  "Returns md5sum for a message object of type '<ListReturn-request>"
  "8083abf57e6eb0ff97ebb506984b66b8")
(defmethod message-definition ((type (eql '<ListReturn-request>)))
  "Returns full string definition for message of type '<ListReturn-request>"
  (format nil "# test case for having single list return value~%int32 a~%int32 b~%int32 c~%int32 d~%~%"))
(defmethod serialization-length ((msg <ListReturn-request>))
  (+ 0
     4
     4
     4
     4
))
(defmethod ros-message-to-list ((msg <ListReturn-request>))
  "Converts a ROS message object to a list"
  (list '<ListReturn-request>
    (cons ':a (a-val msg))
    (cons ':b (b-val msg))
    (cons ':c (c-val msg))
    (cons ':d (d-val msg))
))
;//! \htmlinclude ListReturn-response.msg.html

(defclass <ListReturn-response> (ros-message)
  ((abcd
    :reader abcd-val
    :initarg :abcd
    :type (vector integer)
   :initform (make-array 0 :element-type 'integer :initial-element 0)))
)
(defmethod serialize ((msg <ListReturn-response>) ostream)
  "Serializes a message object of type '<ListReturn-response>"
  (let ((__ros_arr_len (length (slot-value msg 'abcd))))
    (write-byte (ldb (byte 8 0) __ros_arr_len) ostream)
    (write-byte (ldb (byte 8 8) __ros_arr_len) ostream)
    (write-byte (ldb (byte 8 16) __ros_arr_len) ostream)
    (write-byte (ldb (byte 8 24) __ros_arr_len) ostream))
  (map nil #'(lambda (ele)   (write-byte (ldb (byte 8 0) ele) ostream)
  (write-byte (ldb (byte 8 8) ele) ostream)
  (write-byte (ldb (byte 8 16) ele) ostream)
  (write-byte (ldb (byte 8 24) ele) ostream))
    (slot-value msg 'abcd))
)
(defmethod deserialize ((msg <ListReturn-response>) istream)
  "Deserializes a message object of type '<ListReturn-response>"
  (let ((__ros_arr_len 0))
    (setf (ldb (byte 8 0) __ros_arr_len) (read-byte istream))
    (setf (ldb (byte 8 8) __ros_arr_len) (read-byte istream))
    (setf (ldb (byte 8 16) __ros_arr_len) (read-byte istream))
    (setf (ldb (byte 8 24) __ros_arr_len) (read-byte istream))
    (setf (slot-value msg 'abcd) (make-array __ros_arr_len))
    (let ((vals (slot-value msg 'abcd)))
      (dotimes (i __ros_arr_len)
(setf (ldb (byte 8 0) (aref vals i)) (read-byte istream))
  (setf (ldb (byte 8 8) (aref vals i)) (read-byte istream))
  (setf (ldb (byte 8 16) (aref vals i)) (read-byte istream))
  (setf (ldb (byte 8 24) (aref vals i)) (read-byte istream)))))
  msg
)
(defmethod ros-datatype ((msg (eql '<ListReturn-response>)))
  "Returns string type for a service object of type '<ListReturn-response>"
  "test_rospy/ListReturnResponse")
(defmethod md5sum ((type (eql '<ListReturn-response>)))
  "Returns md5sum for a message object of type '<ListReturn-response>"
  "8083abf57e6eb0ff97ebb506984b66b8")
(defmethod message-definition ((type (eql '<ListReturn-response>)))
  "Returns full string definition for message of type '<ListReturn-response>"
  (format nil "int32[] abcd~%~%~%"))
(defmethod serialization-length ((msg <ListReturn-response>))
  (+ 0
     4 (reduce #'+ (slot-value msg 'abcd) :key #'(lambda (ele) (declare (ignorable ele)) (+ 4)))
))
(defmethod ros-message-to-list ((msg <ListReturn-response>))
  "Converts a ROS message object to a list"
  (list '<ListReturn-response>
    (cons ':abcd (abcd-val msg))
))
(defmethod service-request-type ((msg (eql 'ListReturn)))
  '<ListReturn-request>)
(defmethod service-response-type ((msg (eql 'ListReturn)))
  '<ListReturn-response>)
(defmethod ros-datatype ((msg (eql 'ListReturn)))
  "Returns string type for a service object of type '<ListReturn>"
  "test_rospy/ListReturn")
