jyapayne/swig
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

remove final vestiges of gifplot example

Browse source 
git-svn-id: https://swig.svn.sourceforge.net/svnroot/swig/trunk@11878 626c5289-ae23-0410-ae9c-e8d60b6d4f22
This commit is contained in:
William S Fulton 2010-02-28 00:16:39 +00:00
commit 9c541c340a
7 changed files with 6 additions and 86 deletions
Download patch file Download diff file Expand all files Collapse all files

5
Doc/Devel/internals.html
View file

@ -76,9 +76,8 @@ to code).
<tr><td>Examples</td>
<td>This subdir tree contains examples of using SWIG w/ different
scripting languages, including makefiles. Typically, there are the
"simple" and "matrix" examples, w/ some languages offering additional
examples. The GIFPlot example has its own set of per-language
subdirectories. See the README more index.html file in each directory
"simple" and "class" examples, w/ some languages offering additional
examples. See the README more index.html file in each directory
for more info. [FIXME: Ref SWIG user manual.]</td>
</tr>

3
Doc/Manual/Chicken.html
View file

@ -86,8 +86,7 @@
<p>
You may want to look at any of the examples in Examples/chicken/
or Examples/GIFPlot/Chicken for the basic steps to run SWIG
CHICKEN.
directory for the basic steps to run SWIG CHICKEN.
</p>
<H3><a name="Chicken_nn3"></a>19.1.1 Running SWIG in C mode</H3>

10
Doc/Manual/Extending.html
View file

@ -3090,8 +3090,6 @@ The nickname is used in four places:
<TR><TD><B>usage</B></TD><TD><B>transform</B></TD></TR>
<TR><TD>"skip" tag</TD><TD>(none)</TD></TR>
<TR><TD>Examples/ subdir name</TD><TD>(none)</TD></TR>
<TR><TD>Examples/GIFPlot/ subdir name</TD>
<TD>capitalize (upcase first letter)</TD></TR>
<TR><TD>Examples/test-suite/ subdir name</TD><TD>(none)</TD></TR>
<!-- add more uses here (remember to adjust header) -->
</TABLE>
@ -3159,8 +3157,8 @@ skip-qux = $(skip-qux99)
<p>
Lastly, you need to modify each of <TT>check-aliveness</TT>,
<TT>check-examples</TT>, <TT>check-test-suite</TT>,
<TT>check-gifplot</TT> (all targets) and <TT>lib-languages</TT> (var).
<TT>check-examples</TT>, <TT>check-test-suite</TT>
and <TT>lib-languages</TT> (var).
Use the nickname for these, not the alias.
Note that you can do this even before you have any tests or examples
set up; the Makefile rules do some sanity checking and skip around
@ -3175,10 +3173,6 @@ and look to the existing languages for examples.
<dd> Do <TT>cp ../python/check.list .</TT> and modify to taste.
One subdir per line.
<dt> <b>Examples/GIFPlot/Qux99/check.list</b>
<dd> Do <TT>cp ../Python/check.list .</TT> and modify to taste.
One subdir per line.
<dt> <b>Lib/qux99/extra-install.list</b>
<dd> If you add your language to the top-level Makefile.in var
<TT>lib-languages</TT>, then <TT>make install</TT> will install

4
Examples/README
View file

@ -2,9 +2,7 @@ SWIG Examples
The "perl5", "python", "tcl", "guile", "java", "mzscheme", "ruby", and
"chicken" directories contain a number of simple examples that are
primarily used for testing. The "GIFPlot" directory contains a more
complicated example that illustrates some of SWIG's more advanced
capabilities.
primarily used for testing.
The file 'index.html' is the top of a hyperlinked document that
contains information about all of the examples along with various

3
Examples/guile/README
View file

@ -12,6 +12,3 @@ std_vector -- C++ STL vector<int> and vector<double>
Note that the examples in this directory build a special version of
Guile which includes the wrapped functions in the top-level module.
If you want to put the wrapped functions into an own module,
statically or dynamically linked, see the Examples/GIFPlot/Guile
directory.

6
Examples/index.html
View file

@ -46,12 +46,6 @@ language:
If your target platform is Windows, make sure you also see the <a href="../Doc/Manual/Windows.html">Windows</a> page in the main manual.
<h2>Real Life</h2>
The <a href="GIFPlot/">GIFPlot</a> directory contains examples that illustrate the use of SWIG with
a moderately complex C library for creating GIF images. Many of these
examples illustrate more advanced SWIG features.
</body>
</html>

61
Examples/s-exp/uffi.lisp
View file

@ -312,67 +312,6 @@ is no representation."
;; Test instances
#||
#+ignore
(defvar *gifplot-interface*
(run-swig (merge-pathnames "Examples/GIFPlot/Interface/gifplot.i"
*swig-source-directory*)
:directory-search-list (list (merge-pathnames "Examples/GIFPlot/Interface/" *swig-source-directory*))))
(defvar *simple-gifplot-interface*
(run-swig (merge-pathnames "Examples/GIFPlot/Include/gifplot.h"
*swig-source-directory*)
:directory-search-list (list (merge-pathnames "Examples/GIFPlot/Interface/" *swig-source-directory*))
:module "gifplot"))
(defvar *cplex-glue-directory* #p"/home/mkoeppe/cvs/cplex-glue/")
(defvar *cplex-glue-interface*
(run-swig (merge-pathnames "cplex.i" *cplex-glue-directory*)
:directory-search-list (list (merge-pathnames "Lib/guile"
*swig-source-directory*)
*cplex-glue-directory*)
:ignore-errors t))
(require 'uffi)
;;(let ((*uffi-primitive-type-alist* (cons '("Pixel" . :unsigned-int) *uffi-default-primitive-type-alist*)))
;; (eval (cons 'progn (compute-uffi-definitions *simple-gifplot-interface*))))
(with-open-file (f "/tmp/swig-uffi.lisp" :direction :output
:if-exists :supersede)
(let ((*uffi-definitions* '())
(*uffi-output* f)
(*uffi-primitive-type-alist*
(cons '("Pixel" . :unsigned-int) *uffi-default-primitive-type-alist*)))
(apply 'handle-node *simple-gifplot-interface*)))
#+cplex
(with-open-file (f "/tmp/swig-uffi.lisp" :direction :output)
(let ((*uffi-definitions* '())
(*uffi-output* f)
(*uffi-primitive-type-alist*
(cons '("Pixel" . :unsigned-int) *uffi-default-primitive-type-alist*)))
(apply 'handle-node *cplex-glue-interface*)))
(compile-file "/tmp/swig-uffi.lisp")
(uffi:load-foreign-library (merge-pathnames "Examples/GIFPlot/libgifplot.a"
*swig-source-directory*))
(load "/tmp/swig-uffi.lisp")
(load (merge-pathnames "Examples/GIFPlot/Common-Lisp/full/runme.lisp" *swig-source-directory*))
(action (namestring (merge-pathnames "Examples/GIFPlot/Common-Lisp/full/cmap"
*swig-source-directory*)))
||#
;;; Link to SWIG itself
#||