Fixed bug in sdata.scm...thanks sybok

diff --git a/v7/src/runtime/version.scm b/v7/src/runtime/version.scm
index 473c045ba1747e423339dda4fd4396b182090578..32918fa6f1b6d9b8ea77942d24111ec2e2c20c79 100644 (file)
--- a/v7/src/runtime/version.scm
+++ b/v7/src/runtime/version.scm
@@ -1,6 +1,6 @@
 #| -*-Scheme-*-
 
-$Header: /Users/cph/tmp/foo/mit-scheme/mit-scheme/v7/src/runtime/version.scm,v 14.126 1991/07/23 08:20:40 cph Exp $
+$Header: /Users/cph/tmp/foo/mit-scheme/mit-scheme/v7/src/runtime/version.scm,v 14.127 1991/08/06 13:56:05 bal Exp $
 
 Copyright (c) 1988-91 Massachusetts Institute of Technology
 
@@ -45,10 +45,10 @@ MIT in each case. |#
                     '()))
   (add-system! microcode-system)
   (add-event-receiver! event:after-restore snarf-microcode-version!)
-  (add-identification! "Runtime" 14 126))
+  (add-identification! "Runtime" 14 127))
 
 (define microcode-system)
 
 (define (snarf-microcode-version!)
   (set-system/version! microcode-system microcode-id/version)
-  (set-system/modification! microcode-system microcode-id/modification))
\ No newline at end of file
+  (set-system/modification! microcode-system microcode-id/modification))