Source/sources/gnu/kawa/slib/printf.java
public Object lambda14(Object i, Object ex) {
            FString digs = strings.stringAppend("0", this.staticLink.idigs, this.fdigs);
            int ndigs = strings.stringLength(digs);
            Object obj = printf.Lit7;
            AddOp addOp = AddOp.$Pl;
            Object obj2 = this.staticLink.idigs;
            try {
                Object ex2 = addOp.apply2(ex, Integer.valueOf(strings.stringLength((CharSequence) obj2)));
                while (Scheme.numGEq.apply2(obj, Integer.valueOf(ndigs)) == Boolean.FALSE) {
                    try {
                        if (characters.isChar$Eq(printf.Lit9, Char.make(strings.stringRef(digs, ((Number) obj).intValue())))) {
                            obj = AddOp.$Pl.apply2(obj, printf.Lit7);
                            ex2 = AddOp.$Mn.apply2(ex2, printf.Lit7);
                        } else {
                            ApplyToArgs applyToArgs = Scheme.applyToArgs;
                            Object[] objArr = new Object[5];
                            objArr[0] = this.staticLink.staticLink.staticLink.cont;
                            objArr[1] = i;
                            objArr[2] = this.staticLink.staticLink.sgn;
                            Object apply2 = AddOp.$Mn.apply2(obj, printf.Lit7);
                            try {
                                objArr[3] = strings.substring(digs, ((Number) apply2).intValue(), ndigs);
                                objArr[4] = ex2;
                                return applyToArgs.applyN(objArr);
                            } catch (ClassCastException e) {
                                throw new WrongType(e, "substring", 2, apply2);
                            }
                        }
                    } catch (ClassCastException e2) {
                        throw new WrongType(e2, "string-ref", 2, obj);
                    }
                }
                return Scheme.applyToArgs.applyN(new Object[]{this.staticLink.staticLink.staticLink.cont, i, this.staticLink.staticLink.sgn, "0", printf.Lit7});
            } catch (ClassCastException e3) {
                throw new WrongType(e3, "string-length", 1, obj2);
            }
        }
/* access modifiers changed from: 0000 */
access modifiers changed from: 0000
access modifiers changed from : 0000
public Object lambda14(Object i, Object ex) {
            FString digs = strings.stringAppend("0", this.staticLink.idigs, this.fdigs);
            int ndigs = strings.stringLength(digs);
            Object obj = printf.Lit7;
            AddOp addOp = AddOp.$Pl;
            Object obj2 = this.staticLink.idigs;
            try {
                Object ex2 = addOp.apply2(ex, Integer.valueOf(strings.stringLength((CharSequence) obj2)));
                while (Scheme.numGEq.apply2(obj, Integer.valueOf(ndigs)) == Boolean.FALSE) {
                    try {
                        if (characters.isChar$Eq(printf.Lit9, Char.make(strings.stringRef(digs, ((Number) obj).intValue())))) {
                            obj = AddOp.$Pl.apply2(obj, printf.Lit7);
                            ex2 = AddOp.$Mn.apply2(ex2, printf.Lit7);
                        } else {
                            ApplyToArgs applyToArgs = Scheme.applyToArgs;
                            Object[] objArr = new Object[5];
                            objArr[0] = this.staticLink.staticLink.staticLink.cont;
                            objArr[1] = i;
                            objArr[2] = this.staticLink.staticLink.sgn;
                            Object apply2 = AddOp.$Mn.apply2(obj, printf.Lit7);
                            try {
                                objArr[3] = strings.substring(digs, ((Number) apply2).intValue(), ndigs);
                                objArr[4] = ex2;
                                return applyToArgs.applyN(objArr);
                            } catch (ClassCastException e) {
                                throw new WrongType(e, "substring", 2, apply2);
                            }
                        }
                    } catch (ClassCastException e2) {
                        throw new WrongType(e2, "string-ref", 2, obj);
                    }
                }
                return Scheme.applyToArgs.applyN(new Object[]{this.staticLink.staticLink.staticLink.cont, i, this.staticLink.staticLink.sgn, "0", printf.Lit7});
            } catch (ClassCastException e3) {
                throw new WrongType(e3, "string-length", 1, obj2);
            }
        }
public Object lambda14 ( Object i , Object ex ) { FString digs = strings . stringAppend ( "0" , this . staticLink . idigs , this . fdigs ) ; int ndigs = strings . stringLength ( digs ) ; Object obj = printf . Lit7 ; AddOp addOp = AddOp . $Pl ; Object obj2 = this . staticLink . idigs ; try { Object ex2 = addOp . apply2 ( ex , Integer . valueOf ( strings . stringLength ( ( CharSequence ) obj2 ) ) ) ; while ( Scheme . numGEq . apply2 ( obj , Integer . valueOf ( ndigs ) ) == Boolean . FALSE ) { try { if ( characters . isChar$Eq ( printf . Lit9 , Char . make ( strings . stringRef ( digs , ( ( Number ) obj ) . intValue ( ) ) ) ) ) { obj = AddOp . $Pl . apply2 ( obj , printf . Lit7 ) ; ex2 = AddOp . $Mn . apply2 ( ex2 , printf . Lit7 ) ; } else { ApplyToArgs applyToArgs = Scheme . applyToArgs ; Object [ ] objArr = new Object [ 5 ] ; objArr [ 0 ] = this . staticLink . staticLink . staticLink . cont ; objArr [ 1 ] = i ; objArr [ 2 ] = this . staticLink . staticLink . sgn ; Object apply2 = AddOp . $Mn . apply2 ( obj , printf . Lit7 ) ; try { objArr [ 3 ] = strings . substring ( digs , ( ( Number ) apply2 ) . intValue ( ) , ndigs ) ; objArr [ 4 ] = ex2 ; return applyToArgs . applyN ( objArr ) ; } catch ( ClassCastException e ) { throw new WrongType ( e , "substring" , 2 , apply2 ) ; } } } catch ( ClassCastException e2 ) { throw new WrongType ( e2 , "string-ref" , 2 , obj ) ; } } return Scheme . applyToArgs . applyN ( new Object [ ] { this . staticLink . staticLink . staticLink . cont , i , this . staticLink . staticLink . sgn , "0" , printf . Lit7 } ) ; } catch ( ClassCastException e3 ) { throw new WrongType ( e3 , "string-length" , 1 , obj2 ) ; } }
access modifiers changed from: 0000
access modifiers changed from : 0000