aboutsummaryrefslogtreecommitdiff
path: root/src/graph/PS/drawpoint.ps
diff options
context:
space:
mode:
Diffstat (limited to 'src/graph/PS/drawpoint.ps')
-rw-r--r--src/graph/PS/drawpoint.ps16
1 files changed, 16 insertions, 0 deletions
diff --git a/src/graph/PS/drawpoint.ps b/src/graph/PS/drawpoint.ps
new file mode 100644
index 00000000..4283ebaa
--- /dev/null
+++ b/src/graph/PS/drawpoint.ps
@@ -0,0 +1,16 @@
+% operand stack configuration in order to use psDrawPoint:
+% psDrawPoint
+% y0
+% x0
+% graphics-context dictionary
+% this draws a point at (x0, y0).
+
+/psDrawPoint
+ { gsave
+ newpath
+ yVal moveto
+ yVal lineto
+ begin installGC stroke end %%fills with foreground color
+ grestore }
+ def
+