modersohn / delphi-tree-sitter Goto Github PK

Can be seen running the VCL Demo with Win32 being the target platform.

Crash occurs when calling ts_node_end_point(). ts_node_start_point() does not crash, but does not return the correct location.

Originally TSPoint is defined as

typedef struct TSPoint {
  uint32_t row;
  uint32_t column;
} TSPoint;

which I translated to

  TSPoint = packed record
    row: UInt32;
    column: UInt32;
  end;

This works fine on Win64 where the size of the struct equals the size of a pointer. On Win32 that's not the case.

Calling convention for both APIs is explicitly set to cdecl.