zettacode 0.1.3 → 0.1.4

data/files.zettacode2/hello_world.text/unlambda.txt

@@ -0,0 +1 @@
+`r```````````````.G.o.o.d.b.y.e.,. .W.o.r.l.d.!i

data/files.zettacode2/hello_world.text/ursa.txt

@@ -0,0 +1 @@
+out "hello world!" endl console

data/files.zettacode2/hello_world.text/ursala.txt

@@ -0,0 +1,10 @@
+output as a side effect of compilation
+#show+
+
+main = -[Hello world!]-
+output by a compiled executable
+#import std
+
+#executable ('parameterized','')
+
+main = <file[contents: -[Hello world!]-]>!

data/files.zettacode2/hello_world.text/v.txt

@@ -0,0 +1 @@
+"Hello world!" puts

data/files.zettacode2/hello_world.text/v_(vlang).txt

@@ -0,0 +1,3 @@
+fn main() {
+        println('Hello World!')
+}

data/files.zettacode2/hello_world.text/vala.txt

@@ -0,0 +1,3 @@
+void main(){
+	stdout.printf("Hello world!\n");
+}

data/files.zettacode2/hello_world.text/vax_assembly.txt

@@ -0,0 +1,10 @@
+
+<syntaxhighlight lang="vax assembly">
+desc:  .ascid "Hello World!"      ;descriptor (len+addr) and text
+.entry hello, ^m<>                ;register save mask
+       pushaq desc                ;address of descriptor
+       calls #1, g^lib$put_output ;call with one argument on stack
+       ret                        ;restore registers, clean stack &amp; return
+.end hello                        ;transfer address for linker
+
+

data/files.zettacode2/hello_world.text/vba.txt

@@ -0,0 +1,6 @@
+
+Public Sub hello_world_text
+    Debug.Print "Hello World!"
+End Sub
+
+

data/files.zettacode2/hello_world.text/vbscript.txt

@@ -0,0 +1,2 @@
+{{works with|Windows Script Host|5.7}}
+WScript.Echo "Hello world!"

data/files.zettacode2/hello_world.text/vedit_macro_language.txt

@@ -0,0 +1 @@
+Message("Hello world!")

data/files.zettacode2/hello_world.text/verbexx.txt

@@ -0,0 +1,2 @@
+@SAY "Hello world!";
+

data/files.zettacode2/hello_world.text/verilog.txt

@@ -0,0 +1,8 @@
+
+module main;
+  initial begin
+      $display("Hello world!");
+      $finish ;
+    end
+endmodule
+

data/files.zettacode2/hello_world.text/vhdl.txt

