bug#39196: patch

2020-01-19 Thread Matt Wette

Here is a patch to make it work.

--- module/system/repl/command.scm-orig    2020-01-19 13:46:55.041867060 
-0800

+++ module/system/repl/command.scm    2020-01-19 13:48:02.982264244 -0800
@@ -30,7 +30,7 @@
   #:use-module (system vm program)
   #:use-module (system vm trap-state)
   #:use-module (system vm vm)
-  #:autoload (system base language) (lookup-language language-reader)
+  #:autoload (system base language) (lookup-language language-reader 
language-title language-name)

   #:autoload (system vm trace) (call-with-trace)
   #:use-module (ice-9 format)
   #:use-module (ice-9 session)






bug#39196: ,L brainfuck : not working in 3.0.0

2020-01-19 Thread Matt Wette

scheme@(guile-user)> (version)
$4 = "3.0.0"
scheme@(guile-user)> ,L brainfuck
While executing meta-command:
Unbound variable: language-title


noting change to system/base/syntax.scm:
< ;; Copyright (C) 2001, 2009, 2016 Free Software Foundation, Inc
---
> ;; Copyright (C) 2001, 2009, 2016, 2019 Free Software Foundation, Inc
68c68
<    (define ,name (make-record-type ,(symbol->string name) ',slot-names
---
>    (define ,name (make-record-type ',name ',slot-names
101c101
<    (define ,name (make-record-type ,(symbol->string name) ',slot-names
---
>    (define ,name (make-record-type ',name ',slot-names