changed order in LIST, ReadString from InOut still did not work right
This commit is contained in:
parent
9e55f02c3b
commit
300623ac88
|
@ -316,6 +316,7 @@ IMPLEMENTATION MODULE InOut ;
|
||||||
IF NOT Done THEN
|
IF NOT Done THEN
|
||||||
RETURN;
|
RETURN;
|
||||||
END;
|
END;
|
||||||
|
UnRead(ch);
|
||||||
REPEAT
|
REPEAT
|
||||||
Read(ch);
|
Read(ch);
|
||||||
termCH := ch;
|
termCH := ch;
|
||||||
|
|
|
@ -15,9 +15,9 @@ Conversion.mod
|
||||||
Semaphores.mod
|
Semaphores.mod
|
||||||
random.mod
|
random.mod
|
||||||
Strings.mod
|
Strings.mod
|
||||||
Arguments.c
|
|
||||||
catch.c
|
catch.c
|
||||||
Traps.mod
|
Traps.mod
|
||||||
|
Arguments.c
|
||||||
LtoUset.e
|
LtoUset.e
|
||||||
StrAss.c
|
StrAss.c
|
||||||
absd.c
|
absd.c
|
||||||
|
|
Loading…
Reference in a new issue