diff --git a/ChangeLog b/ChangeLog
index 2d5341798..a4ffa0215 100644
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,3 +1,10 @@
+2017-09-25  Ewald Hew  <ewaldhew@gmail.com>
+
+	[psaux] Extend Adobe interpreter (setcurrentpoint).
+
+	* src/psaux/psintrp.c (cf2_interpT2CharString)
+	<cf2_escSETCURRENTPT>: Fix stack access.
+
 2017-09-25  Ewald Hew  <ewaldhew@gmail.com>
 
 	[psaux] Extend Adobe interpreter (`closepath').
diff --git a/src/psaux/psintrp.c b/src/psaux/psintrp.c
index 7132ae8be..5e01c0cbb 100644
--- a/src/psaux/psintrp.c
+++ b/src/psaux/psintrp.c
@@ -1621,8 +1621,9 @@
                       ...
 #endif
 
-                    x = top[0];
-                    y = top[1];
+                    curY = cf2_stack_popFixed( opStack );
+                    curX = cf2_stack_popFixed( opStack );
+
                     decoder->flex_state = 0;
                   }
                   break;