SaveWaypoints.l 3.3 KB

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