upd: add list component

packages/block-data/src/components/index.ts

@@ -73,6 +73,18 @@ export default {
     ],
   ),
 
+  list: component(
+    "List",
+    "ListModel",
+    content("inner", "as-socket", Direction.BOTTOM),
+    input("data", "iterable"),
+    output("current", "unknown", "as-socket", Direction.RIGHT),
+    [],
+    [],
+    [],
+    [textProp("class"), textProp("key", "$index")],
+  ),
+
   forEach: component(
     "For each",
     "ForEachModel",

packages/runtime/src/index.ts

@@ -4,12 +4,12 @@ export * from "./div.r";
 export * from "./forEach.r";
 export * from "./ifElse.r";
 export * from "./input.r";
+export * from "./list.r";
 export * from "./paragraph.r";
 export * from "./span.r";
 export * from "./textNode.r";
 
 import QuasiRuntime from "./plugin";
 export default QuasiRuntime;
 
-import * as refina from "refina";
-export { refina };
+export * as refina from "refina";

packages/runtime/src/list.r.ts

@@ -0,0 +1,31 @@
+import { ComponentContext, Content, OutputComponent, byIndex, byProp, bySelf } from "refina";
+import QuasiRuntime from "./plugin";
+
+export interface ListProps {
+  inner: Content;
+  class: string;
+  data: Iterable<any>;
+  key: string;
+}
+
+export class ListModel {
+  current: any;
+}
+
+@QuasiRuntime.outputComponent("list")
+export class QList extends OutputComponent {
+  main(_: ComponentContext<this>, model: ListModel, props: ListProps): void {
+    _.$cls(props.class);
+    _.mdList(props.data, props.key === "$index" ? byIndex : props.key === "$self" ? bySelf : byProp(props.key), v => {
+      model.current = v;
+      _.embed(props.inner);
+    });
+    model.current = null;
+  }
+}
+
+declare module "refina" {
+  interface OutputComponents {
+    list: QList;
+  }
+}