Re: Encore et toujours Gnucash

Top Page

Reply to this message
Author: Eric
Date:  
To: Benoit T
CC: guilde
Subject: Re: Encore et toujours Gnucash






Benoit T a écrit:



Message de Benoit T, le mardi 02 septembre :


sous debian, il faut aussi les paquets en '-deb', comme par ex
libglib2.0-dev en plus du paquet sans le '-deb' pour que les ./configure
fonctionnent




mille excuses pour le lapsus, je voulais dire '-dev'


si tu es déjà debianiste, tu peux aussi essayer auto-apt : en lançant
'auto-apt ./configure', il installera tout seul les librairies
nécessaires.




ben






Je ne connais pas Debian et j'ai déja un mal de chien avec Mandrake. Je n'ai
pas l'impression que auto-apt puisse fonctionner sous Mdk.
Ton mail m'aura servi puisque je me suis aperçu que libglib (alors que glib
tout court ne donne aucun résultat) était présent dans les cd de Mandrake.
Je l'ai donc installé et ça marche.

Par contre je ne comprends pas la différence qu'il y a entre libglib et glib
(tout court) que j'ai téléchargé et installé et qui n'a donné aucun résultat.

Donc maintenant losque je fais ./configure avec gnucash, ça me donne ça :

  


checking for g-wrap-config... /usr/bin/g-wrap-config
checking for g-wrap - 1.3.3 <= version < 99.99.99... no
configure: warning: gwrap check failed
configure: error:

  g-wrap does not appear to be installed correctly, or is not new
  enough.  Right now gnucash requires at least version 1.3.3 to build
  as there were major changes between version 1.3.1 and 1.3.2, and
  extra support added between 1.3.2 and 1.3.3 that is now required
  by gnucash.
  If you need to install g-wrap, you can find it at
  http://www.gnucash.org/pub/g-wrap.




Après libglib... g-wrap.
Que veut dire le message ???
Dans usr/bin j'ai bien un g-wrap-config, la version 1.34.




#!/usr/bin/guile \
-e main -s
!#
;;;; g-wrap-config --- utility for linking programs with g-wrap
;;;;
;;;; Copyright 2000 Rob Browning <rlb@???>
;;;;
;;;; This program is free software; you can redistribute it and/or modify
;;;; it under the terms of the GNU General Public License as published by
;;;; the Free Software Foundation; either version 2, or (at your option)
;;;; any later version.
;;;;
;;;; This program is distributed in the hope that it will be useful,
;;;; but WITHOUT ANY WARRANTY; without even the implied warranty of
;;;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
;;;; GNU General Public License for more details.
;;;;
;;;; You should have received a copy of the GNU General Public License
;;;; along with this software; see the file COPYING.  If not, write to
;;;; the Free Software Foundation, Inc., 59 Temple Place, Suite 330,
;;;; Boston, MA 02111-1307 USA
;;;;

(define *program-name* #f)
(define *program-version* "1.1.11")

(define (stderr . args)
  (let ((ep (current-error-port)))
    (for-each (lambda (arg) (display arg ep)) args)))

(define (stdout . args)
  (for-each display args))

(define (usage-msg)
  (let ((pr (lambda ( . msg)
              (stderr "  " *program-name* " ")
              (apply stderr msg)
              (stderr #\newline))))
    (stderr "Usage: " #\newline)
    (pr "--version                     - show version information")
    (pr "--help                        - show this message")
    (pr "--c-compile-args LANGUAGE     - C compile args for LANGUAGE")
    (pr "--c-link-args LANGUAGE        - C link args for LANGUAGE")
    (pr "--c-static-link-args LANGUAGE - C static link args for LANGUAGE")
    (pr "--guile-module-directory      - Location of guile module dir")))

(define (c-link-args language static?)
  (let* ((lib-list '(("guile" . "g-wrap-runtime-guile")
                     ("rscheme" . "gwraprs")))
         (lib (assoc language lib-list)))

    (if lib
        (begin
          (if static?
              (stdout "/usr/lib/lib" (cdr lib) ".a" #\newline)
              (stdout "-L/usr/lib -l" (cdr lib) #\newline))
          #t)
        (begin
          (stderr *program-name* ": unknown LANGUAGE \"" language "\" given.")
          (stderr #\newline)
          (usage-msg)
          #f))))

(define (c-compile-args language)
  (stdout "-I/usr/include" #\newline)
  #t)

(define (main args)

  (set! *program-name* (basename (car args)))

  ;; Right now we do dirt-stupid argument processing.
  (let ((rest (cdr args))
        (status #t))

    (cond
     ((null? rest)
      (usage-msg)
      (set! status #f))

     ;; --version
     ((equal? '("--version") rest)
      (stdout "g-wrap-config " *program-version* #\newline))

     ;; --c-compile-args LANGUAGE
     ((and (string=? "--c-compile-args" (car rest))
           (= (length rest) 2))
      (set! status (c-compile-args (cadr rest))))

     ;; --c-link-args LANGUAGE
     ((and (string=? "--c-link-args" (car rest))
           (= (length rest) 2))
      (set! status (c-link-args (cadr rest) #f)))

     ;; --c-static-link-args LANGUAGE
     ((and (string=? "--c-static-link-args" (car rest))
           (= (length rest) 2))
      (set! status (c-link-args (cadr rest) #t)))

     ;; --c-static-link-args LANGUAGE
     ((and (string=? "--guile-module-directory" (car rest))
           (= (length rest) 1))
      (stdout "/usr/share/guile" #\newline)
      (set! status 0))

     (else
      (usage-msg)
      (set! status #f)))

    (quit (if status 0 1))))

;;; Local Variables:
;;; mode: scheme
;;; End:




Ou est-ce que je merde ce coup-ci ?

Dernière question, quand on veut installer  quelque chose dans un répertoire
particulier (j'ai l'impression que la commande "configure" passe son temps
à chercher des choses à des endroits ou elles ne sont pas): Qu'est ce qu'on
doit ajouter exactement à ./configure et make ??

Merci d'avance, s'il n'y avait pas la liste, il y a un moment que j'aurai
formaté ma partition linux.