Added compatibility for 2.5.5.5 (file hash changes).

compatibility/2.3.nom

@@ -1,4 +1,4 @@
-#!/usr/bin/env nomsu -V2.5.5.4
+#!/usr/bin/env nomsu -V2.5.5.5
 #
     This file defines upgrades from Nomsu <2.3 to Nomsu 2.3
 

compatibility/2.4.nom

@@ -1,4 +1,4 @@
-#!/usr/bin/env nomsu -V2.5.5.4
+#!/usr/bin/env nomsu -V2.5.5.5
 #
     This file defines upgrades from Nomsu <2.4 to Nomsu 2.4
 

compatibility/2.5.5.5.nom

@@ -0,0 +1,14 @@
+#!/usr/bin/env nomsu -V2.5.5.4
+#
+    This file defines upgrades from Nomsu <2.5.5.5 to Nomsu 2.5.5.5
+
+use "compatibility/compatibility.nom"
+
+upgrade action [hash %, sha1 %] to "2.5.5.5" as (..)
+    =lua ".."
+        \(base64 decode (hash %)):gsub('.', function(c) return ('%x02'):format(c) end)
+
+upgrade action [file with hash %] to "2.5.5.5" as (..)
+    file with hash (..)
+        base64 (..)
+            =lua "\%:gsub('..', function(xx) return string.char(tonumber(xx, 16)) end)"

compatibility/2.5.nom

@@ -1,4 +1,4 @@
-#!/usr/bin/env nomsu -V2.5.5.4
+#!/usr/bin/env nomsu -V2.5.5.5
 #
     This file defines upgrades from Nomsu <2.5 to Nomsu 2.5
 

compatibility/2.nom

@@ -1,4 +1,4 @@
-#!/usr/bin/env nomsu -V2.5.5.4
+#!/usr/bin/env nomsu -V2.5.5.5
 #
     This file defines upgrades from Nomsu 1 to Nomsu 2
 

compatibility/compatibility.nom

@@ -1,4 +1,4 @@
-#!/usr/bin/env nomsu -V2.5.5.4
+#!/usr/bin/env nomsu -V2.5.5.5
 #
     This file contains code for defining ways to upgrade code between different versions
     of Nomsu.
@@ -18,39 +18,46 @@ action [upgrade action %stub to %version via %upgrade_fn]:
 parse [upgrade %tree to %version as %body] as (..)
     upgrade to %version via ([%] -> (% with %tree -> %body))
 
-compile [upgrade action %action to %version as %body] to:
-    %replacements = {}
-    for %i in 1 to (length of %action):
-        if (%action.%i.type is "Var"):
-            %replacements.(%action.%i.1) = "\(\%tree as lua id)[\%i]"
+compile [upgrade action %actions to %version as %body] to:
+    if (%actions is "Action" syntax tree):
+        %actions = [%actions]
+    %lua = (Lua "")
+    for %action in %actions:
+        %replacements = {}
+        for %i in 1 to (length of %action):
+            if (%action.%i.type is "Var"):
+                %replacements.(%action.%i.1) = "\(\%tree as lua id)[\%i]"
+        
+        local action [make tree %t]:
+            when:
+                (%t is "Var" syntax tree):
+                    if %replacements.(%t.1):
+                        return %replacements.(%t.1)
+                    ..else:
+                        return ".."
+                            \(%t.type)(\(quote "\(%t.source)"), \(..)
+                                quote "\(%t.1) \000\(=lua "string.format('%X', __MANGLE_INDEX)")"
+                            ..)
+                
+                (%t is syntax tree):
+                    %args = ((make tree %) for % in %t)
+                    add "\(\%tree as lua id).source" to %args at index 1
+                    return "\(%t.type)(\(%args joined with ", "))"
+                
+                else:
+                    return (quote "\%t")
+        
+        unless ("\%lua" == ""): to %lua write "\n"
+        to %lua write (..)
+            Lua ".."
+                A_upgrade_action_1_to_2_via_3(\(quote %action.stub), \(%version as lua expr), function(\(..)
+                    \%tree as lua id
+                ..)
+                    __MANGLE_INDEX = (__MANGLE_INDEX or 0) + 1
+                    return \(make tree %body)
+                end)
     
