From mboxrd@z Thu Jan 1 00:00:00 1970 Path: news.gmane.org!not-for-mail From: Mark H Weaver Newsgroups: gmane.lisp.guile.devel Subject: [PATCH] Add ".guile.sls" and ".sls" to the default %load-extensions Date: Sat, 03 Nov 2012 23:31:53 -0400 Message-ID: <87fw4qgi1i.fsf@tines.lan> NNTP-Posting-Host: plane.gmane.org Mime-Version: 1.0 Content-Type: multipart/mixed; boundary="=-=-=" X-Trace: ger.gmane.org 1351999935 1365 80.91.229.3 (4 Nov 2012 03:32:15 GMT) X-Complaints-To: usenet@ger.gmane.org NNTP-Posting-Date: Sun, 4 Nov 2012 03:32:15 +0000 (UTC) To: guile-devel@gnu.org Original-X-From: guile-devel-bounces+guile-devel=m.gmane.org@gnu.org Sun Nov 04 04:32:24 2012 Return-path: Envelope-to: guile-devel@m.gmane.org Original-Received: from lists.gnu.org ([208.118.235.17]) by plane.gmane.org with esmtp (Exim 4.69) (envelope-from ) id 1TUqwi-0004Ar-0A for guile-devel@m.gmane.org; Sun, 04 Nov 2012 04:32:24 +0100 Original-Received: from localhost ([::1]:57335 helo=lists.gnu.org) by lists.gnu.org with esmtp (Exim 4.71) (envelope-from ) id 1TUqwZ-0007HY-1K for guile-devel@m.gmane.org; Sat, 03 Nov 2012 23:32:15 -0400 Original-Received: from eggs.gnu.org ([208.118.235.92]:34596) by lists.gnu.org with esmtp (Exim 4.71) (envelope-from ) id 1TUqwX-0007HS-0C for guile-devel@gnu.org; Sat, 03 Nov 2012 23:32:13 -0400 Original-Received: from Debian-exim by eggs.gnu.org with spam-scanned (Exim 4.71) (envelope-from ) id 1TUqwV-0007UO-QL for guile-devel@gnu.org; Sat, 03 Nov 2012 23:32:12 -0400 Original-Received: from world.peace.net ([96.39.62.75]:52515) by eggs.gnu.org with esmtp (Exim 4.71) (envelope-from ) id 1TUqwV-0007UJ-ID for guile-devel@gnu.org; Sat, 03 Nov 2012 23:32:11 -0400 Original-Received: from 209-6-91-212.c3-0.smr-ubr1.sbo-smr.ma.cable.rcn.com ([209.6.91.212] helo=tines.lan) by world.peace.net with esmtpsa (TLS1.0:DHE_RSA_AES_128_CBC_SHA1:16) (Exim 4.72) (envelope-from ) id 1TUqwM-0005yl-QR; Sat, 03 Nov 2012 23:32:03 -0400 X-detected-operating-system: by eggs.gnu.org: GNU/Linux 2.6.x X-Received-From: 96.39.62.75 X-BeenThere: guile-devel@gnu.org X-Mailman-Version: 2.1.14 Precedence: list List-Id: "Developers list for Guile, the GNU extensibility library" List-Unsubscribe: , List-Archive: List-Post: List-Help: List-Subscribe: , Errors-To: guile-devel-bounces+guile-devel=m.gmane.org@gnu.org Original-Sender: guile-devel-bounces+guile-devel=m.gmane.org@gnu.org Xref: news.gmane.org gmane.lisp.guile.devel:15079 Archived-At: --=-=-= Content-Type: text/plain Hello all, Any objections to adding ".guile.sls" and ".sls" to Guile's default %load-extensions? Ian Price tells me that this naming convention is commonly followed for R6RS libraries and implementations, e.g. Racket, Mosh, Ikarus, and Ypsilon. It would facilitate easy use of R6RS libraries without having to rename the files. I'm inclined to go along. What do you think? Mark --=-=-= Content-Type: text/x-diff Content-Disposition: inline; filename=0001-Add-.guile.sls-and-.sls-to-the-default-load-extensio.patch Content-Description: [PATCH] Add ".guile.sls" and ".sls" to the default %load-extensions >From fb87359d058e0810158019cbd958f60fcabcb9bd Mon Sep 17 00:00:00 2001 From: Mark H Weaver Date: Sat, 3 Nov 2012 23:11:46 -0400 Subject: [PATCH] Add ".guile.sls" and ".sls" to the default %load-extensions. * libguile/load.c (scm_init_load): Add ".guile.sls" and ".sls" to the default %load-extensions. --- libguile/load.c | 4 +++- 1 file changed, 3 insertions(+), 1 deletion(-) diff --git a/libguile/load.c b/libguile/load.c index af2ca45..1a03a87 100644 --- a/libguile/load.c +++ b/libguile/load.c @@ -1031,7 +1031,9 @@ scm_init_load () scm_loc_load_path = SCM_VARIABLE_LOC (scm_c_define ("%load-path", SCM_EOL)); scm_loc_load_extensions = SCM_VARIABLE_LOC (scm_c_define ("%load-extensions", - scm_list_2 (scm_from_locale_string (".scm"), + scm_list_4 (scm_from_locale_string (".scm"), + scm_from_locale_string (".guile.sls"), + scm_from_locale_string (".sls"), scm_nullstr))); scm_loc_load_compiled_path = SCM_VARIABLE_LOC (scm_c_define ("%load-compiled-path", SCM_EOL)); -- 1.7.10.4 --=-=-=--