On 31 May 2015, at 15:13, Stephen Leake <[email protected]> wrote:

> I didn't check if there's a "modules" section in the emacs manual yet;
> this should be in there.
> 
> But it hasn't been commented on by anyone else yet.

Can’t see it? (nor could I see the command module-load, maybe some Mac-related 
confusion vs existing Emacs)

> I've only tested with 32 bits so far; that's what GNAT GPL 2014 on
> Windows is. Which is one reason I tried to move to Linux. I'll get back
> to that soon.

Looking good so far; I’ve made a basic-ada module, and exceptions get handled 
just fine in spite of Mac not having sjlj. If this is what you mean.

package body Basic is

   function Inner (A, B : Emacs_Module_H.Emacs_Value)
                return Emacs_Module_H.Emacs_Value is
      use type Emacs_Module_H.Emacs_Value;
   begin
      if A = 42 or B = 42 then
         raise Constraint_Error;
      end if;
      return A + B;
   end Inner;

   function Sum (A, B : Emacs_Module_H.Emacs_Value)
                return Emacs_Module_H.Emacs_Value is
      use type Emacs_Module_H.Emacs_Value;
   begin
      return Inner (A, B);
   exception
      when others =>
         return -1;
   end Sum;

end Basic;

See attached for code.


Attachment: modules-ada.tar.gz
Description: GNU Zip compressed data

_______________________________________________
Emacs-ada-mode mailing list
[email protected]
http://host114.hostmonster.com/mailman/listinfo/emacs-ada-mode_stephe-leake.org

Reply via email to