Embed pointer values into Values

This commit is contained in:
Tony Garnock-Jones 2021-04-25 00:09:33 +02:00
parent 58d2bf6f3a
commit 2d0e6255bd
1 changed files with 1 additions and 1 deletions

View File

@ -104,7 +104,7 @@ function unconverterFor(ctx: FunctionContext, p: M.Pattern, src: string, t: Simp
case 'lit':
return ctx.mod.literal(p.value);
case 'pointer':
return `${src}`;
return `_.embed(${src})`;
case 'Ref':
return M.lookup(
refPosition(p.value), p.value, ctx.mod.env,