summaryrefslogtreecommitdiff
path: root/modules/language/python/compile.scm
diff options
context:
space:
mode:
authorStefan Israelsson Tampe <stefan.itampe@gmail.com>2017-10-12 22:08:26 +0200
committerStefan Israelsson Tampe <stefan.itampe@gmail.com>2017-10-12 22:08:26 +0200
commit7852343a565da36a09340306a57cae9d3239337a (patch)
tree127033771a25e81e6680edb2d089a2985c40e0f1 /modules/language/python/compile.scm
parent5da3350872568366fc8da10310ce9249491875d3 (diff)
bytevectors
Diffstat (limited to 'modules/language/python/compile.scm')
-rw-r--r--modules/language/python/compile.scm6
1 files changed, 4 insertions, 2 deletions
diff --git a/modules/language/python/compile.scm b/modules/language/python/compile.scm
index b7a52b2..ab9b8f6 100644
--- a/modules/language/python/compile.scm
+++ b/modules/language/python/compile.scm
@@ -597,8 +597,10 @@
'(values)))
(#:string
- ((#:string #f x)
- x))
+ ((#:string p x)
+ (if (or (equal? p "r") (equal? p "R"))
+ `((@ (language python str) str) ,x)
+ x)))
(#:+
((_ . l)