UNPKG

pareto-fountain-pen

Version:

A TypeScript library for easily generating source code files with proper indentation in the pareto programming style/language

129 lines 9.78 kB
"use strict"; var __createBinding = (this && this.__createBinding) || (Object.create ? (function(o, m, k, k2) { if (k2 === undefined) k2 = k; var desc = Object.getOwnPropertyDescriptor(m, k); if (!desc || ("get" in desc ? !m.__esModule : desc.writable || desc.configurable)) { desc = { enumerable: true, get: function() { return m[k]; } }; } Object.defineProperty(o, k2, desc); }) : (function(o, m, k, k2) { if (k2 === undefined) k2 = k; o[k2] = m[k]; })); var __setModuleDefault = (this && this.__setModuleDefault) || (Object.create ? (function(o, v) { Object.defineProperty(o, "default", { enumerable: true, value: v }); }) : function(o, v) { o["default"] = v; }); var __importStar = (this && this.__importStar) || (function () { var ownKeys = function(o) { ownKeys = Object.getOwnPropertyNames || function (o) { var ar = []; for (var k in o) if (Object.prototype.hasOwnProperty.call(o, k)) ar[ar.length] = k; return ar; }; return ownKeys(o); }; return function (mod) { if (mod && mod.__esModule) return mod; var result = {}; if (mod != null) for (var k = ownKeys(mod), i = 0; i < k.length; i++) if (k[i] !== "default") __createBinding(result, mod, k[i]); __setModuleDefault(result, mod); return result; }; })(); Object.defineProperty(exports, "__esModule", { value: true }); exports.Block = exports.Directory = void 0; const pa = __importStar(require("exupery-core-alg")); const Directory = ($) => $.map(($) => pa.cc($, ($) => pa.cc($, ($) => { switch ($[0]) { case 'file': return pa.ss($, ($) => ['file', (0, exports.Block)($)]); case 'directory': return pa.ss($, ($) => ['directory', (0, exports.Directory)($)]); default: return pa.au($[0]); } }))); exports.Directory = Directory; const Block = ($) => { return pa.pure.list.build(($i) => { const Block_Part = ($, $p) => { switch ($[0]) { case 'line': pa.ss($, ($) => { $i['add element']({ 'indentation': $p['current indentation'], 'text': $, }); }); break; case 'nested line': pa.ss($, ($) => { Line($, { 'current indentation': $p['current indentation'] }); }); break; case 'nothing': pa.ss($, ($) => { // do nothing }); break; case 'sub block': pa.ss($, ($) => { Block($, { 'current indentation': $p['current indentation'] }); }); break; default: pa.au($[0]); } }; const Block = ($, $p) => { $.__for_each(($) => { Block_Part($, { 'current indentation': $p['current indentation'] }); }); }; const Line = ($, $p) => { let current_line = null; const Line2 = ($) => { $.__for_each(($) => { switch ($[0]) { case 'snippet': pa.ss($, ($) => { current_line = current_line === null ? $ : current_line + $; }); break; case 'indent': pa.ss($, ($) => { if (current_line !== null) { $i['add element']({ 'indentation': $p['current indentation'], 'text': current_line, }); } current_line = null; Block($, { 'current indentation': $p['current indentation'] + 1 }); }); break; case 'nothing': pa.ss($, ($) => { // do nothing }); break; case 'sub line': pa.ss($, ($) => { Line2($); }); break; default: pa.au($[0]); } }); }; Line2($); if (current_line !== null) { $i['add element']({ 'indentation': $p['current indentation'], 'text': current_line, }); } }; Block($, { 'current indentation': 0 }); }); }; exports.Block = Block; //# sourceMappingURL=data:application/json;base64,eyJ2ZXJzaW9uIjozLCJmaWxlIjoic2VtaV9saW5lcy5qcyIsInNvdXJjZVJvb3QiOiIiLCJzb3VyY2VzIjpbIi4uLy4uLy4uL3NyYy90cmFuc2Zvcm1hdGlvbnMvYmxvY2svc2VtaV9saW5lcy50cyJdLCJuYW1lcyI6W10sIm1hcHBpbmdzIjoiOzs7Ozs7Ozs7Ozs7Ozs7Ozs7Ozs7Ozs7Ozs7Ozs7Ozs7Ozs7QUFDQSxxREFBc0M7QUFLL0IsTUFBTSxTQUFTLEdBQUcsQ0FDckIsQ0FBaUIsRUFDRixFQUFFLENBQUMsQ0FBQyxDQUFDLEdBQUcsQ0FBQyxDQUFDLENBQUMsRUFBRSxFQUFFLENBQUMsRUFBRSxDQUFDLEVBQUUsQ0FBQyxDQUFDLEVBQUUsQ0FBQyxDQUFDLEVBQXFCLEVBQUUsQ0FBQyxFQUFFLENBQUMsRUFBRSxDQUFDLENBQUMsRUFBRSxDQUFDLENBQUMsRUFBRSxFQUFFO0lBQ2pGLFFBQVEsQ0FBQyxDQUFDLENBQUMsQ0FBQyxFQUFFLENBQUM7UUFDWCxLQUFLLE1BQU0sQ0FBQyxDQUFDLE9BQU8sRUFBRSxDQUFDLEVBQUUsQ0FBQyxDQUFDLEVBQUUsQ0FBQyxDQUFDLEVBQUUsRUFBRSxDQUFDLENBQUMsTUFBTSxFQUFFLElBQUEsYUFBSyxFQUFDLENBQUMsQ0FBQyxDQUFDLENBQUMsQ0FBQTtRQUN2RCxLQUFLLFdBQVcsQ0FBQyxDQUFDLE9BQU8sRUFBRSxDQUFDLEVBQUUsQ0FBQyxDQUFDLEVBQUUsQ0FBQyxDQUFDLEVBQUUsRUFBRSxDQUFDLENBQUMsV0FBVyxFQUFFLElBQUEsaUJBQVMsRUFBQyxDQUFDLENBQUMsQ0FBQyxDQUFDLENBQUE7UUFDckUsT0FBTyxDQUFDLENBQUMsT0FBTyxFQUFFLENBQUMsRUFBRSxDQUFDLENBQUMsQ0FBQyxDQUFDLENBQUMsQ0FBQyxDQUFBO0lBQy9CLENBQUM7QUFDTCxDQUFDLENBQUMsQ0FBQyxDQUFDLENBQUE7QUFSUyxRQUFBLFNBQVMsYUFRbEI7QUFFRyxNQUFNLEtBQUssR0FBRyxDQUNqQixDQUFhLEVBQ0YsRUFBRTtJQUViLE9BQU8sRUFBRSxDQUFDLElBQUksQ0FBQyxJQUFJLENBQUMsS0FBSyxDQUFDLENBQUMsRUFBRSxFQUFFLEVBQUU7UUFFN0IsTUFBTSxVQUFVLEdBQUcsQ0FDZixDQUFrQixFQUNsQixFQUVDLEVBQ0csRUFBRTtZQUNOLFFBQVEsQ0FBQyxDQUFDLENBQUMsQ0FBQyxFQUFFLENBQUM7Z0JBQ1gsS0FBSyxNQUFNO29CQUNQLEVBQUUsQ0FBQyxFQUFFLENBQUMsQ0FBQyxFQUFFLENBQUMsQ0FBQyxFQUFFLEVBQUU7d0JBQ1gsRUFBRSxDQUFDLGFBQWEsQ0FBQyxDQUFDOzRCQUNkLGFBQWEsRUFBRSxFQUFFLENBQUMscUJBQXFCLENBQUM7NEJBQ3hDLE1BQU0sRUFBRSxDQUFDO3lCQUNaLENBQUMsQ0FBQTtvQkFDTixDQUFDLENBQUMsQ0FBQTtvQkFDRixNQUFLO2dCQUNULEtBQUssYUFBYTtvQkFDZCxFQUFFLENBQUMsRUFBRSxDQUFDLENBQUMsRUFBRSxDQUFDLENBQUMsRUFBRSxFQUFFO3dCQUNYLElBQUksQ0FBQyxDQUFDLEVBQUUsRUFBRSxxQkFBcUIsRUFBRSxFQUFFLENBQUMscUJBQXFCLENBQUMsRUFBRSxDQUFDLENBQUE7b0JBQ2pFLENBQUMsQ0FBQyxDQUFBO29CQUNGLE1BQUs7Z0JBQ1QsS0FBSyxTQUFTO29CQUNWLEVBQUUsQ0FBQyxFQUFFLENBQUMsQ0FBQyxFQUFFLENBQUMsQ0FBQyxFQUFFLEVBQUU7d0JBQ1gsYUFBYTtvQkFDakIsQ0FBQyxDQUFDLENBQUE7b0JBQ0YsTUFBSztnQkFDVCxLQUFLLFdBQVc7b0JBQUUsRUFBRSxDQUFDLEVBQUUsQ0FBQyxDQUFDLEVBQUUsQ0FBQyxDQUFDLEVBQUUsRUFBRTt3QkFDN0IsS0FBSyxDQUFDLENBQUMsRUFBRSxFQUFFLHFCQUFxQixFQUFFLEVBQUUsQ0FBQyxxQkFBcUIsQ0FBQyxFQUFFLENBQUMsQ0FBQTtvQkFDbEUsQ0FBQyxDQUFDLENBQUE7b0JBQ0UsTUFBSztnQkFDVCxPQUFPLENBQUMsQ0FBQyxFQUFFLENBQUMsRUFBRSxDQUFDLENBQUMsQ0FBQyxDQUFDLENBQUMsQ0FBQyxDQUFBO1lBQ3hCLENBQUM7UUFDTCxDQUFDLENBQUE7UUFDRCxNQUFNLEtBQUssR0FBRyxDQUNWLENBQWEsRUFDYixFQUVDLEVBQ0csRUFBRTtZQUNOLENBQUMsQ0FBQyxVQUFVLENBQUMsQ0FBQyxDQUFDLEVBQUUsRUFBRTtnQkFDZixVQUFVLENBQUMsQ0FBQyxFQUFFLEVBQUUscUJBQXFCLEVBQUUsRUFBRSxDQUFDLHFCQUFxQixDQUFDLEVBQUUsQ0FBQyxDQUFBO1lBQ3ZFLENBQUMsQ0FBQyxDQUFBO1FBQ04sQ0FBQyxDQUFBO1FBQ0QsTUFBTSxJQUFJLEdBQUcsQ0FDVCxDQUFZLEVBQ1osRUFFQyxFQUNHLEVBQUU7WUFDTixJQUFJLFlBQVksR0FBa0IsSUFBSSxDQUFBO1lBQ3RDLE1BQU0sS0FBSyxHQUFHLENBQ1YsQ0FBWSxFQUNSLEVBQUU7Z0JBRU4sQ0FBQyxDQUFDLFVBQVUsQ0FBQyxDQUFDLENBQUMsRUFBRSxFQUFFO29CQUNmLFFBQVEsQ0FBQyxDQUFDLENBQUMsQ0FBQyxFQUFFLENBQUM7d0JBQ1gsS0FBSyxTQUFTOzRCQUNWLEVBQUUsQ0FBQyxFQUFFLENBQUMsQ0FBQyxFQUFFLENBQUMsQ0FBQyxFQUFFLEVBQUU7Z0NBQ1gsWUFBWSxHQUFHLFlBQVksS0FBSyxJQUFJLENBQUMsQ0FBQyxDQUFDLENBQUMsQ0FBQyxDQUFDLENBQUMsWUFBWSxHQUFHLENBQUMsQ0FBQTs0QkFDL0QsQ0FBQyxDQUFDLENBQUE7NEJBQ0YsTUFBSzt3QkFDVCxLQUFLLFFBQVE7NEJBQ1QsRUFBRSxDQUFDLEVBQUUsQ0FBQyxDQUFDLEVBQUUsQ0FBQyxDQUFDLEVBQUUsRUFBRTtnQ0FDWCxJQUFJLFlBQVksS0FBSyxJQUFJLEVBQUUsQ0FBQztvQ0FDeEIsRUFBRSxDQUFDLGFBQWEsQ0FBQyxDQUFDO3dDQUNkLGFBQWEsRUFBRSxFQUFFLENBQUMscUJBQXFCLENBQUM7d0NBQ3hDLE1BQU0sRUFBRSxZQUFZO3FDQUN2QixDQUFDLENBQUE7Z0NBQ04sQ0FBQztnQ0FDRCxZQUFZLEdBQUcsSUFBSSxDQUFBO2dDQUNuQixLQUFLLENBQUMsQ0FBQyxFQUFFLEVBQUUscUJBQXFCLEVBQUUsRUFBRSxDQUFDLHFCQUFxQixDQUFDLEdBQUcsQ0FBQyxFQUFFLENBQUMsQ0FBQTs0QkFDdEUsQ0FBQyxDQUFDLENBQUE7NEJBQ0YsTUFBSzt3QkFDVCxLQUFLLFNBQVM7NEJBQ1YsRUFBRSxDQUFDLEVBQUUsQ0FBQyxDQUFDLEVBQUUsQ0FBQyxDQUFDLEVBQUUsRUFBRTtnQ0FDWCxhQUFhOzRCQUNqQixDQUFDLENBQUMsQ0FBQTs0QkFDRixNQUFLO3dCQUNULEtBQUssVUFBVTs0QkFDWCxFQUFFLENBQUMsRUFBRSxDQUFDLENBQUMsRUFBRSxDQUFDLENBQUMsRUFBRSxFQUFFO2dDQUVYLEtBQUssQ0FBQyxDQUFDLENBQUMsQ0FBQTs0QkFDWixDQUFDLENBQUMsQ0FBQTs0QkFDRixNQUFLO3dCQUNULE9BQU8sQ0FBQyxDQUFDLEVBQUUsQ0FBQyxFQUFFLENBQUMsQ0FBQyxDQUFDLENBQUMsQ0FBQyxDQUFDLENBQUE7b0JBQ3hCLENBQUM7Z0JBQ0wsQ0FBQyxDQUFDLENBQUE7WUFFTixDQUFDLENBQUE7WUFDRCxLQUFLLENBQUMsQ0FBQyxDQUFDLENBQUE7WUFDUixJQUFJLFlBQVksS0FBSyxJQUFJLEVBQUUsQ0FBQztnQkFDeEIsRUFBRSxDQUFDLGFBQWEsQ0FBQyxDQUFDO29CQUNkLGFBQWEsRUFBRSxFQUFFLENBQUMscUJBQXFCLENBQUM7b0JBQ3hDLE1BQU0sRUFBRSxZQUFZO2lCQUN2QixDQUFDLENBQUE7WUFDTixDQUFDO1FBQ0wsQ0FBQyxDQUFBO1FBRUQsS0FBSyxDQUNELENBQUMsRUFDRCxFQUFFLHFCQUFxQixFQUFFLENBQUMsRUFBRSxDQUMvQixDQUFBO0lBQ0wsQ0FBQyxDQUFDLENBQUE7QUFDTixDQUFDLENBQUE7QUE1R1ksUUFBQSxLQUFLLFNBNEdqQiJ9