PBS :: SubpbsResult PBS :: SubpbsResult Módulo contiene soporte para proyectos jerárquicos.
Descargar ahora

PBS :: SubpbsResult Clasificación y resumen

PBS :: SubpbsResult Etiquetas

proyectos Módulo perl jerárquico Proyectos jerárquicos Soporte de proyectos

PBS :: SubpbsResult Descripción

módulo de PBS :: SubpbsResult contiene soporte para proyectos jerárquicos. PBS :: módulo SubpbsResult contiene soporte para uso projects.SYNOPSIS jerárquica PBS :: SubpbsResult; mi subpbs_result $ = nuevo sistema de bandas :: SubpbsResult ($ nombre_archivo); mi @search_paths = @ {$ subpbs_result-> GetLibrarySearchPaths ()}; Pbs se esfuerza por que le permitirán crear proyectos jerárquicos, este módulo simplifica la tarea de devolver la información del módulo secundario al padre módulo. Este módulo se utiliza en el módulo amainly Builders.This le permite crear archivos que contienen la información. A continuación se presentan dos informationSay examples.linker que tiene un módulo que tiene una dependencia de enlace en el módulo B. Módulo B debe estar vinculada con la biblioteca y extra. A y B son de construcción en diferentes proyectos (un subpbs para B existe) .Cuando que unen su proyecto, lo que necesita saber en el nivel superior lo que las necesidades de B a estar vinculado con. Para evitar poner el conocimiento de las dependencias de B en la acumulación de A, nos gustaría que la información de enlace para ser devueltos de forma genérica a A.Module B resultado de la acumulación, cuando se invoca desde la acumulación de A es un archivo '.subpbs_result'. # Hacer un resultado depende de la acumulación de AddRule B 'módulo B', , Build_A; # Build B en un AddSubpbRule subpbs ( 'B.subpbs_result', 'somepbs_file.pl') sub Build_A {uso PBS :: SubpbsResult; ... mi @objects_to_link; mis @libs; mi @other_specific_information; mi $ very_special_information; para mi $ dependencia (@dependencies) {if ($ dependencia = ~ /.subpbs_result/) {my $ = subpbs_result nuevo sistema de bandas :: SubpbsResult ($ dependencia); empujar @objects_to_link, getObjects ($ subpbs_result); @libs empuje, GetLibraries ($ subpbs_result); empuje @other_specific_information = GetOtherSpecificInformation ($ subpbs_result); $ Very_special_information = GetVerySpecialInformation ($ subpbs_result) ; }} ...} # somepbs_file.pl en mis @libraries = ( 'some_lib', 'some_other_lib'); mi @other_specific_information = ( 'specific1', 'specific2'); mi very_special_information $ = 1; AddRule 'B.subpbs_result', , BuildSubpbsResult; sub BuildSubpbsResult {... uso PBS :: SubpbsResult; mi subpbs_result $ = nuevo sistema de bandas :: SubpbsResult (); para mi $ dependencia (@dependencies) {if ($ dependencia = ~ /.subpbs_result$/) {$ subpbs_result-> Añadir ($ dependencia); } Else {$ subpbs_result-> AddObjects ({NOMBRE => $ dependencia, MD5 => $ md5}); }} $ subpbs_result-> AddLibraries (@libraries); $ Subpbs_result-> AddWithMd5 ( 'other_specific_information', @other_specific_information); $ Subpbs_result-> Añadir ( 'very_special_information', $ very_special_information); $ Subpbs_result-> Write ($ dependiente); } Requisitos: · Perl

PBS :: SubpbsResult Software relacionado