Accept literal values able to __as_preserve__ themselves
This commit is contained in:
parent
074568bb91
commit
c66168206b
|
@ -503,7 +503,7 @@ export function compilePattern(pattern: ValuePattern): StaticAnalysis {
|
|||
return template`(__SYNDICATE__.QuasiValue.bind(${walk(pattern.inner)}))`;
|
||||
}
|
||||
case 'PConstant':
|
||||
return template`(__SYNDICATE__.QuasiValue.lit(${pattern.value}))`;
|
||||
return template`(__SYNDICATE__.QuasiValue.lit(__SYNDICATE__.fromJS(${pattern.value})))`;
|
||||
case 'PConstructor': {
|
||||
const pieces = [template`${pattern.ctor}`, ... pattern.arguments.map(walk)];
|
||||
return template`(__SYNDICATE__.QuasiValue.ctor(${commaJoin(pieces)}))`;
|
||||
|
|
Loading…
Reference in New Issue