Skip to content

Commit

Permalink
Re-generate UIKit and PhotosUI bindings.
Browse files Browse the repository at this point in the history
  • Loading branch information
@dboris
dboris committed Sep 7, 2024
1 parent ff4a2cf commit 819cddc
Show file tree
Hide file tree
Showing 2,826 changed files with 48,913 additions and 46,956 deletions.
2 changes: 1 addition & 1 deletion AppKit/dune
View file
Original file line number Diff line number Diff line change
Expand Up @@ -4,6 +4,6 @@
(libraries
camlkit-base.runtime
camlkit-base.Foundation
camlkit-gui.CoreAnimation))
camlkit-base.CoreAnimation))

(documentation (package camlkit-gui))
2 changes: 1 addition & 1 deletion AppKit_extra/dune
View file
Original file line number Diff line number Diff line change
Expand Up @@ -4,6 +4,6 @@
(libraries
camlkit-base.runtime
camlkit-base.Foundation
camlkit-gui.CoreAnimation))
camlkit-base.CoreAnimation))

(documentation (package camlkit-gui))
6 changes: 3 additions & 3 deletions CoreAnimation/dune
View file
Original file line number Diff line number Diff line change
@@ -1,7 +1,7 @@
(library
(name CoreAnimation)
(public_name camlkit-gui.CoreAnimation)
(public_name camlkit-base.CoreAnimation)
(flags :standard -ccopt "-framework QuartzCore")
(libraries camlkit-base.runtime CoreFoundation CoreGraphics))
(libraries CoreFoundation CoreGraphics))

(documentation (package camlkit-gui))
(documentation (package camlkit-base))
2 changes: 1 addition & 1 deletion CoreVideo/dune
View file
Original file line number Diff line number Diff line change
Expand Up @@ -6,6 +6,6 @@
camlkit-base.runtime
camlkit-base.CoreFoundation
camlkit-base.CoreGraphics
camlkit-gui.CoreAnimation))
camlkit-base.CoreAnimation))

(documentation (package camlkit-gui))
2 changes: 2 additions & 0 deletions Foundation/NSObjectClass.ml
View file
Original file line number Diff line number Diff line change
Expand Up @@ -7,6 +7,7 @@ open Objc

