I implemented Goto in OCaml

[@swagrina]

This is even better because your labels are runtime values, so you can compute goto destinations at runtime via string interpolation or such, making it even more readable.

[@swagrina]

Also, you can have multiple labels with the same name, meaning the same goto call will jump to different labels depending in which block the goto is (since you do a linear search through the list), increasing maintainability.

[@rogo7330]

GNU C extensions have runtime-evaluated labels. But GNU C is mostly heresy (despite being actual better version of C, not like C++), so be carefull and put ifdef __GNUC__ everywhere.

[@samgiz]

@@swagrina A goto call should always jump to the same instance of a label (the first one in the list) as it iterates through all blocks from the beginning, not from where it was called.

[@swagrina]

@@samgiz that is correct, my bad. The code was so readable that I got confused.

[@johangamb]

@@samgiz it would be a trivial change to make the iteration looking for next label start from the previous block being executed (and loop back to start again if not found on rest of list), in which case you really could have multiple identical labels, as the guy with headphones wrote, drastically increasing maintainability and code scanability

[@pasc4le]

I started to doubt it some weeks ago, but now I'm sure. His villain arc has started.

[@starup4960]

Compsoy: recursion Compchad: recursion in a try catch 10/10 video

[@monad_tcp]

I though he was going to implement full blown call/cc , or import setjmp/longjmp , but a try/catch is essentially that, setjmp/longjmp. Use this knowledge with care.

[@angelcaru]

10/10 comment, i managed to segfault in Python

[@angelcaru]

wtf?? its not letting me reply to another comment

[@mosomiliardaru]

dude you've reached pure programming god tier by now

[@ribosomerocker]

ocaml isn't pure

[@__gadonk__]

@@ribosomerocker 🤓

[@ribosomerocker]

​@@__gadonk__ 🤓🤓🤓🤓🤓🤓🤓🤓🤓

[@K5RTO]

@@ribosomerocker what man has made filthy, a god makes pure

[@miran248]

He got so pure he overflowed.

[@anon_y_mousse]

I recently installed OCaml to get some project that someone else wrote to compile so I could use it. I learned a little bit of ML like 20 years ago and knew Caml and OCaml existed, but never used them. Your video hasn't changed my mind on goto, but it has changed my mind about even getting into OCaml.

[@AlgoFodder]

Senior Dev strats: "Let's hallucinate like ChadGPT".

[@matrixnorm6672]

it's over for gotocels

[@fille.imgnry]

Holy moly! I last watched your videos 2 years ago, and there were so much ”more” of you then. Nice! Looking good. Your content is still top notch as usual.

[@R3AktoRMacedonia]

Bro you look like stereotypical "Mad Scientist" on the thumbnail :)))))

[@januszkszczotek8587]

19:10 You have optional arguments with default values. E.g. `let goto_block ?(name = None) ...` and call it `goto_block ~name:(Some "foo")`. Mutual recursion is possible by chaining the function definitions with `let rec foo = ... and bar = ...`.

[@replikvltyoutube3727]

Tsoding has ascended into implementing goto, as recursion syntactic sugar

[@monad_tcp]

everything is syntactic sugar

[@freesoftwareextremist8119]

What CompSoy programmers have to do to mimic a fraction of the power of Common Lisp.

[@paoloose]

beautiful control flow, I didn't ever wonder before if goto could be implemented in any language teachers only resort to saying that goto is garbage but you come up with this beauty of state machine

[@teej_dv]

great video :)

[@javajava7867]

Oh , first time a project shorter than an hour, you're becoming a youtuber🎉🎉

[@johetajava]

I love your presentation style :'D Keep up with your divine mission!

[@frechjo]

I think that function used as an intermediate step, to control where to "jump" execution, is usually called a "trampoline". I've seen it used similarly to implement things like tail call optimization in languages that don't have it, like Javascript XD. Which seems like a completely different thing at first sight, but it¡s actually related. Tail calls behave as a jump or goto, and that's why they can be eliminated in the first place.

[@two-spikes]

best preview ever made on KZbin now implement gotos in C like they're not yet implemented

[@Lars-ce4rd]

Beautiful and useful. I love DRY code. Also thanks for the gist so I can just copy-paste that into my projects. Sincerely, thank you. See you in hell.

[@l.piekha100]

Siberian Chud

[@neshkeev]

Why don't you implement a continuation monad with the call/cc function in OCaml? It will allow you implement the `goto` thing more efficiently

[@ben__01]

millions must ocaml

[@dulr10]

You either die a hero, or live long enough to see yourself become the villain. That was the comment I would put while watching the first part of the video. I changed my mind when the irony and meming ended. I gotta say that this is the best video you uploaded in a while in my books. The former Tsoding (the real chad imo) would be proud of you.

[@Phillip3223]

Actually I have that whole "lable" vs "label" spelling issue too

[@necuz]

theater theatre 🤷🏻‍♂

[@Q__Q]

this is one of the only videos that i actually understood what he was talking about

[@MrJCraft]

This is true art!

