[Top][All Lists]

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

Re: list building and argz_smob

From: Paul Jarc
Subject: Re: list building and argz_smob
Date: Mon, 09 Feb 2004 13:41:05 -0500
User-agent: Gnus/5.110002 (No Gnus v0.2) Emacs/21.3 (gnu/linux)

Brian S McQueen <address@hidden> wrote:
>           (if cgi-http-cookie
>             (let ((nop-item (cgi:cookie "nop_item")))
>               (if nop-item
>                 (string-append "nop_item=\"" (frobnicate nop-item) "\"")
>                 "no_nop_item" ))
>              "no_nop_item")

You might also like:
          (let ((nop-item (and cgi-http-cookie (cgi:cookie "nop_item"))))
            (if nop-item
              (string-append "nop_item=\"" (frobnicate nop-item) "\"")

> scm_map(
>    scm_c_define_gsubr("anon-printer", 1, 0, 0, private_printer),
>       argz_list_scm, SCM_EOL);

I don't think you want to use scm_c_define_gsubr here.  This should do
  scm_map(private_printer, argz_list_scm, SCM_EOL);

scm_c_define_gsubr is needed only once, to create the Scheme-visible
binding to the C function, and you might prefer using the SCM_DEFINE
snarfing macro instead of explicitly calling scm_c_Define_gsubr.


reply via email to

[Prev in Thread] Current Thread [Next in Thread]