let _SFSQLiteClassName self = msg_send ~self ~cmd:(selector "SFSQLiteClassName") ~typ:(returning id)
let accessInstanceVariablesDirectly self = msg_send ~self ~cmd:(selector "accessInstanceVariablesDirectly") ~typ:(returning bool)
let alloc self = msg_send ~self ~cmd:(selector "alloc") ~typ:(returning id)
let allowsWeakReference self = msg_send ~self ~cmd:(selector "allowsWeakReference") ~typ:(returning bool)
let automaticallyNotifiesObserversForKey x self = msg_send ~self ~cmd:(selector "automaticallyNotifiesObserversForKey:") ~typ:(id @-> returning bool) x
let autorelease self = msg_send ~self ~cmd:(selector "autorelease") ~typ:(returning id)
Expand Down Expand Up @@ -49,6 +50,7 @@ let methodForSelector x self = msg_send ~self ~cmd:(selector "methodForSelector:
let methodSignatureForSelector x self = msg_send ~self ~cmd:(selector "methodSignatureForSelector:") ~typ:(_SEL @-> returning id) x
let mutableCopy self = msg_send ~self ~cmd:(selector "mutableCopy") ~typ:(returning id)
let mutableCopyWithZone x self = msg_send ~self ~cmd:(selector "mutableCopyWithZone:") ~typ:((ptr void) @-> returning id) x
let new_ self = msg_send ~self ~cmd:(selector "new") ~typ:(returning id)
let performSelector x self = msg_send ~self ~cmd:(selector "performSelector:") ~typ:(_SEL @-> returning id) x
let performSelector1 x ~withObject self = msg_send ~self ~cmd:(selector "performSelector:withObject:") ~typ:(_SEL @-> id @-> returning id) x withObject
let performSelector2 x ~withObject ~withObject_ self = msg_send ~self ~cmd:(selector "performSelector:withObject:withObject:") ~typ:(_SEL @-> id @-> id @-> returning id) x withObject withObject_
Expand Down
9 changes: 4 additions & 5 deletions PhotosUI/PHEditingExtensionContext.ml
View file
Original file line number Diff line number Diff line change
Expand Up @@ -4,14 +4,13 @@ open Runtime
open Objc

[@@@ocaml.warning "-33"]
open CoreFoundation
open CoreFoundation_globals
open CoreGraphics
open CoreGraphics_globals
open Uikit
open Foundation
open UIKit

(** Apple docs: {{:https://developer.apple.com/documentation/photosui/pheditingextensioncontext?language=objc}PHEditingExtensionContext} *)

let self = get_class "PHEditingExtensionContext"

let attemptUndoManagerAutoSetup self = msg_send ~self ~cmd:(selector "attemptUndoManagerAutoSetup") ~typ:(returning bool)
let beginContentEditingWithCompletionHandler x self = msg_send ~self ~cmd:(selector "beginContentEditingWithCompletionHandler:") ~typ:((ptr void) @-> returning void) x
let cancelContentEditingWithResponseHandler x self = msg_send ~self ~cmd:(selector "cancelContentEditingWithResponseHandler:") ~typ:((ptr void) @-> returning void) x
Expand Down
15 changes: 0 additions & 15 deletions PhotosUI/PHEditingExtensionContextClass.ml
View file

This file was deleted.

9 changes: 4 additions & 5 deletions PhotosUI/PHLivePhotoView.ml
View file
Original file line number Diff line number Diff line change
Expand Up @@ -4,14 +4,13 @@ open Runtime
open Objc

[@@@ocaml.warning "-33"]
open CoreFoundation
open CoreFoundation_globals
open CoreGraphics
open CoreGraphics_globals
open Uikit
open Foundation
open UIKit

(** Apple docs: {{:https://developer.apple.com/documentation/photosui/phlivephotoview?language=objc}PHLivePhotoView} *)

let self = get_class "PHLivePhotoView"

let delegate self = msg_send ~self ~cmd:(selector "delegate") ~typ:(returning id)
let generateSnapshotImage self = msg_send ~self ~cmd:(selector "generateSnapshotImage") ~typ:(returning id)
let initWithCoder x self = msg_send ~self ~cmd:(selector "initWithCoder:") ~typ:(id @-> returning id) x
Expand Down
9 changes: 2 additions & 7 deletions PhotosUI/PHLivePhotoViewClass.ml
View file
Original file line number Diff line number Diff line change
Expand Up @@ -4,14 +4,9 @@ open Runtime
open Objc

[@@@ocaml.warning "-33"]
open CoreFoundation
open CoreFoundation_globals
open CoreGraphics
open CoreGraphics_globals
open Uikit
open Foundation
open UIKit

(** Apple docs: {{:https://developer.apple.com/documentation/photosui/phlivephotoview?language=objc}PHLivePhotoView} *)

let self = get_class "PHLivePhotoView"

let livePhotoBadgeImageWithOptions x self = msg_send ~self ~cmd:(selector "livePhotoBadgeImageWithOptions:") ~typ:(ullong @-> returning id) (ULLong.of_int x)
9 changes: 4 additions & 5 deletions PhotosUI/PHPhotosPickerOptions.ml
View file
Original file line number Diff line number Diff line change
Expand Up @@ -4,14 +4,13 @@ open Runtime
open Objc

[@@@ocaml.warning "-33"]
open CoreFoundation
open CoreFoundation_globals
open CoreGraphics
open CoreGraphics_globals
open Uikit
open Foundation
open UIKit

(** Apple docs: {{:https://developer.apple.com/documentation/photosui/phphotospickeroptions?language=objc}PHPhotosPickerOptions} *)

let self = get_class "PHPhotosPickerOptions"

let excludedContentModes self = msg_send ~self ~cmd:(selector "excludedContentModes") ~typ:(returning id)
let hideTabBar self = msg_send ~self ~cmd:(selector "hideTabBar") ~typ:(returning bool)
let initialAssetsToSelect self = msg_send ~self ~cmd:(selector "initialAssetsToSelect") ~typ:(returning id)
Expand Down
15 changes: 0 additions & 15 deletions PhotosUI/PHPhotosPickerOptionsClass.ml
View file

This file was deleted.

9 changes: 4 additions & 5 deletions PhotosUI/PHPickerConfiguration.ml
View file
Original file line number Diff line number Diff line change
Expand Up @@ -4,14 +4,13 @@ open Runtime
open Objc

[@@@ocaml.warning "-33"]
open CoreFoundation
open CoreFoundation_globals
open CoreGraphics
open CoreGraphics_globals
open Uikit
open Foundation
open UIKit

(** Apple docs: {{:https://developer.apple.com/documentation/photosui/phpickerconfiguration?language=objc}PHPickerConfiguration} *)

let self = get_class "PHPickerConfiguration"

let copyWithZone x self = msg_send ~self ~cmd:(selector "copyWithZone:") ~typ:((ptr void) @-> returning id) x
let filter self = msg_send ~self ~cmd:(selector "filter") ~typ:(returning id)
let hash self = msg_send ~self ~cmd:(selector "hash") ~typ:(returning ullong)
Expand Down
15 changes: 0 additions & 15 deletions PhotosUI/PHPickerConfigurationClass.ml
View file

This file was deleted.

9 changes: 4 additions & 5 deletions PhotosUI/PHPickerFilter.ml
View file
Original file line number Diff line number Diff line change
Expand Up @@ -4,14 +4,13 @@ open Runtime
open Objc

[@@@ocaml.warning "-33"]
open CoreFoundation
open CoreFoundation_globals
open CoreGraphics
open CoreGraphics_globals
open Uikit
open Foundation
open UIKit

(** Apple docs: {{:https://developer.apple.com/documentation/photosui/phpickerfilter?language=objc}PHPickerFilter} *)

let self = get_class "PHPickerFilter"

let copyWithZone x self = msg_send ~self ~cmd:(selector "copyWithZone:") ~typ:((ptr void) @-> returning id) x
let hash self = msg_send ~self ~cmd:(selector "hash") ~typ:(returning ullong)
let init self = msg_send ~self ~cmd:(selector "init") ~typ:(returning id)
Expand Down
9 changes: 2 additions & 7 deletions PhotosUI/PHPickerFilterClass.ml
View file
Original file line number Diff line number Diff line change
Expand Up @@ -4,16 +4,11 @@ open Runtime
open Objc

[@@@ocaml.warning "-33"]
open CoreFoundation
open CoreFoundation_globals
open CoreGraphics
open CoreGraphics_globals
open Uikit
open Foundation
open UIKit

(** Apple docs: {{:https://developer.apple.com/documentation/photosui/phpickerfilter?language=objc}PHPickerFilter} *)

let self = get_class "PHPickerFilter"

let allFilterMatchingSubfilters x self = msg_send ~self ~cmd:(selector "allFilterMatchingSubfilters:") ~typ:(id @-> returning id) x
let anyFilterMatchingSubfilters x self = msg_send ~self ~cmd:(selector "anyFilterMatchingSubfilters:") ~typ:(id @-> returning id) x
let imagesFilter self = msg_send ~self ~cmd:(selector "imagesFilter") ~typ:(returning id)
Expand Down
9 changes: 4 additions & 5 deletions PhotosUI/PHPickerResult.ml
View file
Original file line number Diff line number Diff line change
Expand Up @@ -4,14 +4,13 @@ open Runtime
open Objc

[@@@ocaml.warning "-33"]
open CoreFoundation
open CoreFoundation_globals
open CoreGraphics
open CoreGraphics_globals
open Uikit
open Foundation
open UIKit

(** Apple docs: {{:https://developer.apple.com/documentation/photosui/phpickerresult?language=objc}PHPickerResult} *)

let self = get_class "PHPickerResult"

let assetIdentifier self = msg_send ~self ~cmd:(selector "assetIdentifier") ~typ:(returning id)
let hash self = msg_send ~self ~cmd:(selector "hash") ~typ:(returning ullong)
let init self = msg_send ~self ~cmd:(selector "init") ~typ:(returning id)
Expand Down
15 changes: 0 additions & 15 deletions PhotosUI/PHPickerResultClass.ml
View file

This file was deleted.

9 changes: 4 additions & 5 deletions PhotosUI/PHPickerViewController.ml
View file
Original file line number Diff line number Diff line change
Expand Up @@ -4,14 +4,13 @@ open Runtime
open Objc

[@@@ocaml.warning "-33"]
open CoreFoundation
open CoreFoundation_globals
open CoreGraphics
open CoreGraphics_globals
open Uikit
open Foundation
open UIKit

(** Apple docs: {{:https://developer.apple.com/documentation/photosui/phpickerviewcontroller?language=objc}PHPickerViewController} *)

let self = get_class "PHPickerViewController"

let configuration self = msg_send ~self ~cmd:(selector "configuration") ~typ:(returning id)
let dealloc self = msg_send ~self ~cmd:(selector "dealloc") ~typ:(returning void)
let delegate self = msg_send ~self ~cmd:(selector "delegate") ~typ:(returning id)
Expand Down
15 changes: 0 additions & 15 deletions PhotosUI/PHPickerViewControllerClass.ml
View file

This file was deleted.

10 changes: 4 additions & 6 deletions PhotosUI/PHSwipeDownTracker.ml
View file
Original file line number Diff line number Diff line change
Expand Up @@ -4,14 +4,13 @@ open Runtime
open Objc

[@@@ocaml.warning "-33"]
open CoreFoundation
open CoreFoundation_globals
open CoreGraphics
open CoreGraphics_globals
open Uikit
open Foundation
open UIKit

(** Apple docs: {{:https://developer.apple.com/documentation/photosui/phswipedowntracker?language=objc}PHSwipeDownTracker} *)

let self = get_class "PHSwipeDownTracker"

let dismissalProgress self = msg_send ~self ~cmd:(selector "dismissalProgress") ~typ:(returning double)
let finalAnimationDuration self = msg_send ~self ~cmd:(selector "finalAnimationDuration") ~typ:(returning double)
let finalAnimationSpringDamping self = msg_send ~self ~cmd:(selector "finalAnimationSpringDamping") ~typ:(returning double)
Expand All @@ -23,4 +22,3 @@ let trackGestureTranslation x ~velocity self = msg_send ~self ~cmd:(selector "tr
let trackedBounds self = msg_send ~self ~cmd:(selector "trackedBounds") ~typ:(returning CGRect.t)
let trackedCenter self = msg_send ~self ~cmd:(selector "trackedCenter") ~typ:(returning CGPoint.t)
let trackedTransform self = msg_send ~self ~cmd:(selector "trackedTransform") ~typ:(returning CGAffineTransform.t)
(* let trackedVelocity self = msg_send ~self ~cmd:(selector "trackedVelocity") ~typ:(returning PHDisplayVelocity.t) *)
15 changes: 0 additions & 15 deletions PhotosUI/PHSwipeDownTrackerClass.ml
View file

This file was deleted.

9 changes: 4 additions & 5 deletions PhotosUI/PUAbstractNavigationBanner.ml
View file
Original file line number Diff line number Diff line change
Expand Up @@ -4,14 +4,13 @@ open Runtime
open Objc

[@@@ocaml.warning "-33"]
open CoreFoundation
open CoreFoundation_globals
open CoreGraphics
open CoreGraphics_globals
open Uikit
open Foundation
open UIKit

(** Apple docs: {{:https://developer.apple.com/documentation/photosui/puabstractnavigationbanner?language=objc}PUAbstractNavigationBanner} *)

let self = get_class "PUAbstractNavigationBanner"

let delegate self = msg_send ~self ~cmd:(selector "delegate") ~typ:(returning id)
let height self = msg_send ~self ~cmd:(selector "height") ~typ:(returning double)
let setDelegate x self = msg_send ~self ~cmd:(selector "setDelegate:") ~typ:(id @-> returning void) x
Expand Down
15 changes: 0 additions & 15 deletions PhotosUI/PUAbstractNavigationBannerClass.ml
View file

This file was deleted.

Loading

0 comments on commit 819cddc

Please sign in to comment.