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; }
void ConvertPasVarDecl(PasVarDecl pasVar, List<CsStat> csCodes) { var csVar = new CsLocalVarDecl(); csVar.Name = pasVar.Name; csVar.TypeRef = ConvertPasTypeRef(pasVar.TypeRef); csCodes.Add(csVar); ///_associations.Assign(pasVar, csVar); }
void AddWith(List<CsStat> csCodes, PasWith pasWith) { var csVar = new CsLocalVarDecl { Name = "with" + ((++_generator).ToString()), TypeRef = new CsRef { Decl = new CsAliasTypeDecl { Name = "string", TargetTypeName = "string" } } }; csCodes.Add(csVar); var csAssignment = new CsAssignment(); csAssignment.LeftSide = new CsValue { Kind = CsValueKind.Name, StrData = csVar.Name }; csAssignment.RightSide = CsValueOf(pasWith.SubjectValue); csCodes.Add(csAssignment); AddCodes(csCodes, pasWith.Codes); }