mirror of
https://github.com/justinethier/cyclone.git
synced 2025-05-30 07:25:05 +02:00
Fix string_type transport, to avoid wasted space
This commit is contained in:
parent
b3ca496e9a
commit
a47869a43f
1 changed files with 1 additions and 1 deletions
|
@ -2065,7 +2065,7 @@ char *transport(x, gcgen) char *x; int gcgen;
|
||||||
dhallocp += len + 1;
|
dhallocp += len + 1;
|
||||||
}
|
}
|
||||||
forward(x) = nx; type_of(x) = forward_tag;
|
forward(x) = nx; type_of(x) = forward_tag;
|
||||||
x = (char *) nx; allocp = ((char *) nx)+sizeof(integer_type);
|
x = (char *) nx; allocp = ((char *) nx)+sizeof(string_type);
|
||||||
return (char *) nx;}
|
return (char *) nx;}
|
||||||
case integer_tag:
|
case integer_tag:
|
||||||
{register integer_type *nx = (integer_type *) allocp;
|
{register integer_type *nx = (integer_type *) allocp;
|
||||||
|
|
Loading…
Add table
Reference in a new issue