summaryrefslogtreecommitdiff
path: root/highway/Main.hs
diff options
context:
space:
mode:
authorHannes Schulze <haschu0103@outlook.de>2024-08-06 12:57:56 +0200
committerHannes Schulze <haschu0103@outlook.de>2024-08-06 12:57:56 +0200
commitca6106f931c5e6982e24639495dd9feb69c37453 (patch)
tree530231bd80b73d5ac6ac69629a8dd243a81c7ee9 /highway/Main.hs
parent476ab3f025160b14bb2cd69969bda61b555f1a44 (diff)
allocate arguments on the haskell heap
Diffstat (limited to 'highway/Main.hs')
-rw-r--r--highway/Main.hs4
1 files changed, 2 insertions, 2 deletions
diff --git a/highway/Main.hs b/highway/Main.hs
index 617a0ee..4c169e4 100644
--- a/highway/Main.hs
+++ b/highway/Main.hs
@@ -12,8 +12,8 @@ import qualified Data.Map as M
geometry :: WLOutput.Geometry
geometry = WLOutput.Geometry { WLOutput.x = 0
, WLOutput.y = 0
- , WLOutput.physicalWidth = 5120
- , WLOutput.physicalHeight = 2880
+ , WLOutput.physicalWidth = 623
+ , WLOutput.physicalHeight = 583
, WLOutput.subpixel = WLOutput.SubpixelNone
, WLOutput.make = "Apple"
, WLOutput.model = "Studio Display"