Implement quote block.

This commit is contained in:
Tom Alexander 2023-12-30 20:53:20 -05:00
parent 3a6fc5b669
commit 03c8c07fe0
Signed by: talexander
GPG Key ID: D3A179C9A53C0EDE

View File

@ -6,6 +6,7 @@ use super::macros::to_wasm;
use super::to_wasm::ToWasm;
use super::AdditionalProperties;
use crate::compare::ElispFact;
use crate::types::GetAffiliatedKeywords;
use crate::types::QuoteBlock;
use crate::wasm::to_wasm::ToWasmStandardProperties;
@ -21,8 +22,12 @@ to_wasm!(
original,
wasm_context,
{ WasmAstNode::QuoteBlock(original) },
{ "TODO".into() },
{ "quote-block".into() },
{
let additional_properties = original
.get_affiliated_keywords()
.to_wasm(wasm_context.clone())?;
let children = original
.children
.iter()
@ -36,7 +41,7 @@ to_wasm!(
Ok((
children,
WasmQuoteBlock {
additional_properties: AdditionalProperties::default(),
additional_properties,
},
))
}