fixed: beginpart must divert main stream
This commit is contained in:
parent
52d3ee55e2
commit
d763d3ddeb
1 changed files with 4 additions and 0 deletions
|
@ -22,6 +22,7 @@ int d;
|
||||||
char *s;
|
char *s;
|
||||||
swtxt();
|
swtxt();
|
||||||
|
|
||||||
|
C_jump(extnd_main( d));
|
||||||
symbol_definition(s = extnd_part( d));
|
symbol_definition(s = extnd_part( d));
|
||||||
set_local_visible(s);
|
set_local_visible(s);
|
||||||
}
|
}
|
||||||
|
@ -31,9 +32,12 @@ C_endpart( d)
|
||||||
int d;
|
int d;
|
||||||
|
|
||||||
{
|
{
|
||||||
|
char *s;
|
||||||
swtxt();
|
swtxt();
|
||||||
|
|
||||||
C_jump(extnd_cont( d));
|
C_jump(extnd_cont( d));
|
||||||
|
symbol_definition(s = extnd_main( d));
|
||||||
|
set_local_visible(s);
|
||||||
}
|
}
|
||||||
|
|
||||||
|
|
||||||
|
|
Loading…
Reference in a new issue