@@ -0,0 +1,16 @@
+LIBRARY std;
+USE std.TEXTIO.all;
+
+entity test is
+end entity test;
+
+architecture beh of test is
+begin
+  process
+    variable line_out : line;
+  begin
+    write(line_out, string'("Hello world!"));
+    writeline(OUTPUT, line_out);
+    wait; -- needed to stop the execution
+  end process;
+end architecture beh;

data/files.zettacode2/hello_world.text/vim_script.txt

@@ -0,0 +1 @@
+echo "Hello world!\n"

data/files.zettacode2/hello_world.text/visual_basic.txt

@@ -0,0 +1,22 @@
+{{Libheader|Microsoft.Scripting}}
+{{works with|Visual Basic|VB6 Standard}}
+Visual Basic 6 is actually designed to create GUI applications, however with a little help from the Microsoft.Scripting Library it is fairly easy to write a simple console application.
+Option Explicit
+
+Private Declare Function AllocConsole Lib "kernel32.dll" () As Long
+Private Declare Function FreeConsole Lib "kernel32.dll" () As Long
+'needs a reference set to "Microsoft Scripting Runtime" (scrrun.dll)
+
+Sub Main()
+  Call AllocConsole
+  Dim mFSO As Scripting.FileSystemObject
+  Dim mStdIn As Scripting.TextStream
+  Dim mStdOut As Scripting.TextStream
+  Set mFSO = New Scripting.FileSystemObject
+  Set mStdIn = mFSO.GetStandardStream(StdIn)
+  Set mStdOut = mFSO.GetStandardStream(StdOut)
+  mStdOut.Write "Hello world!" & vbNewLine
+  mStdOut.Write "press enter to quit program."
+  mStdIn.Read 1
+  Call FreeConsole
+End Sub

data/files.zettacode2/hello_world.text/visual_basic_.net.txt

@@ -0,0 +1,7 @@
+Imports System
+
+Module HelloWorld
+    Sub Main()
+        Console.WriteLine("Hello world!")
+    End Sub
+End Module

data/files.zettacode2/hello_world.text/viua_vm_assembly.txt

@@ -0,0 +1,6 @@
+.function: main/0
+    text %1 local "Hello World!"
+    print %1 local
+    izero %0 local
+    return
+.end

data/files.zettacode2/hello_world.text/vtl-2.txt

@@ -0,0 +1 @@
+<syntaxhighlight lang="vtl-2">10 ?="Hello world!"

data/files.zettacode2/hello_world.text/wart.txt

@@ -0,0 +1,2 @@
+
+prn "Hello world!"

data/files.zettacode2/hello_world.text/wdte.txt

@@ -0,0 +1 @@
+io.writeln io.stdout 'Hello world!';

data/files.zettacode2/hello_world.text/webassembly.txt

@@ -0,0 +1,38 @@
+
+{{libheader|WASI}}
+(module $helloworld
+
+    ;;Import fd_write from WASI, declaring that it takes 4 i32 inputs and returns 1 i32 value
+    (import "wasi_unstable" "fd_write"
+        (func $fd_write (param i32 i32 i32 i32) (result i32))
+    )
+
+    ;;Declare initial memory size of 32 bytes
+    (memory 32)
+
+    ;;Export memory so external functions can see it
+    (export "memory" (memory 0))
+ 
+    ;;Declare test data starting at address 8
+    (data (i32.const 8) "Hello world!\n")
+ 
+    ;;The entry point for WASI is called _start
+    (func $main (export "_start")
+        
+        ;;Write the start address of the string to address 0
+        (i32.store (i32.const 0) (i32.const 8)) 
+ 
+        ;;Write the length of the string to address 4
+        (i32.store (i32.const 4) (i32.const 13))
+
+        ;;Call fd_write to print to console
+        (call $fd_write
+            (i32.const 1) ;;Value of 1 corresponds to stdout
+            (i32.const 0) ;;The location in memory of the string pointer
+            (i32.const 1) ;;Number of strings to output
+            (i32.const 24) ;;Address to write number of bytes written
+        )
+        drop ;;Ignore return code
+    )
+)
+

data/files.zettacode2/hello_world.text/wee_basic.txt

@@ -0,0 +1,2 @@
+<syntaxhighlight lang="wee basic">print 1 "Hello world!"
+end

data/files.zettacode2/hello_world.text/whenever.txt

@@ -0,0 +1,2 @@
+
+1 print("Hello world!");

data/files.zettacode2/hello_world.text/whiley.txt

@@ -0,0 +1,5 @@
+
+import whiley.lang.System
+
+method main(System.Console console):
+    console.out.println("Hello world!")

data/files.zettacode2/hello_world.text/whitespace.txt

@@ -0,0 +1 @@
+There is a "Hello World" - example-program on the [http://compsoc.dur.ac.uk/whitespace/hworld.ws Whitespace-website]

data/files.zettacode2/hello_world.text/wisp.txt

@@ -0,0 +1,8 @@
+Output in Wisp follows the same concepts as [[Scheme]], but replacing outer parentheses with indentation.
+
+With [[Guile]] and wisp installed, this example can be tested in a REPL started with guile --language=wisp, or directly with the command wisp.
+
+import : scheme base
+         scheme write
+display "Hello world!"
+newline

data/files.zettacode2/hello_world.text/wolfram_language.txt

@@ -0,0 +1 @@
+Print["Hello world!"]

data/files.zettacode2/hello_world.text/wren.txt

@@ -0,0 +1 @@
+System.print("Hello world!")

data/files.zettacode2/hello_world.text/x10.txt

@@ -0,0 +1,8 @@
+class HelloWorld {
+  public static def main(args:Rail[String]):void {
+    if (args.size < 1) {
+        Console.OUT.println("Hello world!");
+        return;
+    }
+  }
+}

data/files.zettacode2/hello_world.text/x86-64_assembly.txt

@@ -0,0 +1,44 @@
+===UASM===
+
+option casemap:none
+if @Platform eq 1
+   option dllimport:<kernel32>
+      ExitProcess   proto :dword
+   option dllimport:none
+      exit          equ ExitProcess
+endif
+printf              proto :qword, :vararg
+exit                proto :dword
+
+.code
+main proc
+invoke printf, CSTR("Goodbye, World!",10)
+invoke exit, 0
+ret
+main endp
+end
+
+===AT&amp;T syntax (Gas)===
+// No "main" used
+// compile with `gcc -nostdlib`
+#define SYS_WRITE   $1
+#define STDOUT      $1
+#define SYS_EXIT    $60
+#define MSGLEN      $14
+
+.global _start
+.text
+
+_start:
+    movq    $message, %rsi          // char *
+    movq    SYS_WRITE, %rax
+    movq    STDOUT, %rdi
+    movq    MSGLEN, %rdx
+    syscall                         // sys_write(message, stdout, 0x14);
+    
+    movq    SYS_EXIT, %rax
+    xorq    %rdi, %rdi              // The exit code.
+    syscall                         // exit(0)
+    
+.data
+message:    .ascii "Hello, world!\n"

data/files.zettacode2/hello_world.text/x86_assembly.txt

@@ -0,0 +1,37 @@
+{{works with|nasm|2.05.01}}
+
+This is known to work on Linux, it may or may not work on other Unix-like systems
+
+Prints "Hello world!" to stdout (and there is probably an even simpler version):
+section .data
+msg     db      'Hello world!', 0AH
+len     equ     $-msg
+
+section .text
+global  _start
+_start: mov     edx, len
+        mov     ecx, msg
+        mov     ebx, 1
+        mov     eax, 4
+        int     80h
+
+        mov     ebx, 0
+        mov     eax, 1
+        int     80h
+
+'''AT&T syntax:''' works with gcc (version 4.9.2) and gas (version 2.5):
+
+.section .text
+
+.globl main
+
+main:
+	movl $4,%eax	#syscall number 4
+	movl $1,%ebx	#number 1 for stdout
+	movl $str,%ecx	#string pointer
+	movl $16,%edx	#number of bytes
+	int $0x80	#syscall interrupt
+	ret
+
+.section .data
+str: .ascii "Hello world!\12"

data/files.zettacode2/hello_world.text/xbasic.txt

@@ -0,0 +1,12 @@
+{{works with|Windows XBasic}}
+
+PROGRAM "hello"
+VERSION "0.0003"
+
+DECLARE FUNCTION Entry()
+
+FUNCTION Entry()
+  PRINT "Hello World"
+END FUNCTION
+END PROGRAM
+

data/files.zettacode2/hello_world.text/xeec.txt

@@ -0,0 +1,4 @@
+
+h#10 h$! h$d h$l h$r h$o h$w h#32  
+h$o h$l h$l h$e h$H >o o$ p jno
+

data/files.zettacode2/hello_world.text/xl.txt

@@ -0,0 +1,2 @@
+use XL.UI.CONSOLE
+WriteLn "Hello world!"

data/files.zettacode2/hello_world.text/xlisp.txt

@@ -0,0 +1,2 @@
+(DISPLAY "Hello world!")
+(NEWLINE)

data/files.zettacode2/hello_world.text/xpath.txt

@@ -0,0 +1 @@
+'Hello world
'

data/files.zettacode2/hello_world.text/xpl0.txt

@@ -0,0 +1,3 @@
+code Text=12;
+Text(0, "Hello world!
+")

data/files.zettacode2/hello_world.text/xslt.txt

@@ -0,0 +1,5 @@
+With a literal newline:
+<xsl:text>Hello world!
+</xsl:text>
+Or, with an explicit newline:
+<xsl:text>Hello world!&amp;#xA;</xsl:text>

data/files.zettacode2/hello_world.text/yabasic.txt

@@ -0,0 +1,3 @@
+
+print "Hello world!"
+

data/files.zettacode2/hello_world.text/yorick.txt

@@ -0,0 +1 @@
+write, "Hello world!"

data/files.zettacode2/hello_world.text/z80_assembly.txt

@@ -0,0 +1,21 @@
+
+Using the Amstrad CPC firmware:
+
+org		$4000
+
+txt_output:	equ	$bb5a
+
+		push	hl
+		ld	hl,world
+
+print:		ld	a,(hl)
+		cp	0
+		jr	z,end
+		call	txt_output
+		inc	hl
+		jr	print
+
+end:		pop	hl
+		ret
+
+world:		defm	"Hello world!\r\n\0"

data/files.zettacode2/hello_world.text/zig.txt

@@ -0,0 +1,4 @@
+const std = @import("std");
+pub fn main() !void {
+    try std.io.getStdOut().writer().writeAll("Hello world!\n");
+}

data/files.zettacode2/hello_world.text/zkl.txt

@@ -0,0 +1,2 @@
+println("Hello world!");
+{{omit from|VBA|VBA can't write or output to console}}

data/files.zettacode2/hello_world.text/zoea.txt

@@ -0,0 +1,2 @@
+program: hello_world 
+  output: "Hello  world!"

data/files.zettacode2/hello_world.text/zoea_visual.txt

@@ -0,0 +1 @@
+[http://zoea.co.uk/examples/zv-rc/Hello_world.png Hello World]

data/files.zettacode2/hello_world.text/zoomscript.txt

@@ -0,0 +1,5 @@
+For typing:
+print "Hello world!"
+For importing:
+
+¶0¶print "Hello world!"

data/files.zettacode2/hello_world.text/zx_spectrum_basic.txt

@@ -0,0 +1,4 @@
+10 print "Hello world!"</text>
+      <sha1>pvejvhhj3r3js3coyflyl113kmxoycz</sha1>
+    
+  

data/files.zettacode2/hello_world.text//340/256/211/340/256/257/340/256/277/340/256/260/340/257/215-uyir.txt

@@ -0,0 +1,5 @@
+<syntaxhighlight lang="உயிர்/uyir">முதன்மை என்பதின் வகை எண் பணி {{
+         ("உலகத்தோருக்கு வணக்கம்") என்பதை திரை.இடு;
+
+         முதன்மை = 0;
+}};

data/install/docker/.gitignore

@@ -0,0 +1,2 @@
+/input/
+files.*

data/install/docker/run

@@ -0,0 +1,7 @@
+
+APPNAME=zettacode
+DOCKER_NAME=$APPNAME
+DOCKER_IMAGE=ruby:latest
+
+docker run -it --rm --name $DOCKER_NAME -v "$PWD":/opt -w /opt $DOCKER_IMAGE /bin/bash
+

data/{vagrant → install/vagrant/debian}/Vagrantfile

@@ -1,7 +1,7 @@
 # -*- mode: ruby -*-
 # vi: set ft=ruby :
 
-NAME = "zettacode"
+NAME = "zettacode-debian"
 Vagrant.configure("2") do |config|
   config.vm.define NAME do |i|
     i.vm.box = "generic/debian11"

data/install/vagrant/opensuse/.gitignore

@@ -0,0 +1,2 @@
+.vagrant
+*.log

data/install/vagrant/opensuse/.ruby-version

@@ -0,0 +1 @@
+system

data/install/vagrant/opensuse/Vagrantfile

@@ -0,0 +1,29 @@
+# -*- mode: ruby -*-
+# vi: set ft=ruby :
+
+VMNAME = "zettacode-opensuse"
+BOXNAME = "opensuse/Leap-15.2.x86_64"
+
+Vagrant.configure("2") do |config|
+  config.vm.define VMNAME do |i|
+    i.vm.box = BOXNAME
+    i.vm.hostname = VMNAME
+    # i.vm.network "public_network", bridge: [ "eth0" ]
+    # i.vm.network "public_network", bridge: [ "wlan0" ]
+    i.vm.network :forwarded_port, guest: 22, host: 2231
+    i.vm.synced_folder "./", "/vagrant"
+    i.vm.provision "shell", inline: <<-SHELL
+      zypper refresh
+      zypper in -y vim tree nmap
+      zypper in -y neofetch lsb-release
+
+      gem install zettacode
+
+      lsb_release -d
+    SHELL
+    i.vm.provider "virtualbox" do |v|
+      v.name = VMNAME
+      v.memory = 2048
+    end
+  end
+end

data/lib/zettacode/parse/parse.rb

@@ -31,7 +31,7 @@ module Zettacode
       name.tr!(" ", "_")
       name.downcase!
       folder = File.join(Zettacode::OUTPUT_FOLDER, name)
-      FileUtils.mkdir(folder) unless Dir.exist? folder
+      FileUtils.mkdir_p(folder) unless Dir.exist? folder
       [content, folder]
     end
 

data/lib/zettacode/version.rb

@@ -1,6 +1,6 @@
 # frozen_string_literal: true
 
 module Zettacode
-  VERSION = "0.1.3"
+  VERSION = "0.1.4"
   OUTPUT_FOLDER = "files.zettacode"
 end