elias/strudel-docker
1
0
Fork 0
mirror of https://github.com/eliasstepanik/strudel-docker.git synced 2026-01-26 13:08:28 +00:00
Code Issues Packages Projects Releases Wiki Activity

simplify fn

Browse Source
This commit is contained in:
Felix Roos 2024-05-19 00:08:17 +02:00
parent c4b3d48498
commit 8ac409f03c
1 changed files with 12 additions and 11 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

23
packages/transpiler/transpiler.mjs
View File

@ -227,18 +227,19 @@ function isTidalTeplateLiteral(node) {
} }
function collectHaskellMiniLocations(haskellCode, offset) { function collectHaskellMiniLocations(haskellCode, offset) {
const stringLocations = haskellCode.split('').reduce((acc, char, i) => { return haskellCode
if (char !== '"') { .split('')
.reduce((acc, char, i) => {
if (char !== '"') {
return acc;
}
if (!acc.length || acc[acc.length - 1].length > 1) {
acc.push([i + 1]);
} else {
acc[acc.length - 1].push(i);
}
return acc; return acc;
} }, [])
if (!acc.length || acc[acc.length - 1].length > 1) {
acc.push([i + 1]);
} else {
acc[acc.length - 1].push(i);
}
return acc;
}, []);
return stringLocations
.map(([start, end]) => { .map(([start, end]) => {
const miniString = haskellCode.slice(start, end); const miniString = haskellCode.slice(start, end);
return getLeafLocations(`"${miniString}"`, offset + start - 1); return getLeafLocations(`"${miniString}"`, offset + start - 1);