steve
/
factor
1
0
Fork 0
Code Issues Pull Requests Releases Wiki Activity

ui.backend.cocoa.views: prepareOpenGL can use ?-> syntax.

paths
John Benediktsson 2018-03-13 11:09:55 -07:00
parent a4f6d43645
commit ade70ab813
1 changed files with 2 additions and 4 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

6
basis/ui/backend/cocoa/views/views.factor
View File

@ -189,11 +189,9 @@ M: send-touchbar-command send-queued-gesture
self SEL: setWantsBestResolutionOpenGLSurface: self SEL: setWantsBestResolutionOpenGLSurface:
-> respondsToSelector: c-bool> [ -> respondsToSelector: c-bool> [
self SEL: setWantsBestResolutionOpenGLSurface: 1 self 1 { void { id SEL char } } ?-> setWantsBestResolutionOpenGLSurface:
void f "objc_msgSend" { id SEL char } f alien-invoke
self SEL: backingScaleFactor self { double { id SEL } } ?-> backingScaleFactor
double f "objc_msgSend" { id SEL } f alien-invoke
dup 1.0 > [ dup 1.0 > [
gl-scale-factor set-global t retina? set-global gl-scale-factor set-global t retina? set-global