[Top][All Lists]
[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[Guile-commits] GNU Guile branch, string_abstraction2, updated. release_
From: |
Michael Gran |
Subject: |
[Guile-commits] GNU Guile branch, string_abstraction2, updated. release_1-9-1-143-g073f04e |
Date: |
Wed, 12 Aug 2009 07:40:22 +0000 |
This is an automated email from the git hooks/post-receive script. It was
generated because a ref change was pushed to the repository containing
the project "GNU Guile".
http://git.savannah.gnu.org/cgit/guile.git/commit/?id=073f04e57d052ea740ffb097182cad7d2c2a702a
The branch, string_abstraction2 has been updated
via 073f04e57d052ea740ffb097182cad7d2c2a702a (commit)
from 78647c15f003812f26056c879fb0b7120d35ab80 (commit)
Those revisions listed above that are new to this repository have
not appeared on any other notification email; so we list those
revisions in full, below.
- Log -----------------------------------------------------------------
commit 073f04e57d052ea740ffb097182cad7d2c2a702a
Author: Michael Gran <address@hidden>
Date: Wed Aug 12 00:29:58 2009 -0700
Fix disassembly of strings and symbols, for real this time
* module/language/assembly/decompile-bytecode.scm (decode-bytecode):
pop bytes in order
-----------------------------------------------------------------------
Summary of changes:
module/language/assembly/decompile-bytecode.scm | 8 ++++----
1 files changed, 4 insertions(+), 4 deletions(-)
diff --git a/module/language/assembly/decompile-bytecode.scm
b/module/language/assembly/decompile-bytecode.scm
index 2f58422..a05db53 100644
--- a/module/language/assembly/decompile-bytecode.scm
+++ b/module/language/assembly/decompile-bytecode.scm
@@ -99,10 +99,10 @@
(define (get1 bytes-per-char)
(if (= bytes-per-char 1)
(pop)
- (let ((a (pop))
- (b (pop))
- (c (pop))
- (d (pop)))
+ (let* ((a (pop))
+ (b (pop))
+ (c (pop))
+ (d (pop)))
(if (= byte-order 1234)
(+ (ash d 24) (ash c 16) (ash b 8) a)
(+ (ash a 24) (ash b 16) (ash c 8) d)))))
hooks/post-receive
--
GNU Guile
[Prev in Thread] |
Current Thread |
[Next in Thread] |
- [Guile-commits] GNU Guile branch, string_abstraction2, updated. release_1-9-1-143-g073f04e,
Michael Gran <=