| 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 |
* Revision 1.3 2003/03/05 23:16:46 joko |
| 23 |
* updated docu - phpDocumentor is very strict about its 'blocks'... |
* updated docu - phpDocumentor is very strict about its 'blocks'... |
| 24 |
* |
* |
| 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. |
| 47 |
* |
* |
| 48 |
|
* <pre> |
| 49 |
* x export_symbol |
* 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' ); |
| 83 |
* |
* |
| 84 |
* @link http://search.cpan.org/author/JHI/perl-5.8.0/lib/Exporter.pm |
* @link http://search.cpan.org/author/JHI/perl-5.8.0/lib/Exporter.pm |
| 85 |
* |
* |
| 86 |
* @todo |
* @todo (x) look at http://www.php.net/manual/en/function.method-exists.php |
| 87 |
* <pre> |
* @todo (x) $bool_exists = (in_array(strtolower($methodName), get_class_methods($className))); |
| 88 |
* x look at http://www.php.net/manual/en/function.method-exists.php |
* @todo (x) -> implemented in php::class_has_method |
|
* x $bool_exists = (in_array(strtolower($methodName), get_class_methods($className))); |
|
|
* 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]++; |