代码搜索:Nested
找到约 7,462 项符合「Nested」的源代码
代码结果 7,462
www.eeworm.com/read/366702/2872625
adb nested_return_test.adb
-- { dg-do run }
-- { dg-options "-gnata" }
procedure Nested_Return_Test is
function H (X: integer) return access integer is
Local : aliased integer := (X+1);
begin
case X is
www.eeworm.com/read/366702/2872708
adb nested_controlled_alloc.adb
-- { dg-do run }
with Text_IO; use Text_IO;
with Ada.Finalization; use Ada.Finalization;
procedure Nested_Controlled_Alloc is
package Controlled_Alloc is
type Fin is new Limited_Contro
www.eeworm.com/read/366702/2872800
adb nested_subtype_byref.adb
package body Nested_Subtype_Byref is
type Data (Stamped : Boolean) is record
case Stamped is
when True => Valid : Boolean;
when others => null;
end case;
end re
www.eeworm.com/read/366702/2873002
m nested-func-1.m
/* Test basic nested C function functionality within ObjC
methods. */
/* Contributed by Ziemowit Laski . */
#include
#include
#include
#includ
www.eeworm.com/read/366702/2876092
f90 nested_reshape.f90
! { dg-do run }
! PR 20436: This used to give a runtime error.
program nested_reshape
implicit none
real :: k(8,2)
real :: o(8,2)
k = reshape((/1.0,2.0,3.0,4.0,5.0,6.0,7.0,8.0, &
www.eeworm.com/read/366702/2881175
c nested-func-5.c
/* { dg-do compile } */
/* { dg-options "-fexceptions" } */
/* PR28516: ICE generating ARM unwind directives for nested functions. */
void ex(int (*)(void));
void foo(int i)
{
int bar(void)
{
www.eeworm.com/read/366702/2881590
c nested-func-2.c
/* PR middle-end/18820 */
/* Check that we reject nested functions as initializers
of static variables. */
/* { dg-do compile } */
/* { dg-options "" } */
struct S {
void (*f)(int);
};
extern
www.eeworm.com/read/366702/2881863
c nested-func-3.c
/* Undefined nested function should be a error, whether or not the
function is called. Bug 17807. */
/* Origin: Joseph Myers */
/* { dg-do compile } */
/* { dg-options "
www.eeworm.com/read/366702/2882362
c nested-func-4.c
/* { dg-do run } */
/* { dg-options "-pg" } */
/* { dg-options "-pg -static" { target hppa*-*-hpux* } } */
/* { dg-require-profiling "-pg" } */
extern void abort(void);
void foo(int i)
{
void bar(
www.eeworm.com/read/366702/2882525
c nested-func-6.c
/* { dg-do compile } */
/* { dg-options "-O -Winline" } */
static inline int foo1 (int a)
{ /* { dg-bogus "function not inlinable" } */
void bar1 (int b)
{}
return a;
}
i