Ejemplo n.º 1
0
void PropertiesDock::currentItemChanged(QtBrowserItem *item)
{
    bool isCustomProperty = mPropertyBrowser->isCustomPropertyItem(item);
    bool external = isExternal(mPropertyBrowser->object());
    mActionRemoveProperty->setEnabled(isCustomProperty && !external);
    mActionRenameProperty->setEnabled(isCustomProperty && !external);
}
Ejemplo n.º 2
0
void UmlActivityPartition::write(FileOut & out) {
  const char * p = (parent()->kind() == aPartition)
    ? "subpartition" : "group";
  
  out.indent();
  out << "<" << p << " xmi:type=\"uml:ActivityPartition\" name=\"";
  out.quote((const char*)name());//[jasa] ambiguous call
  out << '"';
  out.id(this);
  if (isDimension())
    out << " isDimension=\"true\"";
  if (isExternal())
    out << " isExternal=\"true\"";
  if (represents() != 0)
    out.ref(represents(), "represents");
  out << ">\n";
  out.indent(+1);
  
  write_description_properties(out); 
  
  const Q3PtrVector<UmlItem> ch = children();
  unsigned n = ch.size();
  
  for (unsigned i = 0; i != n; i += 1)
    ch[i]->write(out);
  
  out.indent(-1);
  out.indent();
  out << "</" << p << ">\n";

  unload();
}
/*
 * Generate a class reference, including its owning module if necessary and
 * handling forward references if necessary.
 */
static void prClassRef(classDef *cd, moduleDef *mod, ifaceFileList *defined,
        int pep484, FILE *fp)
{
    if (pep484)
    {
        /*
         * We assume that an external class will be handled properly by some
         * handwritten type hint code.
         */
        int is_defined = (isExternal(cd) || isDefined(cd->iff, cd->ecd, mod, defined));

        if (!is_defined)
            fprintf(fp, "'");

        if (cd->iff->module != mod)
            fprintf(fp, "%s.", cd->iff->module->name);

        prScopedPythonName(fp, cd->ecd, cd->pyname->text);

        if (!is_defined)
            fprintf(fp, "'");
    }
    else
    {
        prScopedPythonName(fp, cd->ecd, cd->pyname->text);
    }
}
Ejemplo n.º 4
0
/*
 * Generate the API file.
 */
void generateAPI(sipSpec *pt, moduleDef *mod, const char *apiFile)
{
    overDef *od;
    classDef *cd;
    FILE *fp;

    /* Generate the file. */
    if ((fp = fopen(apiFile, "w")) == NULL)
        fatal("Unable to create file \"%s\"\n", apiFile);

    apiEnums(pt, mod, NULL, fp);
    apiVars(pt, mod, NULL, fp);

    for (od = mod->overs; od != NULL; od = od->next)
    {
        if (od->common->module != mod)
            continue;

        if (od->common->slot != no_slot)
            continue;

        apiOverload(pt, mod, NULL, od, fp);
    }

    for (cd = pt->classes; cd != NULL; cd = cd->next)
    {
        ctorDef *ct;

        if (cd->iff->module != mod)
            continue;

        if (isExternal(cd))
            continue;

        apiEnums(pt, mod, cd, fp);
        apiVars(pt, mod, cd, fp);

        for (ct = cd->ctors; ct != NULL; ct = ct->next)
        {
            if (isPrivateCtor(ct))
                continue;

            apiCtor(pt, mod, cd, ct, fp);
        }

        for (od = cd->overs; od != NULL; od = od->next)
        {
            if (isPrivate(od))
                continue;

            if (od->common->slot != no_slot)
                continue;

            apiOverload(pt, mod, cd, od, fp);
        }
    }

    fclose(fp);
}
Ejemplo n.º 5
0
		font_t* Font::getExternal(RPG2kString::const_iterator& it)
		{
			if( isExternal(it++) ) {
				     if( std::islower(*it) ) return EXTERNAL_LW[*(it++) - 'a'];
				else if( std::isupper(*it) ) return EXTERNAL_UP[*(it++) - 'A'];
			}
			throw std::runtime_error("unknown char");
		}
