jakubkulhan

TARGET=$(notdir $(shell pwd))
MAGIC=$(shell (([ "$(GOARCH)" == "amd64" ] && echo 6) || ([ "$(GOARCH)" == "arm" ] && echo 5)) || echo 8)

all:
	@for dir in `find * -type d`; do                                        \
	    go=$$(find "$$dir" -maxdepth 1 -name "*.go");                       \
	    if [ ! -z "$$go" ]; then                                            \
                echo "- $$dir: $$go";                                           \
	        $(MAGIC)g -I. -o _go_.8 $$go;                                   \
	        rm -f $$dir.a;                                                  \

jakubkulhan

TARGET=$(notdir $(shell pwd))
MAGIC=$(shell (([ "$(GOARCH)" == "amd64" ] && echo 6) || ([ "$(GOARCH)" == "arm" ] && echo 5)) || echo 8)

all:
	@for dir in `find * -type d`; do                                        \
	    go=$$(find "$$dir" -maxdepth 1 -name "*.go");                       \
	    if [ ! -z "$$go" ]; then                                            \
                echo "- $$dir: $$go";                                           \
	        $(MAGIC)g -I. -o _go_.8 $$go;                                   \
	        rm -f $$dir.a;                                                  \

jakubkulhan

TARGET=$(notdir $(shell pwd))
MAGIC=$(shell (([ "$(GOARCH)" == "amd64" ] && echo 6) || ([ "$(GOARCH)" == "arm" ] && echo 5)) || echo 8)

all:
	@for dir in `find * -type d`; do                                        \
	    go=$$(find "$$dir" -maxdepth 1 -name "*.go");                       \
	    if [ ! -z "$$go" ]; then                                            \
                echo "- $$dir: $$go";                                           \
	        $(MAGIC)g -I. -o _go_.8 $$go;                                   \
	        rm -f $$dir.a;                                                  \

jakubkulhan

<?php

/*
 * Hledá se způsob, jak elegantně přepsat PHP kód níže pomocí vyjadřovacích 
 * schopností jiného šablonovacího jazyka, který pro daná data (pole $seznam)
 * vyplivne stejný výsledek (včetně zachování formátování bílých znaků; hlavně
 * co se týče věcí v závorce).
 */

$seznam = array(

jakubkulhan

toplevel = ys:element
         (eol y:element -> { $ys = array_merge($ys, $y); } )*
         -> $ys

block = ys:element
        (eol samedent y:element -> { $ys = array_merge($ys, $y); } )*
        -> $ys

element = n:name ":" spaces? eol indent b:block -> {
              array_pop($this->indent);

jakubkulhan

START = ?{
            $this->indent = array();
            $this->indentstring = "";
            return TRUE;
        }
        
        EmpL*
        b:(blockarray / blockhash)
        EmpL*
        !.

jakubkulhan

Jak nejlépe na tree walker v PHP?

jakubkulhan

<?php
class foo
{
    function stream_open() { return TRUE; }
    function stream_eof() { return FALSE; }

    function stream_read($count)
    {
        var_dump($count);
        return "";

jakubkulhan

<?php
/**
 * Wraps callback with some default params
 */
class fn
{
    /**
     * @var callback Wrapped callback
     */
    private $callback;

jakubkulhan

<?php
class foo
{
    function stream_open() { return TRUE; }
    function stream_eof() { return FALSE; }

    function stream_read($count)
    {
        $backtrace = debug_backtrace();
        if (isset($backtrace[1]['function']) && $backtrace[1]['function'] === 'fread') {