-    local action [make tree %t]:
-        when:
-            (%t is "Var" syntax tree):
-                if %replacements.(%t.1):
-                    return %replacements.(%t.1)
-                ..else:
-                    return ".."
-                        \(%t.type)(\(quote "\(%t.source)"), \(..)
-                            quote "\(%t.1) \000\(=lua "string.format('%X', __MANGLE_INDEX)")"
-                        ..)
-            
-            (%t is syntax tree):
-                %args = ((make tree %) for % in %t)
-                add "\(\%tree as lua id).source" to %args at index 1
-                return "\(%t.type)(\(%args joined with ", "))"
-            
-            else:
-                return (quote "\%t")
-    
-    return (..)
-        Lua ".."
-            A_upgrade_action_1_to_2_via_3(\(quote %action.stub), \(%version as lua expr), function(\(..)
-                \%tree as lua id
-            ..)
-                __MANGLE_INDEX = (__MANGLE_INDEX or 0) + 1
-                return \(make tree %body)
-            end)
+    return %lua
 
 action [..]
     %tree upgraded from %start_version to %end_version

core/collections.nom

@@ -1,4 +1,4 @@
-#!/usr/bin/env nomsu -V2.5.5.4
+#!/usr/bin/env nomsu -V2.5.5.5
 #
     This file contains code that supports manipulating and using collections like lists
     and dictionaries.

core/control_flow.nom

@@ -1,4 +1,4 @@
-#!/usr/bin/env nomsu -V2.5.5.4
+#!/usr/bin/env nomsu -V2.5.5.5
 #
     This file contains compile-time actions that define basic control flow structures
     like "if" statements and loops.

core/coroutines.nom

@@ -1,4 +1,4 @@
-#!/usr/bin/env nomsu -V2.5.5.4
+#!/usr/bin/env nomsu -V2.5.5.5
 #
     This file defines the code that creates and manipulates coroutines
 

core/errors.nom

@@ -1,4 +1,4 @@
-#!/usr/bin/env nomsu -V2.5.5.4
+#!/usr/bin/env nomsu -V2.5.5.5
 #
     This file contains basic error reporting code
 

core/io.nom

@@ -1,4 +1,4 @@
-#!/usr/bin/env nomsu -V2.5.5.4
+#!/usr/bin/env nomsu -V2.5.5.5
 #
     This file contains basic input/output code
 

core/math.nom

@@ -1,4 +1,4 @@
-#!/usr/bin/env nomsu -V2.5.5.4
+#!/usr/bin/env nomsu -V2.5.5.5
 #
     This file defines some common math literals and functions
 

core/metaprogramming.nom

@@ -1,4 +1,4 @@
-#!/usr/bin/env nomsu -V2.5.5.4
+#!/usr/bin/env nomsu -V2.5.5.5
 #
     This File contains actions for making actions and compile-time actions and some helper
     functions to make that easier.

core/operators.nom

@@ -1,4 +1,4 @@
-#!/usr/bin/env nomsu -V2.5.5.4
+#!/usr/bin/env nomsu -V2.5.5.5
 #
     This file contains definitions of operators like "+" and "and".
 

core/scopes.nom

@@ -1,4 +1,4 @@
-#!/usr/bin/env nomsu -V2.5.5.4
+#!/usr/bin/env nomsu -V2.5.5.5
 #
     This file contains definitions pertaining to variable scoping
 

core/text.nom

@@ -1,4 +1,4 @@
-#!/usr/bin/env nomsu -V2.5.5.4
+#!/usr/bin/env nomsu -V2.5.5.5
 #
     This file contains some definitions of text escape sequences, including ANSI console
     color codes.

examples/how_do_i.nom

@@ -1,4 +1,4 @@
-#!/usr/bin/env nomsu -V2.5.5.4
+#!/usr/bin/env nomsu -V2.5.5.5
 # How do I...
 # Write a comment? Put a # and go till the end of the line
 # How do I write a multi-line comment?

lib/base64.nom

