// File: /workspace/github_c_makefile_star2_O1/msteveb[P]autosetup/./jimsh0.c
// Function: JimStringIs
static int JimStringIs(Jim_Interp *interp, Jim_Obj *strObjPtr, Jim_Obj *strClass, int strict)
{
    static const char * const strclassnames[] = {
        "integer", "alpha", "alnum", "ascii", "digit",
        "double", "lower", "upper", "space", "xdigit",
        "control", "print", "graph", "punct", "boolean",
        NULL
    };
    enum {
        STR_IS_INTEGER, STR_IS_ALPHA, STR_IS_ALNUM, STR_IS_ASCII, STR_IS_DIGIT,
        STR_IS_DOUBLE, STR_IS_LOWER, STR_IS_UPPER, STR_IS_SPACE, STR_IS_XDIGIT,
        STR_IS_CONTROL, STR_IS_PRINT, STR_IS_GRAPH, STR_IS_PUNCT, STR_IS_BOOLEAN,
    };
    int strclass;
    int len;
    int i;
    const char *str;
    int (*isclassfunc)(int c) = NULL;

    if (Jim_GetEnum(interp, strClass, strclassnames, &strclass, "class", JIM_ERRMSG | JIM_ENUM_ABBREV) != JIM_OK) {
        return JIM_ERR;
    }

    str = Jim_GetString(strObjPtr, &len);
    if (len == 0) {
        Jim_SetResultBool(interp, !strict);
        return JIM_OK;
    }

    switch (strclass) {
        case STR_IS_INTEGER:
            {
                jim_wide w;
                Jim_SetResultBool(interp, JimGetWideNoErr(interp, strObjPtr, &w) == JIM_OK);
                return JIM_OK;
            }

        case STR_IS_DOUBLE:
            {
                double d;
                Jim_SetResultBool(interp, Jim_GetDouble(interp, strObjPtr, &d) == JIM_OK && errno != ERANGE);
                return JIM_OK;
            }

        case STR_IS_BOOLEAN:
            {
                int b;
                Jim_SetResultBool(interp, Jim_GetBoolean(interp, strObjPtr, &b) == JIM_OK);
                return JIM_OK;
            }

        case STR_IS_ALPHA: isclassfunc = isalpha; break;
        case STR_IS_ALNUM: isclassfunc = isalnum; break;
        case STR_IS_ASCII: isclassfunc = jim_isascii; break;
        case STR_IS_DIGIT: isclassfunc = isdigit; break;
        case STR_IS_LOWER: isclassfunc = islower; break;
        case STR_IS_UPPER: isclassfunc = isupper; break;
        case STR_IS_SPACE: isclassfunc = isspace; break;
        case STR_IS_XDIGIT: isclassfunc = isxdigit; break;
        case STR_IS_CONTROL: isclassfunc = iscntrl; break;
        case STR_IS_PRINT: isclassfunc = isprint; break;
        case STR_IS_GRAPH: isclassfunc = isgraph; break;
        case STR_IS_PUNCT: isclassfunc = ispunct; break;
        default:
            return JIM_ERR;
    }

    for (i = 0; i < len; i++) {
        if (!isclassfunc(UCHAR(str[i]))) {
            Jim_SetResultBool(interp, 0);
            return JIM_OK;
        }
    }
    Jim_SetResultBool(interp, 1);
    return JIM_OK;
}

