api[apple,MapKit] code iOS

#iOS = TargetOS ifFalse: [ self cancelFileIn ]!

| superCls |
superCls := [:cls|
	(cls includes: #View) ifTrue: [
		#iOS = TargetOS ifTrue: [UIView] ifFalse: [NSView]
	] ifFalse: [ NSObject ]
].
#(	#MKReverseGeocoder
	#MKOverlayView
	#MKUserTrackingBarButtonItem
)do: [:each| (superCls value:each) subclass: each category: #MapKit-iOS ] !

! MKReverseGeocoder class methodsFor: #instantiation !
withCoordinate: coordinate
	^self @ (self nativeClass instanceWithCoordinate: coordinate handle)! !

MKReverseGeocoder buildFunctions: #(
	start cancel
)!
MKReverseGeocoder buildTypedAccessors: #(
	#(delegate #NSObject)
)!
MKReverseGeocoder buildTypedGetters: #(
	#(coordinate #CLLocationCoordinate2D)
	#(placemark #MKPlacemark)
)!
MKReverseGeocoder buildIsBooleanGetters: #(
	querying
)!

! MKOverlayView class methodsFor: #instantiation !
withOverlay: aMKOverlay
	^self @ (self nativeClass instanceWithOverlay: aMKOverlay handle)! !

MKOverlayView buildTypedAccessors: #(
	#(overlay #NSObject)
)!
MKOverlayView buildFunctions: #(
	#(#pointForMapPoint: #(#(mapPoint handle)) #CGPoint)
	#(#mapPointForPoint: #(#(point handle)) #MKMapPoint)
	#(#rectForMapRect: #(#(mapRect handle)) #CGRect)
	#(#mapRectForRect: #(#(rect handle)) #MKMapRect)
	#(#canDrawMapRect:zoomScale: #(#(mapRect handle) zoomScale))
	#(#drawMapRect:zoomScale:inContext: #(#(mapRect handle) zoomScale #(context handle)))
	#(#setNeedsDisplayInMapRect: #(#(mapRect handle)))
	#(#setNeedsDisplayInMapRect:zoomScale: #(#(mapRect handle) zoomScale))
)!

MKOverlayView subclass: #MKOverlayPathView category: #MapKit-iOS!
MKOverlayPathView buildTypedAccessors: #(
	#(fillColor #UIColor)
	#(strokeColor #UIColor)
	#(path #CGPathRef)
)!
MKOverlayPathView buildNumberAccessors: #(
	lineWidth lineJoin lineCap
	miterLimit lineDashPhase
)!
MKOverlayPathView buildAccessors: #(
	lineDashPattern
)!
MKOverlayPathView buildFunctions: #(
	createPath invalidatePath
	#(#applyStrokePropertiesToContext:atZoomScale: #(#(context handle) zoomScale))
	#(#applyFillPropertiesToContext:atZoomScale: #(#(context handle) zoomScale))
	#(#strokePath:inContext: #(#(path handle) #(context handle)))
	#(#fillPath:inContext: #(#(path handle) #(context handle)))
)!

MKOverlayPathView subclass: #MKPolygonView !
MKPolygonView buildTypedGetters: #(
	#(polygon #MKPolygon)
)!
! MKPolygonView class methodsFor: #instantiation !
withPolygon: polygon
	^ self @ (self nativeClass instanceWithPolygon: polygon handle)! !

MKOverlayPathView subclass: #MKPolylineView!
MKPolylineView buildTypedGetters: #(
	#(polyline #MKPolyline)
)!
! MKPolylineView class methodsFor: #instantiation !
withPolyline: polyline
	^ self @ (self nativeClass instanceWithPolyline: polyline handle)! !

MKOverlayPathView subclass: #MKCircleView!
MKCircleView buildTypedGetters: #(
	#(circle #MKCircle)
)!
! MKCircleView class methodsFor: #instantiation !
withCircle: circle
	^ self @ (self nativeClass instanceWithCircle: circle handle)! !

UIBarButtonItem subclass: #MKUserTrackingBarButtonItem category: #MapKit-iOS !
! MKUserTrackingBarButtonItem class methodsFor: #instantiation !
withMapView: mapView
	^ self @ (self nativeClass instanceWithMapView: mapView handle)! !
MKUserTrackingBarButtonItem buildTypedAccessors: #(
	#(mapView #MKMapView)
)!