sai-language/ci/MiscC.js

An object-oriented language designed to afford code comprehension and maintenance. Transpiles in-place to Javascript.

#!/usr/bin/env node

// Javascript source for MiscC.sai transpiled by SAI
//

"use strict";

var prototype=new function() {
  this.Constructor=function(){};
  this.__tobelocked=[];
  this.__tobefrozen=[];
  this.__contracts=[];
  this.__unverified=true;
  this.isof={};
  return this;
}();
var $AI=require("sai-library");

// Generated code follows

var __context={"loader":"SAI.GetSourceFromFilename","path":"/Users/seanmpuckett/Documents/ProjSync/Node/sai/src/Construct.sai","workdir":"/Users/seanmpuckett/Documents/ProjSync/Node/sai/src","mtime":"2018-04-04T23:09:42.435Z","fetched":"2018-04-11T21:09:35.833Z"};
var __path=require('path');
var __require=function(fn) {
  try {
    return require(fn);
  } catch (e) {
    try {
      return require(__path.join(process.cwd(),fn));
    } catch (e) {
      return require(__path.join(process.cwd(),'node_modules',fn));
    }
  }
}
var isa = prototype.isa = 'Construct';
var $bindfail = function(m) {
  throw new Error("SAI: A call to " + m + " on object " + isa + " has come unbound from any instance of that object. (If this is not in error, mark the declaration of " + m + " as unbound.)");
}
prototype.isof['Construct'] = {
  version: '0.0.0-unspecified',
  isa: isa,
  context: __context,
  type: "singleton"
};
prototype.__tobelocked = prototype.__tobelocked.concat(["OutVarHelper", "ExprsHelper", "isa"]);
prototype.__tobefrozen = prototype.__tobefrozen.concat(["isof"]);
prototype.__contracts = prototype.__contracts.concat(['manifest']);
var $4g = prototype['OutVarHelper'] || function() {};
prototype['OutVarHelper'] = function(p) {
  var $0_this, $1_key, $2_list, $3_length, $4_none, $5_trial, $ = this['OutVarHelper'] ? this : $bindfail('OutVarHelper'),
    $_c, $_d, _out = p,
    _vars; {
    _vars = [];
    if ($5_trial = (_out)) {
      var $2_list = _out,
        $1_key;
      if (undefined === $2_list) $2_list = [];
      var $3_length = $2_list.length;
      for ($1_key = 0; $1_key < $3_length; $1_key++) {
        $0_this = $2_list[$1_key];
        _vars.push($0_this[0][1]);;
      }
    }
    return (_vars);
  }
};
var $5g = prototype['ExprsHelper'] || function() {};
prototype['ExprsHelper'] = function(p) {
  var $6_this, $ = this['ExprsHelper'] ? this : $bindfail('ExprsHelper'),
    $_b, _exprs = p; {
    return (((undefined !== ($_b = (undefined === ($_b = (_exprs)) ? undefined : ($_b[2])))) ? $_b : []));
  }
};


