elias/strudel
1
0
Fork 0
mirror of https://github.com/eliasstepanik/strudel.git synced 2026-01-11 13:48:40 +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) {
const stringLocations = haskellCode.split('').reduce((acc, char, i) => {
if (char !== '"') {
return haskellCode
.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;
}
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]) => {
const miniString = haskellCode.slice(start, end);
return getLeafLocations(`"${miniString}"`, offset + start - 1);