private static int parseParenSExpression (String aString, int startingIndex) {
        int length = aString.length();
        int parenLevel = 1;
        boolean isQuotedString = false;
        int charsParsed = 0;
        char ch = ' ';
        int index = startingIndex;
        while (parenLevel != 0) {
            index++;
            if (index >= length) {
                Log.current.println("parseParenSExpression, invalid string: " + aString);
                return  0;
            }
            ch = aString.charAt(index);
            if (ch == '"')
                if (isQuotedString)
                    isQuotedString = false;
                else
                    isQuotedString = true;
            if (!isQuotedString) {
                if (ch == '(')
                    parenLevel++;
                if (ch == ')')
                    parenLevel--;
            }
        }
        return  index;
    }