unofficial mirror of emacs-devel@gnu.org 
 help / color / mirror / code / Atom feed

blob 2fdd01e8c31d6079778cd2b841ca2c4340cdd55f 499 bytes (raw)
name: modules/fmod.c 	 # note: path name is non-authoritative(*)

#include <config.h>
#include <lisp.h>

#include <math.h>

/* emacs checks for this symbol before running the module */

int plugin_is_GPL_compatible;

/* define a new lisp function */

EXFUN (Ffmod, 2);
DEFUN ("fmod", Ffmod, Sfmod, 2, 2, 0,
       doc: "Returns the floating-point remainder of NUMER/DENOM")
  (Lisp_Object numer, Lisp_Object denom)
{
  return make_float (fmod (extract_float (numer), extract_float (denom)));
}

/* entry point of the module */

void init ()
{
  defsubr (&Sfmod);
}

debug log:

solving 2fdd01e ...
found 2fdd01e in https://yhetil.org/emacs-devel/CA+5B0FMp_sL+JCff4v1Rp-P-cXwCC0rXP7AuiOQDAhruSa=nwQ@mail.gmail.com/

applying [1/1] https://yhetil.org/emacs-devel/CA+5B0FMp_sL+JCff4v1Rp-P-cXwCC0rXP7AuiOQDAhruSa=nwQ@mail.gmail.com/
diff --git a/modules/fmod.c b/modules/fmod.c
new file mode 100644
index 0000000..2fdd01e

Checking patch modules/fmod.c...
Applied patch modules/fmod.c cleanly.

index at:
100644 2fdd01e8c31d6079778cd2b841ca2c4340cdd55f	modules/fmod.c

(*) Git path names are given by the tree(s) the blob belongs to.
    Blobs themselves have no identifier aside from the hash of its contents.^

Code repositories for project(s) associated with this public inbox

	https://git.savannah.gnu.org/cgit/emacs.git

This is a public inbox, see mirroring instructions
for how to clone and mirror all data and code used for this inbox;
as well as URLs for read-only IMAP folder(s) and NNTP newsgroup(s).