Author Topic: You learn something new every decade... (Read 4535 times)

Pete · « **on:** December 17, 2020, 03:42:47 pm »

I was surprised this worked, putting a conditional IF/THEN inside a SELECT CASE, without making it a case!

Code: QB64: [Select]

DO
    DO
        _LIMIT 30
        b$ = INKEY$
    LOOP UNTIL LEN(b$)
 
    SELECT CASE b$
        IF UCASE$(b$) = "A" THEN
            PRINT "A, look at this!"
            b$ = "" ' Note this WON'T avoid CASE ELSE.
        END IF
 
        CASE "1"
            PRINT "one..."
        CASE "2"
            PRINT "two..."
        CASE ELSE
            PRINT "else..."
    END SELECT
LOOP UNTIL b$ = CHR$(27)

Pete

FellippeHeitor · « **Reply #1 on:** December 17, 2020, 03:44:16 pm »

Lol, that shouldn’t have worked, I suppose 😂

OldMoses · « **Reply #2 on:** December 17, 2020, 07:02:10 pm »

Fascinating. Now I'm wondering if this can be something that can be relied upon...

STxAxTIC · « **Reply #3 on:** December 17, 2020, 07:22:10 pm »

I wouldn't go there. Nothing to see here folks, don't pay attention to that man behind the curtain.

FellippeHeitor · « **Reply #4 on:** December 17, 2020, 07:31:18 pm »

Yeah. Don't do it.

Kernelpanic · « **Reply #5 on:** December 17, 2020, 07:40:25 pm »

https://www.youtube.com/watch?v=NCwzCQcjC0M

Pete · « **Reply #6 on:** December 17, 2020, 07:45:15 pm »

F YouTube and the Progressive a-holes who ruin it.

Pete

STxAxTIC · « **Reply #7 on:** December 17, 2020, 07:56:31 pm »

yeah im also sick of progressive on youtube

Kernelpanic · « **Reply #8 on:** December 17, 2020, 08:37:52 pm »

Quote from: Pete on December 17, 2020, 07:45:15 pm

F YouTube and the Progressive a-holes who ruin it.

Pete

A f. . . .

https://www.youtube.com/watch?v=0qanF-91aJo

FellippeHeitor · « **Reply #9 on:** December 17, 2020, 09:10:00 pm »

It is known that on the C++ translated side all SELECT CASE blocks are a bunch of IFs, but this has gone too far.

Pete · « **Reply #10 on:** December 17, 2020, 09:14:46 pm »

Quote from: STxAxTIC on December 17, 2020, 07:56:31 pm

yeah im also sick of progressive on youtube

Bill, since when did you pick up a sense of humor, and did you purchase or lease?

Pete :D

- Only NASCAR drivers are safe with Progressive because they only insure left turns.

FellippeHeitor · « **Reply #11 on:** December 17, 2020, 11:46:24 pm »

Fix to the issue pushed into the repository. Please help test it, @Pete and everyone else: https://www.qb64.org/portal/development-build/

Turns out issue went deeper than IF being allowed - all control block structures were being allowed, like DO/LOOP, WHILE/WEND, FOR/NEXT. All of that has been fixed now.

[ You are not allowed to view this attachment ]

Cobalt · « **Reply #12 on:** December 18, 2020, 01:17:52 am »

Bad form exists every where, I guess.

gaslouk · « **Reply #13 on:** December 18, 2020, 01:25:34 am »

[ You are not allowed to view this attachment ] [ You are not allowed to view this attachment ] [ You are not allowed to view this attachment ] [ You are not allowed to view this attachment ]

News: