monolithed

# https://raw.githubusercontent.com/aptana/studio2/master/tools/com.aptana.ide.parsing.tools/Parser%20Files/XML.bnf


###
#	level 1
###
document
    :   prolog element Misc* 
    ;

hstraub

var script = document.createElement("script");
script.src = "http://whatever.com/js/my/script.js";
document.body.appendChild(script);

elsassph

/*
	Automatically generate dispatch functions as:
	
		public function onDoubleArguments(one:String, two:Int) {
			for (listener in listeners) 
				listener.onDoubleArguments(one, two);
		}
*/
class Example extends Dispatcher<Dynamic>
{

joepie91

Lower precedence means a stronger binding; ie. this list is sorted from strongest to weakest binding, and in the case of equal precedence between two operators, the associativity decides the binding.

Prec	Abbreviation	Example	Assoc	Description
1	SELECT	e . attrpath [or def]	none	Select attribute denoted by the attribute path attrpath from set e. (An attribute path is a dot-separated list of attribute names.) If the attribute doesn’t exist, return default if provided, otherwise abort evaluation.
2	APP	e1 e2	left	Call function e1 with argument e2.
3	NEG	-e	none	Numeric negation.
4	HAS_ATTR	e ? attrpath	none	Test whether set e contains the attribute denoted by attrpath; return true or false.
5	CONCAT	e1 ++ e2	right	List concatenation.
6	MUL	e1 * e2	le

kachayev

# -*- coding: utf-8 -*-

from tabulate import tabulate

class Var(object):
    def __init__(self, name):
        self.name = name
        self.value = None

    def bind(self, value):

dimitardanailov

#!/bin/sh

# https://apple.stackexchange.com/questions/82472/what-steps-are-needed-to-create-a-new-user-from-the-command-line/84039#84039

. /etc/rc.common
dscl . create /Users/administrator
dscl . create /Users/administrator RealName "Terminal User Account"
dscl . create /Users/administrator hint "Password Hint"
dscl . create /Users/administrator picture "/Path/To/Picture.png"
dscl . passwd /Users/administrator thisistheaccountpassword

sloanlance

jq: JSONL ↔︎ JSON conversion

Prerequisites

• jq — https://jqlang.org/ — "like sed for JSON data"

  There are several options available for installing jq. I prefer to use Homebrew: brew install jq

• JSONL → JSON

codecitizen

(ns list-classes-from-jar
    (:import (java.util.jar JarFile)))

(def jar-file (JarFile. "target/s3-file-upload-sls-1.0.0-SNAPSHOT-standalone.jar"))

(def entries (.entries jar-file))

(while (.hasMoreElements entries)
    (let [entry (.nextElement entries)]
        (println (.getName entry))))

Yanrishatum

How to compile HL/C

Prepwork/terms

Because I have no trust in people.

• <hashlink> points to your installation of Hashlink, e.g. folder in which hl.exe (or Unix executable) is, alongside with library binaries (.hdll files), and include folder.
• <src> points to the folder containing generated HL/C sources. One that contains hlc.json file.
• <app> refers to your output executable name, including extension.
• <main> refers to your entry-point file name, including extension (see below).
• I provide example of doing it on Windows via MSVC cl.exe, but Unix should be more or less same with replacement of argument flags and compiler.
• I expect that you DO have a compiler installed and can call cl.exe or other compiler from command-line.

573

Add on top of default.nix: with import {}; or simply run as nix-build '' (i. e. for nix-build complaining) or rather nix-build -E 'with import {}; callPackage ./default.nix {}' (or even import)