• R/O
  • SSH

quipu: 提交

quipu mercurial repository


Commit MetaInfo

修订版2df4115890b5486c5641a389f0cc77adede1f3b9 (tree)
时间2018-11-17 01:10:29
作者Agustina Arzille <avarzille@rise...>
CommiterAgustina Arzille

Log Message

Some corrections

更改概述

差异

diff -r 7df1ca0a1b30 -r 2df4115890b5 bytecode.cpp
--- a/bytecode.cpp Fri Nov 16 04:22:04 2018 +0000
+++ b/bytecode.cpp Fri Nov 16 13:10:29 2018 -0300
@@ -168,8 +168,11 @@
168168 }
169169 else
170170 {
171+ io_info info;
172+
173+ info.flags &= ~io_info::FLG_RAW;
171174 strm->putb (interp, ' ');
172- xwrite (interp, strm, val);
175+ xwrite (interp, strm, val, info);
173176 }
174177 }
175178
diff -r 7df1ca0a1b30 -r 2df4115890b5 compiler.cpp
--- a/compiler.cpp Fri Nov 16 04:22:04 2018 +0000
+++ b/compiler.cpp Fri Nov 16 13:10:29 2018 -0300
@@ -32,7 +32,9 @@
3232
3333 int operator() (intptr_t left, intptr_t right) const
3434 {
35- return (xcmp (this->ip, (object)left, (object)right));
35+ return (itype (left) != itype (right) ?
36+ itype (left) - itype (right) :
37+ xcmp (this->ip, (object)left, (object)right));
3638 }
3739 };
3840
diff -r 7df1ca0a1b30 -r 2df4115890b5 defs.h
--- a/defs.h Fri Nov 16 04:22:04 2018 +0000
+++ b/defs.h Fri Nov 16 13:10:29 2018 -0300
@@ -373,37 +373,6 @@
373373
374374 #endif
375375
376-#if defined (QP_ARCH_I386) || defined (QP_ARCH_X8664) || \
377- defined (QP_ARCH_X32) || defined (QP_ARCH_ARM64)
378-
379-// On x86 and aarch64, we can use unaligned access.
380-
381-inline uint16_t
382-get16 (const void *__ptr)
383-{
384- return (*(const uint16_t *)__ptr);
385-}
386-
387-inline uint32_t
388-get32 (const void *__ptr)
389-{
390- return (*(const uint32_t *)__ptr);
391-}
392-
393-inline void
394-put16 (void *__ptr, uint32_t __val)
395-{
396- *(uint16_t *)__ptr = (uint16_t)__val;
397-}
398-
399-inline void
400-put32 (void *__ptr, uint32_t __val)
401-{
402- *(uint32_t *)__ptr = __val;
403-}
404-
405-#else
406-
407376 inline uint16_t
408377 get16 (const void *__ptr)
409378 {
@@ -433,8 +402,6 @@
433402 memcpy (__ptr, &__val, sizeof (__val));
434403 }
435404
436-#endif
437-
438405 // Return value for builtins - Assumes 'interp' is bound.
439406 #define qp_return(val) return (interp->retval = (val))
440407
Show on old repository browser