Trivial code cleanup.

2026-06-20 22:59:45 -04:00 · 2020-03-28 14:05:48 -04:00
parent 3f7b06853e
commit 33ce9e3355
1 changed files with 0 additions and 2 deletions
@@ -59,8 +59,6 @@ subroutine wqencode(msg,ntype,data0)
     n2=128*ih + ntype + 64
     call pack50(n1,n2,data0)
  endif
-  go to 900

-900 continue
  return
 end subroutine wqencode