diff -r d47fac0db40b -r c45383095de4 compiler/PPCCompiler.st --- a/compiler/PPCCompiler.st Wed May 27 08:37:09 2015 +0100 +++ b/compiler/PPCCompiler.st Fri May 29 07:25:31 2015 +0100 @@ -119,14 +119,14 @@ addConstant: value as: name (constants includesKey: name) ifTrue:[ - (constants at: name) ~~ value ifTrue:[ + (constants at: name) ~= value ifTrue:[ self error:'Duplicate constant!!'. ]. ^ self. ]. constants at: name put: value - "Modified: / 26-05-2015 / 17:07:04 / Jan Vrany " + "Modified: / 29-05-2015 / 07:22:39 / Jan Vrany " ! addOnLine: string