30:T920,grammar = ohmGrammar(` MapScript { Epochs = ListOf Epoch = listOf, nl+> annotationName = "@" ident componentName = ident indent = "\t" | " " incompleteNeedOperator = "-" needOperator = "<" | "->" join = a b annotationStmtParameterized = annotationName (":" digit) ws* annotationStmtSimple = annotationName ws* annotationStmt = annotationStmtParameterized | annotationStmtSimple attributeStmt = ident ~":" ws* ~":" "=" ws* (~nl ~"#" any)* -- complete | ident ~":" ws* ~":" -- incomplete stanzaOf = header ws* (nl statements)? emptyStmt = ws* componentStanzaStmt = prefix ( annotationStmt | attributeStmt | needStanza | emptyStmt ) componentStanzaStmts = nonemptyListOf, nl+> componentStanzaHeaderSimple = componentName ":" componentStanzaHeaderLegacy = componentName ":" ws* listOf componentStanzaHeader = componentStanzaHeaderLegacy | componentStanzaHeaderSimple componentStanza = stanzaOf>> annotationStanzaStmt = prefix ( annotationStmt | attributeStmt | needStanza | emptyStmt ) annotationStanzaStmts = nonemptyListOf, nl+> annotationStanzaHeader = annotationName ":"? annotationStanza = stanzaOf>> needStanzaStmt = prefix ( attributeStmt | annotationStmt | emptyStmt ) needStanzaStmts = nonemptyListOf, nl+> needStanzaHeader = needOperator ws* componentName ws* ":"? -- complete | needOperator ws* -- incomplete1 | incompleteNeedOperator ws* -- incomplete2 needStanza = stanzaOf>> stanza = attributeStmt | componentStanza | annotationStanza | needStanza ws = " " nl = ("#" (~"\\n" any)*)? "\\n" ident (an identifier) = letter (alnum | "-")* } `)31:Tc65,semanticAttribute = { function stanza(stanzaOf) { let s = stanzaOf.ast if (s.statements) { let r = Object.assign({}, s.header, {statements: s.statements}) if (r.needs) { r.statements.unshift( ...r.needs.map(need => ({type: "need", need: need})) ) delete r.needs } r.statements = r.statements.filter(stmt => stmt.type !== "empty") return r } return s } return { Epoch: stanzas => ({ type: "epoch", stanzas: stanzas.asIteration().ast, }), Epochs: epochs => ({ type: "root", epochs: epochs.asIteration().ast }), stanzaOf(header, _1, _2, statements) { let h = header.ast let s = statements.asIteration() return { header: h, statements: s[0] ? s[0].ast : [], } }, attributeStmt_incomplete(name, _2) { return { type: "attribute", name: name.sourceString, valueString: "", valueSource: _2.source, source: this.source, } }, attributeStmt_complete(name, _2, _3, _4, value) { return { type: "attribute", name: name.sourceString, valueString: value.sourceString, valueSource: value.source, source: this.source, } }, annotationStmtSimple(name, _3) { return { type: "annotation", name: name.sourceString, source: this.source, } }, annotationStmtParameterized(name, _3, param, _5) { return { type: "annotation", name: name.sourceString, param: param.sourceString, paramString: param.sourceString, paramSource: param.source, source: this.source, } }, componentStanzaStmt(_, stmt) { return stmt.ast }, annotationStanzaStmt(_, stmt) { return stmt.ast }, needStanzaStmt(_, stmt) { return stmt.ast }, emptyStmt(_1) { return { type: "empty", } }, needStanzaHeader_incomplete1(_1, _2) { return {type: "empty"} }, needStanzaHeader_incomplete2(_1, _2) { return {type: "empty"} }, needStanzaHeader_complete(_1, _2, name, _3, _4) { return { type: "need", need: name.sourceString, source: this.source, } }, annotationStanzaHeader(name, _) { return { type: "component", name: name.ast, source: this.source, } }, componentStanzaHeaderSimple(name, _1) { return { type: "component", source: this.source, name: name.ast, } }, componentStanzaHeaderLegacy(name, _1, _2, needs) { return { type: "component", name: name.ast, needs: needs.asIteration().ast, source: this.source, } }, stanza(stanzaOf) { return stanza(stanzaOf) }, needStanza(stanzaOf) { return stanza(stanzaOf) }, ident(_1, _2) { return this.sourceString }, _terminal() { return this.sourceString }, annotationName(_1, _2) { return this.sourceString }, componentName(_1) { return this.sourceString }, } ; }32:[] 2e:{"title":"MapScript","cells":[{"id":0,"value":"md`# MapScript`","pinned":true,"hidden":false,"mode":"ojs"},{"id":6,"value":"$30","pinned":false,"hidden":false,"mode":"ojs"},{"id":4,"value":"$31","pinned":true,"hidden":false,"mode":"ojs"},{"id":176,"value":"ohmGrammar = source => {\n try {\n return ohm.grammar(source)\n } catch (e) {\n const lineAndCol = ohm.util.getLineAndColumn(source, e.interval.startIdx)\n lineAndCol.lineNum += 1\n lineAndCol.colNum -= 1\n e.message = e.message + ` (${lineAndCol.lineNum}:${lineAndCol.colNum})`\n throw e\n }\n}","pinned":true,"hidden":false,"mode":"ojs"},{"id":269,"value":"compile = {\n const semantics = grammar.createSemantics()\n .addAttribute(\"ast\", semanticAttribute)\n\n return (source, lineOffset, initialLineColumOffset) => {\n let match = grammar.match(source)\n if (match.succeeded()) {\n\n return semantics(match).ast\n }\n\n if (match.failed()) {\n const lineAndCol = ohm.util.getLineAndColumn(match.input, match.getRightmostFailurePosition())\n if (initialLineColumOffset && lineAndCol.lineNum === 1) {\n lineAndCol.colNum += 10\n }\n // I don't understand why we need to add one...\n if (lineOffset) {\n lineAndCol.lineNum += lineOffset\n }\n throw new Error(`${match.shortMessage} (${lineAndCol.lineNum}:${lineAndCol.colNum})`)\n }\n }\n}","pinned":true,"hidden":false,"mode":"ojs"},{"id":13,"value":"mapscript = (strings, ...values) => {\n let s = strings.reduce((prev, next, i) => `${prev}${next}${values[i] || ''}`, '')\n return compile(s, 1, 10)\n}","pinned":false,"hidden":false,"mode":"ojs"},{"id":62,"value":"mapscript `\ncup-of-tea:\n\t-> hot-water:\n\t\tusage = 8 oz\n`","pinned":true,"hidden":false,"mode":"ojs"},{"id":153,"value":"mapscript `\nx = 1\n\ncup-of-tea:\n\t-> hot-water:\n\t\tusage = 8 oz\n\ncup-of-tea:\n\t@product:4\n\n@product:\n\tn = required\n\tLocation = [\"product\", n/10]\n`","pinned":true,"hidden":false,"mode":"ojs"},{"id":72,"value":"mapscript `\nuser:\n\t-> cup-of-tea:\n\t\tusage = 8 oz\n\t@custom\n`","pinned":true,"hidden":false,"mode":"ojs"},{"id":15,"value":"mapscript`\nuser:\n\t-> cup-of-tea\n\t@custom\n\ncup-of-tea:\n\t-> pour\n\t-> cup\n\t\tx\n\t@custom\n\ncup:\n\t@product:9\n\npour: brew barista\n\t@custom\n\nbrew: tea hot-water\n\t@custom\n\nbarista:\n\t@custom:9\n\ntea:\n\t@product:6\n\nhot-water: kettle water\n\t@custom:2\n\nkettle: power\n\t@product:6\n\npower:\n\t@utility\n\nwater:\n\t@utility\n\ncup-of-tea: milk\n\nmilk:\n\t@product:1\n\n`","pinned":true,"hidden":false,"mode":"ojs"},{"id":58,"value":"mapscript `\nuser: cup-of-tea\n\t@custom\n\ncup-of-tea: pour cup\n\t@custom\n\tmeasure = 8 oz\n\ncup:\n\t@product:9 # d\n\n# x\n#\n#\n\n#\npour: brew barista\n\t@custom\n\nbrew: tea hot-water\n\t@s\n\t@custom\n\nbarista:\n\t@custom:9\n\tmeasure = 1 hour # dsd\n\n@a:\n\tx = 1\n`","pinned":true,"hidden":false,"mode":"ojs"},{"id":36,"value":"mapscript `\nuser: cup-of-tea\n @custom\n\ncup-of-tea: pour cup\n @custom\n measure = 8 oz\n\ncup:\n\t@product:9\n\npour: brew barista\n\t@custom\n\nbrew: tea hot-water\n\t@custom\n\nbarista:\n\t@custom:9\n\tmeasure = 1 hour\n\n@a:\n\tx = 1\n`","pinned":true,"hidden":false,"mode":"ojs"},{"id":395,"value":"mapscript `\nuser:\n\t-> cup-of-tea:\n\t\tusage = 1\n\t@custom\n`","pinned":true,"hidden":false,"mode":"ojs"},{"id":51,"value":"mapscript `\n@varcost:\n\tvarunitcost = default 0\n\tusage = default 1 varunit\n\tvarcostrate = (sum(deps.varcost) + varunitcost) / varunit\n\tvarcost = dot(usage, varcostrate)\n\n@fixedcost:\n\tfixedcost = 0\n\tfixedunit = 1\n\tfixedcostself = 0\n\tfixedcost = (sum(deps.fixedcost) + fixedcostself) / fixedunit\n\n@activity:\n\tType = \"activity\"\n\t@varcost\n\n@custom:\n\tmaturityRating = default 5\n\n\tLocation = [\"custom\", maturityRating/10]\n\t@activity\n\n@utility:\n\tmaturityRating = default 5\n\tLocation = [\"utility\", maturityRating/10]\n\t@activity\n\n@product:\n\tmaturityRating = default 5\n\tLocation = [\"product\", maturityRating/10]\n\t@activity\n\n@genesis:\n\tmaturityRating = default 5\n\tLocation = [\"genesis\", maturityRating/10]\n\t@activity\n\na:\n\ta = 1\n\nb:\n\t@a\n\n---\nuser: cup-of-tea\n\t@custom\n\ncup-of-tea: pour cup\n\t@custom\n\tvarunit = 8 oz\n\ncup:\n\t@product\n\npour: brew barista\n\t@custom\n\nbarista:\n\t@custom\n\tmeasure = 1 hour\n`","pinned":true,"hidden":false,"mode":"ojs"},{"id":8,"value":"ohm = require(\"https://unpkg.com/ohm-js@15.5.0/dist/ohm.min.js\")","pinned":true,"hidden":false,"mode":"ojs"}],"files":"$W32","stdlib":"1","titling":"auto"}