Index: trunk/tests/query/1obj.lht
===================================================================
--- trunk/tests/query/1obj.lht	(nonexistent)
+++ trunk/tests/query/1obj.lht	(revision 30376)
@@ -0,0 +1,55 @@
+ha:pcb-rnd-board-v6 {
+
+ ha:meta {
+   ha:size {
+    thermal_scale = 0.500000
+    x = 375.0mil
+    y = 150.0mil
+   }
+   ha:grid {
+    spacing = 25.0mil
+   }
+ }
+
+ ha:data {
+  li:padstack_prototypes {
+  }
+
+   li:objects {
+   }
+   li:layers {
+
+    ha:top-sig {
+     lid=0
+     group=0
+     ha:combining {     }
+
+      ha:attributes {
+        {pcb-rnd::key::vis}={<Key>l; Shift<Key>t}
+        {pcb-rnd::key::select}={<Key>l; <Key>t}
+      }
+
+      li:objects {
+       ha:line.5 {
+        x1=75.0mil; y1=75.0mil; x2=300.0mil; y2=75.0mil; thickness=10.0mil; clearance=40.0mil;
+        ha:flags {
+         clearline=1
+        }
+       }
+      }
+      color = {#8b2323}
+    }
+
+   }
+ }
+
+ ha:layer_stack {
+  li:groups {
+   ha:0 {
+    name = top_copper
+    ha:type { copper=1; top=1;    }
+    li:layers { 0;    }
+   }
+  }
+ }
+}
Index: trunk/tests/query/Makefile
===================================================================
--- trunk/tests/query/Makefile	(nonexistent)
+++ trunk/tests/query/Makefile	(revision 30376)
@@ -0,0 +1,16 @@
+ROOT=../..
+
+SRC=$(ROOT)/src
+TDIR=../tests/query
+PCBRND=./pcb-rnd
+
+all: action.diff
+
+action.diff: action.out
+	@diff -u action.out action.ref && rm action.out
+
+action.out: FORCE
+	cd $(SRC) && echo 'query(eval, "action(\"message\", \"hello\", @.x)")' | ./$(PCBRND) $(TDIR)/1obj.lht --gui batch > $(TDIR)/action.out
+
+
+FORCE:
Index: trunk/tests/query/action.ref
===================================================================
--- trunk/tests/query/action.ref	(nonexistent)
+++ trunk/tests/query/action.ref	(revision 30376)
@@ -0,0 +1,5 @@
+Script eval: 'action("message", "hello", @.x)' scope=''
+I: hello
+I: 
+ false
+eval statistics: true=0 false=1 errors=0