Source/sources/gnu/kawa/slib/printf.java
public Object lambda5(Object i, Object sgn, Object digs, Object ex) {
            frame0 frame0 = new frame0();
            frame0.staticLink = this;
            frame0.sgn = sgn;
            frame0.digs = digs;
            frame0.f106ex = ex;
            if (Scheme.numEqu.apply2(i, Integer.valueOf(this.f105n)) != Boolean.FALSE) {
                return Scheme.applyToArgs.apply4(this.proc, frame0.sgn, frame0.digs, frame0.f106ex);
            }
            Object obj = this.str;
            try {
                try {
                    if (C0619lists.memv(Char.make(strings.stringRef((CharSequence) obj, ((Number) i).intValue())), printf.Lit2) != Boolean.FALSE) {
                        return lambda4real(i, frame0.lambda$Fn2);
                    }
                    IsEqv isEqv = Scheme.isEqv;
                    Object obj2 = this.str;
                    try {
                        try {
                            if (isEqv.apply2(Char.make(strings.stringRef((CharSequence) obj2, ((Number) i).intValue())), printf.Lit4) == Boolean.FALSE) {
                                return Boolean.FALSE;
                            }
                            Object obj3 = this.str;
                            try {
                                frame0.num = numbers.string$To$Number((CharSequence) obj3);
                                if (frame0.num == Boolean.FALSE) {
                                    return lambda1parseError();
                                }
                                Object obj4 = frame0.num;
                                try {
                                    return printf.stdio$ClParseFloat(numbers.number$To$String(numbers.realPart((Complex) obj4)), frame0.lambda$Fn3);
                                } catch (ClassCastException e) {
                                    throw new WrongType(e, "real-part", 1, obj4);
                                }
                            } catch (ClassCastException e2) {
                                throw new WrongType(e2, "string->number", 1, obj3);
                            }
                        } catch (ClassCastException e3) {
                            throw new WrongType(e3, "string-ref", 2, i);
                        }
                    } catch (ClassCastException e4) {
                        throw new WrongType(e4, "string-ref", 1, obj2);
                    }
                } catch (ClassCastException e5) {
                    throw new WrongType(e5, "string-ref", 2, i);
                }
            } catch (ClassCastException e6) {
                throw new WrongType(e6, "string-ref", 1, obj);
            }
        }
/* access modifiers changed from: 0000 */
access modifiers changed from: 0000
access modifiers changed from : 0000
public Object lambda5(Object i, Object sgn, Object digs, Object ex) {
            frame0 frame0 = new frame0();
            frame0.staticLink = this;
            frame0.sgn = sgn;
            frame0.digs = digs;
            frame0.f106ex = ex;
            if (Scheme.numEqu.apply2(i, Integer.valueOf(this.f105n)) != Boolean.FALSE) {
                return Scheme.applyToArgs.apply4(this.proc, frame0.sgn, frame0.digs, frame0.f106ex);
            }
            Object obj = this.str;
            try {
                try {
                    if (C0619lists.memv(Char.make(strings.stringRef((CharSequence) obj, ((Number) i).intValue())), printf.Lit2) != Boolean.FALSE) {
                        return lambda4real(i, frame0.lambda$Fn2);
                    }
                    IsEqv isEqv = Scheme.isEqv;
                    Object obj2 = this.str;
                    try {
                        try {
                            if (isEqv.apply2(Char.make(strings.stringRef((CharSequence) obj2, ((Number) i).intValue())), printf.Lit4) == Boolean.FALSE) {
                                return Boolean.FALSE;
                            }
                            Object obj3 = this.str;
                            try {
                                frame0.num = numbers.string$To$Number((CharSequence) obj3);
                                if (frame0.num == Boolean.FALSE) {
                                    return lambda1parseError();
                                }
                                Object obj4 = frame0.num;
                                try {
                                    return printf.stdio$ClParseFloat(numbers.number$To$String(numbers.realPart((Complex) obj4)), frame0.lambda$Fn3);
                                } catch (ClassCastException e) {
                                    throw new WrongType(e, "real-part", 1, obj4);
                                }
                            } catch (ClassCastException e2) {
                                throw new WrongType(e2, "string->number", 1, obj3);
                            }
                        } catch (ClassCastException e3) {
                            throw new WrongType(e3, "string-ref", 2, i);
                        }
                    } catch (ClassCastException e4) {
                        throw new WrongType(e4, "string-ref", 1, obj2);
                    }
                } catch (ClassCastException e5) {
                    throw new WrongType(e5, "string-ref", 2, i);
                }
            } catch (ClassCastException e6) {
                throw new WrongType(e6, "string-ref", 1, obj);
            }
        }
public Object lambda5 ( Object i , Object sgn , Object digs , Object ex ) { frame0 frame0 = new frame0 ( ) ; frame0 . staticLink = this ; frame0 . sgn = sgn ; frame0 . digs = digs ; frame0 . f106ex = ex ; if ( Scheme . numEqu . apply2 ( i , Integer . valueOf ( this . f105n ) ) != Boolean . FALSE ) { return Scheme . applyToArgs . apply4 ( this . proc , frame0 . sgn , frame0 . digs , frame0 . f106ex ) ; } Object obj = this . str ; try { try { if ( C0619lists . memv ( Char . make ( strings . stringRef ( ( CharSequence ) obj , ( ( Number ) i ) . intValue ( ) ) ) , printf . Lit2 ) != Boolean . FALSE ) { return lambda4real ( i , frame0 . lambda$Fn2 ) ; } IsEqv isEqv = Scheme . isEqv ; Object obj2 = this . str ; try { try { if ( isEqv . apply2 ( Char . make ( strings . stringRef ( ( CharSequence ) obj2 , ( ( Number ) i ) . intValue ( ) ) ) , printf . Lit4 ) == Boolean . FALSE ) { return Boolean . FALSE ; } Object obj3 = this . str ; try { frame0 . num = numbers . string$To$Number ( ( CharSequence ) obj3 ) ; if ( frame0 . num == Boolean . FALSE ) { return lambda1parseError ( ) ; } Object obj4 = frame0 . num ; try { return printf . stdio$ClParseFloat ( numbers . number$To$String ( numbers . realPart ( ( Complex ) obj4 ) ) , frame0 . lambda$Fn3 ) ; } catch ( ClassCastException e ) { throw new WrongType ( e , "real-part" , 1 , obj4 ) ; } } catch ( ClassCastException e2 ) { throw new WrongType ( e2 , "string->number" , 1 , obj3 ) ; } } catch ( ClassCastException e3 ) { throw new WrongType ( e3 , "string-ref" , 2 , i ) ; } } catch ( ClassCastException e4 ) { throw new WrongType ( e4 , "string-ref" , 1 , obj2 ) ; } } catch ( ClassCastException e5 ) { throw new WrongType ( e5 , "string-ref" , 2 , i ) ; } } catch ( ClassCastException e6 ) { throw new WrongType ( e6 , "string-ref" , 1 , obj ) ; } }
access modifiers changed from: 0000
access modifiers changed from : 0000