Episode 011

[ahJ4s|1724737530191|Mon Aug 26 2024 22:45:30 GMT-0700 (Pacific Daylight Time)|code]

"From episode 006";
notQuiteJSON = (function(){

var _;

_ = {};

_.indent = (function(){
return indent;
function indent(more, state)
  {
    var indentation;
    var levels;
    var unit;

    unit = state.indentationUnit;
    if (unit == "")
      return "";
    levels = state.indentationLevels;
    if (more)
      {
        indentation = levels[levels.length - 1] + unit;
        levels.push(indentation);
      }
      else
      {
        levels.pop();
        indentation = levels[levels.length - 1];
      }
    return indentation;
  }
})();

_.keys = (function(){
return keys;
function keys(object)
  {
    var prop;
    var props;

    if (typeof Object.keys == "function")
      return Object.keys(object);
    props = [];
    for (prop in object)
      props.push(prop);
    return props;
  }
})();

_.padding = (function(){
return padding;
function padding(count)
  {
    var i;
    var result;

    result = "";
    for (i = 0; i < count; ++i)
      result += " ";
    return result;
  }
})();

_.parse = (function(){
return parse;
function parse(json_candidate)
  {
    return parseInner(json_candidate);
  }
function parseInner(ao8Te_)
  {
    var _;
    var parse;
    var parseInner;

    arguments = undefined;
    return eval("(" + ao8Te_ + ")");
  }
})();

_.stringify = (function(){
return stringify;
function stringify(json_candidate, ignored, indentation)
  {
    var i;
    var indentation_unit;
    var state;

    if (typeof ignored != "undefined" && ignored !== null)
      throw new Error("Second argument must be undefined or null");
    if (typeof indentation == "undefined")
      indentation = 0;
    if (typeof indentation != "number" || !isFinite(indentation) || indentation < 0 || indentation % 1 != 0)
      throw new Error("Indentation must be a positive integer");
    indentation_unit = "";
    for (i = 0; i < indentation; ++i)
      indentation_unit += " ";
    state =
      {
        ancestors: [],
        indentationLevels: [ "" ],
        indentationUnit: indentation_unit
      };
    return _.stringifyAny(json_candidate, state);
  }
})();

_.stringifyAny = (function(){
return stringifyAny;
function stringifyAny(json_candidate, state)
  {
    switch (typeof json_candidate)
      {
        default:
        throw new Error("Non-JSONable type");

        case "number":
        if (!isFinite(json_candidate))
          throw new Error("Non-finite number detected");
        /* Fall through */

        case "boolean":
        return "" + json_candidate;

        case "string":
        return _.stringifyString(json_candidate);

        case "object":
        if (json_candidate === null)
          return "null";
        if (json_candidate instanceof Array)
          return _.stringifyArray(json_candidate, state);
        return _.stringifyObject(json_candidate, state);
      }
  }
})();

_.stringifyArray = (function(){
return stringifyArray;
function stringifyArray(array, state)
  {
    var i;
    var indentation;
    var jsons;

    _.testCircular(array, state);
    state.ancestors.push(array);
    indentation = _.indent(true, state);
    jsons = [];
    for (i = 0; i < array.length; ++i)
      jsons.push(indentation + _.stringifyAny(array[i], state));
    indentation = _.indent(false, state);
    state.ancestors.pop();
    if (state.indentationUnit != "" && jsons.length > 0)
      return "[\n" + jsons.join(",\n") + "\n" + indentation + "]";
    return "[" + jsons.join(",") + "]";
  }
})();

_.stringifyObject = (function(){
return stringifyObject;
function stringifyObject(object, state)
  {
    var i;
    var indentation;
    var members;
    var key;
    var keys;

    _.testCircular(object, state);
    state.ancestors.push(object);
    indentation = _.indent(true, state);
    keys = _.keys(object);
    members = [];
    for (i = 0; i < keys.length; ++i)
      {
        key = keys[i];
        members.push(indentation + _.stringifyString(key) + ":" + (state.indentationUnit != "" ? " " : "") + _.stringifyAny(object[key], state));
      }
    indentation = _.indent(false, state);
    state.ancestors.pop();
    if (state.indentationUnit != "" && members.length > 0)
      return "{\n" + members.join(",\n") + "\n" + indentation + "}";
    return "{" + members.join(",") + "}";
  }
})();

_.stringReplacements =
  [
    [ /\\/g, "\\\\" ],
    [ /"/g, "\\\"" ],
    [ /\u0000/g, "\\u0000" ],
    [ /\u0001/g, "\\u0001" ],
    [ /\u0002/g, "\\u0002" ],
    [ /\u0003/g, "\\u0003" ],
    [ /\u0004/g, "\\u0004" ],
    [ /\u0005/g, "\\u0005" ],
    [ /\u0006/g, "\\u0006" ],
    [ /\u0007/g, "\\u0007" ],
    [ /\u0008/g, "\\b" ],
    [ /\u0009/g, "\\t" ],
    [ /\u000a/g, "\\n" ],
    [ /\u000b/g, "\\u000b" ],
    [ /\u000c/g, "\\f" ],
    [ /\u000d/g, "\\r" ],
    [ /\u000e/g, "\\u000e" ],
    [ /\u000f/g, "\\u000f" ],
    [ /\u0010/g, "\\u0010" ],
    [ /\u0011/g, "\\u0011" ],
    [ /\u0012/g, "\\u0012" ],
    [ /\u0013/g, "\\u0013" ],
    [ /\u0014/g, "\\u0014" ],
    [ /\u0015/g, "\\u0015" ],
    [ /\u0016/g, "\\u0016" ],
    [ /\u0017/g, "\\u0017" ],
    [ /\u0018/g, "\\u0018" ],
    [ /\u0019/g, "\\u0019" ],
    [ /\u001a/g, "\\u001a" ],
    [ /\u001b/g, "\\u001b" ],
    [ /\u001c/g, "\\u001c" ],
    [ /\u001d/g, "\\u001d" ],
    [ /\u001e/g, "\\u001e" ],
    [ /\u001f/g, "\\u001f" ]
  ];

_.stringifyString = (function(){
return stringifyString;
function stringifyString(string)
  {
    var i;
    var replacement;

    for (i = 0; i < _.stringReplacements.length; ++i)
      {
        replacement = _.stringReplacements[i];
        string = string.replace(replacement[0], replacement[1]);
      }
    return "\"" + string + "\"";
  }
})();

_.stringifyTable = (function(){
return stringifyTable;
function stringifyTable(table)
  {
    var column;
    var i;
    var j;
    var line;
    var lines;
    var max_column_width;
    var new_column;
    var new_row;
    var new_table;
    var padding;
    var row;

    if (!(table instanceof Array))
      throw new Error("Table is not an array");
    if (table.length == 0)
      return "[]";
    max_column_width = [];
    new_table = [];
    for (i = 0; i < table.length; ++i)
      {
        row = table[i];
        if (!(row instanceof Array))
          throw new Error("Each row must be an array");
        new_row = [];
        new_table.push(new_row);
        for (j = 0; j < row.length; ++j)
          {
            column = row[j];
            new_column = _.stringify(column);
            new_row.push(new_column);
            if (j == max_column_width.length)
              max_column_width.push(0);
            if (new_column.length > max_column_width[j])
              max_column_width[j] = new_column.length;
          }
      }
    lines = [];
    for (i = 0; i < new_table.length; ++i)
      {
        new_row = new_table[i];
        if (new_row.length == 0)
          {
            lines.push("  []");
            continue;
          }
        line = [];
        padding = 0;
        for (j = 0; j < new_row.length; ++j)
          {
            new_column = new_row[j];
            line.push(_.padding(padding) + new_column);
            padding = max_column_width[j] - new_column.length;
          }
        lines.push("  [ " + line.join(", ") + " ]");
      }
    return "[\n" + lines.join(",\n") + "\n]";
  }
})();

_.testCircular = (function(){
return testCircular;
function testCircular(object, state)
  {
    var i;

    for (i = 0; i < state.ancestors.length; ++i)
      {
        if (object === state.ancestors[i])
          throw new Error("Circular reference detected");
      }
  }
})();

return {
    parse: _.parse,
    stringify: _.stringify,
    stringifyTable: _.stringifyTable
  };

})();

