From 7cee16c01ec767fcb131e71aa30fe6d5e743b009 Mon Sep 17 00:00:00 2001
From: =?UTF-8?q?Matthias=20K=C3=B6ppe?= <mkoeppe@mail.math.uni-magdeburg.de>
Date: Wed, 13 Jul 2005 11:35:55 +0000
Subject: [PATCH] Make several helper functions "static".

git-svn-id: https://swig.svn.sourceforge.net/svnroot/swig/trunk/SWIG@7328 626c5289-ae23-0410-ae9c-e8d60b6d4f22
---
 Source/Modules/allegrocl.cxx | 14 +++++++-------
 1 file changed, 7 insertions(+), 7 deletions(-)

diff --git a/Source/Modules/allegrocl.cxx b/Source/Modules/allegrocl.cxx
index c1ffdee65..b311fc909 100644
--- a/Source/Modules/allegrocl.cxx
+++ b/Source/Modules/allegrocl.cxx
@@ -21,9 +21,9 @@ static struct {
   String **entries;
 } defined_foreign_types;
 
-const char *identifier_converter="identifier-convert-null";
+static const char *identifier_converter="identifier-convert-null";
 
-int any_varargs(ParmList *pl) {
+static int any_varargs(ParmList *pl) {
   Parm *p;
   
   for(p=pl; p; p=nextSibling(p)) {
@@ -37,7 +37,7 @@ int any_varargs(ParmList *pl) {
   
 /* utilities */
 /* returns new string w/ parens stripped */
-String *strip_parens(String *string) {
+static String *strip_parens(String *string) {
 	char *s=Char(string), *p;
 	int len=Len(string);
 	String *res;
@@ -62,7 +62,7 @@ String *strip_parens(String *string) {
 }
 
 
-String *convert_literal(String *num_param, String *type) {
+static String *convert_literal(String *num_param, String *type) {
 	String *num=strip_parens(num_param), *res;
 	char *s=Char(num);
 	
@@ -100,7 +100,7 @@ String *convert_literal(String *num_param, String *type) {
 	return res;
 }
 
-void add_defined_foreign_type(String *type) {
+static void add_defined_foreign_type(String *type) {
   if (!defined_foreign_types.count) {
     /* Make fresh */
     defined_foreign_types.count=1;
@@ -125,7 +125,7 @@ void add_defined_foreign_type(String *type) {
 }
 
 
-String *get_ffi_type(SwigType *ty, const String_or_char *name) {
+static String *get_ffi_type(SwigType *ty, const String_or_char *name) {
   Hash *typemap = Swig_typemap_search("ffitype", ty, name, 0);
   if (typemap) {
 	  String *typespec = Getattr(typemap, "code");
@@ -169,7 +169,7 @@ String *get_ffi_type(SwigType *ty, const String_or_char *name) {
   return 0;
 }
 
-String *get_lisp_type(SwigType *ty, const String_or_char *name)
+static String *get_lisp_type(SwigType *ty, const String_or_char *name)
 {
   Hash *typemap = Swig_typemap_search("lisptype", ty, name, 0);
   if (typemap) {