vishapoberon/compiler
1
0
Fork 0
mirror of https://github.com/vishapoberon/compiler.git synced 2026-04-06 18:02:25 +00:00
Code Issues Projects Releases Packages Wiki Activity Actions

sometimes it can crash because of this line. commented for now. fonts

Browse source 
are not necessary anyway.


Former-commit-id: 815795588b
This commit is contained in:
norayr 2015-10-12 20:31:28 +04:00
parent df223b96a4
commit 7607ee8651
3 changed files with 3 additions and 3 deletions
Download patch file Download diff file Expand all files Collapse all files

2
src/lib/v4/Texts.Mod
View file

@ -744,7 +744,7 @@ MODULE Texts; (** CAS/HM 23.9.93 -- interface based on Texts by JG/NW 6.12.91**
IF plen > 0 THEN NEW(p); p.file := f; p.org := pos; p.ascii := FALSE; un := p; un.len := plen IF plen > 0 THEN NEW(p); p.file := f; p.org := pos; p.ascii := FALSE; un := p; un.len := plen
ELSE LoadElem(msg.r, pos - org, -plen, e); un := e; un.len := 1 ELSE LoadElem(msg.r, pos - org, -plen, e); un := e; un.len := 1
END; END;
un.fnt := fnts[fno]; un.col := col; un.voff := voff; (*un.fnt := fnts[fno];*) un.col := col; un.voff := voff;
INC(pos, un.len); u.next := un; un.prev := u; u := un; Files.Read(msg.r, fno) INC(pos, un.len); u.next := un; un.prev := u; u := un; Files.Read(msg.r, fno)
END; END;
u.next := T.head; T.head.prev := u; T.cache := T.head; T.corg := 0; u.next := T.head; T.head.prev := u; T.cache := T.head; T.corg := 0;

2
src/lib/v4/Texts0.Mod
View file

@ -761,7 +761,7 @@ MODULE Texts0; (** CAS/HM 23.9.93 -- interface based on Texts by JG/NW 6.12.91*
IF plen > 0 THEN NEW(p); p.file := f; p.org := pos; p.ascii := FALSE; un := p; un.len := plen IF plen > 0 THEN NEW(p); p.file := f; p.org := pos; p.ascii := FALSE; un := p; un.len := plen
ELSE LoadElem(msg.r, pos - org, -plen, e); un := e; un.len := 1 ELSE LoadElem(msg.r, pos - org, -plen, e); un := e; un.len := 1
END; END;
un.fnt := fnts[fno]; un.col := col; un.voff := voff; (*un.fnt := fnts[fno];*) un.col := col; un.voff := voff;
INC(pos, un.len); u.next := un; un.prev := u; u := un; Files.Read(msg.r, fno) INC(pos, un.len); u.next := un; un.prev := u; u := un; Files.Read(msg.r, fno)
END; END;
u.next := T.head; T.head.prev := u; T.cache := T.head; T.corg := 0; u.next := T.head; T.head.prev := u; T.cache := T.head; T.corg := 0;

2
vocstatic.linux.gcc.x86_64.REMOVED.git-id
View file

@ -1 +1 @@
a113ad22927e0094e5f94f603c617f48146ed169 da9e240374a49ee39c08857a483a931dcbd48906