SaveWaypoints.lisp 6.7 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128
  1. ; Auto-generated. Do not edit!
  2. (cl:in-package waterplus_map_tools-srv)
  3. ;//! \htmlinclude SaveWaypoints-request.msg.html
  4. (cl:defclass <SaveWaypoints-request> (roslisp-msg-protocol:ros-message)
  5. ((filename
  6. :reader filename
  7. :initarg :filename
  8. :type cl:string
  9. :initform ""))
  10. )
  11. (cl:defclass SaveWaypoints-request (<SaveWaypoints-request>)
  12. ())
  13. (cl:defmethod cl:initialize-instance :after ((m <SaveWaypoints-request>) cl:&rest args)
  14. (cl:declare (cl:ignorable args))
  15. (cl:unless (cl:typep m 'SaveWaypoints-request)
  16. (roslisp-msg-protocol:msg-deprecation-warning "using old message class name waterplus_map_tools-srv:<SaveWaypoints-request> is deprecated: use waterplus_map_tools-srv:SaveWaypoints-request instead.")))
  17. (cl:ensure-generic-function 'filename-val :lambda-list '(m))
  18. (cl:defmethod filename-val ((m <SaveWaypoints-request>))
  19. (roslisp-msg-protocol:msg-deprecation-warning "Using old-style slot reader waterplus_map_tools-srv:filename-val is deprecated. Use waterplus_map_tools-srv:filename instead.")
  20. (filename m))
  21. (cl:defmethod roslisp-msg-protocol:serialize ((msg <SaveWaypoints-request>) ostream)
  22. "Serializes a message object of type '<SaveWaypoints-request>"
  23. (cl:let ((__ros_str_len (cl:length (cl:slot-value msg 'filename))))
  24. (cl:write-byte (cl:ldb (cl:byte 8 0) __ros_str_len) ostream)
  25. (cl:write-byte (cl:ldb (cl:byte 8 8) __ros_str_len) ostream)
  26. (cl:write-byte (cl:ldb (cl:byte 8 16) __ros_str_len) ostream)
  27. (cl:write-byte (cl:ldb (cl:byte 8 24) __ros_str_len) ostream))
  28. (cl:map cl:nil #'(cl:lambda (c) (cl:write-byte (cl:char-code c) ostream)) (cl:slot-value msg 'filename))
  29. )
  30. (cl:defmethod roslisp-msg-protocol:deserialize ((msg <SaveWaypoints-request>) istream)
  31. "Deserializes a message object of type '<SaveWaypoints-request>"
  32. (cl:let ((__ros_str_len 0))
  33. (cl:setf (cl:ldb (cl:byte 8 0) __ros_str_len) (cl:read-byte istream))
  34. (cl:setf (cl:ldb (cl:byte 8 8) __ros_str_len) (cl:read-byte istream))
  35. (cl:setf (cl:ldb (cl:byte 8 16) __ros_str_len) (cl:read-byte istream))
  36. (cl:setf (cl:ldb (cl:byte 8 24) __ros_str_len) (cl:read-byte istream))
  37. (cl:setf (cl:slot-value msg 'filename) (cl:make-string __ros_str_len))
  38. (cl:dotimes (__ros_str_idx __ros_str_len msg)
  39. (cl:setf (cl:char (cl:slot-value msg 'filename) __ros_str_idx) (cl:code-char (cl:read-byte istream)))))
  40. msg
  41. )
  42. (cl:defmethod roslisp-msg-protocol:ros-datatype ((msg (cl:eql '<SaveWaypoints-request>)))
  43. "Returns string type for a service object of type '<SaveWaypoints-request>"
  44. "waterplus_map_tools/SaveWaypointsRequest")
  45. (cl:defmethod roslisp-msg-protocol:ros-datatype ((msg (cl:eql 'SaveWaypoints-request)))
  46. "Returns string type for a service object of type 'SaveWaypoints-request"
  47. "waterplus_map_tools/SaveWaypointsRequest")
  48. (cl:defmethod roslisp-msg-protocol:md5sum ((type (cl:eql '<SaveWaypoints-request>)))
  49. "Returns md5sum for a message object of type '<SaveWaypoints-request>"
  50. "030824f52a0628ead956fb9d67e66ae9")
  51. (cl:defmethod roslisp-msg-protocol:md5sum ((type (cl:eql 'SaveWaypoints-request)))
  52. "Returns md5sum for a message object of type 'SaveWaypoints-request"
  53. "030824f52a0628ead956fb9d67e66ae9")
  54. (cl:defmethod roslisp-msg-protocol:message-definition ((type (cl:eql '<SaveWaypoints-request>)))
  55. "Returns full string definition for message of type '<SaveWaypoints-request>"
  56. (cl:format cl:nil "string filename~%~%~%"))
  57. (cl:defmethod roslisp-msg-protocol:message-definition ((type (cl:eql 'SaveWaypoints-request)))
  58. "Returns full string definition for message of type 'SaveWaypoints-request"
  59. (cl:format cl:nil "string filename~%~%~%"))
  60. (cl:defmethod roslisp-msg-protocol:serialization-length ((msg <SaveWaypoints-request>))
  61. (cl:+ 0
  62. 4 (cl:length (cl:slot-value msg 'filename))
  63. ))
  64. (cl:defmethod roslisp-msg-protocol:ros-message-to-list ((msg <SaveWaypoints-request>))
  65. "Converts a ROS message object to a list"
  66. (cl:list 'SaveWaypoints-request
  67. (cl:cons ':filename (filename msg))
  68. ))
  69. ;//! \htmlinclude SaveWaypoints-response.msg.html
  70. (cl:defclass <SaveWaypoints-response> (roslisp-msg-protocol:ros-message)
  71. ()
  72. )
  73. (cl:defclass SaveWaypoints-response (<SaveWaypoints-response>)
  74. ())
  75. (cl:defmethod cl:initialize-instance :after ((m <SaveWaypoints-response>) cl:&rest args)
  76. (cl:declare (cl:ignorable args))
  77. (cl:unless (cl:typep m 'SaveWaypoints-response)
  78. (roslisp-msg-protocol:msg-deprecation-warning "using old message class name waterplus_map_tools-srv:<SaveWaypoints-response> is deprecated: use waterplus_map_tools-srv:SaveWaypoints-response instead.")))
  79. (cl:defmethod roslisp-msg-protocol:serialize ((msg <SaveWaypoints-response>) ostream)
  80. "Serializes a message object of type '<SaveWaypoints-response>"
  81. )
  82. (cl:defmethod roslisp-msg-protocol:deserialize ((msg <SaveWaypoints-response>) istream)
  83. "Deserializes a message object of type '<SaveWaypoints-response>"
  84. msg
  85. )
  86. (cl:defmethod roslisp-msg-protocol:ros-datatype ((msg (cl:eql '<SaveWaypoints-response>)))
  87. "Returns string type for a service object of type '<SaveWaypoints-response>"
  88. "waterplus_map_tools/SaveWaypointsResponse")
  89. (cl:defmethod roslisp-msg-protocol:ros-datatype ((msg (cl:eql 'SaveWaypoints-response)))
  90. "Returns string type for a service object of type 'SaveWaypoints-response"
  91. "waterplus_map_tools/SaveWaypointsResponse")
  92. (cl:defmethod roslisp-msg-protocol:md5sum ((type (cl:eql '<SaveWaypoints-response>)))
  93. "Returns md5sum for a message object of type '<SaveWaypoints-response>"
  94. "030824f52a0628ead956fb9d67e66ae9")
  95. (cl:defmethod roslisp-msg-protocol:md5sum ((type (cl:eql 'SaveWaypoints-response)))
  96. "Returns md5sum for a message object of type 'SaveWaypoints-response"
  97. "030824f52a0628ead956fb9d67e66ae9")
  98. (cl:defmethod roslisp-msg-protocol:message-definition ((type (cl:eql '<SaveWaypoints-response>)))
  99. "Returns full string definition for message of type '<SaveWaypoints-response>"
  100. (cl:format cl:nil "~%~%"))
  101. (cl:defmethod roslisp-msg-protocol:message-definition ((type (cl:eql 'SaveWaypoints-response)))
  102. "Returns full string definition for message of type 'SaveWaypoints-response"
  103. (cl:format cl:nil "~%~%"))
  104. (cl:defmethod roslisp-msg-protocol:serialization-length ((msg <SaveWaypoints-response>))
  105. (cl:+ 0
  106. ))
  107. (cl:defmethod roslisp-msg-protocol:ros-message-to-list ((msg <SaveWaypoints-response>))
  108. "Converts a ROS message object to a list"
  109. (cl:list 'SaveWaypoints-response
  110. ))
  111. (cl:defmethod roslisp-msg-protocol:service-request-type ((msg (cl:eql 'SaveWaypoints)))
  112. 'SaveWaypoints-request)
  113. (cl:defmethod roslisp-msg-protocol:service-response-type ((msg (cl:eql 'SaveWaypoints)))
  114. 'SaveWaypoints-response)
  115. (cl:defmethod roslisp-msg-protocol:ros-datatype ((msg (cl:eql 'SaveWaypoints)))
  116. "Returns string type for a service object of type '<SaveWaypoints>"
  117. "waterplus_map_tools/SaveWaypoints")