audinue

function objectMap () {
  return Object.defineProperty(Object.create(null), Symbol.iterator, {
    configurable: true, // This descriptor is inspired by Map.prototype[Symbol.iterator]
    writable: true,
    value: function* () {
      for (const key in this) {
        yield [key, this[key]]
      }
    }
  })

audinue

using System;
using System.Collections.Generic;
using System.Linq;

public sealed class Container
{
    private Dictionary<Type, Type> concreteTypes = new Dictionary<Type, Type>();

    private Dictionary<Type, object> objects = new Dictionary<Type, object>();

draegtun

>> double: lambda [? * 2]
>> double 2
== 4

>> double: lambda [? + ?]
>> double 4
== 8

>> add2: lambda [?1 + ?2]
>> add2 2 4

dmajda

/*
 * Simple Intentation-Based Language PEG.js Grammar
 * ================================================
 *
 * Describes a simple indentation-based language. A program in this language is
 * a possibly empty list of the following statements:
 *
 *   * S (simple)
 *
 *     Consists of the letter "S".

XProger

program min_ogl;
 
uses
  Windows, OpenGL;
 
var
  pfd : TPixelFormatDescriptor;
  DC  : HDC;
begin
// Creating window

irazasyed

<?PHP

/**
 * Spintax - A helper class to process Spintax strings.
 */
class Spintax
{
    /**
     * Set seed to make the spinner predictable. 
     */

dmajda

Content =
  (Element / Text)*

Element =
  startTag:StartTag content:Content endTag:EndTag {
    if (startTag != endTag) {
      throw new Error(
        "Expected </" + startTag + "> but </" + endTag + "> found."
      );
    }

gblazex

IMPORTANT

Please duplicate this radar for a Safari fix! 
This will clean up a 50-line workaround.

  rdar://22376037 (https://openradar.appspot.com/radar?id=4965070979203072)

//////////////////////////////////////////////////////////////////////////////

(Now available as a standalone repo.)

mjackson

/**
 * Converts an RGB color value to HSL. Conversion formula
 * adapted from http://en.wikipedia.org/wiki/HSL_color_space.
 * Assumes r, g, and b are contained in the set [0, 255] and
 * returns h, s, and l in the set [0, 1].
 *
 * @param   Number  r       The red color value
 * @param   Number  g       The green color value
 * @param   Number  b       The blue color value
 * @return  Array           The HSL representation

riyadparvez

protected override CreateParams CreateParams
{
    get
    {
        CreateParams cp = base.CreateParams;
        cp.ExStyle |= 0x02000000;
        return cp;
    }
}