Ejemplo n.º 6
0
strvec MtxLP::getExternals()const{
    strvec rv;
    strvec rows = getRowNames();
    for (strvec::iterator it = rows.begin(); it != rows.end(); ++it)
        if (isExternal(*it))
            rv.push_back(*it);
    return rv;
}
Ejemplo n.º 7
0
void PropertiesDock::currentObjectChanged(Object *object)
{
    mPropertyBrowser->setObject(object);

    const bool enabled = object != 0 && !isExternal(object);
    mPropertyBrowser->setEnabled(enabled);
    mActionAddProperty->setEnabled(enabled);
}
Ejemplo n.º 8
0
	void Link::ExecutePageLink ()
	{
		auto link = std::dynamic_pointer_cast<Poppler::LinkGoto> (Link_);
		const QString& filename = link->isExternal () ?
				link->fileName () :
				QString ();
		const auto& dest = link->destination ();
		Doc_->RequestNavigation (filename, dest.pageNumber () - 1, dest.left (), dest.top ());
	}
Ejemplo n.º 9
0
void UmlActivityPartition::html(Q3CString pfix, unsigned int rank, unsigned int level) {
  define();
  
  chapter("Activity partition", pfix, rank, "activitypartition", level);

  Q3CString s = description();
  
  if (!s.isEmpty()) {
    fw.write("<p>");
    writeq(s);
    fw.write("<br /></p>");
  }
  
  if (isDimension())
    fw.write((isExternal())
	     ? "<p>is dimension, is external</p>\n"
	     : "<p>is dimension</p>\n");
  else if (isExternal())
    fw.write("<p>is external</p>\n");
    
  if (represents() != 0) {
    fw.write("<p>represents ");
    represents()->write();
    fw.write("</p>");
  }
    
  write_dependencies();
    
  UmlDiagram * d = associatedDiagram();
  
  if (d != 0) {
    fw.write("<p>Diagram : ");
    d->write();
    fw.write("</p>\n");
  }

  write_properties();

  write_children(pfix, rank, level);

  unload(FALSE, FALSE);
}
Ejemplo n.º 10
0
		CharType Font::check(RPG2kString::const_iterator const& it)
		{
			int first = *it & 0xff;
			if(
				isExternal(it) ||
				rpg2k::within(0x81, first, 0xa0) || rpg2k::within(0xe0, first, 0xf0)
			) return FULL;
			else if(
				rpg2k::within(0x00, first, 0x80) || rpg2k::within(0xa1, first, 0xe0)
			) return HALF;
			else throw std::runtime_error("unknown char");
		}
Ejemplo n.º 11
0
// This write a function of object Chip
void Func::writeCFiles(string path) const
{
  if (isExternal()) {
    // Do nothing
  } else {
    ostringstream out;

    // Header
    out << "/** Auto generated C++ code started by "<<__FILE__<<":"<<__LINE__<< " */" << endl;
    out << endl;
    out << "#include \"Types.h\"" << endl;
    out << "#include \"Chip.h\"" << endl;
    if (m_isInternalMachineFunc) {
      out << "#include \"" << m_machineStr << "_Controller.h\"" << endl;
    }
    out << endl;

    // Generate function header
    string code;
    Type* void_type_ptr = g_sym_table.getType("void");
    string return_type = m_type_ptr->cIdent(); 
    code += return_type;
    if (existPair("return_by_ref") && m_type_ptr != void_type_ptr) {
      code += "&";
    }
    if (!m_isInternalMachineFunc) {   
      code += " Chip::" + cIdent() + "(";
    } else {
      code += " " + m_machineStr + "_Controller::" + cIdent() + "(";
    }
    int size = m_param_type_vec.size();
    for(int i=0; i<size; i++) {
      // Generate code
      if (i != 0) {
        code += ", ";
      }
      code += m_param_string_vec[i];
    }
    code += ")";
    
    // Function body
    code += "\n{\n";
    code += m_body;
    code += "}\n";
    out << code << endl;
    
    // Write it out
    conditionally_write_file(path + cIdent() + ".C", out);
  }
}
/*
 * Lookup a class.
 */
