Hi,

I am using latest ada-mode from monotone repo. On the attached code if
I go to COMMA within association_list and press TAB then
wisi-indent-line raises an exception.

This is only a report. I did not investigate, so do not have a patch.

-- 
Piotr Trojanek
package P2 is

   function UpdateOrderCommonChangeTrackingStatusTS
     (Archtrackingdata : ArchTrackingData_Opt.Optional_T)
      return Boolean
   is
     ((if Not_Nil (ArchDepartmentRecognitionData) then
         WsOrderTrackingStatus_Out =
         Override (WsOrderTrackingStatus)
         and (
                (
                 WsDepartmentCompletedHistory_Out =
                   COMPLETEDHISTORY_Sets.Union
                     ((WsDepartmentCompletedHistory -
                         (if not Contains (WsConfiguredRecognisedOrders_Out, Order)
                          then Comprehension (WsDepartmentCompletedHistory, OC_Pred'Access)
                          else COMPLETEDHISTORY_Sets.Empty_Set)
                      )
                       ,

                      (if (OrderTrackingStatus_Maps.Element (WsOrderTrackingStatus, Order)) = Inprocess
                       then
                         COMPLETEDHISTORY_Sets.To_Set
                           (COMPLETEDHISTORYITEM'
                              (OrderId => Order,
                               TimeIssued => OrderDataTimestamp,
                               DeliveryStatus =>
                                 (if Not_Nil (ArchTrackingData) then
                                    (if The (ArchTrackingData).DeliveryMethod = DataLinkDelivery
                                     then DeliveryStatusDriverPending
                                     else DeliveryStatusScanned)
                                  else DeliveryStatusNone)))
                       else COMPLETEDHISTORY_Sets.Empty_Set))))));

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

Reply via email to