[ahJ4s|1724737530191|Mon Aug 26 2024 22:45:30 GMT-0700 (Pacific Daylight Time)|value]

[object Object]

[ahJ4s|1724737534333|Mon Aug 26 2024 22:45:34 GMT-0700 (Pacific Daylight Time)|code]

"Working with tightly-coupled counters";
ep011 = (0, function () { return [ function (code) { return (code = {

max: 0x1FFFFFFFFFFFFF,

min: -0x1FFFFFFFFFFFFF,

outer_object: this,

quine: null,

quine_parts:
  [
    "(0, function () { return [ ",
    null,
    " ][0](); })()"
  ],

counterPairInvoke:
function counterPairInvoke(counters, amount)
  {
    if (typeof amount != "number")
      throw new Error("amount must be a number");
    if (!isFinite(amount))
      throw new Error("amount must be finite");
    if (amount % 1 != 0)
      throw new Error("amount must be an integer");
    if (amount < code.min)
      throw new Error("magnitude of negative amount is too great");
    if (amount > code.max)
      throw new Error("magnitude of positive amount is too great");
    if (amount < 0)
      {
        amount *= -1;
        if (amount > counters.difference)
          throw new Error("amount to decrease is greater than permitted by previous increases");
        counters.decreases += amount;
        counters.difference -= amount;
      }
      else if (amount > 0)
      {
        if (code.max - counters.difference < amount)
          throw new Error("Overflow: cannot wrap counters");
        counters.difference += amount;
        if (code.max - counters.increases < amount)
          {
            counters.decreases = 0;
            counters.increases = counters.difference;
          }
          else
          {
            counters.increases += amount;
          }
      }
    return {
        "+": counters.increases,
        "-": counters.decreases,
        "=": counters.difference
      };
  },

main:
function main()
  {
    return {
        makeQuine: code.makeQuine,
        max: code.max,
        min: code.min,
        newCounterPair: code.newCounterPair
      };
  },

makeQuine:
function makeQuine()
  {
    if (code.quine_parts[1] == null)
      code.quine_parts[1] = code.outer_object[0].toString();
    if (code.quine == null)
      code.quine = code.quine_parts.join("");
    return code.quine;
  },

newCounterPair:
function newCounterPair()
  {
    var counters;

    if (arguments.length != 0)
      throw new Error("newCounterPair takes no arguments");
    counters =
      {
        decreases: 0,
        difference: 0,
        increases: 0
      };
    return counterPairInvoke_closure;
    function counterPairInvoke_closure(amount) { return code.counterPairInvoke(counters, amount); }
  }

}).main(); } ][0](); })();

