Queries about while doc and (ice-9 command-line)

[Neil Jerram]

Hi there,

I was looking today at some recent commits, and noticed a few queries...

In
http://git.savannah.gnu.org/cgit/guile.git/commit/?h=stable-2.0&id=91956a94fe6363cf69d574b56397962ec6ef4468:

address@hidden
+(while #f (error "not reached")) @result{} #f
+(while #t (break)) @result{} #t
+(while #f (break 1 2 3)) @result{} 1 2 3
address@hidden example

I think the #f in the last while line should be #t.

In
http://git.savannah.gnu.org/cgit/guile.git/tree/module/ice-9/command-line.scm?h=stable-2.0&id=90779ad9a1d8b2533ad8495753677aebf5626571:

            (if (pair? do-script)
                (set-car! do-script arg))
            (set! arg0 arg)
            (set! interactive? #f)
            (finish args
                    (cons `(load ,arg) out)))

Does this code mean that we load the script twice, in the -ds case?

If that's right, I believe the -s block has the same issue.

           ((string=? arg "-x")         ; add to %load-extensions
            (if (null? args)
                (error "missing argument to `-L' switch"))
            (set! user-extensions (cons (car args) user-extensions))
            (parse (cdr args)
                   out))

In the error message here, -L should be -x.

          ;; Handle the `-e' switch, if it was specified.
          ,@(if entry-point
                `((,entry-point (command-line)))
                '())

Do we go interactive after seeing a -e option?  I don't see a setting of
the interactive? variable that would prevent this?

Regards,
        Neil