Zack Maril zmaril

Keybase proof

I hereby claim:

I am zmaril on github.
I am zmaril (https://keybase.io/zmaril) on keybase.
I have a public key ASBSk8HWQgCYHukY5NAte5V6YE7IXitE1OkatCXhsz0-hAo

To claim this, I am signing this object:

I've been messing around with macro compilation and embedded languages in Julia. This is a reverse polish notation compiler built into a macro. Be forewarned, I don't really know julia or how to build a compiler.

I wanted the compiler to leak, so I could pull in environmental variables. a=1; rpn"a 1 +" #Totally valid and should be 2

I wanted the compiler to be able to take in information about the number of arguments to a function. N!f tells the compiler what to do. The default for N is 2. rpn"1 2 3 3!+" # should be 6

Thanks to being a compiler that is porous (unhygenic?), this means that all the power of julia is available to you, the reverse polish notation programmer.

	[{:lines ["/* $OpenBSD: scp.c,v 1.187 2016/09/12 01:22:38 deraadt Exp $ */"
	"/*"
	"* scp - secure remote copy. This is basically patched BSD rcp which"
	"* uses ssh to do the data transfer (instead of using rcmd)."
	"*"
	"* NOTE: This version should NOT be suid root. (This uses ssh to"
	"* do the transfer and ssh has the necessary privileges.)"
	"*"
	"* 1995 Timo Rinne <tri@iki.fi>, Tatu Ylonen <ylo@cs.hut.fi>"
	"*"

	(ns example.test
	(:require [aleph.tcp :as tcp]
	[manifold.stream :as stream]))

	(defn handler [s info]
	(println "START")
	(println @(stream/take! s))
	(println "STOP"))

	(defn start-server

	(ns instagenerate.strlenc
	(:refer-clojure :exclude [==])
	(:require [clojure.core.logic :as l :refer [run* fresh ==]]
	[clojure.core.logic.protocols :as lp])
	(:import [clojure.core.logic LCons]))

	(defn lcount [l]
	(loop [i 0 l l]
	(println i l)
	(if (and (= LCons (type l)) (.d l))

	import unittest
	from newMethod import GG,Key

	class TestnewMethod(unittest.TestCase):
	def test_GG(self):
	r = GG(Key(8,[[99, 99, 99, 3, 99, 5, 6, 7], [99, 99, 99, 3, 99, 5, 6, 7], [99, 99, 99, 3, 99, 5, 6, 7], [99, 99, 99, 3, 99, 5, 6, 7], [99, 99\
	, 99, 3, 99, 5, 6, 7], [99, 99, 99, 3, 99, 5, 6, 7], [99, 1, 99, 3, 99, 99, 6, 7], [99, 1, 99, 3, 99, 99, 6, 7]]))
	self.assertEqual(r.solutions,80)
	self.assertTrue(r.alternating)

	<html><head>
	<meta http-equiv="content-type" content="text/html; charset=UTF-8">
	<title> - jsFiddle demo</title>

	<script type="text/javascript" src="http://code.jquery.com/jquery-git2.js"></script>



	<link rel="stylesheet" type="text/css" href="/css/result-light.css">

	function map_with_indexed(f,cs...)
	args = Any[f,]
	push!(args,1:endof(first(cs)))
	for c in cs
	push!(args,c)
	end
	apply(map,args)
	end

	<!doctype html>
	<!--[if lt IE 7]> <html class="no-js ie6 oldie" lang="en"> <![endif]-->
	<!--[if IE 7]> <html class="no-js ie7 oldie" lang="en"> <![endif]-->
	<!--[if IE 8]> <html class="no-js ie8 oldie" lang="en"> <![endif]-->
	<!--[if gt IE 8]><!--> <html class="no-js" lang="en"> <!--<![endif]-->
	<head>
	<meta charset="utf-8">
	<meta http-equiv="X-UA-Compatible" content="IE=edge,chrome=1">

	<title></title>