Skip to content
Draft
Changes from all commits
Commits
File filter

Filter by extension

Filter by extension

Conversations
Failed to load comments.
Loading
Jump to
Jump to file
Failed to load files.
Loading
Diff view
Diff view
4 changes: 3 additions & 1 deletion examples/sdl-triangle/Main.hs
Original file line number Diff line number Diff line change
Expand Up @@ -37,6 +37,7 @@ import Vulkan.Core10
import qualified Vulkan.Core10.DeviceInitialization as DI
import Vulkan.Extensions.VK_EXT_debug_utils
import Vulkan.Extensions.VK_EXT_validation_features
import Vulkan.Extensions.VK_KHR_portability_enumeration
import Vulkan.Extensions.VK_KHR_surface
import qualified Vulkan.Extensions.VK_KHR_surface as SF
import Vulkan.Extensions.VK_KHR_swapchain
Expand Down Expand Up @@ -437,7 +438,7 @@ windowInstanceCreateInfo window = do
let requiredLayers = []
optionalLayers = ["VK_LAYER_KHRONOS_validation"]
requiredExtensions = [EXT_DEBUG_UTILS_EXTENSION_NAME] <> windowExtensions
optionalExtensions = [EXT_VALIDATION_FEATURES_EXTENSION_NAME]
optionalExtensions = [EXT_VALIDATION_FEATURES_EXTENSION_NAME, KHR_PORTABILITY_ENUMERATION_EXTENSION_NAME]
extensions <- partitionOptReq "extension"
availableExtensionNames
optionalExtensions
Expand All @@ -453,6 +454,7 @@ windowInstanceCreateInfo window = do
}
, enabledLayerNames = V.fromList layers
, enabledExtensionNames = V.fromList extensions
, flags = INSTANCE_CREATE_ENUMERATE_PORTABILITY_BIT_KHR
}
::& debugUtilsMessengerCreateInfo
:& ValidationFeaturesEXT [VALIDATION_FEATURE_ENABLE_BEST_PRACTICES_EXT] []
Expand Down