Mercurial > hg > octave-lyh
comparison src/defun-dld.h @ 2968:e330cb788508
[project @ 1997-05-15 17:40:29 by jwe]
author | jwe |
---|---|
date | Thu, 15 May 1997 17:54:17 +0000 |
parents | 1a30f46e1870 |
children | 35a6d027772c |
comparison
equal
deleted
inserted
replaced
2967:467aae13b70a | 2968:e330cb788508 |
---|---|
31 | 31 |
32 // Define a builtin function that may be loaded dynamically at run | 32 // Define a builtin function that may be loaded dynamically at run |
33 // time. | 33 // time. |
34 // | 34 // |
35 // If Octave is not configured for dynamic linking of builtin | 35 // If Octave is not configured for dynamic linking of builtin |
36 // functions, this is similar to DEFUN, except that it will generate | 36 // functions, this is the same as DEFUN, except that it will generate |
37 // an extra static struct and an extra externally visible function. | 37 // an extra externally visible function. |
38 // | 38 // |
39 // The first DECLARE_FUN is for the struct, the second is for the | 39 // The first DECLARE_FUN is for the benefit of the installer function |
40 // definition of the function. | 40 // and the second is for the definition of the function. |
41 | 41 |
42 #if defined (MAKE_BUILTINS) | 42 #if defined (MAKE_BUILTINS) |
43 #if ! (defined (OCTAVE_LITE) && defined (WITH_DYNAMIC_LINKING)) | 43 #if ! (defined (OCTAVE_LITE) && defined (WITH_DYNAMIC_LINKING)) |
44 #define DEFUN_DLD(name, args_name, nargout_name, doc) \ | 44 #define DEFUN_DLD(name, args_name, nargout_name, doc) \ |
45 DEFUN_INTERNAL (name, args_name, nargout_name, 0, doc) | 45 DEFUN_INTERNAL (name, args_name, nargout_name, 0, doc) |
46 #endif | 46 #endif |
47 #else | 47 #else |
48 #define DEFUN_DLD(name, args_name, nargout_name, doc) \ | 48 #define DEFUN_DLD(name, args_name, nargout_name, doc) \ |
49 DECLARE_FUN (name, args_name, nargout_name); \ | 49 DECLARE_FUN (name, args_name, nargout_name); \ |
50 DEFINE_FUN_STRUCT_FUN (name, doc) \ | 50 DEFINE_FUN_INSTALLER_FUN (name, doc) \ |
51 DECLARE_FUN (name, args_name, nargout_name) | 51 DECLARE_FUN (name, args_name, nargout_name) |
52 #endif | 52 #endif |
53 | 53 |
54 #endif | 54 #endif |
55 | 55 |