From eric.hodges@gmail.com

Index​: src/classes/Int.pir

--- src/classes/Int.pir (revision 33937)
+++ src/classes/Int.pir (working copy)
@​@​ -37,6 +37,24 @​@​
.end

+=item succ and pred
+
+Increment and Decrement Methods
+
+=cut
+
+.sub 'succ' :method
+ $P0 = clone self
+ inc $P0
+ .return ($P0)
+.end
+
+.sub 'pred' :method
+ $P0 = clone self
+ dec $P0
+ .return ($P0)
+.end
+
=item ACCEPTS()

=cut
Index​: src/classes/Str.pir

--- src/classes/Str.pir (revision 33937)
+++ src/classes/Str.pir (working copy)
@​@​ -113,7 +113,25 @​@​
  .return ($P0)
.end

+=item succ and pred

+Increment and Decrement Methods
+
+=cut
+
+.sub 'succ' :method
+ $P0 = clone self
+ inc $P0
+ .return ($P0)
+.end
+
+.sub 'pred' :method
+ $P0 = clone self
+ dec $P0
+ .return ($P0)
+.end
+
+
=item WHICH()

Returns the identify value.
Index​: src/classes/Num.pir

--- src/classes/Num.pir (revision 33937)
+++ src/classes/Num.pir (working copy)
@​@​ -67,6 +67,25 @​@​
.end

+=item succ and pred
+
+Increment and Decrement Methods
+
+=cut
+
+.sub 'succ' :method
+ $P0 = clone self
+ inc $P0
+ .return ($P0)
+.end
+
+.sub 'pred' :method
+ $P0 = clone self
+ dec $P0
+ .return ($P0)
+.end
+
+
=item WHICH()

Returns the identify value.

From @pmichaud

Applied in r34011, thanks!

Pm

@pmichaud - Status changed from 'new' to 'resolved'