[Ecls-list] Two small problems with ECL 15.2.21 on Windows

[Daniel Kochmański]

Hey,

thank you for your report and I'm sorry for inconvenience. In develop
branch both issues are fixed - thanks for attached patch!

Best regards,
Daniel

Polos Ruetz writes:

> Hi,
>
> just wanted to report two small problems with new ECL 15.2.21 on Windows,
> using the MSVC (2008/2010) compilers:
>
> (1) File "ecl/src/c/file.d" needs this patch in order to compile:
>
>
> diff --git a/_file.d b/file.d
> index 578cc27..8427b3b 100755
> --- a/_file.d
> +++ b/file.d
> @@ -2773,12 +2773,12 @@ io_file_length(cl_object strm)
>  static cl_object
>  io_file_get_position(cl_object strm)
>  {
> -       int f = IO_FILE_DESCRIPTOR(strm);
> -        if (isatty(f)) return(ECL_NIL);
> -
>         cl_object output;
>         ecl_off_t offset;
>
> +       int f = IO_FILE_DESCRIPTOR(strm);
> +        if (isatty(f)) return(ECL_NIL);
> +
>         ecl_disable_interrupts();
>         offset = lseek(f, 0, SEEK_CUR);
>         ecl_enable_interrupts();
> @@ -2810,10 +2810,10 @@ io_file_get_position(cl_object strm)
>  static cl_object
>  io_file_set_position(cl_object strm, cl_object large_disp)
>  {
> -       int f = IO_FILE_DESCRIPTOR(strm);
> -        if (isatty(f)) return(ECL_NIL);
>         ecl_off_t disp;
>         int mode;
> +       int f = IO_FILE_DESCRIPTOR(strm);
> +        if (isatty(f)) return(ECL_NIL);
>         if (Null(large_disp)) {
>                 disp = 0;
>                 mode = SEEK_END;
>
>
> (2) Starting up ECL in a Windows console gives this error; as you can
> see, it's simply a problem with character encoding of the name of the
> new maintainer:
>
>
> ECL (Embeddable Common-Lisp) 15.2.21 (git:UNKNOWN)
> Copyright (C) 1984 Taiichi Yuasa and Masami Hagiya
> Copyright (C) 1993 Giuseppe Attardi
> Copyright (C) 2000 Juan J. Garcia-Ripoll
> Copyright (C) 2015 Daniel Kochma
> Condition of type: STREAM-ENCODING-ERROR
> encoding error on stream #<i/o win32 console stream "stdout"> (:EXTERNAL-FORMAT
> ...
> Available restarts:
>
> 1. (CONTINUE) Ignore character
> 2. (USE-VALUE) Store a different character code.
>
> Top level in: #<process TOP-LEVEL>.
>>

-- 
Daniel Kochmański | Poznań, Poland
;; aka jackdaniel

"Be the change that you wish to see in the world." - Mahatma Gandhi