pyret-embed 0.1.7 → 0.1.9

package/dist/build/web/js/cpo-main.jarr

@@ -1,4 +1,4 @@
 [diffend] Oversized file quarantined before diffing.
 name: package/dist/build/web/js/cpo-main.jarr
-size: 39417727 bytes
-sha256: a6b0d42c360be26d9d7292b2d8b0fb5113a711bc18e638f24da49f25aaa81128
+size: 39425070 bytes
+sha256: e538bdded88d99cf1f4b5054ba82c446f75118fb31c768cfc3f7811cafbe648e

package/dist/build/web/js/cpo-main.jarr.js

@@ -1,4 +1,4 @@
 [diffend] Oversized file quarantined before diffing.
 name: package/dist/build/web/js/cpo-main.jarr.js
-size: 39417727 bytes
-sha256: a6b0d42c360be26d9d7292b2d8b0fb5113a711bc18e638f24da49f25aaa81128
+size: 39425070 bytes
+sha256: e538bdded88d99cf1f4b5054ba82c446f75118fb31c768cfc3f7811cafbe648e

package/dist/build/web/js/cpo-main.jarr.min

@@ -1,4 +1,4 @@
 [diffend] Oversized file quarantined before diffing.
 name: package/dist/build/web/js/cpo-main.jarr.min
-size: 36462951 bytes
-sha256: fcbd5e96dbe981c069dcbc391fc6c27ca83c08ee1eac55ba9e3bd13995144597
+size: 36467830 bytes
+sha256: 240e5f973fccc25df91da15592f0d665e9daa4e4dcc2cec6e0c165f8fef37bd8

package/dist/build/web/js/cpo-main.js

@@ -230,6 +230,8 @@
                 const realpath = window.MESSAGES.sendRpc('path', 'resolve', [info.path]);
                 realpath.then((realpath) => {
                   restarter.resume(`js-file://${realpath}`);
+                }, (err) => {
+                  restarter.error(runtime.ffi.makeMessageException("Error resolving import path: " + String(err)));
                 });
               });
             }
@@ -242,6 +244,8 @@
                 const realpath = window.MESSAGES.sendRpc('path', 'resolve', [info.path]);
                 realpath.then((realpath) => {
                   restarter.resume(`file://${realpath}`);
+                }, (err) => {
+                  restarter.error(runtime.ffi.makeMessageException("Error resolving import path: " + String(err)));
                 });
               });
             }
@@ -341,30 +345,45 @@
                         return fileLocatorConstructor.makeFileLocator(info.path);
                       case "local-if-present":
                         return runtime.pauseStack(async (restarter) => {
-                          const exists = await fsInternal.exists(info.path);
+                          // This callback is async, so anything it throws is a
+                          // rejected promise nobody looks at; catch it here or
+                          // the run never resumes.
+                          let exists;
+                          try {
+                            exists = await fsInternal.exists(info.path);
+                          }
+                          catch(err) {
+                            restarter.error(runtime.isObject(err) ? err
+                              : runtime.ffi.makeMessageException("Error checking for local file " + JSON.stringify(info.path) + ": " + String(err)));
+                            return;
+                          }
                           if(exists) {
                             fsInternal.readFile(info.path).then((contents) => {
                               const strContents = Buffer.from(contents).toString('utf8');
                               CPO.documents.set(fullUrl, new CodeMirror.Doc(strContents, "pyret"));
                             });
-                            return runtime.runThunk(() => {
-                              var fileLocatorConstructor = fileLocator.makeFileLocatorConstructor(window.MESSAGES.sendRpc, runtime, compileLib, compileStructs, parsePyret, builtinModules, cpo);
-                              return fileLocatorConstructor.makeFileLocator(info.path);
-                            }, (result) => {
-                              if(runtime.isSuccessResult(result)) {
-                                restarter.resume(result.result);
-                              }
-                              else {
-                                restarter.error(result.error);
-                              }
-                            });
                           }
                           else {
                             fetch(fullUrl).then(async (response) => {
                               CPO.documents.set(fullUrl, new CodeMirror.Doc(await response.text(), "pyret"));
                             });
-                            return restarter.resume(runtime.getField(runtime.getField(urlLoc, "values"), "url-locator").app(fullUrl, replGlobals));
                           }
+                          return runtime.runThunk(() => {
+                            if(exists) {
+                              var fileLocatorConstructor = fileLocator.makeFileLocatorConstructor(window.MESSAGES.sendRpc, runtime, compileLib, compileStructs, parsePyret, builtinModules, cpo);
+                              return fileLocatorConstructor.makeFileLocator(info.path);
+                            }
+                            else {
+                              return runtime.getField(runtime.getField(urlLoc, "values"), "url-locator").app(fullUrl, replGlobals);
+                            }
+                          }, (result) => {
+                            if(runtime.isSuccessResult(result)) {
+                              restarter.resume(result.result);
+                            }
+                            else {
+                              restarter.error(result.exn);
+                            }
+                          });
                         });
                     }
 