@@ -1,4 +1,4 @@
-#!/usr/bin/env nomsu -V2.5.5.4
+#!/usr/bin/env nomsu -V2.5.5.5
 #
     This file defines actions for encoding/decoding base 64, as specified in:
     https://tools.ietf.org/html/rfc4648

lib/consolecolor.nom

@@ -1,4 +1,4 @@
-#!/usr/bin/env nomsu -V2.5.5.4
+#!/usr/bin/env nomsu -V2.5.5.5
 #
     This file defines actions for ANSI console color escape codes.
 

lib/file_hash.nom

@@ -1,4 +1,4 @@
-#!/usr/bin/env nomsu -V2.5.5.4
+#!/usr/bin/env nomsu -V2.5.5.5
 #
     This file defines some actions for hashing files and looking up files by hash.
 

lib/object.nom

@@ -1,4 +1,4 @@
-#!/usr/bin/env nomsu -V2.5.5.4
+#!/usr/bin/env nomsu -V2.5.5.5
 #
     This file contains the implementation of an Object-Oriented programming system.
 

lib/os.nom

@@ -1,4 +1,4 @@
-#!/usr/bin/env nomsu -V2.5.5.4
+#!/usr/bin/env nomsu -V2.5.5.5
 #
     This file defines some actions that interact with the operating system and filesystem.
 

lib/training_wheels.nom

@@ -1,4 +1,4 @@
-#!/usr/bin/env nomsu -V2.5.5.4
+#!/usr/bin/env nomsu -V2.5.5.5
 #
     This file contains a set of definitions that bring some familiar language features
     from other languages into nomsu (e.g. "||" and "continue")
@@ -15,7 +15,7 @@ parse [%a || %b] as (%a or %b)
 parse [%a && %b] as (%a and %b)
 parse [continue] as (do next)
 parse [break] as (stop)
-parse [let %thing = %value in %action] as (with local {%thing: %value})
+parse [let %thing = %value in %action] as (with local {%thing:%value})
 parse [print %, println %] as (say %)
 parse [error!, panic!, fail!, abort!] as (barf!)
 parse [error %, panic %, fail %, abort %] as (barf %)

lib/version.nom

@@ -1,3 +1,3 @@
-#!/usr/bin/env nomsu -V2.5.5.4
+#!/usr/bin/env nomsu -V2.5.5.5
 # This file sets the current library version.
 lua> "NOMSU_LIB_VERSION = 5"

tools/autoformat.nom

@@ -1,4 +1,4 @@
-#!/usr/bin/env nomsu -V2.5.5.4
+#!/usr/bin/env nomsu -V2.5.5.5
 #
     Auto-format Nomsu code. Usage:
         nomsu tools/autoformat.nom [-i] file1 file2 directory1 ...

tools/find_action.nom

@@ -1,4 +1,4 @@
-#!/usr/bin/env nomsu -V2.5.5.4
+#!/usr/bin/env nomsu -V2.5.5.5
 #
     Find an action by its stub. Usage:
         nomsu tools/find_action.nom "foo %" file1 file2 directory1 ...

tools/parse.nom

@@ -1,4 +1,4 @@
-#!/usr/bin/env nomsu -V2.5.5.4
+#!/usr/bin/env nomsu -V2.5.5.5
 #
     Tool to print out a parse tree of files in an easy-to-read format. Usage:
         nomsu tools/parse.nom file1 file2 directory1 ...        

tools/test.nom

@@ -1,4 +1,4 @@
-#!/usr/bin/env nomsu -V2.5.5.4
+#!/usr/bin/env nomsu -V2.5.5.5
 #
     Tool to run all tests in a file (i.e. the code block inside a call to 'test %'). Usage:
         nomsu tools/test.nom file1 file2 directory1 ...

tools/upgrade.nom

@@ -1,4 +1,4 @@
-#!/usr/bin/env nomsu -V2.5.5.4
+#!/usr/bin/env nomsu -V2.5.5.5
 #
     Tool to automatically update code from old versions of Nomsu. Usage:
         nomsu tools/upgrade.nom [-i] file1 file2 directory1 ...