First of all, I'm afraid this code is as human readable as it is machine readable. I suggest some refactoring. After 30 minutes, I was able to come up with this translation to VB.Net:
Imports System
Imports System.Collections.Generic
Namespace PreHOPL
Module Program
Private ReadOnly dict As Dictionary(Of String, Tuple(Of Integer, Action(Of String))) = New Dictionary(Of String, Tuple(Of Integer, Action(Of String))) From {{"SAYLIT", New Tuple(Of Integer, Action(Of String))(1, CType(AddressOf System.Console.WriteLine, Action(Of String)))}}
Sub Main()
dict("SAYLIT").Item2.DynamicInvoke("Hello World!")
End Sub
End Module
End Namespace
Programmed Canon Canola calculators in 1977. Assorted platforms and languages ever since. Assisting with HOPL.info.
I am NOT looking for work -- I've got more than enough to do.
Location
Perth, WA Australia
Education
A few diplomas.
Work
Software Engineer at [Daisy Digital](https://daisydigital.com.au/)
First of all, I'm afraid this code is as human readable as it is machine readable. I suggest some refactoring. After 30 minutes, I was able to come up with this translation to VB.Net:
Thank you for spending so much time on it. I wonder if
ValueTuple
would simplifying it at all.