--- a/ExternalLong.st	Mon Mar 14 18:45:48 2016 +0100
+++ b/ExternalLong.st	Tue Mar 15 22:45:53 2016 +0100
@@ -138,7 +138,7 @@
 
     |result|
 
-    result := self wordAt:1 MSB:false.
+    result := self unsignedInt16At:1 MSB:false.
     result = 0 ifTrue:[ ^ #SQL_NO_NULLS ].
     result = 1 ifTrue:[ ^ #SQL_NULLABLE ].
     ^ #SQL_NULLABLE_UNKNOWN
@@ -206,10 +206,10 @@
 !ExternalLong class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libbasic2/ExternalLong.st,v 1.14 2015-04-24 12:18:20 stefan Exp $'
+    ^ '$Header$'
 !
 
 version_CVS
-    ^ '$Header: /cvs/stx/stx/libbasic2/ExternalLong.st,v 1.14 2015-04-24 12:18:20 stefan Exp $'
+    ^ '$Header$'
 ! !