Patch title: Release 96 bulk changes
Abstract:
File: /pliant/protocol/vnc/client.pli
Key:
    Removed line
    Added line
   
module "/pliant/language/unsafe.pli"
module "/pliant/language/stream.pli"
module "/pliant/linux/input/keyboard.pli"
module "/pliant/linux/input/mouse.pli"
module "/pliant/language/os.pli"


  thread # auto refresh
    while s=success
      sleep 0.25
      var CBool was_active := active      
      os_ioctl 0 os_VT_GETSTATE addressof:(var os_vt_stat st
      active := stat:v_active=2
      if active
        sem request
        var uInt8 message := 3 ; s raw_write addressof:messa
        var uInt8 incremental := shunt was_active 1 0 ; s ra
        var uInt16_hi x_position := 0 ; s raw_write addresso
        var uInt16_hi y_position := 0 ; s raw_write addresso
module "/pliant/language/unsafe.pli"
module "/pliant/language/stream.pli"
module "/pliant/linux/input/keyboard.pli"
module "/pliant/linux/input/mouse.pli"
module "/pliant/language/os.pli"


  thread # auto refresh
    while s=success
      sleep 0.25
      var CBool was_active := active      
      os_ioctl 0 os_VT_GETSTATE addressof:(var os_vt_stat st
      active := stat:v_active=2
      if active
        sem request
        var uInt8 message := 3 ; s raw_write addressof:messa
        var uInt8 incremental := shunt was_active 1 0 ; s ra
        var uInt16_hi x_position := 0 ; s raw_write addresso
        var uInt16_hi y_position := 0 ; s raw_write addresso
        var uInt16_hi width := size_x ; s raw_write addresso
        var uInt16_hi height := size_y ; s raw_write address
        var uInt16_hi width := size_x ; s raw_write addressof:width uInt16_hi:size
        var uInt16_hi height := size_y ; s raw_write addressof:height uInt16_hi:size
        s flush anytime
        sem release


export vnc_client
        s flush anytime
        sem release


export vnc_client