sampersand

#!/usr/bin/env ruby

# Knight in ruby, but with copious amounts of monkey patching :-)

class Fn
  @fns = {}

  def self.register(name, ...) = @fns[name] = Fn.new(...)
  def self.lookup(name) = @fns.fetch(name)
  def initialize(call_args: true, &block) @call_args, @block = call_args, block end

sampersand

raw =: '1,9,10,3,2,3,11,0,99,30,40,50'
ints =: ". every (',' cut raw)

run_one =: {{
	'op src1 src2 dst' =. (x + i.4) { y

	select. op
	case. 1 do. ((src1{y)+(src2{y)) dst } y
	case. 2 do. y((src1{y)*(src2{y)) dst } y

sampersand

CWD =: (<./CWD i:'/\') {.CWD=: ;(4!:3''){~4!:4 CWD=: <'CWD'
raw =: }: freads CWD , '/day2.txt'
die =: {{ echo y throw. }}

NB. raw =: '1,9,10,3,2,3,11,0,99,30,40,50'
ints =: ". every (',' cut raw)
ints =: (12 2) (1 2) } ints

number_of_params =: ((_ 3 3) , (_ * i.96) , 0) & {

sampersand

[12:27:12 PM 1029] ruby % git diff
diff --git a/gc.c b/gc.c
index 3fd2a3b33f..f909e5b81b 100644
--- a/gc.c
+++ b/gc.c
@@ -11460,6 +11460,10 @@ gc_stress_get(rb_execution_context_t *ec, VALUE self)
 static void
 gc_stress_set(rb_objspace_t *objspace, VALUE flag)
 {
+    if (flag != Qtrue && flag != Qfalse) {

sampersand

#!/bin/sh

# Safety first
set -o nounset

scriptname="$(basename -- "$0"; echo x)"; scriptname="${scriptname%?x}"

warn () {
   msg="%s: $1"'\n'
   shift

sampersand

################################################################################
# Option 1: Just repeat the defaults
################################################################################
alias ls="ls -ACFPq"

## ... other config ...

# macOS config
if [ "$(uname)" = Darwin ]; then

sampersand

## SH
while test $count -gt 0; do
	echo $string\\c
  count=`expr $count - 1`
done

## CSH
while ( $count > 0 )
  echo -n $string
  @ count--