commit 4c46a4e9d2753822db17564270a153957bad2b9d parent 1e21056afcdb46984e66b98ad84a0a05067e7402 Author: Alexander Burger <abu@software-lab.de> Date: Thu, 27 Jan 2011 13:55:43 +0100 Forgot the second case Diffstat:
M | src64/apply.l | | | 8 | ++++---- |
1 file changed, 4 insertions(+), 4 deletions(-)
diff --git a/src64/apply.l b/src64/apply.l @@ -168,10 +168,10 @@ ld Z 0 # No classes call methodEY_FCYZ # Found? jne msgErrYX # No - ld (S I) (EnvCls) # 'cls' - ld (S) (EnvKey) # 'key' - ld (EnvCls) Z # Set new - ld (EnvKey) Y # 'key' + xchg Z (S I) # 'cls' + xchg (S I) (EnvCls) + xchg Y (S) # 'key' + xchg (S) (EnvKey) # 'key' ld X (C) # Parameter list in X push (EnvBind) # Build bind frame link