Ejemplo n.º 1
0
 void ConvertPasProcedureTypeDecl(PasProcedureTypeDecl pasProcedure, CsNamespace csNamespace)
 {
     var csDelegate = new CsDelegateDomain();
     csDelegate.Name = pasProcedure.Name;
     ///TODO delegate
     csNamespace.Decls.Add(csDelegate);
     _associations.Assign(pasProcedure, csDelegate);
 }
Ejemplo n.º 2
0
 private void ConvertPasProcedureDecl(PasProcedureDecl pasProcedure, List<CsStat> csCodes)
 {
     var csDelegate = new CsDelegateDomain();
     csDelegate.Name = pasProcedure.Name + "Delegate";
     ConvertPasParams(pasProcedure.Params, csDelegate.Params);
     AddDecls(csDelegate.Codes, pasProcedure.Decls);
     AddCodes(csDelegate.Codes, pasProcedure.Codes);
     csDelegate.ReturnType = ConvertPasTypeRef(pasProcedure.ReturnType);
     var csVar = new CsLocalVarDecl();
     csVar.Name = pasProcedure.Name;
     csVar.TypeRef = new CsRef { Decl = csDelegate };
     csCodes.Add(csVar);
     ///_mappings[pasProcedure]= csVar;
 }