Added some more tests

src/pluto/reader/errors.cljc

@@ -14,6 +14,7 @@
                    ::invalid-assoc-type
                    ::invalid-reference
                    ::invalid-destructuring-format
+                   ::missing-property
                    ::missing-keys
                    ::unknown-reference
                    ::unknown-reference-type

src/pluto/reader/types.cljc

@@ -64,7 +64,7 @@
         errors))
     (if optional?
       (update m :data #(if (empty? %) {} %))
-      (assoc m :errors [(errors/error ::errors/invalid-type-name name)]))))
+      (assoc m :errors [(errors/error ::errors/missing-property name)]))))
 
 (defmethod resolve :assoc [ctx ext type value]
   (if (map? type)

test/pluto/reader/hooks_test.cljc

@@ -27,7 +27,7 @@
     (let [app-hooks (hooks {:name :string :id :keyword})]
       (is (= {:data {:hooks {:main {:a {:parsed   {:name "name"}
                                         :hook-ref (:main app-hooks)}}}}
-              :errors [{::errors/type  ::errors/invalid-type-name
+              :errors [{::errors/type  ::errors/missing-property
                         ::errors/value :id}]}
              (hooks/parse {:capacities {:hooks app-hooks}}
                           {'hooks/main.a {:name "name"}}))))

test/pluto/reader/types_test.cljc

@@ -81,6 +81,17 @@
   (is (= {:data {:scopes [{:scope :one}]}}
          (types/resolve {} {} {:scopes [{:scope {:one-of #{:one :two :three}}}]}
                              {:scopes [{:scope :one}]})))
+  (is (= {:data {:students [{:firstname "John" :lastname "Doe"}]}}
+         (types/resolve {} {} {:students [{:firstname :string :lastname :string :name? :string}]}
+                              {:students [{:firstname "John" :lastname "Doe"}]})))
+  (is (= '[text nil]
+         (let [m (types/resolve {} '{views/screen [text]} {:screen :view :students [{:firstname :string :lastname :string :name? :string}]}
+                                   {:screen ['screen] :students [{:firstname "John" :lastname "Doe"}]})]
+           ((get-in m [:data :screen]) {}))))
+  (is (= '[text nil]
+         (let [m (types/resolve {} '{views/screen [text]} {:screen? :view :students [{:firstname :string :lastname :string :name? :string}]}
+                                   {:screen ['screen] :students [{:firstname "John" :lastname "Doe" :name "Henry"}]})]
+           ((get-in m [:data :screen]) {}))))
   (is (= {:data {:name     "hello"
                  :children [{:name "name" :scopes [{:scope :one}]}
                             {:name "name" :scopes [{:scope :two}]}]}}

website/pages/try.html

@@ -17,7 +17,7 @@
     const ipfs = new window.Ipfs();
 
     async function load() {
-      const buffer = await loadIPFS(ipfs, "QmSQnPcpzuk9ij9Vq5crEUNomBvHn8CB99j7gcCtfF2UdJ");
+      const buffer = await loadIPFS(ipfs, "QmVkhWzxTM9kmZANcUnzrfrzN5qg3Qh7GqZDQtX1E1JPE4");
       return buffer.toString();
     }