13 |
* $Id$ |
* $Id$ |
14 |
* |
* |
15 |
* $Log$ |
* $Log$ |
16 |
|
* Revision 1.5 2003/03/28 03:05:20 joko |
17 |
|
* minor update: fixed labels, modified debugging level |
18 |
|
* |
19 |
|
* Revision 1.4 2003/03/10 22:58:45 joko |
20 |
|
* + fixed metadata for phpDocumentor |
21 |
|
* |
22 |
|
* Revision 1.3 2003/03/05 23:16:46 joko |
23 |
|
* updated docu - phpDocumentor is very strict about its 'blocks'... |
24 |
|
* |
25 |
* Revision 1.2 2003/03/05 18:54:41 joko |
* Revision 1.2 2003/03/05 18:54:41 joko |
26 |
* updated docu - phpDocumentor is very strict about its 'blocks'... |
* updated docu - phpDocumentor is very strict about its 'blocks'... |
27 |
* |
* |
44 |
* |
* |
45 |
* This tries to mimic a very small subset of the |
* This tries to mimic a very small subset of the |
46 |
* functionality of CPAN's Exporter. |
* functionality of CPAN's Exporter. |
|
* @link http://search.cpan.org/author/JHI/perl-5.8.0/lib/Exporter.pm |
|
47 |
* |
* |
48 |
* x export_symbol <br> |
* <pre> |
49 |
|
* x export_symbol |
50 |
* x export_symbols |
* x export_symbols |
51 |
* |
* |
|
* <pre> |
|
52 |
* Synopsis: |
* Synopsis: |
53 |
* <code> |
* <code> |
54 |
* define('EXPORT_OK', 'loadModule mkInstance' ); |
* define('EXPORT_OK', 'loadModule mkInstance' ); |
81 |
* @package org.netfrag.glib |
* @package org.netfrag.glib |
82 |
* @name Exporter |
* @name Exporter |
83 |
* |
* |
84 |
* @todo |
* @link http://search.cpan.org/author/JHI/perl-5.8.0/lib/Exporter.pm |
85 |
* <pre> |
* |
86 |
* x look at http://www.php.net/manual/en/function.method-exists.php |
* @todo (x) look at http://www.php.net/manual/en/function.method-exists.php |
87 |
* x $bool_exists = (in_array(strtolower($methodName), get_class_methods($className))); |
* @todo (x) $bool_exists = (in_array(strtolower($methodName), get_class_methods($className))); |
88 |
* x -> implemented in php::class_has_method |
* @todo (x) -> implemented in php::class_has_method |
|
* </pre> |
|
89 |
* |
* |
90 |
*/ |
*/ |
91 |
class Exporter { |
class Exporter { |
203 |
static $target_cache; |
static $target_cache; |
204 |
|
|
205 |
if (!php::class_has_method($source_class, $source_name)) { |
if (!php::class_has_method($source_class, $source_name)) { |
206 |
user_error("Exporter error: class '$source_class' does not implement method '$source_name', will skip exporting this symbol."); |
user_error("Exporter::create_stub_function - Error: class '$source_class' does not implement method '$source_name', will skip exporting this symbol."); |
207 |
return; |
return; |
208 |
} |
} |
209 |
|
|
210 |
// prevent redeclarations |
// prevent redeclarations |
211 |
if ($target_cache[$target_name]) { |
if ($target_cache[$target_name]) { |
212 |
$msg = "php::create_stub_function: already declared: $target_name"; |
$msg = "Exporter::create_stub_function - Warning: already declared: $target_name"; |
213 |
php::append_log($msg, PEAR_LOG_ERR); |
php::append_log($msg, PEAR_LOG_DEBUG); |
214 |
return 1; |
return 1; |
215 |
} else { |
} else { |
216 |
$target_cache[$target_name]++; |
$target_cache[$target_name]++; |