Update viewer of include

IBM · Sep 30, 2024 · 2bdaa1d · 2bdaa1d
1 parent 34c57d5
commit 2bdaa1d
Showing 1 changed file with 6 additions and 3 deletions.
diff --git a/pdl-live/src/pdl_viewer.ts b/pdl-live/src/pdl_viewer.ts
@@ -90,7 +90,7 @@ export function show_array(array: PdlBlocks) {
   match(array)
     .with(P.array(P._), data => {
       for (const doc of data) {
-        const child = show_blocks('lastOf', doc);
+        const child = show_lastOf(doc);
         doc_fragment.appendChild(child);
         doc_fragment.appendChild(comma);
       }
@@ -183,9 +183,12 @@ export function show_block(data: PdlBlock) {
       body.appendChild(show_result_or_code(data));
     })
     .with({kind: 'include'}, data => {
-      // TODO
       body.classList.add('pdl_include');
-      body.appendChild(show_result_or_code(data));
+      if (data.trace) {
+        body.appendChild(show_program(data.trace));
+      } else {
+        body.appendChild(show_result_or_code(data));
+      }
     })
     .with({kind: 'function'}, _ => {
       // TODO