mirror of
https://github.com/vishapoberon/compiler.git
synced 2026-04-06 01:42:24 +00:00
applied changes for the issue #61, with the @jtempl fix 9e3e13af63
This commit is contained in:
parent
bad584ec32
commit
2ec7f3277a
186 changed files with 196 additions and 196 deletions
|
|
@ -723,7 +723,7 @@ MODULE OPV; (* J. Templ 16.2.95 / 3.7.96
|
|||
design(d, MinPrec); OPM.WriteString(" = __NEWARR(");
|
||||
WHILE base^.comp = OPT.Array DO INC(nofdim); base := base^.BaseTyp END ;
|
||||
IF (base^.comp = OPT.Record) & (OPC.NofPtrs(base) # 0) THEN
|
||||
OPC.Ident(base^.strobj); OPM.WriteString(DynTypExt)
|
||||
OPC.Andent(base); OPM.WriteString(DynTypExt)
|
||||
ELSIF base^.form = OPT.Pointer THEN OPM.WriteString("POINTER__typ")
|
||||
ELSE OPM.WriteString("NIL")
|
||||
END ;
|
||||
|
|
|
|||
Loading…
Add table
Add a link
Reference in a new issue