// Assembly:
pushq %rbp
movq %rsp, %rbp
pushq %r15
pushq %r14
pushq %r13
pushq %r12
pushq %rbx
subq $0x18, %rsp
movl %ecx, %r12d
movq %rsi, %r15
movq %rdi, %rbx
leaq 0x133d7(%rip), %rax     # 0x37640
leaq 0x9b10(%rip), %r8       # 0x2dd80
leaq -0x2c(%rbp), %rcx
movq %rdx, %rsi
movq %rax, %rdx
movl $0x3, %r9d
callq 0x7e97
movl $0x1, %r14d
testl %eax, %eax
jne 0x2444d
cmpq $0x0, (%r15)
jne 0x242a3
movq 0x8(%r15), %rax
movq %r15, %rdi
callq *0x18(%rax)
movl 0x14(%r15), %r13d
testq %r13, %r13
je 0x24315
movl -0x2c(%rbp), %eax
cmpq $0xe, %rax
ja 0x2444d
movq (%r15), %r14
leaq 0x4335(%rip), %rcx      # 0x285f8
movslq (%rcx,%rax,4), %rax
addq %rcx, %rax
jmpq *%rax
leaq 0x1200d(%rip), %r12     # 0x362e0
cmpq %r12, 0x8(%r15)
je 0x242ed
xorl %r13d, %r13d
movq %rbx, %rdi
movq %r15, %rsi
xorl %edx, %edx
callq 0xd6d7
testl %eax, %eax
jne 0x242f3
movl $0x1, %r13d
movq %rbx, %rdi
callq 0xae58
movq %rax, %r14
movq %r12, 0x8(%rax)
movq $0x0, (%rax)
movq %r13, 0x18(%rax)
incl 0x10(%rax)
jmp 0x2442e
xorl %r15d, %r15d
testl %r12d, %r12d
sete %r15b
movq %rbx, %rdi
callq 0xae58
movq %rax, %r14
leaq 0x11faf(%rip), %rax     # 0x362e0
movq %rax, 0x8(%r14)
movq $0x0, (%r14)
movq %r15, 0x18(%r14)
jmp 0x2442a
leaq -0x38(%rbp), %rdx
movq %rbx, %rdi
movq %r15, %rsi
callq 0xe1bf
movl %eax, %r15d
xorl $0x1, %r15d
jmp 0x2431f
movq 0x13c6c(%rip), %r15     # 0x37fd0
jmp 0x243e9
movq 0x13bf8(%rip), %r15     # 0x37f68
jmp 0x243e9
movq 0x13c77(%rip), %r15     # 0x37ff0
jmp 0x243e9
movq 0x13c56(%rip), %r15     # 0x37fd8
jmp 0x243e9
movq 0x13c0d(%rip), %r15     # 0x37f98
jmp 0x243e9
leaq 0x121(%rip), %r15       # 0x244b5
jmp 0x243e9
movq 0x13c2b(%rip), %r15     # 0x37fc8
jmp 0x243e9
movq 0x13c1a(%rip), %r15     # 0x37fc0
jmp 0x243e9
leaq -0x38(%rbp), %rdx
movq %rbx, %rdi
movq %r15, %rsi
callq 0xe057
testl %eax, %eax
je 0x244a1
xorl %r15d, %r15d
jmp 0x2431f
movq 0x13bd2(%rip), %r15     # 0x37fa0
jmp 0x243e9
movq 0x13ba9(%rip), %r15     # 0x37f80
jmp 0x243e9
movq 0x13bb0(%rip), %r15     # 0x37f90
jmp 0x243e9
movq 0x13bbf(%rip), %r15     # 0x37fa8
testl %r13d, %r13d
jle 0x24405
xorl %r12d, %r12d
movzbl (%r14,%r12), %edi
callq *%r15
testl %eax, %eax
je 0x2445f
incq %r12
cmpq %r12, %r13
jne 0x243f1
movq %rbx, %rdi
callq 0xae58
movq %rax, %r14
leaq 0x11ec9(%rip), %rax     # 0x362e0
movq %rax, 0x8(%r14)
movq $0x0, (%r14)
movq $0x1, 0x18(%r14)
incl 0x10(%r14)
movq (%rbx), %rsi
movl 0x10(%rsi), %eax
leal -0x1(%rax), %ecx
movl %ecx, 0x10(%rsi)
cmpl $0x1, %eax
jg 0x24447
movq %rbx, %rdi
callq 0x759a
movq %r14, (%rbx)
xorl %r14d, %r14d
movl %r14d, %eax
addq $0x18, %rsp
popq %rbx
popq %r12
popq %r13
popq %r14
popq %r15
popq %rbp
retq
movq %rbx, %rdi
callq 0xae58
movq %rax, %r15
leaq 0x11e6f(%rip), %rax     # 0x362e0
movq %rax, 0x8(%r15)
xorl %r14d, %r14d
movq %r14, (%r15)
movq %r14, 0x18(%r15)
incl 0x10(%r15)
movq (%rbx), %rsi
movl 0x10(%rsi), %eax
leal -0x1(%rax), %ecx
movl %ecx, 0x10(%rsi)
cmpl $0x1, %eax
jg 0x2449c
movq %rbx, %rdi
callq 0x759a
movq %r15, (%rbx)
jmp 0x2444d
callq 0x6080
xorl %r15d, %r15d
cmpl $0x22, (%rax)
setne %r15b
jmp 0x2431f