[@necuz]

Your approach of skipping blocks that shouldn't be executed reminded me of the same approach being used to implement loops in "M/o/Vfuscator", a C compiler that generates only mov instructions.

[@Novascrub]

Somebody read the Lambda papers.

[@parseemizuhasi9338]

The best CPS(Continue Passing Style) vedio.

[@HelloThere-xs8ss]

What a villain to admire

[@Bleb1k_irl]

"Today, I woke up.And chose violence."😤 😂😂😂

[@hooxenv9692]

chad goto and compsoy LOL will be borrowing those for sure!

[@000dr0g]

as an F# hacker, I approve this message.

[@alurma]

Algebraic effects are awesome

[@warko4]

GOTO reminded me of Basic but also MacroB in cnc programming, I'm using it a lot with G-CODE on Swiss lathes..

[@monad_tcp]

20:06 shot out to F#'s computational expressions (not to use the compsoy "monadic")

[@Vulto166]

That was fun! Thank you Tsoding!

[@realdebil.]

i love you mr. tsoding

[@dupdrop]

I learned some lua for configuring neovim recently and was surprised to discover that in lua 5.2 they actually added goto to the language. Does that make lua the chad-est dynamic language now? Kind of ironic since they don't even know the only true correct number to start counting from, but then again, would a true chad care about that?

[@replikvltyoutube3727]

The tables start at 1

[@dupdrop]

@@replikvltyoutube3727 I know. Real programmers count up from zero ;)

[@yjlom]

@@dupdrop real programmers count down

[@vnshngpnt]

Based Lua

[@safariknight3239]

​@@yjlom so would the first element be index -1 or 0?

[@davidrudpedersen5622]

Very gigachad

[@JeremyGluckStuff]

CompSoy

[@Scouarn]

