krzosa/corelang
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

Raymarcher mostly working, need to fix specular still

Browse Source
This commit is contained in:
Krzosa Karol
2022-09-28 13:10:26 +02:00
parent 0050abe190
commit 4510f39397
5 changed files with 59 additions and 22 deletions
Download Patch File Download Diff File Expand all files Collapse all files

7
modules/os_windows.kl
View File

@@ -51,12 +51,13 @@ WriteConsole :: (string: String16)
WriteConsoleW(handle, string.str->*void, string.len->DWORD, 0, 0)
PerformanceFrequency: F64
PerformanceFrequency_S64: S64
Time :: (): F64
query: LARGE_INTEGER
if !PerformanceFrequency
err := QueryPerformanceFrequency(&query)
if PerformanceFrequency_S64 == 0
err := QueryPerformanceFrequency(&PerformanceFrequency_S64)
Assert(err != 0)
PerformanceFrequency = query->F64
PerformanceFrequency = PerformanceFrequency_S64->F64
err := QueryPerformanceCounter(&query)
Assert(err != 0)