static classDef *lookupClass(sipSpec *pt, const char *name, classDef *scope_cd)
{
    classDef *cd;

    for (cd = pt->classes; cd != NULL; cd = cd->next)
        if (strcmp(cd->pyname->text, name) == 0 && cd->ecd == scope_cd && !isExternal(cd))
        {
            classDef *impl = getClassImplementation(pt, cd);

            if (impl != NULL)
                return impl;
        }

    return NULL;
}
Ejemplo n.º 13
0
void MtxLP::setMixedObjective(stomap* sto){
    emptyObjective();
    for (stomap::iterator i = sto->begin(); i != sto->end(); ++i){
        string name = i->first;
        if (nrow(name) != 0){
            setRowObjCoef(name, i->second);
            //if the metabolite is internal, externalise it and add to the list of temp. externals.
            if (!isExternal(name)){
                strvec buff (1, name);                          // Added by Andrzej Kierzek
                externalise(buff);                             // Added by Andrzej Kierzek
                tmp_externals.push_back(name);
            }
        }
        else
            updateObjCoef(i->first, i->second);
    }
}
Ejemplo n.º 14
0
void BarnesHutTree::updateForceOnBody(const shared_ptr<Body>& body)
{
	if (isExternal())
	{
		body->addToAccelerationDueToOneBody(m_bodyInTree);
	}
	else if (m_Quadrant.sideLength() / body->twoDimensionalDistanceToOtherBody(m_bodyInTree) < 2)
	{
		body->addToAccelerationDueToOneBody(m_bodyInTree);
	}
	else
	{
		if (m_NW) m_NW->updateForceOnBody(body);
		if (m_NE) m_NE->updateForceOnBody(body);
		if (m_SW) m_SW->updateForceOnBody(body);
		if (m_SE) m_SE->updateForceOnBody(body);
	}
};
Ejemplo n.º 15
0
//-------------------------------------------------------------------------------------
NetworkInterface::NetworkInterface(Network::EventDispatcher * pDispatcher,
		int32 extlisteningPort_min, int32 extlisteningPort_max, const char * extlisteningInterface,
		uint32 extrbuffer, uint32 extwbuffer,
		int32 intlisteningPort, const char * intlisteningInterface,
		uint32 intrbuffer, uint32 intwbuffer):
	extEndpoint_(),
	intEndpoint_(),
	channelMap_(),
	pDispatcher_(pDispatcher),
	pExtensionData_(NULL),
	pExtListenerReceiver_(NULL),
	pIntListenerReceiver_(NULL),
	pDelayedChannels_(new DelayedChannels()),
	pChannelTimeOutHandler_(NULL),
	pChannelDeregisterHandler_(NULL),
	isExternal_(extlisteningPort_min != -1),
	numExtChannels_(0)
{
	if(isExternal())
	{
		pExtListenerReceiver_ = new ListenerReceiver(extEndpoint_, Channel::EXTERNAL, *this);
		this->recreateListeningSocket("EXTERNAL", htons(extlisteningPort_min), htons(extlisteningPort_max), 
			extlisteningInterface, &extEndpoint_, pExtListenerReceiver_, extrbuffer, extwbuffer);

		// 如果配置了对外端口范围, 如果范围过小这里extEndpoint_可能没有端口可用了
		if(extlisteningPort_min != -1)
		{
			KBE_ASSERT(extEndpoint_.good() && "Channel::EXTERNAL: no available port, "
				"please check for kbengine[_defs].xml!\n");
		}
	}

	if(intlisteningPort != -1)
	{
		pIntListenerReceiver_ = new ListenerReceiver(intEndpoint_, Channel::INTERNAL, *this);
		this->recreateListeningSocket("INTERNAL", intlisteningPort, intlisteningPort, 
			intlisteningInterface, &intEndpoint_, pIntListenerReceiver_, intrbuffer, intwbuffer);
	}

	KBE_ASSERT(good() && "NetworkInterface::NetworkInterface: no available port, "
		"please check for kbengine[_defs].xml!\n");

	pDelayedChannels_->init(this->dispatcher(), this);
}
Ejemplo n.º 16
0
//-------------------------------------------------------------------------------------
NetworkInterface::NetworkInterface(Mercury::EventDispatcher * pMainDispatcher,
		int32 extlisteningPort_min, int32 extlisteningPort_max, const char * extlisteningInterface,
		int32 intlisteningPort, const char * intlisteningInterface):
	extEndpoint_(),
	intEndpoint_(),
	channelMap_(),
	pDispatcher_(new EventDispatcher),
	pMainDispatcher_(NULL),
	pExtensionData_(NULL),
	pExtListenerReceiver_(NULL),
	pIntListenerReceiver_(NULL),
	pDelayedChannels_(new DelayedChannels()),
	pChannelTimeOutHandler_(NULL),
	pChannelDeregisterHandler_(NULL),
	isExternal_(extlisteningPort_min != -1)
{
	if(isExternal())
	{
		pExtListenerReceiver_ = new ListenerReceiver(extEndpoint_, Channel::EXTERNAL, *this);
		this->recreateListeningSocket("EXTERNAL", htons(extlisteningPort_min), htons(extlisteningPort_max), 
			extlisteningInterface, &extEndpoint_, pExtListenerReceiver_);

		// 如果配置了对外端口范围, 如果范围过小这里extEndpoint_可能没有端口可用了
		if(extlisteningPort_min != -1)
		{
			KBE_ASSERT(extEndpoint_.good() && "Channel::EXTERNAL: no available port!\n");
		}
	}

	if(intlisteningPort != -1)
	{
		pIntListenerReceiver_ = new ListenerReceiver(intEndpoint_, Channel::INTERNAL, *this);
		this->recreateListeningSocket("INTERNAL", intlisteningPort, intlisteningPort, 
			intlisteningInterface, &intEndpoint_, pIntListenerReceiver_);
	}

	
	KBE_ASSERT(good());

	if (pMainDispatcher != NULL)
	{
		this->attach(*pMainDispatcher);
	}
}
Ejemplo n.º 17
0
/*
 * Generate the XML export file.
 */
