From fbc1184c08d18d5ac0f8763a058e015e95353341 Mon Sep 17 00:00:00 2001 From: Charles Forsyth Date: Wed, 29 Apr 2015 17:44:33 +0100 Subject: switch to Dial module --- appl/lib/mpeg.b | 11 +++++++---- 1 file changed, 7 insertions(+), 4 deletions(-) (limited to 'appl/lib/mpeg.b') diff --git a/appl/lib/mpeg.b b/appl/lib/mpeg.b index f1cd00f0..100a8708 100644 --- a/appl/lib/mpeg.b +++ b/appl/lib/mpeg.b @@ -6,6 +6,8 @@ FD, Connection: import Sys; include "draw.m"; draw: Draw; Display, Rect, Image: import draw; +include "dial.m"; +dial: Dial; include "mpeg.m"; Chroma: con 16r05; @@ -17,12 +19,13 @@ getenv() sys = load Sys Sys->PATH; draw = load Draw Draw->PATH; + dial = load Dial Dial->PATH; } copy(files: list of string, notify: chan of string, mpctl, mpdata: ref FD) { - ok, n: int; - c: Connection; + n: int; + c: ref Connection; name: list of string; while(files != nil) { @@ -37,8 +40,8 @@ copy(files: list of string, notify: chan of string, mpctl, mpdata: ref FD) return; } 2 => - (ok, c) = sys->dial(hd tl name, nil); - if(ok < 0) { + c = dial->dial(hd tl name, nil); + if(c == nil) { notify <-= "dial:" + hd tl name; return; } -- cgit v1.2.3