From 9416aa7c4046f0dbd463229ff8037c6fe666f81a Mon Sep 17 00:00:00 2001 From: Bruce Mitchener Date: Thu, 17 Dec 2020 23:38:02 +0700 Subject: [PATCH] Remove call-c.c (#94) This incompletely defines a function `call_c_fn`. This is actually defined in `src/foreign.c` (and called from `src/subr.c`). --- src/call-c.c | 29 ----------------------------- 1 file changed, 29 deletions(-) delete mode 100644 src/call-c.c diff --git a/src/call-c.c b/src/call-c.c deleted file mode 100644 index 4b9aa3c..0000000 --- a/src/call-c.c +++ /dev/null @@ -1,29 +0,0 @@ -/* $Id: call-c.c,v 1.2 1999/01/03 02:06:48 sybalsky Exp $ (C) Copyright Venue, All Rights Reserved - */ -static char *id = "$Id: call-c.c,v 1.2 1999/01/03 02:06:48 sybalsky Exp $ Copyright (C) Venue"; - -/************************************************************************/ -/* */ -/* (C) Copyright 1989-95 Venue. All Rights Reserved. */ -/* Manufactured in the United States of America. */ -/* */ -/************************************************************************/ - -#include "version.h" - -/************************************************************************/ -/* */ -/* F O R E I G N - F U N C T I O N C A L L I N T E R F A C E */ -/* */ -/* */ -/* */ -/************************************************************************/ - -#include "lispemul.h" - -lispPTR call_c_fn(args); -{ - void() *fn = args[0]; - (*fn)(); - return (NIL); -}