humza/sml-projects
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

hardcode more pleasant (in my opinion) colour scheme for the moment

Browse Source
This commit is contained in:
Humza Shahid
2024-10-09 01:23:26 +01:00
parent 1ae15e5585
commit bfc5a3914c
3 changed files with 2 additions and 2 deletions
Download Patch File Download Diff File Expand all files Collapse all files

2
fcore/text-builder.sml
View File

@@ -178,7 +178,7 @@ struct
, 5, 5, 5 , 5, 5, 5
, windowWidth, windowHeight , windowWidth, windowHeight
, Real32.fromInt windowWidth, Real32.fromInt windowHeight , Real32.fromInt windowWidth, Real32.fromInt windowHeight
, 0.0, 0.0, 0.0 , 0.67, 0.51, 0.83
, rStrTl , rStrTl
) )
end end

2
shell/gl-draw.sml
View File

@@ -125,7 +125,7 @@ struct
let let
val shellState = consumeDrawEvents shellState val shellState = consumeDrawEvents shellState
val _ = Gles3.clearColor (1.0, 1.0, 1.0, 1.0) val _ = Gles3.clearColor (0.087, 0.095, 0.13, 1.0)
val _ = Gles3.clear () val _ = Gles3.clear ()
val _ = draw shellState val _ = draw shellState

BIN
shf
View File

Binary file not shown.