tricu

definition-inspector.test.mjs (1226B)

---

 import test from 'node:test';
 import assert from 'node:assert/strict';
 import {definitionSites,inspectionText} from '../dist/definition-inspector.js';
 test('inspection sites are unique top-level heads, never comments, strings or local binders',()=>{
  const source='!export answer\n-- fake = 1\nanswer = 42\nf [] = 0\nf xs = 1\ntext = "not = a definition"\nouter x =\n  let local = x\n  in local\n|- hidden = 2 -|';
  assert.deepEqual(definitionSites('outer = let\n  answer = 1\n  in answer\nanswer = 42').map(s=>s.name),['outer','answer']);
  assert.deepEqual(definitionSites(source).map(s=>s.name),['answer','f','text','outer']);
  for(const site of definitionSites(source))assert.equal(source.slice(site.start,site.start+site.name.length),site.name);
 });
 test('inspection text respects decoder output and preserves zero/false/empty text',()=>{
  assert.equal(inspectionText({type:'number',value:'0'}),'0');
  assert.equal(inspectionText({type:'bool',value:false}),'false');
  assert.equal(inspectionText({type:'string',value:''}),'');
  assert.equal(inspectionText({type:'tricu',value:'ignored',file:{text:'t',extension:'tri',bytes:1}}),'t');
  assert.throws(()=>inspectionText({type:'tree',value:{}}),/source interpretation/);
 });