I tried to do it myself before watching. I defined a binding operator that does the try-with, but you can't jump forward this way (I'm still hacking it I have some ideas). Also I think it can be done by defining labels as mutually recursive functions that tail-call each other. My half working solution looks like that : let* loop = make_label () in goto loop; goto exit; (* Doesn't work since exit is not defined *) let* exit = make_label () in ...

[@luvincste]

coming from c#, isn't there a conditional catch? you could divide the blocks in multiple catches each one for a label, and then throwing you owuld go in that 'case', like a sort of switch

[@monad_tcp]

no, we don't do that here, we do match, no label jumps from machine code

[@realdebil.]

wait, it's all a state machine? always has been~

[@primosoma]

i like compsoy even if i don't know what it means

[@felix.5507]

I see one possible improvement and two problems. If you change line 16 to also [] -> throw Goto entry than you have even some kind of interfunction jumps. The problem that arises from that is what happens if you try to jump a Label that is not defined and what if the user catches or throws Gotos themselves. But the bigger problem I see with this approach is to have the jumps being calculated at runtime. That kind of violates the advantage of goto in my eyes because of the huge Overhead beeing generated. But I am no programmer and don't have any education in this field! But I love your unique apoaches to everything you do. Keep on comming up with such interesting ideas. I hope you can keep making content and wish you the best of luck.

[@pstrusi]

I've noticed that you always use Emacs for your workflow, btw superfast. My question: do you use it cause is really highly efficient in comparison to others modern IDEor text editors. I'm aware that this is a controversial area, but as an amateur programmer, is very confusing and I'd like to know professional opinions. Many, nowadays, are commenting that VScode is the replacement of Emacs. Do you agree? Emacs is obviously more powerful but young generations are not sticking to Emacs community. Thanks for any insight

[@alexanderkovalev391]

hmm, looks like an interesting challenge for me to sneaky commit something like that into our production erlang code

[@NuclearShadowYT]

one way to introduce new syntax in a language is to make a preprocessor which converts your new syntax to an implementation in the language

[@michalbotor]

todaY wE arE goinG tO enD thE worlD so lets start with implementing 'hello world'

[@ih_aye_aitch]

This reminds me of the special operator LABELS in Lisp

[@WilderPoo]

State of the art

[@kuyajj68]

The thumbnail forced me to watch this 😂

[@Tekay37]

I'm not sure if you bullied Exceptions, functional languages or both here. Either way, I like it.

[@valovanonym]

What a madman

[@angelcaru]

badass intro

[@adrient8288]

How is this so close to your old channel type of video and simultaneously the polar opposite of it

[@caio_c]

I wouldn't be able to figure out something like that, tsoding is slowly ascending to programmer mage levels

[@liquidsnake6879]

"Today i woke up and chose the violence" and that's the story of how i subscribed and that was before the "double dick operator" which is a beautiful name and an excellent way to ensure nobody ever forgets it lol

[@el_chivo99]

conditional jumping would also be easy under this approach!!

[@ErikBongers]

I wouldn't trust a language that hasn't goto. And that hasn't nullptr.

[@ismaelvc3728]

Instead of an unconditional "goto loop", it could have been "if !i >= 10 then goto loop", no need for the "out" label, it would be a do-while though.

[@ebriussenex9850]

Сверхчеловек сверхразум

[@martinstrnad3243]

Very similar to tagbody in common lisp. 👍

[@beachneosculpordwarf]

I am very afraid of mutations, what do I do

[@timwhite1783]

You get a like just for that thumbnail 👍

[@abdelrahmandwedar]

Structured programming: NOOOOOOOOOOOO!!!!

[@cynocephalusw]

Tom Harding implemented GoTo by using circular reasoning.

[@dirrelito]

I think the same thing in Haskell would have been much more beautiful. Goto statements should be implemented in a pure way.

[@dirrelito]

callCC seems like magic--- but your implementation in this stream seems like essentially CPS

[@renato360a]

this isn't really goto (fully) because you can't have multiple gotos inside one "block". Unless you make redundant copies of chunks of blocks.

[@AK-vx4dy]

Impresive but... try catch is a goto. Also := is from Algol, and i don't know wich is better, := for assigment or == for comparision, first is less error prone

[@monad_tcp]

28:51 can your C even do that ! If it compiles, it works !

[@mellowyellow7523]

SOMEONE TELL TSODING TO STOP SAYING RIGHT EVERY 5 SECONDS I CANT LISTEN TO IT

[@sddsddsd-o4h]

здарова, будут туториалы для начинающих?

[@rodelias9378]

That was great!!

[@jorios550]

I wonder how it would look lime in a language that supports macros

[@evlogiy]

Wait. So Rust is basically a low level ML language!? I just started with Rust and never tried OCaml, but this looks very familiar for some reason...

[@SimonBuchanNz]

Rust was initially implemented in ocaml, and it takes several details from ocaml including a lot of it's naming, but it deliberately draws from a lot of different types of languages.

[@ilovepeaceandplaying8917]

pog

[@suryaprakash-sh5bf]

Sir can I have your neovim config

[@ernestodelgato930]

Pretty sure he mentions he's using Emacs at 6:53

[@suryaprakash-sh5bf]

@@ernestodelgato930 yea thanks bro

[@IBelieveInCode]

"I implemented Goto in OCaml" Yes, but what for ?

[@diegorocha2186]

To show you that he can and you cannot!

[@vitalyl1327]

Language which does not have a goto is a crappy compilation target - and, therefore, a crappy metalanguage. You cannot compile parsers efficiently, for example, if you don't have a decently fast goto.

[@youtubelisk]

I have a hard time understanding tsoding's sarcasm. Most things just whoosh by me. Are people scared of for loops? Do students use recursive? What is soycaml? ~$ man tsoding-jokes

[@ea_naseer]

zig doesn't have a for loop.

[@anon_y_mousse]

@@ea_naseer Yeah it does. It's a weird syntax, but it's there.

[@csori1075]

CompSoy lmao

[@straight2heaven_]

нифига у тебя лицо злое на превью.

[@TsodingDaily]

Мизицем ноги об стол ударился специально для превью.

[@spidorak254]

@@TsodingDaily Мизинцем* bro

[@minzmango1915]

i love you

[@trejohnson7677]

yes.

[@mra-f3x]

When AI videos again??

[@idk24lol]

something

[@alurma]

Good but using if is soy. Computed goto better

[@alurma]

Not chad enough Kappa

[@postmodernist1848]

akshually, functions have namespacing and labels don't so this "goto implementation" has some limitations P. S. Don't call me 🤓

[@user-tk2jy8xr8b]

Try using CPS for that purpose next time ;)

[@pookiepats]

Ocaml soy? Lmfao

[@arcane.wizard]

I love your content mate. This is one of the few channels that provides based HQ content for C chads. Nowadays, the majority of YT tech. content creators 're making garbage for JS soydevs: ""x Is A gAmE cHaNgEr!" "sToP uSiNg y! uSe ThIs wheelReinvented.js nOdE pAcKaGe InStEaD!"

[@CPSPD]

@@andrewdunbar828I literally cannot stand Acerola but the video content is always so good. Recommended definitely.

[@Waldganger64]

HOW DARE YOU.

[@bruisedbug]

im sorry, but you look like "the west has fallen" wojak

[@CherishedMe]

so basic...

[@varshneydevansh]

master

[@user-pe7gf9rv4m]

this reminds me of single-store/assign in LLVM IR type stuff

[@motorbreath69]

If you install utop you can run OCaml REPL inside Emacs using C-c C-e to eval function and C-c C-b to eval buffer just like emacs lisp. Makes developing much easier.

[@SimGunther]

Congrats, you rediscovered call/cc

[@alurma]

But typed!

[@frechjo]

call/cc preserves the execution context, it saves the state of the stack, no? This is a trampoline, it behaves similarly, but without preserving the state of the program, it only jumps to where it's told.

[@ribosomerocker]

chaddest solution: ```hs main = replicateM_ 10 (putStrLn "Hello World") ``` i thought you'll use delimited continuations, but your solution is way worse! congrats! i suggest you look into continuations, delimited continuations, continuation passing style, and defunctionalization!