diff options
| author | David Robillard <d@drobilla.net> | 2015-11-06 23:04:22 -0500 |
|---|---|---|
| committer | David Robillard <d@drobilla.net> | 2015-11-06 23:04:22 -0500 |
| commit | f4bccc3d667726fb2c9e70f55a0e83bd8fb65e70 (patch) | |
| tree | 5a51e4f340a3121772c1b5bdcae99d6d4655df63 /src | |
| parent | da4c2dc337252d21d1ceea3f32c61620a5b6e4f4 (diff) | |
| download | resp-f4bccc3d667726fb2c9e70f55a0e83bd8fb65e70.tar.gz resp-f4bccc3d667726fb2c9e70f55a0e83bd8fb65e70.tar.bz2 resp-f4bccc3d667726fb2c9e70f55a0e83bd8fb65e70.zip | |
Fix undeclared function warnings
Diffstat (limited to 'src')
| -rw-r--r-- | src/pprint.cpp | 6 | ||||
| -rw-r--r-- | src/repl.cpp | 2 | ||||
| -rw-r--r-- | src/resp.cpp | 2 | ||||
| -rw-r--r-- | src/resp.hpp | 2 |
4 files changed, 7 insertions, 5 deletions
diff --git a/src/pprint.cpp b/src/pprint.cpp index cc6d316..56ce0e3 100644 --- a/src/pprint.cpp +++ b/src/pprint.cpp @@ -49,9 +49,9 @@ print_annotation(ostream& out, const AST* ast, unsigned indent, CEnv* cenv, bool } } -ostream& +static ostream& print_list_one_line(ostream& out, const ATuple* tup, ATuple::const_iterator i, - unsigned indent, CEnv* cenv, bool types, const ATuple* elemsT) + unsigned indent, CEnv* cenv, bool types, const ATuple* elemsT) { ATuple::const_iterator ti = elemsT ? elemsT->begin() : tup->end(); for (; i != tup->end(); ) { @@ -86,7 +86,7 @@ print_list_one_line(ostream& out, const ATuple* tup, ATuple::const_iterator i, * (elem three) * (elem four) */ -ostream& +static ostream& print_list(ostream& out, const ATuple* tup, ATuple::const_iterator i, unsigned indent, CEnv* cenv, bool types, bool split_pairs) { diff --git a/src/repl.cpp b/src/repl.cpp index e808dd8..d3ad22e 100644 --- a/src/repl.cpp +++ b/src/repl.cpp @@ -85,7 +85,7 @@ callPrintCollect(CEnv& cenv, CFunc f, const AST* result, const AST* resultT, boo Object::pool.collect(Object::pool.roots()); } -const AST* +static const AST* compile(CEnv& cenv, const Code& parsed, Code& defs, bool& hasMain, const char* mainName) { // Convert to CPS (currently not used in the compilation process) diff --git a/src/resp.cpp b/src/resp.cpp index 704c864..7167227 100644 --- a/src/resp.cpp +++ b/src/resp.cpp @@ -61,7 +61,7 @@ is_primitive(const PEnv& penv, const AST* ast) return penv.primitives.find(sym->sym()) != penv.primitives.end(); } -int +static int print_usage(char* name, bool error) { ostream& os = error ? cerr : cout; diff --git a/src/resp.hpp b/src/resp.hpp index 90a0efa..9179b16 100644 --- a/src/resp.hpp +++ b/src/resp.hpp @@ -79,6 +79,8 @@ typedef void* CFunc; ///< Compiled function (opaque) * Garbage Collection * ***************************************************************************/ +extern "C" { void* __resp_alloc(unsigned size); } + struct Object; /// Type tag for an AST node (must be even and > 1 since LSb is used as mark) |