Araq

if a of Z:
  echo "Z"
elif a of Y:
  echo "Y"
elif a of X:
  echo "X"
  
'of' is expensive and will become MORE expensive for proper DLL support
(string comparisons!). Thus we reserve a slot for the exact matched object

Araq

# module A

var a: int

template tmp*(): expr = 
  # declaration context: the 'a' from module A
  a

Araq

# Compile with nimrod c -d:release --passC:-fopenmp --passL:-fopenmp PN.nim

import os, strutils, unsigned

const
  TileDim = 50'i32
  Miw = 2
  MaxWid = 8

  NumLevs = 800

Araq

proc test() =
  asm """ 
    ".byte 0xCC\n" 
    "push %rcx\n"
    "push %rdx\n"
    "push %r8\n"
    "mov `navmBackendS1`, %rax\n"
    "mov `navmBackendS2`, %r8\n"
    "mov `navmBackendTempAdr`, %rdx\n"
    "call *%rdx\n"

Araq

const
  Identity = [
    [1, 0, 0],
    [0, 1, 0],
    [0, 0, 1]
  ]

  Identity = Matrix([
    [1, 0, 0],
    [0, 1, 0],

Araq

const CacheLineSize = 32 # true for most archs

type
  Barrier {.compilerProc.} = object
    entered: int
    cv: CondVar # condvar takes 3 words at least
    when sizeof(int) < 8:
      cacheAlign: array[CacheLineSize-4*sizeof(int), byte] 
    left: int
    cacheAlign2: array[CacheLineSize-sizeof(int), byte]

Araq

import threadpool, tables, strutils

var db {.threadvar.}: CountTable[string]

proc rawPut(key: string) =
  inc(db, key)

proc rawInit() =
  db = initCountTable[string]()

Araq

This document describes how Lambda Lifting (LL) works. LL is responsible for transforming 'closures' into (environment, function) pairs.

The basic approach is that captured vars need to be put on the heap and that the calling chain needs to be explicitly modelled. Things to consider:

proc a =
  var v = 0

Araq

var
  a: array[2, Thread[int]]

proc worker(x: int) =
  while true:
    echo x

createThread(a[0], worker, 1)
createThread(a[1], worker, 2)

Araq

REM - Run the full testsuite;  tests\testament\tester all

REM - Uncomment the list of changes in news.txt
REM - write a news ticker entry
REM - Update the version

REM - Generate the full docs;  koch web0
REM - Generate the installers;
REM - Update the version in system.nim
REM - Test the installers