--- a/src/JavaNativeMemory.st	Wed Jul 11 09:40:08 2012 +0000
+++ b/src/JavaNativeMemory.st	Mon Jul 16 15:00:31 2012 +0000
@@ -161,16 +161,18 @@
     "Created: / 11-07-2012 / 10:13:08 / Jan Vrany <jan.vrany@fit.cvut.cz>"
 !
 
-longAt:address
-    ^(self chunkFor: address) longAt: address
+sint64At:address
+    "Returns signed 64bit integer at given address"
+    ^(self chunkFor: address) sint64At: address
 
-    "Created: / 10-07-2012 / 19:01:25 / Jan Vrany <jan.vrany@fit.cvut.cz>"
+    "Created: / 16-07-2012 / 16:00:39 / Jan Vrany <jan.vrany@fit.cvut.cz>"
 !
 
-longAt:address put: value
-    (self chunkFor: address) longAt: address put: value
+sint64At:address put: value
+    "Stores signed 64bit integer at given address"
+    ^(self chunkFor: address) sint64At: address put: value
 
-    "Created: / 09-12-2010 / 17:32:02 / Jan Vrany <jan.vrany@fit.cvut.cz>"
+    "Created: / 16-07-2012 / 16:00:57 / Jan Vrany <jan.vrany@fit.cvut.cz>"
 ! !
 
 !JavaNativeMemory methodsFor:'byte transfer'!
@@ -384,16 +386,20 @@
     "Created: / 11-07-2012 / 10:12:31 / Jan Vrany <jan.vrany@fit.cvut.cz>"
 !
 
-longAt:address
-    ^data longAt: address - base
+sint64At:address
+    "Returns signed 64bit integer at given address"
 
-    "Created: / 10-07-2012 / 19:01:25 / Jan Vrany <jan.vrany@fit.cvut.cz>"
+    ^data longLongAt: address
+
+    "Created: / 16-07-2012 / 16:00:39 / Jan Vrany <jan.vrany@fit.cvut.cz>"
 !
 
-longAt:address put: value
-    data longAt: address - base put: value
+sint64At:address put: value
+    "Stores signed 64bit integer at given address"
 
-    "Created: / 09-12-2010 / 17:32:02 / Jan Vrany <jan.vrany@fit.cvut.cz>"
+    ^ data longLongAt: address put: value.
+
+    "Created: / 16-07-2012 / 16:00:57 / Jan Vrany <jan.vrany@fit.cvut.cz>"
 ! !
 
 !JavaNativeMemory::MallocatedMemoryChunk methodsFor:'byte transfer'!