[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[Guile-commits] 06/07: Allow peval to gnaw on string->symbol, symbol->st
From: |
Andy Wingo |
Subject: |
[Guile-commits] 06/07: Allow peval to gnaw on string->symbol, symbol->string |
Date: |
Fri, 5 Jan 2018 09:25:25 -0500 (EST) |
wingo pushed a commit to branch master
in repository guile.
commit a8210424803ffb777325bb4b8d2e358685a634be
Author: Andy Wingo <address@hidden>
Date: Fri Jan 5 15:17:46 2018 +0100
Allow peval to gnaw on string->symbol, symbol->string
* module/language/tree-il/primitives.scm (*interesting-primitive-names*):
(*effect-free-primitives*): Add string->symbol and symbol->string.
---
module/language/tree-il/primitives.scm | 5 ++++-
1 file changed, 4 insertions(+), 1 deletion(-)
diff --git a/module/language/tree-il/primitives.scm
b/module/language/tree-il/primitives.scm
index c9e1fc0..934b5c7 100644
--- a/module/language/tree-il/primitives.scm
+++ b/module/language/tree-il/primitives.scm
@@ -1,6 +1,6 @@
;;; open-coding primitive procedures
-;; Copyright (C) 2009-2015, 2017 Free Software Foundation, Inc.
+;; Copyright (C) 2009-2015, 2017-2018 Free Software Foundation, Inc.
;;;; This library is free software; you can redistribute it and/or
;;;; modify it under the terms of the GNU Lesser General Public
@@ -54,6 +54,8 @@
pair? null? list? symbol? vector? string? struct? number? char? nil?
bytevector? keyword? bitvector?
+ symbol->string string->symbol
+
procedure? thunk?
complex? real? rational? inf? nan? integer? exact? inexact? even? odd?
@@ -178,6 +180,7 @@
exact-integer?
char<? char<=? char>=? char>?
integer->char char->integer number->string string->number
+ symbol->string string->symbol
struct-vtable
length string-length vector-length bytevector-length
;; These all should get expanded out by expand-primitives.
- [Guile-commits] branch master updated (118f516 -> 7486806), Andy Wingo, 2018/01/05
- [Guile-commits] 03/07: Prevent LICM of memory accesses guarded by effect-free predicates, Andy Wingo, 2018/01/05
- [Guile-commits] 06/07: Allow peval to gnaw on string->symbol, symbol->string,
Andy Wingo <=
- [Guile-commits] 04/07: Allow peeling loops with bailouts, Andy Wingo, 2018/01/05
- [Guile-commits] 02/07: Disable resolve-primitives pass below -O2, Andy Wingo, 2018/01/05
- [Guile-commits] 05/07: Instruction explosion for vector-{length, ref, set!}, Andy Wingo, 2018/01/05
- [Guile-commits] 01/07: Add (system base optimize) module, Andy Wingo, 2018/01/05
- [Guile-commits] 07/07: Improve compilation of make-vector without init, Andy Wingo, 2018/01/05