jonsterling

My tiny language, Foam, is coming along nicely! The following code:

tv := @textView
as := tv typingAttributes. mutableCopy
as setObject:@defaultParagraphStyle forKey:NSParagraphStyleAttributeName
@defaultTypingAttributes = as

tv setTypingAttributes:@defaultTypingAttributes
tv setDefaultParagraphStyle:@defaultParagraphStyle

jonsterling

+ (id)bagWithCollection:(id <NSFastEnumeration>)enumerable;

jonsterling

struct arr : obj
{
  arr(id *input)
  {
    size_t s = sizeof(input) - 1;
    this->substrate_object = [NSArray arrayWithObjects:input count:s];
  }
  
  arr(NSArray *input) : obj::obj(input) {}
  

jonsterling

\usepackage{covington}
%....

    \begin{examples}
      \item[(o)] \gll no-nintsi-mi eeroka naaka
                      1st.\textsc{subj}.like.2nd.\textsc{obj} I you
                 \glt `I like you.'
                 \glend
      \item[(a)] \gll no-yaatsi naaka
                      1st.\textsc{subj}.go I

jonsterling

Just transcribed (out of cuneiform) and translated this monster passage:

e₂-an-na-tum₂ ensi₂ lagaš^ki a₂-šum₂-ma en-lil₂-ke₄ ga-zi ni-gu₇-a ^dnin-hur-saǧ-ke₄ mu-pad₃-a₂ ^dnin-ǧir₂-su₂-ke₄ ša₃-pad₃-a₂ ^dnanše-ke₄ dumu-a-kur-gal ensi₂ lagaš^ki kur elam^ki aga₃-kar₂ bi-se₃ URU_xA^ki aga₃-kar₂ bi-se₃ umma^ki aga₃-kar₂ bi-se₃ uri₅^ki aga₃-kar bi-se₃ ud ba ^dnin-gir₂-su₂-ra kisal-daǧal-la-na pu₂-sig₄-bahar₂-ra mu-na-ni-du₃ diǧir-ra-ni ^dšul-utul₁₂ ud-ba ^dnin-ǧi

jonsterling

\usepackage{ifthen,delarray}
\newcommand{\phonarr}[1]{
  \ifthenelse{\equal{#1}{}}{}{\ensuremath{
    \begin{array}[c][ {l} ]
      #1
    \end{array}
  }}
}

\newcommand{\genmap}[2]{#1\  $\to$\ #2}

jonsterling

import Prelude
import Control.Applicative

-- These are some sketchy implementations of integral approximations.
-- They work, but are probably in need of refactoring.
-- I repeat: I SUCK at Haskell, so this is really gross.

midApp n a b f = h * (foldl (+) 0 vals) where
  h = (b - a)/n
  vals = [midF i | i <- [1..n]] where

jonsterling

template <typename T> NSArray *fk::arr (T obj1, ...) NS_REQUIRES_NIL_TERMINATION;
template <typename T> NSArray *fk::lift_arr (T obj);

// we started with the following, which would be better represented as a C-array of ints:
[NSArray arrayWithObjects:
 [NSNumber numberWithInt:2],
 [NSNumber numberWithInt:5],
 [NSNumber numberWithInt:1],
 [NSNumber numberWithInt:45],
 nil];

jonsterling

#import <Foundation/Foundation.h>
#import <CoreGraphics/CoreGraphics.h>
#import <objc/message.h>
#import <string>
#import <map>
#import <typeinfo>

#define $(value) box<typeof(value)>(value)

using namespace std;

jonsterling

#include <stdio.h>

int main () {
  size_t n = 100;
  int odds[n];
  
  size_t i;
  for(i = 0; i < n; ++i) {
    odds[i] = 2 * i + 1;
  }