# HG changeset patch
# User nipkow
# Date 1319178297 -7200
# Node ID 6eab55bab82f346d9d3ac4f57a9f35b2f865b726
# Parent  c4fab1099cd0b10ef8426436c93cd5bfad4205d0
tuned

diff -r c4fab1099cd0 -r 6eab55bab82f src/HOL/IMP/ASM.thy
--- a/src/HOL/IMP/ASM.thy	Thu Oct 20 10:44:00 2011 +0200
+++ b/src/HOL/IMP/ASM.thy	Fri Oct 21 08:24:57 2011 +0200
@@ -4,7 +4,7 @@
 
 subsection "Arithmetic Stack Machine"
 
-datatype ainstr = LOADI val | LOAD string | ADD
+datatype ainstr = LOADI val | LOAD vname | ADD
 
 type_synonym stack = "val list"