void generateXML(sipSpec *pt, moduleDef *mod, const char *xmlFile)
{
    FILE *fp;
    classDef *cd;
    memberDef *md;

    if ((fp = fopen(xmlFile, "w")) == NULL)
        fatal("Unable to create file \"%s\"\n", xmlFile);

    fprintf(fp, "<?xml version=\"1.0\"?>\n");
    fprintf(fp, "<Module version=\"%u\" name=\"%s\">\n",
            XML_VERSION_NR, mod->name);

    /*
     * Note that we don't yet handle mapped types, templates or exceptions.
     */

    for (cd = pt->classes; cd != NULL; cd = cd->next)
    {
        if (cd->iff->module != mod)
            continue;

        if (isExternal(cd))
            continue;

        xmlClass(pt, mod, cd, fp);
    }

    for (cd = mod->proxies; cd != NULL; cd = cd->next)
        xmlClass(pt, mod, cd, fp);

    xmlEnums(pt, mod, NULL, 1, fp);
    xmlVars(pt, mod, NULL, 1, fp);

    for (md = mod->othfuncs; md != NULL; md = md->next)
        xmlFunction(pt, NULL, md, mod->overs, 1, fp);

    fprintf(fp, "</Module>\n");

    fclose(fp);
}
Ejemplo n.º 18
0
		font_t* Font::getFullFrom(RPG2kString::const_iterator& it, font_t (&src)[KU_MAX][TEN_MAX][FONT_H])
		{
			if( isExternal(it) ) return getExternal(it);

			uint ku = 0, ten = 0;

		// calculate ku
			int first = *(it++) & 0xff;
			     if( rpg2k::within(0x81, first, 0xa0) ) ku = first - 0x81 + 0x00;
			else if( rpg2k::within(0xe0, first, 0xf0) ) ku = first - 0xe0 + 0x20;
			else rpg2k_assert(false);
			ku *= 2;
		// calculate ten
			int second = *(it++) & 0xff;
			     if( rpg2k::within(0x40, second, 0x7f) ) { ten = second - 0x40 + 0x00; ku += 0; }
			else if( rpg2k::within(0x80, second, 0x9f) ) { ten = second - 0x80 + 0x3f; ku += 0; }
			else if( rpg2k::within(0x9f, second, 0xfd) ) { ten = second - 0x9f + 0x00; ku += 1; }
			else rpg2k_assert(false);

			return src[ku][ten];
		}