[ahJ4s|1724737534334|Mon Aug 26 2024 22:45:34 GMT-0700 (Pacific Daylight Time)|value]

[object Object]

[ahJ4s|1724737884534|Mon Aug 26 2024 22:51:24 GMT-0700 (Pacific Daylight Time)|code]

"Takes no arguments";
ep011.test1 = ep011.newCounterPair(42);

[ahJ4s|1724737884538|Mon Aug 26 2024 22:51:24 GMT-0700 (Pacific Daylight Time)|error]

Error: newCounterPair takes no arguments
    at Object.newCounterPair (eval at safeEvaluate (https://www.sha0.net/codewhile/codewhile011.html:1:2184), <anonymous>:89:13)
    at eval (eval at safeEvaluate (https://www.sha0.net/codewhile/codewhile011.html:1:2184), <anonymous>:2:21)
    at eval (<anonymous>)
    at safeEvaluate (https://www.sha0.net/codewhile/codewhile011.html:22:4860)
    at Object.execute (https://www.sha0.net/codewhile/codewhile011.html:22:3060)
    at https://www.sha0.net/codewhile/codewhile011.html:22:4936
    at HTMLButtonElement.onclick (https://www.sha0.net/codewhile/codewhile011.html:22:4949)

[ahJ4s|1724737891419|Mon Aug 26 2024 22:51:31 GMT-0700 (Pacific Daylight Time)|code]

"Make a new counter-pair";
ep011.test1 = ep011.newCounterPair();

[ahJ4s|1724737891419|Mon Aug 26 2024 22:51:31 GMT-0700 (Pacific Daylight Time)|value]

function counterPairInvoke_closure(amount) { return code.counterPairInvoke(counters, amount); }

[ahJ4s|1724737921801|Mon Aug 26 2024 22:52:01 GMT-0700 (Pacific Daylight Time)|code]

"Must have a numeric argument";
ep011.test1();

[ahJ4s|1724737921803|Mon Aug 26 2024 22:52:01 GMT-0700 (Pacific Daylight Time)|error]

Error: amount must be a number
    at Object.counterPairInvoke (eval at safeEvaluate (https://www.sha0.net/codewhile/codewhile011.html:1:2184), <anonymous>:23:13)
    at Object.counterPairInvoke_closure [as test1] (eval at safeEvaluate (https://www.sha0.net/codewhile/codewhile011.html:1:2184), <anonymous>:97:62)
    at eval (eval at safeEvaluate (https://www.sha0.net/codewhile/codewhile011.html:1:2184), <anonymous>:2:7)
    at eval (<anonymous>)
    at safeEvaluate (https://www.sha0.net/codewhile/codewhile011.html:22:4860)
    at Object.execute (https://www.sha0.net/codewhile/codewhile011.html:22:3060)
    at https://www.sha0.net/codewhile/codewhile011.html:22:4936
    at HTMLButtonElement.onclick (https://www.sha0.net/codewhile/codewhile011.html:22:4949)

[ahJ4s|1724737930199|Mon Aug 26 2024 22:52:10 GMT-0700 (Pacific Daylight Time)|code]

"Must have a finite argument";
ep011.test1(NaN);

[ahJ4s|1724737930199|Mon Aug 26 2024 22:52:10 GMT-0700 (Pacific Daylight Time)|error]

Error: amount must be finite
    at Object.counterPairInvoke (eval at safeEvaluate (https://www.sha0.net/codewhile/codewhile011.html:1:2184), <anonymous>:25:13)
    at Object.counterPairInvoke_closure [as test1] (eval at safeEvaluate (https://www.sha0.net/codewhile/codewhile011.html:1:2184), <anonymous>:97:62)
    at eval (eval at safeEvaluate (https://www.sha0.net/codewhile/codewhile011.html:1:2184), <anonymous>:2:7)
    at eval (<anonymous>)
    at safeEvaluate (https://www.sha0.net/codewhile/codewhile011.html:22:4860)
    at Object.execute (https://www.sha0.net/codewhile/codewhile011.html:22:3060)
    at https://www.sha0.net/codewhile/codewhile011.html:22:4936
    at HTMLButtonElement.onclick (https://www.sha0.net/codewhile/codewhile011.html:22:4949)

[ahJ4s|1724737943599|Mon Aug 26 2024 22:52:23 GMT-0700 (Pacific Daylight Time)|code]

"Must have an integer argument";
ep011.test1(3.14159);

[ahJ4s|1724737943599|Mon Aug 26 2024 22:52:23 GMT-0700 (Pacific Daylight Time)|error]

Error: amount must be an integer
    at Object.counterPairInvoke (eval at safeEvaluate (https://www.sha0.net/codewhile/codewhile011.html:1:2184), <anonymous>:27:13)
    at Object.counterPairInvoke_closure [as test1] (eval at safeEvaluate (https://www.sha0.net/codewhile/codewhile011.html:1:2184), <anonymous>:97:62)
    at eval (eval at safeEvaluate (https://www.sha0.net/codewhile/codewhile011.html:1:2184), <anonymous>:2:7)
    at eval (<anonymous>)
    at safeEvaluate (https://www.sha0.net/codewhile/codewhile011.html:22:4860)
    at Object.execute (https://www.sha0.net/codewhile/codewhile011.html:22:3060)
    at https://www.sha0.net/codewhile/codewhile011.html:22:4936
    at HTMLButtonElement.onclick (https://www.sha0.net/codewhile/codewhile011.html:22:4949)

[ahJ4s|1724737959571|Mon Aug 26 2024 22:52:39 GMT-0700 (Pacific Daylight Time)|code]

"Amount cannot be too small";
ep011.test1(ep011.min - 1);

[ahJ4s|1724737959571|Mon Aug 26 2024 22:52:39 GMT-0700 (Pacific Daylight Time)|error]

Error: magnitude of negative amount is too great
    at Object.counterPairInvoke (eval at safeEvaluate (https://www.sha0.net/codewhile/codewhile011.html:1:2184), <anonymous>:29:13)
    at Object.counterPairInvoke_closure [as test1] (eval at safeEvaluate (https://www.sha0.net/codewhile/codewhile011.html:1:2184), <anonymous>:97:62)
    at eval (eval at safeEvaluate (https://www.sha0.net/codewhile/codewhile011.html:1:2184), <anonymous>:2:7)
    at eval (<anonymous>)
    at safeEvaluate (https://www.sha0.net/codewhile/codewhile011.html:22:4860)
    at Object.execute (https://www.sha0.net/codewhile/codewhile011.html:22:3060)
    at https://www.sha0.net/codewhile/codewhile011.html:22:4936
    at HTMLButtonElement.onclick (https://www.sha0.net/codewhile/codewhile011.html:22:4949)

[ahJ4s|1724737967252|Mon Aug 26 2024 22:52:47 GMT-0700 (Pacific Daylight Time)|code]

"Amount cannot be too large";
ep011.test1(ep011.max + 1);

[ahJ4s|1724737967253|Mon Aug 26 2024 22:52:47 GMT-0700 (Pacific Daylight Time)|error]

Error: magnitude of positive amount is too great
    at Object.counterPairInvoke (eval at safeEvaluate (https://www.sha0.net/codewhile/codewhile011.html:1:2184), <anonymous>:31:13)
    at Object.counterPairInvoke_closure [as test1] (eval at safeEvaluate (https://www.sha0.net/codewhile/codewhile011.html:1:2184), <anonymous>:97:62)
    at eval (eval at safeEvaluate (https://www.sha0.net/codewhile/codewhile011.html:1:2184), <anonymous>:2:7)
    at eval (<anonymous>)
    at safeEvaluate (https://www.sha0.net/codewhile/codewhile011.html:22:4860)
    at Object.execute (https://www.sha0.net/codewhile/codewhile011.html:22:3060)
    at https://www.sha0.net/codewhile/codewhile011.html:22:4936
    at HTMLButtonElement.onclick (https://www.sha0.net/codewhile/codewhile011.html:22:4949)

[ahJ4s|1724737995461|Mon Aug 26 2024 22:53:15 GMT-0700 (Pacific Daylight Time)|code]

"Probe current state";
notQuiteJSON.stringify(ep011.test1(0), null, 2);

[ahJ4s|1724737995467|Mon Aug 26 2024 22:53:15 GMT-0700 (Pacific Daylight Time)|value]

{
  "+": 0,
  "-": 0,
  "=": 0
}

[ahJ4s|1724738014342|Mon Aug 26 2024 22:53:34 GMT-0700 (Pacific Daylight Time)|code]

"Increase by 10";
notQuiteJSON.stringify(ep011.test1(10), null, 2);

[ahJ4s|1724738014342|Mon Aug 26 2024 22:53:34 GMT-0700 (Pacific Daylight Time)|value]

{
  "+": 10,
  "-": 0,
  "=": 10
}

[ahJ4s|1724738039986|Mon Aug 26 2024 22:53:59 GMT-0700 (Pacific Daylight Time)|code]

"Cannot decrease by 11";
notQuiteJSON.stringify(ep011.test1(-11), null, 2);

[ahJ4s|1724738039988|Mon Aug 26 2024 22:53:59 GMT-0700 (Pacific Daylight Time)|error]

Error: amount to decrease is greater than permitted by previous increases
    at Object.counterPairInvoke (eval at safeEvaluate (https://www.sha0.net/codewhile/codewhile011.html:1:2184), <anonymous>:36:17)
    at Object.counterPairInvoke_closure [as test1] (eval at safeEvaluate (https://www.sha0.net/codewhile/codewhile011.html:1:2184), <anonymous>:97:62)
    at eval (eval at safeEvaluate (https://www.sha0.net/codewhile/codewhile011.html:1:2184), <anonymous>:2:30)
    at eval (<anonymous>)
    at safeEvaluate (https://www.sha0.net/codewhile/codewhile011.html:22:4860)
    at Object.execute (https://www.sha0.net/codewhile/codewhile011.html:22:3060)
    at https://www.sha0.net/codewhile/codewhile011.html:22:4936
    at HTMLButtonElement.onclick (https://www.sha0.net/codewhile/codewhile011.html:22:4949)

[ahJ4s|1724738057080|Mon Aug 26 2024 22:54:17 GMT-0700 (Pacific Daylight Time)|code]

"Can decrease by 10";
notQuiteJSON.stringify(ep011.test1(-10), null, 2);

[ahJ4s|1724738057081|Mon Aug 26 2024 22:54:17 GMT-0700 (Pacific Daylight Time)|value]

{
  "+": 10,
  "-": 10,
  "=": 0
}

[ahJ4s|1724738096668|Mon Aug 26 2024 22:54:56 GMT-0700 (Pacific Daylight Time)|code]

"Maximum difference exercises wrap-around";
notQuiteJSON.stringify(ep011.test1(ep011.max), null, 2);

[ahJ4s|1724738096669|Mon Aug 26 2024 22:54:56 GMT-0700 (Pacific Daylight Time)|value]

{
  "+": 9007199254740991,
  "-": 0,
  "=": 9007199254740991
}

[ahJ4s|1724738124250|Mon Aug 26 2024 22:55:24 GMT-0700 (Pacific Daylight Time)|code]

"Cannot increase any more; difference at maximum";
notQuiteJSON.stringify(ep011.test1(1), null, 2);

[ahJ4s|1724738124251|Mon Aug 26 2024 22:55:24 GMT-0700 (Pacific Daylight Time)|error]

Error: Overflow: cannot wrap counters
    at Object.counterPairInvoke (eval at safeEvaluate (https://www.sha0.net/codewhile/codewhile011.html:1:2184), <anonymous>:43:17)
    at Object.counterPairInvoke_closure [as test1] (eval at safeEvaluate (https://www.sha0.net/codewhile/codewhile011.html:1:2184), <anonymous>:97:62)
    at eval (eval at safeEvaluate (https://www.sha0.net/codewhile/codewhile011.html:1:2184), <anonymous>:2:30)
    at eval (<anonymous>)
    at safeEvaluate (https://www.sha0.net/codewhile/codewhile011.html:22:4860)
    at Object.execute (https://www.sha0.net/codewhile/codewhile011.html:22:3060)
    at https://www.sha0.net/codewhile/codewhile011.html:22:4936
    at HTMLButtonElement.onclick (https://www.sha0.net/codewhile/codewhile011.html:22:4949)

[ahJ4s|1724738148161|Mon Aug 26 2024 22:55:48 GMT-0700 (Pacific Daylight Time)|code]

"Can catch up with decreases";
notQuiteJSON.stringify(ep011.test1(ep011.min), null, 2);

[ahJ4s|1724738148162|Mon Aug 26 2024 22:55:48 GMT-0700 (Pacific Daylight Time)|value]

{
  "+": 9007199254740991,
  "-": 9007199254740991,
  "=": 0
}

[ahJ4s|1724738167366|Mon Aug 26 2024 22:56:07 GMT-0700 (Pacific Daylight Time)|code]

"Wrap-around is possible, again";
notQuiteJSON.stringify(ep011.test1(1), null, 2);

[ahJ4s|1724738167367|Mon Aug 26 2024 22:56:07 GMT-0700 (Pacific Daylight Time)|value]

{
  "+": 1,
  "-": 0,
  "=": 1
}