fix append_path hack to specify the right type; should fix this by using MzScheme exports, eventually

svn: r4924
This commit is contained in:
Matthew Flatt 2006-11-23 01:49:29 +00:00
parent a21214a558
commit 1a4df0fa70

View File

@ -2370,7 +2370,7 @@ static Scheme_Object *append_path(Scheme_Object *a, Scheme_Object *b)
{
Scheme_Object *s;
s = scheme_append_byte_string(a, b);
s->type = scheme_path_type;
s->type = SCHEME_PLATFORM_PATH_KIND;
return s;
}