[gtkada] Error Handling

[Robert Love]

In a section of File_Chooser code I try to do this.  I always get a null returned if the input is good or bad.


 Error_Code : Glib.Error.GError := null;


 Error_Code := Gtk.File_Chooser.Add_Shortcut_Folder
   (Chooser    => +My_Dialog,
    Folder     => "/home/u102k/bin");

 if Error_Code = null  then
    Text_IO.Put_Line ("Error: Null");
 else
    Text_IO.Put_Line ("Error: NOT Null");
    Glib.Error.Error_Free (Error_Code);
 end if;

If I change the string to a non-existant directory name, the chooser doesn't display it but I get the same error code returned regardless if the string value is a valid directory or not.