added checks and texts for mixing gtk1 and gtk2

git-svn-id: trunk@4216 -

.gitattributes

@@ -849,6 +849,7 @@ packager/ufrmaddcomponent.lrs svneol=native#text/pascal
 packager/ufrmaddcomponent.pas svneol=native#text/pascal
 tools/apiwizz/apiwizard.pp svneol=native#text/pascal
 tools/apiwizz/apiwizz.pp svneol=native#text/pascal
+tools/check_ide_libs.sh -text svneol=native#application/x-sh
 tools/install/create_fpc_deb.sh -text svneol=native#application/x-sh
 tools/install/create_fpc_export_tgz.sh -text svneol=native#application/x-sh
 tools/install/create_fpc_rpm.sh -text svneol=native#application/x-sh

components/gtk/gtkglarea/README

@@ -0,0 +1,21 @@
+Package GtkOpenGL
+
+Contains the lcl component TGTKGLAreaControl, which wraps the gtkglarea, a
+gtk widget for opengl. This component works only with the gtk interface.
+
+There is an example in examples/gtkglarea/.
+
+
+WARNING:
+Make sure your program links to libgtkgl, not to libgtkgl-2.0. Linking to
+libgtkgl-2.0 will result in mixing gtk1 and gtk2 in your program/IDE, which
+will result in al kinds of strange errors, including freezing your
+windowmanager.
+You can find out, what libs were linked to your program with the ldd program:
+
+[]$ ldd yourprogram
+
+
+ToDo:
+Add an example using the package.
+

components/gtk/gtkglarea/gtkopengl.lpk

@@ -3,7 +3,8 @@
   <Package>
     <Name Value="GTKOpenGL"/>
     <Author Value="Mattias Gaertner, Satan"/>
-    <Description Value="OpenGL for LCL - components: TGtkGlAreaControl"/>
+    <Description Value="OpenGL for LCL - components: TGtkGlAreaControl
+Please make sure that you link to the right libgtkgl. If you accidently link to libgtkgl-2.0 then you will mix gtk1 and gtk2 libraries, which will result in strange errors, up to freezing your windowmanager."/>
     <License Value="LGPL-2"/>
     <Version Major="1"/>
     <Files Count="5">

ide/lazarus.pp

@@ -76,7 +76,11 @@ begin
   {$ENDIF}
 
   SplashForm.StartTimer;
-  Application.Run;
+  try
+    Application.Run;
+  except
+    writeln('lazarus.pp - unhandled exception');
+  end;
   SplashForm.Free;
   SplashForm:=nil;
 
@@ -90,6 +94,9 @@ end.
 
 {
   $Log$
+  Revision 1.45  2003/05/30 12:41:46  mattias
+  added checks and texts for mixing gtk1 and gtk2
+
   Revision 1.44  2003/05/30 08:10:51  mattias
   added try except to Application.Run, message on changing debugger items during compile
 

tools/check_ide_libs.sh

@@ -0,0 +1,12 @@
+#!/bin/bash
+
+set -e
+set -x
+
+GlibCount=`ldd lazarus | grep '\blibglib-[12]' | wc -l | sed 's/ //g'`
+if [ "x$GlibCount" = "x2" ]; then
+  echo "lazarus.pp(1) fatal: lib glib is used twice"
+  exit -1
+fi
+
+# end.