Add '_spi(TokamakCore)' to ideally internal public members.

Sources/TokamakCore/App/Scenes/WindowGroup.swift

@@ -63,6 +63,7 @@ public struct WindowGroup<Content>: Scene, TitledScene where Content: View {
     self.content = content()
   }
 
+  @_spi(TokamakCore)
   public var body: Never {
     neverScene("WindowGroup")
   }

Sources/TokamakCore/App/Scenes/_SceneModifier.swift

@@ -25,6 +25,7 @@ public struct _SceneModifier_Content<Modifier>: Scene where Modifier: _SceneModi
   public let modifier: Modifier
   public let scene: _AnyScene
 
+  @_spi(TokamakCore)
   public var body: Never {
     neverScene("_SceneModifier_Content")
   }

Sources/TokamakCore/App/_AnyApp.swift

@@ -31,26 +31,32 @@ public struct _AnyApp: App {
     bodyType = A.Body.self
   }
 
+  @_spi(TokamakCore)
   public var body: Never {
     neverScene("_AnyApp")
   }
 
+  @_spi(TokamakCore)
   public init() {
     fatalError("`_AnyApp` cannot be initialized without an underlying `App` type.")
   }
 
+  @_spi(TokamakCore)
   public static func _launch(_ app: Self, _ rootEnvironment: EnvironmentValues) {
     fatalError("`_AnyApp` cannot be launched. Access underlying `app` value.")
   }
 
+  @_spi(TokamakCore)
   public static func _setTitle(_ title: String) {
     fatalError("`title` cannot be set for `AnyApp`. Access underlying `app` value.")
   }
 
+  @_spi(TokamakCore)
   public var _phasePublisher: AnyPublisher<ScenePhase, Never> {
     fatalError("`_AnyApp` cannot monitor scenePhase. Access underlying `app` value.")
   }
 
+  @_spi(TokamakCore)
   public var _colorSchemePublisher: AnyPublisher<ColorScheme, Never> {
     fatalError("`_AnyApp` cannot monitor colorScheme. Access underlying `app` value.")
   }

Sources/TokamakCore/App/_AnyScene.swift

@@ -66,6 +66,7 @@ public struct _AnyScene: Scene {
     }
   }
 
+  @_spi(TokamakCore)
   public var body: Never {
     neverScene("_AnyScene")
   }

Sources/TokamakCore/Shapes/Shape.swift

@@ -59,6 +59,7 @@ public struct _ShapeView<Content, Style>: View where Content: Shape, Style: Shap
     self.fillStyle = fillStyle
   }
 
+  @_spi(TokamakCore)
   public var body: Never {
     neverBody("_ShapeView")
   }

Sources/TokamakCore/Styles/ButtonStyle.swift

