Simple design question for schemers

[Hartmut Goebel]

Hi,

I'm about to refactor the Tryton packages to the (not so) new style. Now the trytond-xxx modules all share a basic list of native inputs,like this:

    (native-inputs
     `(,@(%standard-trytond-native-inputs)
       ("trytond-account-fr" ,trytond-account-fr)
       ("trytond-edocument-uncefact" ,trytond-edocument-uncefact)))

Now I wonder what would be the most scheme-like way for doing this in new style?

Using "apply list":

    (native-inputs (apply list
                          trytond-account-fr
                          trytond-edocument-uncefact
                          %standard-trytond-native-inputs ))

Using "append":

    (native-inputs (append %standard-trytond-native-inputs
                           (list trytond-account-fr
                                 trytond-edocument-uncefact)))

Using a custom function "extend":

    (native-inputs
     (extend %standard-trytond-native-inputs
             trytond-account-invoice
             trytond-purchase
             trytond-sale))

Using a custom function "@trytond-module-native-inputs":

    (native-inputs (@trytond-module-native-inputs
                    trytond-account-invoice
                    trytond-purchase
                    trytond-sale))

Opinions?

-- 
Regards
Hartmut Goebel

| Hartmut Goebel          | h.goe...@crazy-compilers.com               |
| www.crazy-compilers.com | compilers which you thought are impossible |