Custom Query (429 matches)
Results (16 - 18 of 429)
Ticket | Resolution | Summary | Owner | Reporter |
---|---|---|---|---|
#497 | invalid | Error with AWS 2018 | ||
Description |
With aws-gpl-2018-20180524-src.tar.gz I got this: matreshka-servlet_servers-aws_servers.adb:124:17: no candidate interpretations match the actuals: matreshka-servlet_servers-aws_servers.adb:125:34: expected type "Standard.String" matreshka-servlet_servers-aws_servers.adb:125:34: found type access to function "Request_Callback" defined at line 125 matreshka-servlet_servers-aws_servers.adb:125:34: ==> in call to "Start" at aws-server.ads:92 matreshka-servlet_servers-aws_servers.adb:125:51: unmatched actual "Security" in call |
|||
#496 | fixed | Incorrect result of nested mtl:for | ||
Description |
Substitution of nested mtl:for is incorrect. See test for #454 where 'expected' text is wrong: post 1 post 2 -> subitem 1-2 post 2 -> subitem 1-2 post 2 post 2 -> subitem 2-2 post 2 -> subitem 2-2 Correct value should be: post 1 post 1 -> subitem 1-1 post 1 -> subitem 1-2 post 2 post 2 -> subitem 2-1 post 2 -> subitem 2-2 |
|||
#494 | fixed | construction of array with array_buffer storage | ||
Description |
with Interfaces; package Test4 is type Real is new Interfaces.IEEE_Float_64; type Matrix_4x4 is array (Positive range 1 .. 4, Positive range 1 .. 4) of Real; type GLfloat is new Interfaces.IEEE_Float_32; type GLfloat_Matrix_4x4 is array (Positive range 1 .. 4, Positive range 1 .. 4) of GLfloat with Convention => Fortran; pragma JavaScript_Array_Buffer (GLfloat_Matrix_4x4); function Convert (Item : Matrix_4x4) return GLfloat_Matrix_4x4; procedure Test; end Test4; package body Test4 is function Convert (Item : Matrix_4x4) return GLfloat_Matrix_4x4 is begin return (1 => (1 => GLfloat (Item (1, 1)), 2 => GLfloat (Item (1, 2)), 3 => GLfloat (Item (1, 3)), 4 => GLfloat (Item (1, 4))), 2 => (1 => GLfloat (Item (2, 1)), 2 => GLfloat (Item (2, 2)), 3 => GLfloat (Item (2, 3)), 4 => GLfloat (Item (2, 4))), 3 => (1 => GLfloat (Item (3, 1)), 2 => GLfloat (Item (3, 2)), 3 => GLfloat (Item (3, 3)), 4 => GLfloat (Item (3, 4))), 4 => (1 => GLfloat (Item (4, 1)), 2 => GLfloat (Item (4, 2)), 3 => GLfloat (Item (4, 3)), 4 => GLfloat (Item (4, 4)))); end Convert; procedure Test is S : constant Matrix_4x4 := (1 => (0.1, 0.2, 0.3, 0.4), 2 => (0.5, 0.6, 0.7, 0.8), 3 => (0.9, 1.0, 1.1, 1.2), 4 => (1.3, 1.4, 1.5, 1.6)); E : constant GLfloat_Matrix_4x4 := (1 => (0.1, 0.2, 0.3, 0.4), 2 => (0.5, 0.6, 0.7, 0.8), 3 => (0.9, 1.0, 1.1, 1.2), 4 => (1.3, 1.4, 1.5, 1.6)); R : constant GLfloat_Matrix_4x4 := Convert (S); begin if E /= R then raise Program_Error; end if; end Test; end Test4; |
Note:
See TracQuery
for help on using queries.