added basic Modula-3 support

git-svn-id: https://swig.svn.sourceforge.net/svnroot/swig/trunk/SWIG@5776 626c5289-ae23-0410-ae9c-e8d60b6d4f22
This commit is contained in:
Henning Thielemann 2004-03-19 11:45:29 +00:00
commit 39d92e49b2
57 changed files with 6645 additions and 380 deletions

View file

@ -39,9 +39,7 @@ Mapping Operations (for hash table behavior)
Getattr(hash,key) Get an attribute
Setattr(hash,key,value) Set an attribute
Delattr(hash,key) Delete an attribute
Firstkey(hash) Get first key
Nextkey(hash) Get next key
First(hash) Get first object
First(hash) Get first object (iterator)
Next(hash) Get next object
GetInt(hash,key) Get attribute as an 'int'
SetInt(hash,key,ivalue) Set attribute as an 'int'

View file

@ -203,6 +203,20 @@
/* please leave 830-849 free for C# */
#define WARN_MODULA3_TYPEMAP_TYPE_UNDEF 850
#define WARN_MODULA3_TYPEMAP_GETCPTR_UNDEF 851
#define WARN_MODULA3_TYPEMAP_CLASSMOD_UNDEF 852
#define WARN_MODULA3_TYPEMAP_PTRCONSTMOD_UNDEF 853
#define WARN_MODULA3_TYPEMAP_MULTIPLE_RETURN 854
#define WARN_MODULA3_MULTIPLE_INHERITANCE 855
#define WARN_MODULA3_TYPECONSTRUCTOR_UNKNOWN 856
#define WARN_MODULA3_UNKNOWN_PRAGMA 857
#define WARN_MODULA3_BAD_ENUMERATION 858
#define WARN_MODULA3_DOUBLE_ID 859
#define WARN_MODULA3_BAD_IMPORT 860
/* please leave 850-869 free for Modula 3 */
/* Feel free to claim any number in this space that's not currently being used. Just make sure you

View file

@ -46,6 +46,7 @@ eswig_SOURCES = CParse/cscanner.c \
Modules/java.cxx \
Modules/lang.cxx \
Modules/main.cxx \
Modules/modula3.cxx \
Modules/module.cxx \
Modules/mzscheme.cxx \
Modules/ocaml.cxx \

4184
Source/Modules/modula3.cxx Normal file

File diff suppressed because it is too large Load diff

View file

@ -36,6 +36,7 @@ extern "C" {
Language *swig_perl5(void);
Language *swig_ruby(void);
Language *swig_guile(void);
Language *swig_modula3(void);
Language *swig_mzscheme(void);
Language *swig_java(void);
Language *swig_php(void);
@ -62,6 +63,7 @@ swig_module modules[] = {
{"-csharp", swig_csharp, "C#"},
{"-guile", swig_guile, "Guile"},
{"-java", swig_java, "Java"},
{"-modula3", swig_modula3, "Modula 3"},
{"-mzscheme", swig_mzscheme, "Mzscheme"},
{"-ocaml", swig_ocaml, "Ocaml"},
{"-perl", swig_perl5, "Perl"},