Sign in
gnu
/
gcc.git
/
refs/heads/devel/bypass-asm
/
.
/
gcc
/
testsuite
/
gm2
/
switches
/
uninit-variable-checking
/
fail
/
testwithptr3.mod
blob: b442a6263046a90216616ee2f9c4d9d854940d9c [
file
] [
log
] [
blame
]
MODULE testwithptr3
;
TYPE
ptr
=
POINTER TO vec
;
vec
=
RECORD
x
,
y
:
CARDINAL
;
END
;
PROCEDURE test
;
VAR
p
:
ptr
;
BEGIN
WITH p
^
DO
END
END
test
;
BEGIN
test
END
testwithptr3
.