Getting my test case during the Memorial Day sale!

This commit is contained in:
David E Bernholdt 1994-05-27 23:34:42 +00:00
parent d55e2fa480
commit 7c31e7cccf
2 changed files with 11 additions and 1 deletions

View file

@ -1,4 +1,4 @@
OBJ = rjhtest.o raktest.o
OBJ = rjhtest.o raktest.o debtest.o
LIBRARY = libtest.a
include ../config/makefile.h

10
src/develop/debtest.F Normal file
View file

@ -0,0 +1,10 @@
Subroutine DEBTest(RTDB)
Implicit NONE
Integer RTDB
Integer LUOut
Parameter (LuOut = 6)
C#include "stdio.fh"
C#include "stdio_init.fh"
Write (LuOut, *) 'Just a placeholder!'
Return
End