Commit 9d911014 authored by johnvg@science.ru.nl's avatar johnvg@science.ru.nl
Browse files

change type of field dm_name

parent 7e2e225a
......@@ -462,7 +462,7 @@ BEDeclareDclModule (int moduleIndex, CleanString name, CleanString modificationT
DeclareModule (moduleIndex, cName, isSystemModule, nFunctions, nTypes, nConstructors, nFields);
dclModule = ConvertAllocType (DefRepr);
dclModule->dm_name = moduleNameSymbol;
dclModule->dm_name = cName;
dclModule->dm_modification_time = ConvertCleanString (modificationTime);
dclModule->dm_system_module = isSystemModule;
dclModule->dm_symbols = gBEState.be_allSymbols; /* ??? too many symbols? */
......
......@@ -62,7 +62,7 @@ void GenDependencyList (void)
DefModList def_mod;
for_l (def_mod,OpenDefinitionModules,mod_next)
GenDepend (def_mod->mod_body->dm_name->symb_ident->ident_name
GenDepend (def_mod->mod_body->dm_name
#if WRITE_DCL_MODIFICATION_TIME
,def_mod->mod_body->dm_modification_time
#endif
......
......@@ -686,7 +686,7 @@ typedef struct {
} *ImpMod, ImpRepr;
struct def_repr {
Symbol dm_name;
char * dm_name;
Symbol dm_symbols;
TableKind dm_system_module_table_kind;
Bool dm_system_module;
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment