Re: C++ et abs()

[debianpmd <debianpmd@orange.fr>]

Le Wednesday 28 January 2009 14:11:12 debianpmd, vous avez écrit :
> Bonjour
> je recompile le projet dont je suis un des développeurs, projet construit
> sous Mandriva.
> J'ai donc fait un Perl de compil ci dessous.
> Donc deux questions : quand je compile en bash, ça passe , par contre à
> travers perl ça  ne passe pas.
> Y at-il une double analyse syntaxique ?
> 2° question, dans /usr/include/math.h je ne retrouve pas la la fonction
> abs() , nombre absolu, alors que je vois fabs. Y a t-il une particularité
> sous Debian pour math.h ?
>
> Le perl :
> #!/usr/bin/perl -w
>
> $cheminmedintux = "/home/pmddeb/Desktop/MedinTux-V2.13-250109/Programmes/";
> $cheminqmakeqt3 = "/usr/bin/qmake";
> $cheminqmakeqt4 = "/usr/bin/qmake-qt4";
> $cheminmake = "/usr/bin/make";
> #@qmakeqt3project = ("$cheminqmakeqt3","-project");
> #@qmakeqt4project = ("$cheminqmakeqt4","-project");
>
>
> @qmakecompta = ($cheminqmakeqt3,
> $cheminmedintux."comptabilite/compta/compta.pro");
> @qmakecheck_dus = ($cheminqmakeqt3,
> $cheminmedintux."comptabilite/check_dus/check_du.pro");
> @qmakecomptaplug = ($cheminqmakeqt3,
> $cheminmedintux."comptabilite/compta-plugins/compta-plugins.pro");
> @qmakechoix = ($cheminqmakeqt4 ,
> $cheminmedintux."comptabilite/comptabilite_interfaces_src/choixdialog/choix
>dialog.pro"); @qmakerecette = ($cheminqmakeqt4 ,
> $cheminmedintux."comptabilite/comptabilite_interfaces_src/recettedialog/rec
>ettedialog.pro"); @qmakedepense = ($cheminqmakeqt4 ,
> $cheminmedintux."comptabilite/comptabilite_interfaces_src/depensedialog/dep
>ensedialog.pro"); @qmakealarmes = ($cheminqmakeqt4 ,
> $cheminmedintux."pensebetux/Alarmes/src/src.pro");
> @qmakelecturealarmes = ($cheminqmakeqt4 ,
> $cheminmedintux."pensebetux/lecture_table_alarmes/src/src.pro");
> @makeclean = ($cheminmake,"clean");
> @make = ($cheminmake);
> #construction de la liste des make
>
> @listemake =
> ("ccamview", "drtux", "gest_user", "personnes", "QLightPad", "QLaboFTP",
> "Manager", "mise_a_jour", "set_bases", "qgetdatasemp", "qmedicabase",
> "manu", "med_stat", "cal_obst", "calendrier", "param_view",
> "comptabilite","pensebetux","sauvegarde","crypt");
>
> chdir $cheminmedintux;
>
> for($i=0;$i<@listemake;$i++){
>
> if($listemake[$i] eq "comptabilite"){
> #--------------------------------------------------------------------------
>---------------------
>
> #system(@qmakeqt3project) == 0
> #	or die "system @qmakeqt3project erreur:$?";
> system(@qmakecompta) == 0
> 	or die "system @qmakecompta erreur:$?";
> system(@makeclean) == 0
> 	or die "system @make erreur:$?";
> system(@make) == 0
> 	or die "system @make erreur:$?";
> print "compilation compta OK";
> #--------------------------------------------------------------------------
>----------------------
>
> #system(@qmakeqt3project) == 0
> #	or die "system @qmakeqt3project erreur:$?";
> system(@qmakecheck_dus) == 0
> 	or die "system @qmakecheck_dus erreur:$?";
> system(@makeclean) == 0
> 	or die "system @make erreur:$?";
> system(@make) == 0
> 	or die "system @make erreur:$?";
> print "compilation check_dus OK";
> #--------------------------------------------------------------------------
>----------------------
>
> #system(@qmakeqt3project) == 0
> #	or die "system @qmakeqt3project erreur:$?";
> system(@qmakecomptaplug) == 0
> 	or die "system @qmakecomptaplug erreur:$?";
> system(@makeclean) == 0
> 	or die "system @make erreur:$?";
> system(@make) == 0
> 	or die "system @make erreur:$?";
> print "compilation compta-plugins OK";
>
> #compilation en
> QT4
> ---------------------------------------------------------------------------
>-- #choixdialog
> ---------------------------------------------------------------------------
>----------- #system(@qmakeqt4project) == 0
> #	or die "system @qmakeqt4project erreur:$?";
>
> system(@qmakechoix) == 0
> 	or die "system @qmakechoix erreur:$?";
>
> system(@makeclean) == 0
> 	or die "system @make erreur:$?";
> system(@make) == 0
> 	or die "system @make erreur:$?";
> #recettedialog
> ---------------------------------------------------------------------------
>--------------------------
>
> system(@qmakerecette) == 0
> 	or die "system @qmakerecette erreur:$?";
> system(@makeclean) == 0
> 	or die "system @make erreur:$?";
> system(@make) == 0
> 	or die "system @make erreur:$?";
> #depensedialog-------------------------------------------------------------
>----------------------------------------- chdir
> $cheminmedintux."comptabilite/comptabilite_interfaces_src/";
> system(@qmakedepense) == 0
> 	or die "system @qmakedepense erreur:$?";
> system(@makeclean) == 0
> 	or die "system @make erreur:$?";
> system(@make) == 0
> 	or die "system @make erreur:$?";
> print "compilation comptabilite_interfaces_src OK";
> }
>
> #compilation sous
> QT4
> ---------------------------------------------------------------------------
>------------------- #compilation
> pensebetux
> ---------------------------------------------------------------------------
>------------------ elsif ($listemake[$i] eq "pensebetux"){
> #compilation
> Alarmes
> ---------------------------------------------------------------------------
>------------------------------ system(@qmakealarmes) == 0
> 	or die "system @qmakealarmes erreur:$?";
> system(@makeclean) == 0
> 	or die "system @make erreur:$?";
> system(@make) == 0
> 	or die "system @make erreur:$?";
> #compilation
> lecture_table_alarmes
> ---------------------------------------------------------------------------
>-------- system(@qmakelecturealarmes) == 0
> 	or die "system @qmakelecturealarmes erreur:$?";
> system(@makeclean) == 0
> 	or die "system @make erreur:$?";
> system(@make) == 0
> 	or die "system @make erreur:$?";
> }
> #compilation sauvegarde et
> crypt
> ---------------------------------------------------------------------------
>--------- elsif( $listemake[$i] eq "sauvegarde" || $listemake[$i] eq "crypt"
> ){ @qmakeqt4 =
> ($cheminqmakeqt4,$cheminmedintux.$listemake[$i]."/src/src.pro");
> system(@qmakeqt4) == 0
> 	or die "system @qmakeqt4 erreur:$?";
> system(@makeclean) == 0
> 	or die "system @make erreur:$?";
> system(@make) == 0
> 	or die "system @make erreur:$?";
> }
> #compilation de tous les modules qt3 organisés en module/bin et module/src
> else{
> @qmake = ($cheminqmakeqt3,$cheminmedintux.$listemake[$i]."/src/src.pro");
> system(@qmake) == 0
> 	or die "system @qmake erreur:$?";
> system(@makeclean) == 0
> 	or die "system @make erreur:$?";
> system(@make) == 0
> 	or die "system @make erreur:$?";
> }
> }
>
> print "compilation réussie, veuillez mettre les binaires produits dans les
> fichiers bin";
>
>
> Merci de votre aide
> pmd

il va sans dire que le perl est erroné.
Manque les chdir ;-)
pmd