Changeset 3017

Timestamp:

May 25, 2012, 8:14:09 AM (12 years ago)

Author:

gah

Message:

changes to templates for histogram

Location:

branches/blt4/builder/scripts/templates

Files:

• clang.tl (modified) (1 diff)
• fortran77.tl (modified) (1 diff)
• java.tl (modified) (1 diff)
• matlab.tl (modified) (1 diff)
• octave.tl (modified) (1 diff)
• perl.tl (modified) (1 diff)
• python.tl (modified) (1 diff)
• r.tl (modified) (1 diff)
• ruby.tl (modified) (1 diff)
• tcl.tl (modified) (1 diff)

branches/blt4/builder/scripts/templates/clang.tl

@@ -134 +134 @@
     code "\n/* save output value for $path */"
     code "/* this shows just one point -- modify as needed */"
-    code "/* (x,h,w) = x-coord, height of bar, and width of bar (optional) */"
-    code "sprintf(line, \"%g %g %g\\n\", x, h, w);"
-    code "rpPutString(io,\"$path.component.xhw\", line, RPLIB_APPEND);"
+    code "/* (x,y) = x-label, y-coordinate is height of bar */"
+    code "sprintf(line, \"%s %g\\n\", x, y);"
+    code "rpPutString(io,\"$path.component.xy\", line, RPLIB_APPEND);"
   }
   output image {

branches/blt4/builder/scripts/templates/fortran77.tl

@@ -130 +130 @@
     code "\nc       save output value for $path"
     code "c       this shows just one point -- modify as needed"
-    code "c       (x,h,w) = x-coord, height of bar, and width of bar (optional)"
-    code "        write(strVal,'(E20.12,E20.12,E20.12,A)') x, h, w, char(10)"
-    code "        call rp_lib_put_str(io,\n     +    \"$path.component.xhw\",strVal,1)"
+    code "c       (x,y) = x-label, y-coordinate is height of bar"
+    code "        write(strVal,'(A20,E20.12,A)') label, x, h, char(10)"
+    code "        call rp_lib_put_str(io,\n     +    \"$path.component.xy\",strVal,1)"
   }
   output image {

branches/blt4/builder/scripts/templates/java.tl

@@ -91 +91 @@
     code "\n// save output value for $path"
     code "// this shows just one point -- modify as needed"
-    code "// (x,h,w) = x-coord, height of bar, and width of bar (optional)"
-    code "str = String.format(\"%g %g %g\\n\", x, h, w);"
-    code "io.put(\"$path.component.xhw\", line, true);"
+    code "// (x,y) = x-label, y-coordinate is height of bar"
+    code "str = String.format(\"%s %g\\n\", x, y);"
+    code "io.put(\"$path.component.xy\", line, true);"
   }
   output image {

branches/blt4/builder/scripts/templates/matlab.tl

@@ -83 +83 @@
   output histogram {
     code "\n% save output value for $path"
-    code "% vectors x,h,w: x-coord, height of bar, and width of bar (optional)"
-    code "xhwdata = \[x;h;w\];"
-    code "str = sprintf('%12g %12g %12g\\n', xhwdata);"
-    code "rpLibPutString(io,'$path.component.xhw',str,0);"
+    code "% vectors x,y: x-label, y-coordinate is height of bar"
+    code "xydata = \[x;y\];"
+    code "str = sprintf('%s %12g\\n', x, y);"
+    code "rpLibPutString(io,'$path.component.xy',str,0);"
   }
   output image {

branches/blt4/builder/scripts/templates/octave.tl

@@ -95 +95 @@
   output integer {
     code "\n% save output value for $path"
-    code "rpLibPutString(io,'$path.current',num2str($id),0);"
+    code "rpLibPutString(io,'$path.current',int2str($id),0);"
   }
   output number {

branches/blt4/builder/scripts/templates/perl.tl

@@ -79 +79 @@
     code "\n# save output value for $path"
     code "# this shows just one point -- modify as needed"
-    code "# (x,h,w) = x-coord, height of bar, and width of bar (optional)"
-    code "\$io->put(\"$path.component.xhw\", \"\$x \$h \$w\\n\", 1);"
+    code "# (x,y) = x-label, y-coordinate is height of bar"
+    code "\$io->put(\"$path.component.xy\", \"\$x \$y\\n\", 1);"
   }
   output image {

branches/blt4/builder/scripts/templates/python.tl

@@ -85 +85 @@
     code "\n# save output value for $path"
     code "# this shows just one point -- modify as needed"
-    code "# (x,h,w) = x-coord, height of bar, and width of bar (optional)"
-    code "line = \"%g %g %g\n\" % (x, h, w)"
-    code "io.put('$path.component.xhw', line, append=1)"
+    code "# (x,y) = x-label, y-coordinate is  height of bar"
+    code "line = \"%s %g\n\" % (x, y)"
+    code "io.put('$path.component.xy', line, append=1)"
   }
   output image {

branches/blt4/builder/scripts/templates/r.tl

@@ -79 +79 @@
     code "\n# save output value for $path"
     code "# assumes output in vectors x and y"
-    code "str <- paste(sprintf(\"%g %g\\n\",x,y), collapse=\"\")"
+    code "str <- paste(sprintf(\"%s %g\\n\",x,y), collapse=\"\")"
     code "rp_lib_put_string(io,\"$path.component.xy\",str,FALSE)"
   }

branches/blt4/builder/scripts/templates/ruby.tl

@@ -79 +79 @@
     code "\n# save output value for $path"
     code "# this shows just one point -- modify as needed"
-    code "# (x,h,w) = x-coord, height of bar, and width of bar (optional)"
-    code "str = sprintf(\"%g %g %g\\n\", x, h, w)"
+    code "# (x,y) = x-label, y-coordinate is height of bar"
+    code "str = sprintf(\"%g %g %g\\n\", x, y)"
     code "io.put(\"$path.component.xhw\", str, Rappture::APPEND)"
   }

branches/blt4/builder/scripts/templates/tcl.tl

@@ -79 +79 @@
     code "\n# save output value for $path"
     code "# this shows just one point -- modify as needed"
-    code "# (x,h,w) = x-coord, height of bar, and width of bar (optional)"
-    code "\$io put -append yes $path.component.xy \"\$x \$h \$w\\n\""
+    code "# (x,y) = x-label, y-coordinate is height of bar"
+    code "\$io put -append yes $path.component.xy \"\$x \$y\\n\""
   }
   output image {