Ejemplo n.º 19
0
void Func::funcPrototype(string& code) const
{
  if (isExternal()) {
    // Do nothing
  } else {
    string return_type = m_type_ptr->cIdent(); 
    Type* void_type_ptr = g_sym_table.getType("void");
    if (existPair("return_by_ref") && (m_type_ptr != void_type_ptr)) {
      return_type += "&";
    }
    code += return_type + " " + cIdent() + "(";
    int size = m_param_string_vec.size();
    for(int i=0; i<size; i++) {
      // Generate code
      if (i != 0) {
        code += ", ";
      }
      code += m_param_string_vec[i];
    }
    code += ");\n";
  }
}
Ejemplo n.º 20
0
void UmlTransition::write_it(FileOut & out)
{
    out.indent();
    out << "<transition xmi:type=\"uml:Transition\"";
    out.id(this);

    if (!name().isEmpty() && (name() != "<transition>")) {
        out << " name=\"";
        out.quote(name());
        out << '"';
    }

    out.ref(parent(), "source");
    out.ref(target(), "target");

    if (parent() == target())
        out << " kind=\"" << ((isExternal()) ? "external" : "internal") << '"';

    out << ">\n";
    out.indent(+1);
    write_description_properties(out);

    WrapperStr trig;
    WrapperStr grd;
    WrapperStr effect;

    switch (_lang) {
    case Uml:
        trig = trigger();
        grd = guard();
        effect = activity();
        break;

    case Cpp:
        trig = cppTrigger();
        grd = cppGuard();
        effect = cppActivity();
        break;

    default: // Java
        trig = javaTrigger();
        grd = javaGuard();
        effect = javaActivity();
        break;
    }

    if (! trig.isEmpty()) {
        out.indent();
        out << "<trigger xmi:type=\"uml:Trigger\"";
        out.id_prefix(this, "TRIGGER_");
        out << " name=\"";
        out.quote(trig);
        out << "\"/>\n";
    }

    if (! grd.isEmpty()) {
        out.indent();
        out << "<guard xmi:type=\"uml:Constraint\"";
        out.id_prefix(this, "GUARD_");
        out << ">\n";
        out.indent();
        out << "\t<specification xmi:type=\"uml:OpaqueExpression\"";
        out.id_prefix(this, "GUARD_EXPR_");
        out << ">\n";
        out.indent();
        out << "\t\t<body>";
        out.quote(grd);
        out << "</body>\n";
        out.indent();
        out << "\t</specification>\n";
        out.indent();
        out << "</guard>\n";
    }

    if (! effect.isEmpty()) {
        out.indent();
        out << "<effect xmi:type=\"uml:Activity\"";
        out.id_prefix(this, "EFFECT_");
        out << ">\n";
        out.indent();
        out << "\t<body>";
        out.quote(effect);
        out << "</body>\n";
        out.indent();
        out << "</effect>\n";
    }

    out.indent(-1);
    out.indent();
    out << "</transition>\n";

    unload();
}
Ejemplo n.º 21
0
	bool good() const{ return (!isExternal() || extEndpoint_.good()) && (intEndpoint_.good()); }
Ejemplo n.º 22
0
void BarnesHutTree::insertBody(const Body& body)
{
	//If there's not a body there already, put the body there.
	if (m_bodyInTree.mass() == 0)
	{
		m_bodyInTree.set_mass(body.mass());
		m_bodyInTree.set_xPosition(body.xPosition());
		m_bodyInTree.set_yPosition(body.yPosition());
		m_bodyInTree.set_zPosition(body.zPosition());
	}
	//If there's already a body there, but it's not an external node
	//combine the two bodies and figure out which quadrant of the 
	//tree it should be located in. Then recursively update the nodes below it.
	else if (isExternal() == false)
	{
		double newMass = m_bodyInTree.mass() + body.mass();
		m_bodyInTree.set_xPosition((m_bodyInTree.xPosition()*m_bodyInTree.mass() + body.xPosition()*body.mass()) / newMass);
		m_bodyInTree.set_yPosition((m_bodyInTree.yPosition()*m_bodyInTree.mass() + body.yPosition()*body.mass()) / newMass);
		m_bodyInTree.set_zPosition((m_bodyInTree.zPosition()*m_bodyInTree.mass() + body.zPosition()*body.mass()) / newMass);
		m_bodyInTree.set_mass(m_bodyInTree.mass() + body.mass());
		if (body.isInQuadrant(m_Quadrant.NWQuad()))
		{
			if (!m_NW)
			{
				m_NW = new BarnesHutTree(m_Quadrant.NWQuad());
			}
			m_NW->insertBody(body);
		}
		else if (body.isInQuadrant(m_Quadrant.NEQuad()))
		{
			if (!m_NE)
			{
				m_NE = new BarnesHutTree(m_Quadrant.NEQuad());
			}
			m_NE->insertBody(body);
		}
		else if (body.isInQuadrant(m_Quadrant.SWQuad()))
		{
			if (!m_SW)
			{
				m_SW = new BarnesHutTree(m_Quadrant.SWQuad());	
			}
			m_SW->insertBody(body);
		}
		else if (body.isInQuadrant(m_Quadrant.SEQuad()))
		{
			if (!m_SE)
			{
				m_SE = new BarnesHutTree(m_Quadrant.SEQuad());
			};
			m_SE->insertBody(body);
		};
	}
	//If the node is external and contains one other body, create BHTrees
	//where the bodies should go, update the node, and end 
	//(do not do anything recursively)
	else if (isExternal() == true)
	{
		//there is only one body in this tree
		if (m_bodyInTree.isInQuadrant(m_Quadrant.NWQuad()))
		{
			if (!m_NW)
			{
				m_NW = new BarnesHutTree(m_Quadrant.NWQuad());
			};
			m_NW->insertBody(m_bodyInTree);
		}
		else if (m_bodyInTree.isInQuadrant(m_Quadrant.NEQuad()))
		{
			if (!m_NE)
			{
				m_NE = new BarnesHutTree(m_Quadrant.NEQuad());
			};
			m_NE->insertBody(m_bodyInTree);
		}
		else if (m_bodyInTree.isInQuadrant(m_Quadrant.SWQuad()))
		{
			if (!m_SW)
			{
				m_SW = new BarnesHutTree(m_Quadrant.SWQuad());
			};
			m_SW->insertBody(m_bodyInTree);
		}
		else if (m_bodyInTree.isInQuadrant(m_Quadrant.SEQuad()))
		{
			if (!m_SE)
			{
				m_SE = new BarnesHutTree(m_Quadrant.SEQuad());
			};
			m_SE->insertBody(m_bodyInTree);
		}
		insertBody(body);
	}
};
/*
 * Generate the type hints for an ordinary module.
 */
