diff options
Diffstat (limited to 'Objects')
| -rw-r--r-- | Objects/moduleobject.c | 11 |
1 files changed, 11 insertions, 0 deletions
diff --git a/Objects/moduleobject.c b/Objects/moduleobject.c index 09bbae9..22a793f 100644 --- a/Objects/moduleobject.c +++ b/Objects/moduleobject.c @@ -62,6 +62,17 @@ setmoduledict(m, v) return 0; } +char * +getmodulename(m) + object *m; +{ + if (!is_moduleobject(m)) { + err_badarg(); + return NULL; + } + return getstringvalue(((moduleobject *)m) -> md_name); +} + /* Methods */ static void |