소스 검색

* previous ugly workaround removed (baseunix replaced with ctypes)

Tomas Hajny 21 년 전
부모
커밋
1a27b6bf90
1개의 변경된 파일1개의 추가작업 그리고 9개의 파일을 삭제
  1. 1 9
      packages/extra/x11/xinerama.pp

+ 1 - 9
packages/extra/x11/xinerama.pp

@@ -1,21 +1,13 @@
 unit xinerama;
 interface
 uses
-{$IFDEF UNIX}
- baseunix,
-{$ENDIF UNIX}
- xlib;
+ ctypes, xlib;
 { Converted from X11/Xinerama.h }
 
 {$PACKRECORDS C}
 
 
 type
-{$IFNDEF UNIX}
-   cint = longint;
-   pcint = plongint;
-   cshort = smallint;
-{$ENDIF UNIX}
 
    PXineramaScreenInfo = ^TXineramaScreenInfo;
    TXineramaScreenInfo = record