record var

Smart pascal source code


type
  TBase = record
    Field: Integer;
    class var Test: Integer;
  end;

WriteLn(TBase.Test);
TBase.Test := 123;
WriteLn(TBase.Test);

var b: TBase;
WriteLn(b.Test);

{<<< RESULT - CONSOLE LOG >>>
-----------------------------
0
123
123
-----------------------------
{<<<<<<<<< THE END >>>>>>>>>}

function Copy$TBase(s,d) {
   return d;
}
function Clone$TBase($) {
   return {

   }
}
var Test = 0;
var b = {Field:0};

/* <<< main JS >>> */

   WriteLn(Test);
   Test = 123;
   WriteLn(Test);
   WriteLn(Test);