GetNumOfWaypoints.l 3.3 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115
  1. ;; Auto-generated. Do not edit!
  2. (when (boundp 'waterplus_map_tools::GetNumOfWaypoints)
  3. (if (not (find-package "WATERPLUS_MAP_TOOLS"))
  4. (make-package "WATERPLUS_MAP_TOOLS"))
  5. (shadow 'GetNumOfWaypoints (find-package "WATERPLUS_MAP_TOOLS")))
  6. (unless (find-package "WATERPLUS_MAP_TOOLS::GETNUMOFWAYPOINTS")
  7. (make-package "WATERPLUS_MAP_TOOLS::GETNUMOFWAYPOINTS"))
  8. (unless (find-package "WATERPLUS_MAP_TOOLS::GETNUMOFWAYPOINTSREQUEST")
  9. (make-package "WATERPLUS_MAP_TOOLS::GETNUMOFWAYPOINTSREQUEST"))
  10. (unless (find-package "WATERPLUS_MAP_TOOLS::GETNUMOFWAYPOINTSRESPONSE")
  11. (make-package "WATERPLUS_MAP_TOOLS::GETNUMOFWAYPOINTSRESPONSE"))
  12. (in-package "ROS")
  13. (defclass waterplus_map_tools::GetNumOfWaypointsRequest
  14. :super ros::object
  15. :slots ())
  16. (defmethod waterplus_map_tools::GetNumOfWaypointsRequest
  17. (:init
  18. (&key
  19. )
  20. (send-super :init)
  21. self)
  22. (:serialization-length
  23. ()
  24. (+
  25. 0
  26. ))
  27. (:serialize
  28. (&optional strm)
  29. (let ((s (if strm strm
  30. (make-string-output-stream (send self :serialization-length)))))
  31. ;;
  32. (if (null strm) (get-output-stream-string s))))
  33. (:deserialize
  34. (buf &optional (ptr- 0))
  35. ;;
  36. self)
  37. )
  38. (defclass waterplus_map_tools::GetNumOfWaypointsResponse
  39. :super ros::object
  40. :slots (_num ))
  41. (defmethod waterplus_map_tools::GetNumOfWaypointsResponse
  42. (:init
  43. (&key
  44. ((:num __num) 0)
  45. )
  46. (send-super :init)
  47. (setq _num (round __num))
  48. self)
  49. (:num
  50. (&optional __num)
  51. (if __num (setq _num __num)) _num)
  52. (:serialization-length
  53. ()
  54. (+
  55. ;; int32 _num
  56. 4
  57. ))
  58. (:serialize
  59. (&optional strm)
  60. (let ((s (if strm strm
  61. (make-string-output-stream (send self :serialization-length)))))
  62. ;; int32 _num
  63. (write-long _num s)
  64. ;;
  65. (if (null strm) (get-output-stream-string s))))
  66. (:deserialize
  67. (buf &optional (ptr- 0))
  68. ;; int32 _num
  69. (setq _num (sys::peek buf ptr- :integer)) (incf ptr- 4)
  70. ;;
  71. self)
  72. )
  73. (defclass waterplus_map_tools::GetNumOfWaypoints
  74. :super ros::object
  75. :slots ())
  76. (setf (get waterplus_map_tools::GetNumOfWaypoints :md5sum-) "54b3c80efd6fae6e6ffff8a4b9facd69")
  77. (setf (get waterplus_map_tools::GetNumOfWaypoints :datatype-) "waterplus_map_tools/GetNumOfWaypoints")
  78. (setf (get waterplus_map_tools::GetNumOfWaypoints :request) waterplus_map_tools::GetNumOfWaypointsRequest)
  79. (setf (get waterplus_map_tools::GetNumOfWaypoints :response) waterplus_map_tools::GetNumOfWaypointsResponse)
  80. (defmethod waterplus_map_tools::GetNumOfWaypointsRequest
  81. (:response () (instance waterplus_map_tools::GetNumOfWaypointsResponse :init)))
  82. (setf (get waterplus_map_tools::GetNumOfWaypointsRequest :md5sum-) "54b3c80efd6fae6e6ffff8a4b9facd69")
  83. (setf (get waterplus_map_tools::GetNumOfWaypointsRequest :datatype-) "waterplus_map_tools/GetNumOfWaypointsRequest")
  84. (setf (get waterplus_map_tools::GetNumOfWaypointsRequest :definition-)
  85. "---
  86. int32 num
  87. ")
  88. (setf (get waterplus_map_tools::GetNumOfWaypointsResponse :md5sum-) "54b3c80efd6fae6e6ffff8a4b9facd69")
  89. (setf (get waterplus_map_tools::GetNumOfWaypointsResponse :datatype-) "waterplus_map_tools/GetNumOfWaypointsResponse")
  90. (setf (get waterplus_map_tools::GetNumOfWaypointsResponse :definition-)
  91. "---
  92. int32 num
  93. ")
  94. (provide :waterplus_map_tools/GetNumOfWaypoints "54b3c80efd6fae6e6ffff8a4b9facd69")