@@ -17,6 +17,8 @@
 public struct ButtonStyleConfiguration {
   public struct Label: View {
     let content: AnyView
+
+    @_spi(TokamakCore)
     public var body: Never {
       neverBody("ButtonStyleConfiguration.Label")
     }

Sources/TokamakCore/Tokens/Color.swift

@@ -241,6 +241,7 @@ public struct Color: Hashable, Equatable {
   }
 
   /// Create a `Color` dependent on the current `ColorScheme`.
+  @_spi(TokamakCore)
   public static func _withScheme(_ resolver: @escaping (ColorScheme) -> Self) -> Self {
     .init(_EnvironmentDependentColorBox {
       resolver($0.colorScheme)

Sources/TokamakCore/Views/AnyView.swift

@@ -68,6 +68,7 @@ public struct AnyView: View {
     }
   }
 
+  @_spi(TokamakCore)
   public var body: Never {
     neverBody("AnyView")
   }
@@ -80,6 +81,7 @@ public func mapAnyView<T, V>(_ anyView: AnyView, transform: (V) -> T) -> T? {
 }
 
 extension AnyView: ParentView {
+  @_spi(TokamakCore)
   public var children: [AnyView] {
     (view as? ParentView)?.children ?? []
   }

Sources/TokamakCore/Views/Buttons/Button.swift

@@ -58,6 +58,7 @@ public struct _Button<Label>: View where Label: View {
     self.action = action
   }
 
+  @_spi(TokamakCore)
   public var body: Never {
     neverBody("_Button")
   }
@@ -72,6 +73,7 @@ public extension Button where Label == Text {
 }
 
 extension Button: ParentView {
+  @_spi(TokamakCore)
   public var children: [AnyView] {
     (implementation.label as? GroupView)?.children ?? [AnyView(implementation.label)]
   }

Sources/TokamakCore/Views/Buttons/Link.swift

@@ -25,6 +25,7 @@ public struct Link<Label>: View where Label: View {
     (self.destination, self.label) = (destination, label())
   }
 
+  @_spi(TokamakCore)
   public var body: Never {
     neverBody("Link")
   }

Sources/TokamakCore/Views/Containers/DisclosureGroup.swift

@@ -40,6 +40,7 @@ public struct DisclosureGroup<Label, Content>: View where Label: View, Content:
     self.content = content
   }
 
+  @_spi(TokamakCore)
   public var body: Never {
     neverBody("DisclosureGroup")
   }

Sources/TokamakCore/Views/Containers/ForEach.swift

@@ -48,6 +48,7 @@ public struct ForEach<Data, ID, Content>: View where Data: RandomAccessCollectio
     self.content = content
   }
 
+  @_spi(TokamakCore)
   public var body: Never {
     neverBody("ForEach")
   }
@@ -79,6 +80,7 @@ public extension ForEach where Data == Range<Int>, ID == Int {
 }
 
 extension ForEach: ParentView {
+  @_spi(TokamakCore)
   public var children: [AnyView] {
     data.map { AnyView(IDView(content($0), id: $0[keyPath: id])) }
   }

Sources/TokamakCore/Views/Containers/Group.swift

@@ -20,12 +20,14 @@ public struct Group<Content> {
 }
 
 extension Group: View where Content: View {
+  @_spi(TokamakCore)
   public var body: Never {
     neverBody("Group")
   }
 }
 
 extension Group: ParentView where Content: View {
+  @_spi(TokamakCore)
   public var children: [AnyView] { (content as? ParentView)?.children ?? [AnyView(content)] }
 }
 

Sources/TokamakCore/Views/Containers/TupleView.swift

@@ -19,6 +19,7 @@
 ///
 /// Mainly for use with `@ViewBuilder`.
 public struct TupleView<T>: View {
+  @_spi(TokamakCore)
   public var body: Never {
     neverBody("TupleView")
   }

Sources/TokamakCore/Views/Image.swift

@@ -40,6 +40,7 @@ public struct Image: View {
     self.bundle = bundle
   }
 
+  @_spi(TokamakCore)
   public var body: Never {
     neverBody("Image")
   }

Sources/TokamakCore/Views/Layout/GeometryReader.swift

@@ -46,6 +46,7 @@ public struct GeometryReader<Content>: View where Content: View {
     self.content = content
   }
 
+  @_spi(TokamakCore)
   public var body: Never {
     neverBody("GeometryReader")
   }

Sources/TokamakCore/Views/Layout/HStack.swift

@@ -43,12 +43,14 @@ public struct HStack<Content>: View where Content: View {
     self.content = content()
   }
 
+  @_spi(TokamakCore)
   public var body: Never {
     neverBody("HStack")
   }
 }
 
 extension HStack: ParentView {
+  @_spi(TokamakCore)
   public var children: [AnyView] {
     (content as? GroupView)?.children ?? [AnyView(content)]
   }

Sources/TokamakCore/Views/Layout/LazyHGrid.swift

@@ -36,6 +36,7 @@ public struct LazyHGrid<Content>: View where Content: View {
     self.content = content()
   }
 
+  @_spi(TokamakCore)
   public var body: Never {
     neverBody("LazyVGrid")
   }

Sources/TokamakCore/Views/Layout/LazyVGrid.swift

@@ -36,6 +36,7 @@ public struct LazyVGrid<Content>: View where Content: View {
     self.content = content()
   }
 
+  @_spi(TokamakCore)
   public var body: Never {
     neverBody("LazyVGrid")
   }

Sources/TokamakCore/Views/Layout/ScrollView.swift

@@ -50,12 +50,14 @@ public struct ScrollView<Content>: View where Content: View {
     self.content = content()
   }
 
+  @_spi(TokamakCore)
   public var body: Never {
     neverBody("ScrollView")
   }
 }
 
 extension ScrollView: ParentView {
+  @_spi(TokamakCore)
   public var children: [AnyView] {
     (content as? GroupView)?.children ?? [AnyView(content)]
   }

Sources/TokamakCore/Views/Layout/VStack.swift

@@ -40,12 +40,14 @@ public struct VStack<Content>: View where Content: View {
     self.content = content()
   }
 
+  @_spi(TokamakCore)
   public var body: Never {
     neverBody("VStack")
   }
 }
 
 extension VStack: ParentView {
+  @_spi(TokamakCore)
   public var children: [AnyView] {
     (content as? GroupView)?.children ?? [AnyView(content)]
   }

Sources/TokamakCore/Views/Layout/ZStack.swift

@@ -58,12 +58,14 @@ public struct ZStack<Content>: View where Content: View {
     self.content = content()
   }
 
+  @_spi(TokamakCore)
   public var body: Never {
     neverBody("ZStack")
   }
 }
 
 extension ZStack: ParentView {
+  @_spi(TokamakCore)
   public var children: [AnyView] {
     (content as? GroupView)?.children ?? [AnyView(content)]
   }

Sources/TokamakCore/Views/Navigation/NavigationLink.swift

@@ -45,6 +45,7 @@ public struct NavigationLink<Label, Destination>: View where Label: View, Destin
   //    @ViewBuilder label: () -> Label
   //   ) where V : Hashable
 
+  @_spi(TokamakCore)
   public var body: Never {
     neverBody("NavigationLink")
   }

Sources/TokamakCore/Views/Navigation/NavigationView.swift

@@ -28,6 +28,7 @@ public struct NavigationView<Content>: View where Content: View {
     self.content = content()
   }
 
+  @_spi(TokamakCore)
   public var body: Never {
     neverBody("NavigationView")
   }

Sources/TokamakCore/Views/Selectors/Picker.swift

@@ -37,6 +37,7 @@ public struct _PickerContainer<Label: View, SelectionValue: Hashable, Content: V
     self.content = content()
   }
 
+  @_spi(TokamakCore)
   public var body: Never {
     neverBody("_PickerLabel")
   }
@@ -47,6 +48,7 @@ public struct _PickerElement: View {
   public let content: AnyView
   @Environment(\.pickerStyle) public var style
 
+  @_spi(TokamakCore)
   public var body: Never {
     neverBody("_PickerElement")
   }
@@ -105,12 +107,15 @@ public extension Picker where Label == Text {
 }
 
 extension Picker: ParentView {
+  @_spi(TokamakCore)
   public var children: [AnyView] {
     (content as? GroupView)?.children ?? [AnyView(content)]
   }
 }
 
+@_spi(TokamakCore)
 extension Picker: _PickerContainerProtocol {
+  @_spi(TokamakCore)
   public var elements: [_AnyIDView] {
     (content as? ForEachProtocol)?.children
       .compactMap {

Sources/TokamakCore/Views/Selectors/Slider.swift

@@ -37,6 +37,7 @@ public struct Slider<Label, ValueLabel>: View where Label: View, ValueLabel: Vie
   let step: _SliderStep
   let onEditingChanged: (Bool) -> ()
 
+  @_spi(TokamakCore)
   public var body: Never {
     neverBody("Slider")
   }
@@ -144,6 +145,7 @@ public extension Slider {
 }
 
 extension Slider: ParentView {
+  @_spi(TokamakCore)
   public var children: [AnyView] {
     ((label as? GroupView)?.children ?? [AnyView(label)])
       + ((minValueLabel as? GroupView)?.children ?? [AnyView(minValueLabel)])

Sources/TokamakCore/Views/Selectors/Toggle.swift

@@ -48,6 +48,7 @@ public extension Toggle where Label == AnyView {
 }
 
 extension Toggle: ParentView {
+  @_spi(TokamakCore)
   public var children: [AnyView] {
     (label as? GroupView)?.children ?? [AnyView(label)]
   }

Sources/TokamakCore/Views/Spacers/Divider.swift

@@ -18,7 +18,10 @@
 /// A horizontal line for separating content.
 public struct Divider: View {
   @Environment(\.self) public var environment
+
   public init() {}
+
+  @_spi(TokamakCore)
   public var body: Never {
     neverBody("Divider")
   }

Sources/TokamakCore/Views/Spacers/Spacer.swift

@@ -29,6 +29,7 @@ public struct Spacer: View {
     self.minLength = minLength
   }
 
+  @_spi(TokamakCore)
   public var body: Never {
     neverBody("Spacer")
   }

Sources/TokamakCore/Views/Text/SecureField.swift

@@ -40,6 +40,7 @@ public struct SecureField<Label>: View where Label: View {
   let textBinding: Binding<String>
   let onCommit: () -> ()
 
+  @_spi(TokamakCore)
   public var body: Never {
     neverBody("SecureField")
   }
@@ -57,6 +58,7 @@ public extension SecureField where Label == Text {
 }
 
 extension SecureField: ParentView {
+  @_spi(TokamakCore)
   public var children: [AnyView] {
     (label as? GroupView)?.children ?? [AnyView(label)]
   }

Sources/TokamakCore/Views/Text/Text.swift

@@ -72,6 +72,7 @@ public struct Text: View {
     self.init(storage: .verbatim(String(content)))
   }
 
+  @_spi(TokamakCore)
   public var body: Never {
     neverBody("Text")
   }

Sources/TokamakCore/Views/Text/TextEditor.swift

@@ -19,6 +19,7 @@ public struct TextEditor: View {
     textBinding = text
   }
 
+  @_spi(TokamakCore)
   public var body: Never {
     neverBody("TextEditor")
   }

Sources/TokamakCore/Views/Text/TextField.swift

@@ -41,6 +41,7 @@ public struct TextField<Label>: View where Label: View {
   let onCommit: () -> ()
   @Environment(\.textFieldStyle) var style
 
+  @_spi(TokamakCore)
   public var body: Never {
     neverBody("TextField")
   }
@@ -68,6 +69,7 @@ public extension TextField where Label == Text {
 }
 
 extension TextField: ParentView {
+  @_spi(TokamakCore)
   public var children: [AnyView] {
     (label as? GroupView)?.children ?? [AnyView(label)]
   }