From e65e734e5df3746ffb7df2cc9fa33826e0083fcd Mon Sep 17 00:00:00 2001 From: Eduardo Julian Date: Sun, 6 May 2018 03:30:47 -0400 Subject: - Re-named shift-left -> left-shift, shift-right -> logical-right-shift, signed-shift-right -> arithmetic-right-shift. --- new-luxc/source/luxc/lang/translation/r/eval.jvm.lux | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) (limited to 'new-luxc/source/luxc/lang/translation/r/eval.jvm.lux') diff --git a/new-luxc/source/luxc/lang/translation/r/eval.jvm.lux b/new-luxc/source/luxc/lang/translation/r/eval.jvm.lux index 5685ae05e..05d16f871 100644 --- a/new-luxc/source/luxc/lang/translation/r/eval.jvm.lux +++ b/new-luxc/source/luxc/lang/translation/r/eval.jvm.lux @@ -94,9 +94,9 @@ high (get-int-32 (:! IntArrayVector high)) low (get-int-32 (:! IntArrayVector low))]] (wrap (:! Int - (n/+ (|> high (bit.shift-left +32)) + (n/+ (|> high (bit.left-shift +32)) (if (i/< 0 (:! Int low)) - (|> low (bit.shift-left +32) (bit.shift-right +32)) + (|> low (bit.left-shift +32) (bit.logical-right-shift +32)) low)))))) (def: (lux-object host-object) -- cgit v1.2.3