#BUGFIX by stefan
class: PositionableStream
changed: #upTo:
include stdlib.h (for bcc)
--- a/PositionableStream.st Fri Oct 25 12:29:42 2019 +0200
+++ b/PositionableStream.st Fri Oct 25 12:44:56 2019 +0200
@@ -1,5 +1,3 @@
-"{ Encoding: utf8 }"
-
"
COPYRIGHT (c) 1989 by Claus Gittinger
All Rights Reserved
@@ -131,7 +129,6 @@
^ self == PositionableStream
! !
-
!PositionableStream methodsFor:'Compatibility-Dolphin'!
endChunk
@@ -776,7 +773,8 @@
upTo:anObject
|anObjectIsCharacter|
%{
-#include <sys/types.h>
+
+#include <stdlib.h>
if (__isCharacter(anObject)) {
unsigned int ch = __intVal(__characterVal(anObject));
@@ -784,7 +782,7 @@
anObjectIsCharacter = true;
- if (__isStringLike(_collection) && ch <= 0xFF) {
+ if (__isStringLike(_coll) && ch <= 0xFF) {
int _startPos = __intVal(__INST(position));
int _endIndex = __stringSize(_coll);
char *startPtr = __stringVal(_coll) + _startPos;
@@ -852,7 +850,7 @@
"
"Modified: / 22-03-2019 / 03:01:19 / Claus Gittinger"
- "Modified: / 22-10-2019 / 19:27:35 / Stefan Vogel"
+ "Modified: / 25-10-2019 / 12:30:36 / Stefan Vogel"
!
upToAll:aCollection