lydell

// https://elm.dmy.fr/?q=elm%2F
// https://elm.dmy.fr/?q=elm-explorations%2F
copy(Array.from(document.querySelectorAll(".pkg-summary-title a"), e => e.textContent).filter(s => s.startsWith("elm/") || s.startsWith("elm-explorations/")).join("\n"))

lydell

For those interested in ES5 vs ES3 … it’s ES5. Trying to parse as ES3 chokes here:

var _String_filter = F2(function(isGood, str)
{
	var arr = [];
	var len = str.length;
	var i = 0;
	while (i < len)
	{

lydell

module Main exposing (main)

import React exposing (..)
import Zod

main = React.mount(render)

render(model) =
    let
        (getCount, setCount) = React.useState("count", Zod.int(), 0)

lydell

import * as readline from "readline";

const rl = readline.createInterface({ input: process.stdin, output: process.stdout });
const lower = new Date(process.argv[2] || "0000-01-01");
const upper = new Date(process.argv[3] || "9999-12-31");
const diff = upper - lower;

function randomDate() {
  return new Date(lower.getTime() + Math.random() * diff);
}

lydell

Find unused Elm record fields

This script finds some unused record fields (but not all).

First run npm ci, and then:

git grep -l '^main =' | xargs elm make --output elm.js && node find-unused-record-fields.js < elm.js

lydell

test("js-tokens example", () => {
  const token = {
    type: "StringLiteral",
    value: `""`,
  };
  expect(token).toMatchInlineSnapshot(`
{
  "type": "StringLiteral",
  "value": """",
}

lydell

begin
    echo 'module Input'
    echo 'let input ='
    echo '  ['
    cat | string replace -r ^ '    '
    echo '  ]'
end >Input.fsx

dotnet fsi ab.fsx

lydell

module AB exposing (main)

import Browser
import Html exposing (Html)
import Html.Attributes
import Html.Events
import Input
import Process
import Set
import Svg exposing (Svg)

lydell

module AB exposing (main)

import Browser
import Dict exposing (Dict)
import Html exposing (Html)
import Html.Attributes
import Html.Events
import Process
import Svg exposing (Svg)
import Svg.Attributes

lydell

var _Debug_log = F2(function(tag, value)
{
	console.log(tag + ': ' + _Debug_toString(value));
	return value;
});