Skip to content

Instantly share code, notes, and snippets.

View igstan's full-sized avatar

Ionuț G. Stan igstan

203 followers · 505 following
View GitHub Profile
@igstan
igstan / timewarp.sml
Created November 12, 2024 15:23
(* Inspired by: https://www.reddit.com/r/ProgrammingLanguages/comments/1golfwz/emit_a_time_travelling_programming_language/ *)
structure Timewarp =
struct
structure Cont = SMLofNJ.Cont;
type t = unit Cont.cont option ref
fun point () =
let
@igstan
igstan / IEEE754.scala
Created August 6, 2024 20:12
#!/usr/bin/env -S scala-cli shebang -S 3
/**
* https://www.doc.ic.ac.uk/~eedwards/compsys/float/
*/
import java.{ lang => j }
val n = args(0).toFloat
val bits = j.Float.floatToRawIntBits(n)
@igstan
igstan / css-3d-transforms.html
Created July 7, 2024 11:46
CSS 3D Transforms & Animations
<!DOCTYPE html>
<!-- Demo: https://www.youtube.com/watch?v=7M9aPgORP_E -->
<html>
<head>
<meta charset="UTF-8">
<title>CSS 3D Transforms &amp; Animations</title>
<style type="text/css">
* {
@igstan
igstan / scala-3-is-yaml.scala
Last active August 27, 2024 01:18
object YAML:
apiVersion:
apps/v1
kind:
Deployment
metadata:
name:
"my-app"
namespace:
"my-app"
@igstan
igstan / pratt.sh
Last active June 8, 2024 11:45
Arithmetic evaluator in pure Bash using Pratt parsing
#!/usr/bin/env bash
#
# RESOURCES
#
# - https://tdop.github.io/
# - https://journal.stuffwithstuff.com/2011/03/19/pratt-parsers-expression-parsing-made-easy/
# - https://martin.janiczek.cz/2023/07/03/demystifying-pratt-parsers.html
#
@igstan
igstan / clone-gists.sh
Last active May 30, 2024 17:35
Clone all your GitHub gists, public or private.
#!/usr/bin/env bash
# Clones all gists (public or private) into directory `gists/` (auto-created
# and configurable if desired). The cloned gists are placed into directory
# names formed from the name of the first file found in the gist concatenated
# to the gist ID. For example, this gist will be cloned into:
#
# gists/clone-gists.sh-0a89b8bb1a6df0754647cdd87d8221b6
#
# USAGE:
@igstan
igstan / reverse-pdf.js
Last active May 30, 2024 19:49
#!/usr/bin/env osascript -l JavaScript
ObjC.import('stdlib')
ObjC.import('PDFKit');
function reverse(opts) {
// Load the PDF document
const pdfURL = $.NSURL.fileURLWithPath(opts.src);
const pdfDoc = $.PDFDocument.alloc.initWithURL(pdfURL);
@igstan
igstan / nulls-nulls-everywhere.sql
Created May 15, 2024 19:16
SQL NULL & JSON NULL
SELECT
jsonb_set(
'{"deeply": {"nested": {"field": 1}}}'::jsonb,
'{deeply,nested,field}',
to_jsonb(NULL::int)
) AS with_null_arg,
jsonb_set(
'{"deeply": {"nested": {"field": 1}}}'::jsonb,
'{deeply,nested,field}',
@igstan
igstan / jitted.c
Created November 30, 2022 20:08
Hello World JIT for Apple Silicon
#include <pthread.h>
#include <stdbool.h>
#include <stdio.h>
#include <stdint.h>
#include <string.h>
#include <sys/mman.h>
static uint8_t code[] = {
0x40, 0x05, 0x80, 0x52, // mov w0, #3
0xc0, 0x03, 0x5f, 0xd6, // ret
@igstan
igstan / fold_right.ml
Created November 26, 2022 05:13
module Seq = struct
include Seq
let rec fold_right : 'a Seq.t -> 'b -> ('a -> 'b Lazy.t -> 'b Lazy.t) -> 'b Lazy.t =
fun seq acc f ->
match seq () with
| Seq.Nil -> lazy acc
| Seq.Cons (a, rest) -> f a (lazy (Lazy.force (fold_right rest acc f)))
let map : ('a -> 'b) -> 'a Seq.t -> 'b Seq.t =