]> ocean-lang.org Git - ocean/blobdiff - csrc/oceani.mdc
oceani-tests: assorted more tests.
[ocean] / csrc / oceani.mdc
index 27c0c32493ecba0ee96916ae13135e2f69558790..dd02e81ab89e7b01855e145973bf0def5252b6d3 100644 (file)
@@ -1316,6 +1316,8 @@ subclasses, and to access these we need to be able to `cast` the
 
        static int __fput_loc(struct exec *loc, FILE *f)
        {
+               if (!loc)
+                       return 0;
                if (loc->line >= 0) {
                        fprintf(f, "%d:%d: ", loc->line, loc->column);
                        return 1;