static void pyiModule(sipSpec *pt, moduleDef *mod, FILE *fp)
{
    char *cp;
    int first;
    memberDef *md;
    classDef *cd;
    mappedTypeDef *mtd;
    ifaceFileList *defined;
    moduleListDef *mld;

    /*
     * Generate the imports. Note that we assume the super-types are the
     * standard SIP ones.
     */
    fprintf(fp,
"import typing\n"
"import sip\n"
        );

    first = TRUE;

    for (mld = mod->imports; mld != NULL; mld = mld->next)
    {
        /* We lie about the indent because we only want one blank line. */
        first = separate(first, 1, fp);

        if ((cp = strrchr(mld->module->fullname->text, '.')) == NULL)
        {
            fprintf(fp, "import %s\n", mld->module->name);
        }
        else
        {
            *cp = '\0';
            fprintf(fp, "from %s import %s\n", mld->module->fullname->text,
                    mld->module->name);
            *cp = '.';
        }
    }

    /*
     * Generate any exported type hint code and any module-specific type hint
     * code.
     */
    pyiTypeHintCode(pt->exptypehintcode, 0, fp);
    pyiTypeHintCode(mod->typehintcode, 0, fp);

    /* Generate the types - global enums must be first. */
    pyiEnums(pt, mod, NULL, NULL, 0, fp);

    defined = NULL;

    for (cd = pt->classes; cd != NULL; cd = cd->next)
    {
        classDef *impl;

        if (cd->iff->module != mod)
            continue;

        if (isExternal(cd))
            continue;

        impl = getClassImplementation(pt, cd);

        if (impl != NULL)
        {
            if (impl->no_typehint)
                continue;

            /* Only handle non-nested classes here. */
            if (impl->ecd != NULL)
                continue;

            pyiClass(pt, mod, impl, &defined, 0, fp);
        }
    }

    for (mtd = pt->mappedtypes; mtd != NULL; mtd = mtd->next)
    {
        mappedTypeDef *impl;

        if (mtd->iff->module != mod)
            continue;

        impl = getMappedTypeImplementation(pt, mtd);

        if (impl != NULL && impl->pyname != NULL)
            pyiMappedType(pt, mod, impl, &defined, 0, fp);
    }

    pyiVars(pt, mod, NULL, defined, 0, fp);

    first = TRUE;

    for (md = mod->othfuncs; md != NULL; md = md->next)
        if (md->slot == no_slot)
        {
            first = separate(first, 0, fp);

            pyiCallable(pt, mod, md, mod->overs, FALSE, defined, 0, fp);
        }
}