From mboxrd@z Thu Jan  1 00:00:00 1970
Path: news.gmane.org!.POSTED.blaine.gmane.org!not-for-mail
From: Eli Zaretskii <eliz@gnu.org>
Newsgroups: gmane.lisp.guile.user
Subject: Re: string-ports issue on Windows
Date: Thu, 18 Apr 2019 21:51:41 +0300
Message-ID: <831s1zdu4i.fsf@gnu.org>
References: <CAKVAZZKGeVMxtMsONgmM6dVkT2UZuCmNQrXFmrDkb9_TvW_Yeg@mail.gmail.com>
	<877ebt7tc0.fsf@netris.org>
	<CAKVAZZLTL1+AJCkQ0t8VbdS=39BxLG5=T7TD+C0_2_7-kPuY0g@mail.gmail.com>
	<87tvew4efa.fsf@netris.org>
	<CAKVAZZ+v9kFaAUxeJ5_opNSnmwJONT+wW14R38AHGpnwqEfuGA@mail.gmail.com>
Injection-Info: blaine.gmane.org; posting-host="blaine.gmane.org:195.159.176.226";
	logging-data="74140"; mail-complaints-to="usenet@blaine.gmane.org"
Cc: guile-user@gnu.org
To: Christopher Lam <christopher.lck@gmail.com>
Original-X-From: guile-user-bounces+guile-user=m.gmane.org@gnu.org Thu Apr 18 20:52:33 2019
Return-path: <guile-user-bounces+guile-user=m.gmane.org@gnu.org>
Envelope-to: guile-user@m.gmane.org
Original-Received: from lists.gnu.org ([209.51.188.17])
	by blaine.gmane.org with esmtps (TLS1.0:RSA_AES_256_CBC_SHA1:256)
	(Exim 4.89)
	(envelope-from <guile-user-bounces+guile-user=m.gmane.org@gnu.org>)
	id 1hHC9A-000J9x-QH
	for guile-user@m.gmane.org; Thu, 18 Apr 2019 20:52:32 +0200
Original-Received: from localhost ([127.0.0.1]:45829 helo=lists.gnu.org)
	by lists.gnu.org with esmtp (Exim 4.71)
	(envelope-from <guile-user-bounces+guile-user=m.gmane.org@gnu.org>)
	id 1hHC99-00075l-RO
	for guile-user@m.gmane.org; Thu, 18 Apr 2019 14:52:31 -0400
Original-Received: from eggs.gnu.org ([209.51.188.92]:58027)
	by lists.gnu.org with esmtp (Exim 4.71)
	(envelope-from <eliz@gnu.org>) id 1hHC8o-00075Y-UO
	for guile-user@gnu.org; Thu, 18 Apr 2019 14:52:11 -0400
Original-Received: from fencepost.gnu.org ([2001:470:142:3::e]:37940)
	by eggs.gnu.org with esmtp (Exim 4.71) (envelope-from <eliz@gnu.org>)
	id 1hHC8o-0003Vi-Ny; Thu, 18 Apr 2019 14:52:10 -0400
Original-Received: from [176.228.60.248] (port=3233 helo=home-c4e4a596f7)
	by fencepost.gnu.org with esmtpsa (TLS1.2:RSA_AES_256_CBC_SHA1:256)
	(Exim 4.82) (envelope-from <eliz@gnu.org>)
	id 1hHC8k-0001kx-LF; Thu, 18 Apr 2019 14:52:09 -0400
In-reply-to: <CAKVAZZ+v9kFaAUxeJ5_opNSnmwJONT+wW14R38AHGpnwqEfuGA@mail.gmail.com>
	(message from Christopher Lam on Thu, 18 Apr 2019 16:22:24 +0000)
X-detected-operating-system: by eggs.gnu.org: GNU/Linux 2.2.x-3.x [generic]
X-BeenThere: guile-user@gnu.org
X-Mailman-Version: 2.1.21
Precedence: list
List-Id: General Guile related discussions <guile-user.gnu.org>
List-Unsubscribe: <https://lists.gnu.org/mailman/options/guile-user>,
	<mailto:guile-user-request@gnu.org?subject=unsubscribe>
List-Archive: <http://lists.gnu.org/archive/html/guile-user/>
List-Post: <mailto:guile-user@gnu.org>
List-Help: <mailto:guile-user-request@gnu.org?subject=help>
List-Subscribe: <https://lists.gnu.org/mailman/listinfo/guile-user>,
	<mailto:guile-user-request@gnu.org?subject=subscribe>
Errors-To: guile-user-bounces+guile-user=m.gmane.org@gnu.org
Original-Sender: "guile-user" <guile-user-bounces+guile-user=m.gmane.org@gnu.org>
Xref: news.gmane.org gmane.lisp.guile.user:15400
Archived-At: <http://permalink.gmane.org/gmane.lisp.guile.user/15400>

> From: Christopher Lam <christopher.lck@gmail.com>
> Date: Thu, 18 Apr 2019 16:22:24 +0000
> Cc: guile-user <guile-user@gnu.org>
> 
> scheme@(guile-user)> (setlocale LC_ALL "")
> $15 = "English_Australia.1252"
> scheme@(guile-user)> (locale-encoding)
> $16 = "CP1252"
> scheme@(guile-user)> (setlocale LC_ALL "C")
> $17 = "C"
> scheme@(guile-user)> (locale-encoding)
> $18 = "CP1252"

The above is expected, if codepage 1252 is your system codepage.
Here's what I get, FWIW:

  scheme@(guile-user)> (use-modules (ice-9 i18n))
  scheme@(guile-user)> (locale-encoding)
  $1 = "CP1252"
  scheme@(guile-user)> (setlocale LC_ALL "French_France.1250")
  $2 = "French_France.1250"
  scheme@(guile-user)> (locale-encoding)
  $3 = "CP1250"
  scheme@(guile-user)> (setlocale LC_ALL "")
  $4 = "English_United States.1252"
  scheme@(guile-user)> (locale-encoding)
  $5 = "CP1252"
  scheme@(guile-user)> (setlocale LC_ALL "C")
  $6 = "C"
  scheme@(guile-user)> (locale-encoding)
  $7 = "CP1255"

My system locale is 1255, as you might have guessed.

HTH