Waypoint.l 3.2 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114
  1. ;; Auto-generated. Do not edit!
  2. (when (boundp 'waterplus_map_tools::Waypoint)
  3. (if (not (find-package "WATERPLUS_MAP_TOOLS"))
  4. (make-package "WATERPLUS_MAP_TOOLS"))
  5. (shadow 'Waypoint (find-package "WATERPLUS_MAP_TOOLS")))
  6. (unless (find-package "WATERPLUS_MAP_TOOLS::WAYPOINT")
  7. (make-package "WATERPLUS_MAP_TOOLS::WAYPOINT"))
  8. (in-package "ROS")
  9. ;;//! \htmlinclude Waypoint.msg.html
  10. (if (not (find-package "GEOMETRY_MSGS"))
  11. (ros::roseus-add-msgs "geometry_msgs"))
  12. (defclass waterplus_map_tools::Waypoint
  13. :super ros::object
  14. :slots (_frame_id _name _pose ))
  15. (defmethod waterplus_map_tools::Waypoint
  16. (:init
  17. (&key
  18. ((:frame_id __frame_id) "")
  19. ((:name __name) "")
  20. ((:pose __pose) (instance geometry_msgs::Pose :init))
  21. )
  22. (send-super :init)
  23. (setq _frame_id (string __frame_id))
  24. (setq _name (string __name))
  25. (setq _pose __pose)
  26. self)
  27. (:frame_id
  28. (&optional __frame_id)
  29. (if __frame_id (setq _frame_id __frame_id)) _frame_id)
  30. (:name
  31. (&optional __name)
  32. (if __name (setq _name __name)) _name)
  33. (:pose
  34. (&rest __pose)
  35. (if (keywordp (car __pose))
  36. (send* _pose __pose)
  37. (progn
  38. (if __pose (setq _pose (car __pose)))
  39. _pose)))
  40. (:serialization-length
  41. ()
  42. (+
  43. ;; string _frame_id
  44. 4 (length _frame_id)
  45. ;; string _name
  46. 4 (length _name)
  47. ;; geometry_msgs/Pose _pose
  48. (send _pose :serialization-length)
  49. ))
  50. (:serialize
  51. (&optional strm)
  52. (let ((s (if strm strm
  53. (make-string-output-stream (send self :serialization-length)))))
  54. ;; string _frame_id
  55. (write-long (length _frame_id) s) (princ _frame_id s)
  56. ;; string _name
  57. (write-long (length _name) s) (princ _name s)
  58. ;; geometry_msgs/Pose _pose
  59. (send _pose :serialize s)
  60. ;;
  61. (if (null strm) (get-output-stream-string s))))
  62. (:deserialize
  63. (buf &optional (ptr- 0))
  64. ;; string _frame_id
  65. (let (n) (setq n (sys::peek buf ptr- :integer)) (incf ptr- 4) (setq _frame_id (subseq buf ptr- (+ ptr- n))) (incf ptr- n))
  66. ;; string _name
  67. (let (n) (setq n (sys::peek buf ptr- :integer)) (incf ptr- 4) (setq _name (subseq buf ptr- (+ ptr- n))) (incf ptr- n))
  68. ;; geometry_msgs/Pose _pose
  69. (send _pose :deserialize buf ptr-) (incf ptr- (send _pose :serialization-length))
  70. ;;
  71. self)
  72. )
  73. (setf (get waterplus_map_tools::Waypoint :md5sum-) "b5abd84eafa003e99e40f2565ee73135")
  74. (setf (get waterplus_map_tools::Waypoint :datatype-) "waterplus_map_tools/Waypoint")
  75. (setf (get waterplus_map_tools::Waypoint :definition-)
  76. "string frame_id
  77. string name
  78. geometry_msgs/Pose pose
  79. ================================================================================
  80. MSG: geometry_msgs/Pose
  81. # A representation of pose in free space, composed of position and orientation.
  82. Point position
  83. Quaternion orientation
  84. ================================================================================
  85. MSG: geometry_msgs/Point
  86. # This contains the position of a point in free space
  87. float64 x
  88. float64 y
  89. float64 z
  90. ================================================================================
  91. MSG: geometry_msgs/Quaternion
  92. # This represents an orientation in free space in quaternion form.
  93. float64 x
  94. float64 y
  95. float64 z
  96. float64 w
  97. ")
  98. (provide :waterplus_map_tools/Waypoint "b5abd84eafa003e99e40f2565ee73135")