d66f561cfc
git-svn-id: https://swig.svn.sourceforge.net/svnroot/swig/trunk/SWIG@961 626c5289-ae23-0410-ae9c-e8d60b6d4f22
55 lines
1.3 KiB
C
55 lines
1.3 KiB
C
/* -----------------------------------------------------------------------------
|
|
* cparsemodule.c
|
|
*
|
|
* This module is responsible for running the SWIG C Parsing module.
|
|
*
|
|
* Author(s) : David Beazley (beazley@cs.uchicago.edu)
|
|
*
|
|
* Copyright (C) 1999-2000. The University of Chicago
|
|
* See the file LICENSE for information on usage and redistribution.
|
|
* ----------------------------------------------------------------------------- */
|
|
|
|
#include "swig.h"
|
|
#include "swigconfig.h"
|
|
#include "lparse.h"
|
|
|
|
static const char *usage = "C Parsing options:\n\
|
|
";
|
|
|
|
static
|
|
int cparse_init(int argc, char **argv) {
|
|
int i;
|
|
/* Look for command line options */
|
|
for (i = 1; i < argc; i++) {
|
|
if (argv[i]) {
|
|
if (strcmp(argv[i],"-c++") == 0) {
|
|
LParse_cplusplus(1);
|
|
Swig_mark_arg(i);
|
|
} else if (strcmp(argv[i],"-help") == 0) {
|
|
Printf(stderr,"%s",usage);
|
|
Swig_mark_arg(i);
|
|
}
|
|
}
|
|
}
|
|
return 0;
|
|
}
|
|
|
|
static
|
|
DOH *cparse_run(DOH *node) {
|
|
String *data;
|
|
DOH *result;
|
|
|
|
data = Getattr(node,"data");
|
|
if (!data) {
|
|
Printf(stderr,"SWIG: cparse error. no data.\n");
|
|
Swig_exit(1);
|
|
}
|
|
Seek(data,0, SEEK_SET);
|
|
result = LParse_parse(data);
|
|
Setattr(result,"last",node);
|
|
return result;
|
|
}
|
|
|
|
void cparsemodule() {
|
|
Swig_register_module("cparse","swig:preprocess", cparse_init, cparse_run);
|
|
}
|