Browse Source

+ added link test for the xext unit

git-svn-id: trunk@49597 -
nickysn 4 năm trước cách đây
mục cha
commit
f0a78f48f3

+ 1 - 0
.gitattributes

@@ -10179,6 +10179,7 @@ packages/x11/src/xutil.pp svneol=native#text/plain
 packages/x11/src/xv.pp svneol=native#text/plain
 packages/x11/src/xv.pp svneol=native#text/plain
 packages/x11/src/xvlib.pp svneol=native#text/plain
 packages/x11/src/xvlib.pp svneol=native#text/plain
 packages/x11/tests/mitmisc_linktest.pp svneol=native#text/plain
 packages/x11/tests/mitmisc_linktest.pp svneol=native#text/plain
+packages/x11/tests/xext_linktest.pp svneol=native#text/plain
 packages/x11/tests/xfixes_linktest.pp svneol=native#text/plain
 packages/x11/tests/xfixes_linktest.pp svneol=native#text/plain
 packages/x11/tests/xge_linktest.pp svneol=native#text/plain
 packages/x11/tests/xge_linktest.pp svneol=native#text/plain
 packages/x11/tests/xinput2_linktest.pp svneol=native#text/plain
 packages/x11/tests/xinput2_linktest.pp svneol=native#text/plain

+ 9 - 0
packages/x11/tests/xext_linktest.pp

@@ -0,0 +1,9 @@
+{ this program just links all externals, declared in the xext unit }
+program xext_linktest;
+uses
+  xext;
+begin
+  halt(0);
+  XSetExtensionErrorHandler(nil);
+  XMissingExtension(nil,nil);
+end.