package/dist/build/web/js/file-locator.js

@@ -67,6 +67,14 @@ define("cpo/file-locator", [], function() {
     var gmf = function(m, f) { return gf(gf(m, "values"), f); };
 
 
+    // Every RPC here runs under a paused stack, so a rejected RPC has to
+    // become restarter.error -- otherwise the run waits forever, silently.
+    function rpcFailed(restarter, what) {
+      return function(err) {
+        restarter.error(runtime.ffi.makeMessageException(what + ": " + String(err)));
+      };
+    }
+
     function makeFileLocator(path) {
       return runtime.pauseStack((restarter) => {
         const realpath = sendRpc('path', 'resolve', [path]);
@@ -89,10 +97,14 @@ define("cpo/file-locator", [], function() {
                     return ast; 
                   }, "file-locator:parse-contents");
                 }, function(result) {
-                  console.log("Result from getModule runThunk: ", result);
-                  restarter.resume(result.result);
+                  if(runtime.isSuccessResult(result)) {
+                    restarter.resume(result.result);
+                  }
+                  else {
+                    restarter.error(result.exn);
+                  }
                 });
-              });
+              }, rpcFailed(restarter, "Could not read file " + JSON.stringify(path)));
             });
           }
 
@@ -166,7 +178,7 @@ define("cpo/file-locator", [], function() {
             "set-compiled": m2(setCompiled),
             "get-compiled": m1(function() { return runtime.ffi.makeNone(); })
           }));
-        });
+        }, rpcFailed(restarter, "Could not resolve file path " + JSON.stringify(path)));
       });
     }
 

package/dist/build/web/views/editor.html

@@ -25,6 +25,9 @@
     if(m) { window.CPO_COMPILER = decodeURIComponent(m[1]); }
     if(window.CPO_COMPILER === "ts" && window.PYRET_TS) {
       window.PYRET = window.PYRET_TS;
+      // Lets pure CSS show ts-only chrome (the "(ts mode)" badge in the
+      // REPL corner) without another script running at DOM-ready.
+      document.documentElement.classList.add("ts-mode");
       // In gzipped mode the host may serve assets without an executable MIME
       // type (nosniff), which refuses a <script src> load outright --
       // beforePyret.js fetches the compiler bundle alongside the jarr instead.
@@ -391,6 +394,7 @@
 </div>
 <div id="REPL" class="replContainer" role="region" aria-label="Interactions">
 <div id="handle" class="ui-resizable-handle ui-resizable-w"></div>
+<div id="compilerFlavorBadge" title="This session uses the TypeScript version of Pyret. Visit /settings/clear-ts to turn it off.">(ts mode)</div>
 </div>
 <div id="help-keys">
   <p><b>Press <kbd>Esc</kbd> to close this help window</b></p>