singrdk/base/Contracts/NameSpace.Contracts/ServiceContract.sg

27 lines
616 B
Plaintext
Raw Normal View History

2008-03-05 09:52:00 -05:00
////////////////////////////////////////////////////////////////////////////////
//
// Microsoft Research Singularity
//
// Copyright (c) Microsoft Corporation. All rights reserved.
//
// File: ServiceContract.sg
//
// This is the base contract to be used, and overridden by, every Service
// participating in the Directory
namespace Microsoft.Singularity.Directory
{
public contract ServiceContract
{
out message ContractNotSupported();
state Start: one
{
ContractNotSupported! -> Done;
}
state Done: one {}
}
}