var __context={"loader":"SAI.GetSourceFromFilename","path":"/Users/seanmpuckett/Documents/ProjSync/Node/sai/src/MiscC.sai","workdir":"/Users/seanmpuckett/Documents/ProjSync/Node/sai/src","mtime":"2018-04-11T16:57:14.771Z","fetched":"2018-04-11T21:09:35.786Z"};
var __path=require('path');
var __require=function(fn) {
  try {
    return require(fn);
  } catch (e) {
    try {
      return require(__path.join(process.cwd(),fn));
    } catch (e) {
      return require(__path.join(process.cwd(),'node_modules',fn));
    }
  }
}
var isa = prototype.isa = 'MiscC';
var $bindfail = function(m) {
  throw new Error("SAI: A call to " + m + " on object " + isa + " has come unbound from any instance of that object. (If this is not in error, mark the declaration of " + m + " as unbound.)");
}
prototype.isof['MiscC'] = {
  version: '0.0.0-unspecified',
  isa: isa,
  context: __context,
  type: "singleton"
};
prototype.__tobelocked = prototype.__tobelocked.concat(["manifest", "docs", "MiscConstruct", "isa"]);
prototype.__tobefrozen = prototype.__tobefrozen.concat(["isof"]);
prototype.isof[prototype.isa].inherit = prototype.__inherits = ['Construct'];
Object.defineProperty(prototype, "manifest", {
  configurable: true,
  enumerable: true,
  get: function(p) {
    var $ = this; {
      return ({
        'constructs': {
          'orphan': {
            repeats: false,
            clauses: {
              'orphan': {
                none: true
              }
            },
            handler: function() {
              return ($.MiscConstruct).apply($, arguments);
            }
          },
          'with': {
            repeats: false,
            clauses: {
              'with': {
                exproutblock: true
              }
            },
            handler: function() {
              return ($.MiscConstruct).apply($, arguments);
            }
          },
          'inc': {
            repeats: false,
            clauses: {
              'inc': {
                rvalue: true
              }
            },
            handler: function() {
              return ($.MiscConstruct).apply($, arguments);
            }
          },
          'dec': {
            repeats: false,
            clauses: {
              'dec': {
                rvalue: true
              }
            },
            handler: function() {
              return ($.MiscConstruct).apply($, arguments);
            }
          },
          'delete': {
            repeats: false,
            clauses: {
              'delete': {
                rvalue: true
              }
            },
            handler: function() {
              return ($.MiscConstruct).apply($, arguments);
            }
          }
        }
      });
    }
  },
  set: undefined
});
Object.defineProperty(prototype, "docs", {
  configurable: true,
  enumerable: true,
  get: function(p) {
    var $0_this, $ = this; {
      return ({
        'constructs': {
          'dec': {
            category: 'keywords',
            subtitle: 'decrement verb',
            summary: 'Decrements (reduces by 1) the value in the given variable.',
            synref: 'dec [var]',
            detail: 'Example:' + '\n' + '' + '\n' + '  set a to 2' + '\n' + '  dec a' + '\n' + '  debug a' + '\n' + '' + '\n' + '  > 1' + '\n' + '' + '\n' + ''
          },
          'delete': {
            category: 'keywords',
            subtitle: 'a verb that deletes variables',
            summary: 'summary',
            synref: 'delete [variable]',
            detail: 'When called on a variable or traits, undefines the named variable or attribute(s) of a variable.' + '\n' + '' + '\n' + '    delete thisUnwantedValue' + '\n' + '    delete goodObject.unwantedAttribute' + '\n' + '' + '\n' + 'This just calls the underlying Javascript version of **delete**, with all the same rules and caveats.' + '\n' + '' + '\n' + '#### delete pipe operator' + '\n' + '' + '\n' + 'The __delete__ pipe operator has advanced functionality, which see.' + '\n' + '' + '\n' + ''
          },
          'inc': {
            category: 'keywords',
            subtitle: 'value increment',
            summary: 'Increments (adds 1 to) the given variable.',
            synref: 'inc [var]',
            detail: 'As in:' + '\n' + '' + '\n' + '    set a to 1' + '\n' + '    inc a' + '\n' + '    debug a' + '\n' + '' + '\n' + '    > 2' + '\n' + '' + '\n' + 'The __inc__ statement has special behaviour around values that are _undefined_ or evaulate to _falsy_; when you increment one of these values, it becomes `1`.  For example:' + '\n' + '' + '\n' + '    set a to undefined' + '\n' + '    inc a' + '\n' + '    debug a' + '\n' + '' + '\n' + '    > 1' + '\n' + '' + '\n' + 'This is useful when tallying with an array, e.g. the following construct automatically initializes array elements the way the standard `++` operator does not, such that the `tally` object will contain a log of word usage.' + '\n' + '' + '\n' + '    set tally blank' + '\n' + '    every word' + '\n' + '      inc tally\it' + '\n' + '' + '\n' + 'Note that __dec__ does not have similar initialization functionality.' + '\n' + '' + '\n' + '' + '\n' + '' + '\n' + ''
          },
          'orphan': {
            category: 'keywords',
            subtitle: 'rescoping this',
            summary: '**Orphan** causes the __@__ scoping prefix within the function to refer to the context' + '\n' + 'of the function call, instead of the context of the function definition.',
            detail: 'You probably want to use this in combination with **local** variable definitions.' + '\n' + '' + '\n' + 'For clarifications and example code on this, see **task**.' + '\n' + '' + '\n' + 'To do this on a case-by-case basis, use the __@@__ scoping prefix (which see).' + '\n' + '' + '\n' + ''
          },
          'with': {
            subtitle: 'block-level pronoun assignment',
            summary: 'Allows the use of the **it** pronoun (and the `.` scoping prefix) within an arbitrary block of code.',
            detail: 'For example:' + '\n' + '' + '\n' + '    with customer' + '\n' + '      set label to \'\'\'' + '\n' + '        $\{.name}' + '\n' + '        $\{.address1}' + '\n' + '        $\{.address2}' + '\n' + '        $\{.city} $\{.region} $\{.postcode}' + '\n' + '' + '\n' + 'Another example, this time using an assigned pronoun:' + '\n' + '' + '\n' + '    with category\\document\\page as p' + '\n' + '      set precis:' + '\n' + '        title p.title' + '\n' + '        authors join!p.authors \', \'' + '\n' + '        summary p.abstract ? p.summary' + '\n' + '' + '\n' + 'Though that is much the same as this:' + '\n' + '' + '\n' + '    local p category\\document\\page' + '\n' + '    set precis:' + '\n' + '      title p.title' + '\n' + '      authors join!p.authors \', \'' + '\n' + '      summary p.abstract ? p.summary' + '\n' + '' + '\n' + '__WITH__ can make things tidier, but mind what your pronouns are.' + '\n' + '' + '\n' + '' + '\n' + ''
          }
        }
      });
    }
  },
  set: undefined
});
var $3g = prototype['MiscConstruct'] || function() {};
prototype['MiscConstruct'] = function(p) {
  var $1_this, $2_trial, $3, $4_this, $ = this['MiscConstruct'] ? this : $bindfail('MiscConstruct'),
    $_c, $_d, _body, _outs, _vars; {
    if ($2_trial = ((p.clauses.length > 1))) {
      return ({
        error: 'SAI bug: error parsing construct with multiple clauses: ' + $AI.keys_op(p.clauses).join(', ')
      });
    }
    _body = '';
    var $4_this = p.clauses[0];
    switch ($3 = ($4_this.type)) {
      case 'orphan.none':
        _body = 'var $=this;\n';
        break;
      case 'inc.rvalue':
        _body = '' + $4_this.args.rvalue + '=(' + $4_this.args.rvalue + ' || 0)+1;\n';
        break;
      case 'dec.rvalue':
        _body = '' + $4_this.args.rvalue + '--;\n';
        break;
      case 'delete.rvalue':
        _body = 'delete ' + $4_this.args.rvalue + ';\n';
        break;
      case 'with.exproutblock':
        _outs = $.OutVarHelper($4_this.args.out);
        _vars = {
          'this': _outs[0],
          'block': $4_this.args.block,
          'expr': $4_this.args.expr
        };
        _body = 'var \x5e{this}=\x5e{expr};' + '\n' + '\x5e{block};';
        _body = p.tools.replacer(_body, _vars);
        break;
      default:
        return ({
          error: 'Unhandled construct type ' + $4_this.type + ' in ReturnConstruct'
        });
        break;
    };
    return ({
      body: _body
    });
  }
};




// End of generated code

$AI.finalizePrototype(prototype);
var result=prototype;
switch (prototype.isof[prototype.isa].type) {
case 'singleton':
  prototype.Constructor();
  if (prototype.Instantiate) prototype.Instantiate();
  break;
case 'main':
  result=prototype.constructor();
  break;
default:
  result=prototype.constructor;
  break;
}
exports=result; try { module.exports=result; } catch(e) {};
return result;