Tcl patches. Use [info sharedlibextension] to get file extension rather than hard-coding it]

git-svn-id: https://swig.svn.sourceforge.net/svnroot/swig/trunk@5301 626c5289-ae23-0410-ae9c-e8d60b6d4f22

SWIG/Examples/GIFPlot/Tcl/full/runme.tcl

@@ -1,7 +1,6 @@
 # Plot a 3D function
 
-catch { load ./gifplot.so gifplot}
-catch { load ./gifplot.dll gifplot}  ;# Windows
+catch { load ./gifplot[info sharedlibextension] gifplot}
 
 # Here is the function to plot
 proc func { x y } {

SWIG/Examples/GIFPlot/Tcl/mandel/mandel.tcl

@@ -1,5 +1,4 @@
-catch { load ./gifplot.so }
-catch { load ./gifplot.dll }   ; # Windows
+catch { load ./gifplot[info sharedlibextension] }
 source display.tcl
 set tcl_precision 17
 set f [FrameBuffer -args 400 400]

SWIG/Examples/GIFPlot/Tcl/simple/runme.tcl

@@ -1,8 +1,7 @@
 # Draw some simple shapes
 puts "Drawing some basic shapes"
 
-catch { load ./simple.so simple}
-catch { load ./simple.dll simple}  ;# Windows
+catch { load ./simple[info sharedlibextension] simple}
 
 set cmap [new_ColorMap]
 set f    [new_FrameBuffer 400 400]