Make #lang syndicate equivalent to #lang syndicate/actor. Fixes #17.

6 years ago · b3a745dbcb
parent c9996d53ae
commit b3a745dbcb
115 changed files with 118 additions and 114 deletions
--- a/examples/ircd/channel.rkt
+++ b/examples/ircd/channel.rkt
@ -1,4 +1,4 @@
-#lang syndicate/actor
+#lang syndicate

 (require "protocol.rkt")
 (require "message.rkt")
--- a/examples/ircd/config.rkt
+++ b/examples/ircd/config.rkt
@ -1,4 +1,4 @@
-#lang syndicate/actor
+#lang syndicate

 (require/activate syndicate/reload)
 (require/activate syndicate/supervise)
--- a/examples/ircd/main.rkt
+++ b/examples/ircd/main.rkt
@ -1,4 +1,4 @@
-#lang syndicate/actor
+#lang syndicate

 (require/activate syndicate/reload)

--- a/examples/ircd/protocol.rkt
+++ b/examples/ircd/protocol.rkt
@ -1,4 +1,4 @@
-#lang syndicate/actor
+#lang syndicate

 (provide (struct-out ircd-listener)
         (struct-out ircd-motd)
--- a/examples/ircd/session.rkt
+++ b/examples/ircd/session.rkt
@ -1,4 +1,4 @@
-#lang syndicate/actor
+#lang syndicate

 (require racket/set)
 (require racket/string)
--- a/examples/netstack/incremental-highlevel/arp.rkt
+++ b/examples/netstack/incremental-highlevel/arp.rkt
@ -1,4 +1,4 @@
-#lang syndicate/actor
+#lang syndicate
 ;; ARP protocol, http://tools.ietf.org/html/rfc826
 ;; Only does ARP-over-ethernet.

--- a/examples/netstack/incremental-highlevel/demo-config.rkt
+++ b/examples/netstack/incremental-highlevel/demo-config.rkt
@ -1,4 +1,4 @@
-#lang syndicate/actor
+#lang syndicate
 ;; Demonstration stack configuration for various hosts.

 (require racket/match)
--- a/examples/netstack/incremental-highlevel/ethernet.rkt
+++ b/examples/netstack/incremental-highlevel/ethernet.rkt
@ -1,4 +1,4 @@
-#lang syndicate/actor
+#lang syndicate
 ;; Ethernet driver

 (provide (struct-out ethernet-packet)
--- a/examples/netstack/incremental-highlevel/fetchurl.rkt
+++ b/examples/netstack/incremental-highlevel/fetchurl.rkt
@ -1,4 +1,4 @@
-#lang syndicate/actor
+#lang syndicate

 (require/activate syndicate/drivers/timer)
 (require/activate "ethernet.rkt")
--- a/examples/netstack/incremental-highlevel/ip.rkt
+++ b/examples/netstack/incremental-highlevel/ip.rkt
@ -1,4 +1,4 @@
-#lang syndicate/actor
+#lang syndicate

 (provide (struct-out ip-packet)
 	 ip-address->hostname
--- a/examples/netstack/incremental-highlevel/main.rkt
+++ b/examples/netstack/incremental-highlevel/main.rkt
@ -1,4 +1,4 @@
-#lang syndicate/actor
+#lang syndicate

 (require syndicate/protocol/advertise)

--- a/examples/netstack/incremental-highlevel/port-allocator.rkt
+++ b/examples/netstack/incremental-highlevel/port-allocator.rkt
@ -1,4 +1,4 @@
-#lang syndicate/actor
+#lang syndicate
 ;; UDP/TCP port allocator

 (provide spawn-port-allocator
--- a/examples/netstack/incremental-highlevel/tcp.rkt
+++ b/examples/netstack/incremental-highlevel/tcp.rkt
@ -1,4 +1,4 @@
-#lang syndicate/actor
+#lang syndicate

 (provide (struct-out tcp-address)
 	 (struct-out tcp-handle)
--- a/examples/netstack/incremental-highlevel/udp.rkt
+++ b/examples/netstack/incremental-highlevel/udp.rkt
@ -1,4 +1,4 @@
-#lang syndicate/actor
+#lang syndicate

 (provide (struct-out udp-remote-address)
 	 (struct-out udp-handle)
--- a/examples/operational-transformation/syndicate-multiserver.rkt
+++ b/examples/operational-transformation/syndicate-multiserver.rkt
@ -1,4 +1,4 @@
-#lang syndicate/actor
+#lang syndicate

 (require racket/file)
 (require racket/serialize)
--- a/examples/operational-transformation/syndicate-server.rkt
+++ b/examples/operational-transformation/syndicate-server.rkt
@ -1,4 +1,4 @@
-#lang syndicate/actor
+#lang syndicate

 (require racket/file)
 (require racket/serialize)
--- a/examples/platformer/hll-main.rkt
+++ b/examples/platformer/hll-main.rkt
@ -1,4 +1,4 @@
-#lang syndicate/actor
+#lang syndicate

 (require 2htdp/image)
 (require 2htdp/planetcute)
--- a/examples/webchat/server/account.rkt
+++ b/examples/webchat/server/account.rkt
@ -1,4 +1,4 @@
-#lang syndicate/actor
+#lang syndicate

 (require racket/set)

--- a/examples/webchat/server/api.rkt
+++ b/examples/webchat/server/api.rkt
@ -1,4 +1,4 @@
-#lang syndicate/actor
+#lang syndicate

 (require/activate syndicate/reload)
 (require/activate syndicate/supervise)
--- a/examples/webchat/server/config.rkt
+++ b/examples/webchat/server/config.rkt
@ -1,4 +1,4 @@
-#lang syndicate/actor
+#lang syndicate

 (require racket/cmdline)
 (require racket/port)
--- a/examples/webchat/server/contacts.rkt
+++ b/examples/webchat/server/contacts.rkt
@ -1,4 +1,4 @@
-#lang syndicate/actor
+#lang syndicate

 (require/activate syndicate/reload)
 (require/activate syndicate/supervise)
--- a/examples/webchat/server/conversation.rkt
+++ b/examples/webchat/server/conversation.rkt
@ -1,4 +1,4 @@
-#lang syndicate/actor
+#lang syndicate

 (require racket/port)
 (require markdown)
--- a/examples/webchat/server/duplicate.rkt
+++ b/examples/webchat/server/duplicate.rkt
@ -1,4 +1,4 @@
-#lang syndicate/actor
+#lang syndicate

 (provide stop-when-duplicate)

--- a/examples/webchat/server/main.rkt
+++ b/examples/webchat/server/main.rkt
@ -1,4 +1,4 @@
-#lang syndicate/actor
+#lang syndicate

 (require/activate syndicate/reload)

--- a/examples/webchat/server/pages.rkt
+++ b/examples/webchat/server/pages.rkt
@ -1,4 +1,4 @@
-#lang syndicate/actor
+#lang syndicate

 (require racket/dict)
 (require racket/port)
--- a/examples/webchat/server/qa.rkt
+++ b/examples/webchat/server/qa.rkt
@ -1,4 +1,4 @@
-#lang syndicate/actor
+#lang syndicate

 (provide ask-question!)

--- a/examples/webchat/server/script-compiler.rkt
+++ b/examples/webchat/server/script-compiler.rkt
@ -1,4 +1,4 @@
-#lang syndicate/actor
+#lang syndicate

 (require racket/file)
 (require racket/port)
--- a/examples/webchat/server/static-content.rkt
+++ b/examples/webchat/server/static-content.rkt
@ -1,4 +1,4 @@
-#lang syndicate/actor
+#lang syndicate

 (require racket/file)
 (require racket/runtime-path)
--- a/examples/webchat/server/testdata.rkt
+++ b/examples/webchat/server/testdata.rkt
@ -1,4 +1,4 @@
-#lang syndicate/actor
+#lang syndicate

 (require "protocol.rkt")

--- a/examples/webchat/server/trust.rkt
+++ b/examples/webchat/server/trust.rkt
@ -1,4 +1,4 @@
-#lang syndicate/actor
+#lang syndicate

 (require racket/set)

--- a/racket/syndicate-gl/examples/basic.rkt
+++ b/racket/syndicate-gl/examples/basic.rkt
@ -1,4 +1,4 @@
-#lang syndicate/actor
+#lang syndicate

 (require racket/set)
 (require 2htdp/image)
--- a/racket/syndicate-gl/examples/clock-face.rkt
+++ b/racket/syndicate-gl/examples/clock-face.rkt
@ -1,4 +1,4 @@
-#lang syndicate/actor
+#lang syndicate
 ;; Compare to "ezd" clock-face example from: J. F. Bartlett, “Don’t
 ;; Fidget with Widgets, Draw!,” Palo Alto, California, DEC WRL
 ;; Research Report 91/6, May 1991.
--- a/racket/syndicate-gl/examples/many.rkt
+++ b/racket/syndicate-gl/examples/many.rkt
@ -1,4 +1,4 @@
-#lang syndicate/actor
+#lang syndicate
 ;; Multiple animated sprites.
 ;;
 ;; 2016-12-12 With the current implementations of (a) Syndicate's
--- a/racket/syndicate/big-bang/timestate.rkt
+++ b/racket/syndicate/big-bang/timestate.rkt
@ -1,4 +1,4 @@
-#lang syndicate/actor
+#lang syndicate
 ;; Big-bang specific timestate implementation with compatible protocol.

 (provide (struct-out later-than)
--- a/racket/syndicate/broker/server.rkt
+++ b/racket/syndicate/broker/server.rkt
@ -1,4 +1,4 @@
-#lang syndicate/actor
+#lang syndicate
 ;; Generic relay for WebSockets/TCP/etc-based participation in a network.

 (provide spawn-broker-server
--- a/racket/syndicate/drivers/config.rkt
+++ b/racket/syndicate/drivers/config.rkt
@ -1,4 +1,4 @@
-#lang syndicate/actor
+#lang syndicate
 ;; Monitor configuration files.

 (provide (struct-out config)
--- a/racket/syndicate/drivers/filesystem.rkt
+++ b/racket/syndicate/drivers/filesystem.rkt
@ -1,4 +1,4 @@
-#lang syndicate/actor
+#lang syndicate
 ;; Filesystem change monitor driver

 (provide (struct-out file-content)
--- a/racket/syndicate/drivers/gui.rkt
+++ b/racket/syndicate/drivers/gui.rkt
@ -1,4 +1,4 @@
-#lang syndicate/actor
+#lang syndicate
 ;; Driver for Racket's GUI.

 (require racket/class)
--- a/racket/syndicate/drivers/irc.rkt
+++ b/racket/syndicate/drivers/irc.rkt
@ -1,4 +1,4 @@
-#lang syndicate/actor
+#lang syndicate
 ;; Dreadfully simplified IRC client driver.

 (provide (struct-out irc-connection)
--- a/racket/syndicate/drivers/line-reader.rkt
+++ b/racket/syndicate/drivers/line-reader.rkt
@ -1,4 +1,4 @@
-#lang syndicate/actor
+#lang syndicate

 (provide (struct-out tcp-channel-line))

--- a/racket/syndicate/drivers/smtp.rkt
+++ b/racket/syndicate/drivers/smtp.rkt
@ -1,4 +1,4 @@
-#lang syndicate/actor
+#lang syndicate

 (provide (struct-out/defaults [make-smtp-account-config smtp-account-config])
         (rename-out [smtp-account-config <smtp-account-config>])
--- a/racket/syndicate/drivers/timestate.rkt
+++ b/racket/syndicate/drivers/timestate.rkt
@ -1,4 +1,4 @@
-#lang syndicate/actor
+#lang syndicate

 (provide (struct-out later-than)
         stop-when-timeout
--- a/racket/syndicate/drivers/web.rkt
+++ b/racket/syndicate/drivers/web.rkt
@ -1,4 +1,4 @@
-#lang syndicate/actor
+#lang syndicate
 ;; More general web driver: supports normal HTTP as well as websockets.

 (provide (struct-out web-virtual-host)
--- a/racket/syndicate/examples/actor/bank-account.rkt
+++ b/racket/syndicate/examples/actor/bank-account.rkt
@ -1,4 +1,4 @@
-#lang syndicate/actor
+#lang syndicate
 ;; Hello-worldish "bank account" example.

 (struct account (balance) #:prefab)
--- a/racket/syndicate/examples/actor/big-bang.rkt
+++ b/racket/syndicate/examples/actor/big-bang.rkt
@ -1,4 +1,4 @@
-#lang syndicate/actor
+#lang syndicate

 (require syndicate/big-bang)
 (require racket/math)
--- a/racket/syndicate/examples/actor/box-and-client.rkt
+++ b/racket/syndicate/examples/actor/box-and-client.rkt
@ -1,4 +1,4 @@
-#lang syndicate/actor
+#lang syndicate
 ;; Simple mutable box and count-to-infinity box client.

 (struct set-box (new-value) #:transparent)
--- a/racket/syndicate/examples/actor/broadcast-messages.rkt
+++ b/racket/syndicate/examples/actor/broadcast-messages.rkt
@ -1,4 +1,4 @@
-#lang syndicate/actor
+#lang syndicate
 ;; Demonstrate sending a message to multiple receivers.

 (struct envelope (destination message) #:prefab)
--- a/racket/syndicate/examples/actor/chain.rkt
+++ b/racket/syndicate/examples/actor/chain.rkt
@ -1,4 +1,4 @@
-#lang syndicate/actor
+#lang syndicate

 (require/activate syndicate/drivers/timestate)

--- a/racket/syndicate/examples/actor/chat-client.rkt
+++ b/racket/syndicate/examples/actor/chat-client.rkt
@ -1,4 +1,4 @@
-#lang syndicate/actor
+#lang syndicate

 (require syndicate/protocol/advertise)
 (require/activate syndicate/drivers/tcp)
--- a/racket/syndicate/examples/actor/chat-multiroom-topic-persist.rkt
+++ b/racket/syndicate/examples/actor/chat-multiroom-topic-persist.rkt
@ -1,4 +1,4 @@
-#lang syndicate/actor
+#lang syndicate
 ;; Evolution of chat-multiroom-topic.rkt to support persistent room topics.

 (require syndicate/protocol/advertise)
--- a/racket/syndicate/examples/actor/chat-multiroom-topic.rkt
+++ b/racket/syndicate/examples/actor/chat-multiroom-topic.rkt
@ -1,4 +1,4 @@
-#lang syndicate/actor
+#lang syndicate
 ;; Evolution of chat-multiroom.rkt to support room topics.

 (require syndicate/protocol/advertise)
--- a/racket/syndicate/examples/actor/chat-multiroom.rkt
+++ b/racket/syndicate/examples/actor/chat-multiroom.rkt
@ -1,4 +1,4 @@
-#lang syndicate/actor
+#lang syndicate
 ;; Evolution of chat-simplified-internals2.rkt to support multiple rooms.
 ;; Uses the approach of modifying the protocol to include a room name.

--- a/racket/syndicate/examples/actor/chat-no-quit-world-no-nesting.rkt
+++ b/racket/syndicate/examples/actor/chat-no-quit-world-no-nesting.rkt
@ -1,4 +1,4 @@
-#lang syndicate/actor
+#lang syndicate

 (require syndicate/protocol/advertise)
 (require/activate syndicate/drivers/tcp)
--- a/racket/syndicate/examples/actor/chat-no-quit-world.rkt
+++ b/racket/syndicate/examples/actor/chat-no-quit-world.rkt
@ -1,4 +1,4 @@
-#lang syndicate/actor
+#lang syndicate

 (require syndicate/protocol/advertise)
 (require/activate syndicate/drivers/tcp)
--- a/racket/syndicate/examples/actor/chat-simplified-internals.rkt
+++ b/racket/syndicate/examples/actor/chat-simplified-internals.rkt
@ -1,4 +1,4 @@
-#lang syndicate/actor
+#lang syndicate

 (require syndicate/protocol/advertise)
 (require/activate syndicate/drivers/tcp)
--- a/racket/syndicate/examples/actor/chat-simplified-internals2.rkt
+++ b/racket/syndicate/examples/actor/chat-simplified-internals2.rkt
@ -1,4 +1,4 @@
-#lang syndicate/actor
+#lang syndicate

 (require syndicate/protocol/advertise)
 (require/activate syndicate/drivers/tcp)
--- a/racket/syndicate/examples/actor/chat.rkt
+++ b/racket/syndicate/examples/actor/chat.rkt
@ -1,4 +1,4 @@
-#lang syndicate/actor
+#lang syndicate

 (require syndicate/protocol/advertise)
 (require/activate syndicate/drivers/tcp)
--- a/racket/syndicate/examples/actor/double-click.rkt
+++ b/racket/syndicate/examples/actor/double-click.rkt
@ -1,4 +1,4 @@
-#lang syndicate/actor
+#lang syndicate
 ;; Demonstrates debouncer-like functionality.

 (require syndicate/big-bang)
--- a/racket/syndicate/examples/actor/echo.rkt
+++ b/racket/syndicate/examples/actor/echo.rkt
@ -1,4 +1,4 @@
-#lang syndicate/actor
+#lang syndicate

 (require syndicate/protocol/advertise)
 (require/activate syndicate/drivers/tcp)
--- a/racket/syndicate/examples/actor/example-action-after-suspension.rkt
+++ b/racket/syndicate/examples/actor/example-action-after-suspension.rkt
@ -1,4 +1,4 @@
-#lang syndicate/actor
+#lang syndicate
 ;; Test case for a bug relating to use of parameters to accumulate
 ;; actions across react/suspend when an intermediate parameterization
 ;; for current-dataflow-subject-id has taken place.
--- a/racket/syndicate/examples/actor/example-assertion-spike.rkt
+++ b/racket/syndicate/examples/actor/example-assertion-spike.rkt
@ -1,4 +1,4 @@
-#lang syndicate/actor
+#lang syndicate
 ;;
 ;; Test case for a problem written up on 25 Oct 2016 in my research
 ;; journal.
--- a/racket/syndicate/examples/actor/example-bug-query-scope.rkt
+++ b/racket/syndicate/examples/actor/example-bug-query-scope.rkt
@ -1,4 +1,4 @@
-#lang syndicate/actor
+#lang syndicate
 ;; Demonstrates a (fixed) bug in define/query-value scoping.
 ;;
 ;; Buggy output:
--- a/racket/syndicate/examples/actor/example-bug-rising-edge-true.rkt
+++ b/racket/syndicate/examples/actor/example-bug-rising-edge-true.rkt
@ -1,4 +1,4 @@
-#lang syndicate/actor
+#lang syndicate
 ;; Demonstrates a bug: rising-edge of a predicate that starts off true
 ;; yields a crash.
 ;;
--- a/racket/syndicate/examples/actor/example-during-criterion-snapshotting.rkt
+++ b/racket/syndicate/examples/actor/example-during-criterion-snapshotting.rkt
@ -1,4 +1,4 @@
-#lang syndicate/actor
+#lang syndicate
 ;; Illustrates a (now fixed) bug where mutation altering a
 ;; subscription caused the `retracted` half of a during instance to be
 ;; lost.
--- a/racket/syndicate/examples/actor/example-filesystem.rkt
+++ b/racket/syndicate/examples/actor/example-filesystem.rkt
@ -1,4 +1,4 @@
-#lang syndicate/actor
+#lang syndicate

 (require/activate syndicate/drivers/filesystem)
 (require racket/file)
--- a/racket/syndicate/examples/actor/example-glitch.rkt
+++ b/racket/syndicate/examples/actor/example-glitch.rkt
@ -1,4 +1,4 @@
-#lang syndicate/actor
+#lang syndicate
 ;; Demonstrate FRP-like "glitching"
 ;;
 ;; Based on an example from the FRP survey of Bainomugisha et al.
--- a/racket/syndicate/examples/actor/example-multiple-suspension-resumption.rkt
+++ b/racket/syndicate/examples/actor/example-multiple-suspension-resumption.rkt
@ -1,4 +1,4 @@
-#lang syndicate/actor
+#lang syndicate
 ;; Shows that the checks enforcing single-use suspension-resumption are working.

 (spawn #:name 'shouldnt-work
--- a/racket/syndicate/examples/actor/example-partial-retraction.rkt
+++ b/racket/syndicate/examples/actor/example-partial-retraction.rkt
@ -1,4 +1,4 @@
-#lang syndicate/actor
+#lang syndicate
 ;; Illustrates the response of asserted / retracted / during to
 ;; observation of assertions discarding some of their dimensions.

--- a/racket/syndicate/examples/actor/example-responsibility-transfer-1.rkt
+++ b/racket/syndicate/examples/actor/example-responsibility-transfer-1.rkt
@ -1,4 +1,4 @@
-#lang syndicate/actor
+#lang syndicate
 ;; Demonstrates glitch preservation in during/spawn.
 ;;
 ;; Previously, `spawn` was expanded in place into the new actor's
--- a/racket/syndicate/examples/actor/example-responsibility-transfer-2.rkt
+++ b/racket/syndicate/examples/actor/example-responsibility-transfer-2.rkt
@ -1,4 +1,4 @@
-#lang syndicate/actor
+#lang syndicate
 ;; Demonstrates responsibility transfer.
 ;;
 ;; Previously, `spawn` was expanded in place into the new actor's
--- a/racket/syndicate/examples/actor/example-supervise.rkt
+++ b/racket/syndicate/examples/actor/example-supervise.rkt
@ -1,4 +1,4 @@
-#lang syndicate/actor
+#lang syndicate
 ;; Shows the difference between a supervised exit and a supervised crash.

 (require/activate syndicate/supervise)
--- a/racket/syndicate/examples/actor/example-synthetic-patch.rkt
+++ b/racket/syndicate/examples/actor/example-synthetic-patch.rkt
@ -1,4 +1,4 @@
-#lang syndicate/actor
+#lang syndicate
 ;; Illustrates a (now fixed) bug where creating a facet interested in something
 ;; already known didn't properly trigger the assertion-handler.
 ;;
--- a/racket/syndicate/examples/actor/example-termination-scripts-1.rkt
+++ b/racket/syndicate/examples/actor/example-termination-scripts-1.rkt
@ -1,4 +1,4 @@
-#lang syndicate/actor
+#lang syndicate
 ;; Demonstrate handling of facet termination.
 ;;
 ;; Prior to early November, 2016, only a *single* stop-when was able
--- a/racket/syndicate/examples/actor/example-termination-scripts-2.rkt
+++ b/racket/syndicate/examples/actor/example-termination-scripts-2.rkt
@ -1,4 +1,4 @@
-#lang syndicate/actor
+#lang syndicate
 ;; Demonstrate handling of facet termination.

 (require racket/pretty)
--- a/racket/syndicate/examples/actor/f-to-c.rkt
+++ b/racket/syndicate/examples/actor/f-to-c.rkt
@ -1,4 +1,4 @@
-#lang syndicate/actor
+#lang syndicate
 ;; After the Fahrenheit-to-Celsius converter example in "Fabrik - A
 ;; Visual Programming Environment", Ingalls, Wallace, Chow, Ludolph
 ;; and Doyle, OOPSLA 1988.
--- a/racket/syndicate/examples/actor/f-to-c2.rkt
+++ b/racket/syndicate/examples/actor/f-to-c2.rkt
@ -1,4 +1,4 @@
-#lang syndicate/actor
+#lang syndicate
 ;; After the Fahrenheit-to-Celsius converter example in "Fabrik - A
 ;; Visual Programming Environment", Ingalls, Wallace, Chow, Ludolph
 ;; and Doyle, OOPSLA 1988.
--- a/racket/syndicate/examples/actor/fib-server.rkt
+++ b/racket/syndicate/examples/actor/fib-server.rkt
@ -1,4 +1,4 @@
-#lang syndicate/actor
+#lang syndicate

 (require syndicate/threaded)
 (require/activate syndicate/drivers/timer)
--- a/racket/syndicate/examples/actor/file-system-during.rkt
+++ b/racket/syndicate/examples/actor/file-system-during.rkt
@ -1,4 +1,4 @@
-#lang syndicate/actor
+#lang syndicate
 ;; Toy file system, based on the example in the ESOP2016 submission.
 ;; syndicate/actor implementation, using "during" instead of "on asserted/until retracted".

--- a/racket/syndicate/examples/actor/file-system-during2.rkt
+++ b/racket/syndicate/examples/actor/file-system-during2.rkt
@ -1,4 +1,4 @@
-#lang syndicate/actor
+#lang syndicate
 ;; Toy file system, based on the example in the ESOP2016 submission.
 ;; syndicate/actor implementation, using "during" instead of "on asserted/until retracted".

--- a/racket/syndicate/examples/actor/file-system-lll.rkt
+++ b/racket/syndicate/examples/actor/file-system-lll.rkt
@ -1,4 +1,4 @@
-#lang syndicate/actor
+#lang syndicate
 ;; Toy file system, based on the example in the ESOP2016 submission.
 ;; Low-level implementation.

--- a/racket/syndicate/examples/actor/file-system-lll2.rkt
+++ b/racket/syndicate/examples/actor/file-system-lll2.rkt
@ -1,4 +1,4 @@
-#lang syndicate/actor
+#lang syndicate
 ;; Toy file system, based on the example in the ESOP2016 submission.
 ;; Low-level implementation, without subconversation.

--- a/racket/syndicate/examples/actor/file-system.rkt
+++ b/racket/syndicate/examples/actor/file-system.rkt
@ -1,4 +1,4 @@
-#lang syndicate/actor
+#lang syndicate
 ;; Toy file system, based on the example in the ESOP2016 submission.
 ;; syndicate/actor implementation.

--- a/racket/syndicate/examples/actor/file-system2.rkt
+++ b/racket/syndicate/examples/actor/file-system2.rkt
@ -1,4 +1,4 @@
-#lang syndicate/actor
+#lang syndicate
 ;; Toy file system, based on the example in the ESOP2016 submission.
 ;; syndicate/actor implementation, without subconversation.

--- a/racket/syndicate/examples/actor/firewall-demo.rkt
+++ b/racket/syndicate/examples/actor/firewall-demo.rkt
@ -1,4 +1,4 @@
-#lang syndicate/actor
+#lang syndicate

 (require syndicate/firewall)

--- a/racket/syndicate/examples/actor/forward-chaining-mini.rkt
+++ b/racket/syndicate/examples/actor/forward-chaining-mini.rkt
@ -1,4 +1,4 @@
-#lang syndicate/actor
+#lang syndicate
 ;; Minimal syndicate/actor variation on examples/forward-chaining.rkt.

 (spawn (assert `(parent john douglas)))
--- a/racket/syndicate/examples/actor/fs-protocol.rkt
+++ b/racket/syndicate/examples/actor/fs-protocol.rkt
@ -1,4 +1,4 @@
-#lang syndicate/actor
+#lang syndicate
 ;; File System Demo protocol

 (provide (struct-out file)
--- a/racket/syndicate/examples/actor/fs-shell.rkt
+++ b/racket/syndicate/examples/actor/fs-shell.rkt
@ -1,4 +1,4 @@
-#lang syndicate/actor
+#lang syndicate
 ;; Simple "shell" or REPL, used by the file-system demos.

 (require (only-in racket/port read-bytes-line-evt))
--- a/racket/syndicate/examples/actor/gui.rkt
+++ b/racket/syndicate/examples/actor/gui.rkt
@ -1,4 +1,4 @@
-#lang syndicate/actor
+#lang syndicate
 ;; Small test program for the gui.rkt driver

 (require/activate syndicate/drivers/gui)
--- a/racket/syndicate/examples/actor/irc.rkt
+++ b/racket/syndicate/examples/actor/irc.rkt
@ -1,4 +1,4 @@
-#lang syndicate/actor
+#lang syndicate

 (require/activate syndicate/drivers/irc)

--- a/racket/syndicate/examples/actor/let-event.rkt
+++ b/racket/syndicate/examples/actor/let-event.rkt
@ -1,4 +1,4 @@
-#lang syndicate/actor
+#lang syndicate
 ;; Demonstrate let-event.
 ;; Should print "Complete.".

--- a/racket/syndicate/examples/actor/mini-echo.rkt
+++ b/racket/syndicate/examples/actor/mini-echo.rkt
@ -1,4 +1,4 @@
-#lang syndicate/actor
+#lang syndicate

 (struct echo-req (body) #:prefab)
 (struct echo-resp (body) #:prefab)
--- a/racket/syndicate/examples/actor/mutex.rkt
+++ b/racket/syndicate/examples/actor/mutex.rkt
@ -1,4 +1,4 @@
-#lang syndicate/actor
+#lang syndicate
 ;; Counting-semaphore-like mutex, and dining philosophers.

 (require racket/set)
--- a/racket/syndicate/examples/actor/parameters.rkt
+++ b/racket/syndicate/examples/actor/parameters.rkt
@ -1,4 +1,4 @@
-#lang syndicate/actor
+#lang syndicate
 ;; Demonstrate use of parameters with actors.
 ;;
 ;; Per https://github.com/tonyg/syndicate/issues/10, "Parameters don't
--- a/racket/syndicate/examples/actor/query-set.rkt
+++ b/racket/syndicate/examples/actor/query-set.rkt
@ -1,4 +1,4 @@
-#lang syndicate/actor
+#lang syndicate

 (require racket/set)

--- a/racket/syndicate/examples/actor/queue-no-credit.rkt
+++ b/racket/syndicate/examples/actor/queue-no-credit.rkt
@ -1,4 +1,4 @@
-#lang syndicate/actor
+#lang syndicate
 ;; A Queue with no flow control.

 (require racket/set)
--- a/racket/syndicate/examples/actor/queue-no-credit2.rkt
+++ b/racket/syndicate/examples/actor/queue-no-credit2.rkt
@ -1,4 +1,4 @@
-#lang syndicate/actor
+#lang syndicate
 ;; A Queue with no flow control.

 (require racket/set)
--- a/racket/syndicate/examples/actor/queue.rkt
+++ b/racket/syndicate/examples/actor/queue.rkt
@ -1,4 +1,4 @@
-#lang syndicate/actor
+#lang syndicate
 ;; A Queue with credit-based flow control.

 (require racket/set)
--- a/racket/syndicate/examples/actor/sandbox-os.rkt
+++ b/racket/syndicate/examples/actor/sandbox-os.rkt
@ -1,4 +1,4 @@
-#lang syndicate/actor
+#lang syndicate
 ;; Explore use of sandboxes etc for being an "operating system"

 (require racket/match)
--- a/racket/syndicate/examples/actor/show-field-scope-enforcement1.rkt
+++ b/racket/syndicate/examples/actor/show-field-scope-enforcement1.rkt
@ -1,4 +1,4 @@
-#lang syndicate/actor
+#lang syndicate
 ;; Demonstrates that fields may not be passed between actors.

 (spawn #:name 'reading-actor
--- a/racket/syndicate/examples/actor/show-field-scope-enforcement4.rkt
+++ b/racket/syndicate/examples/actor/show-field-scope-enforcement4.rkt
@ -1,4 +1,4 @@
-#lang syndicate/actor
+#lang syndicate
 ;; Demonstrates that fields at actor scope are visible to facets.

 (spawn* (field [x 123])
--- a/Show More
+++ b/Show More