Write Compressed UInt32
/* This file is part of Sunlit World Scheme http://swscheme.codeplex.com/ Copyright (c) 2010 by Edward Kiser (edkiser@gmail.com) This program is free software; you can redistribute it and/or modify it under the terms of the GNU General Public License as published by the Free Software Foundation; either version 2 of the License, or (at your option) any later version. This program is distributed in the hope that it will be useful, but WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License for more details. You should have received a copy of the GNU General Public License along with this program; if not, write to the Free Software Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA. */ using System; using System.Collections.Generic; using System.Linq; using System.Text; using System.IO; namespace ExprObjModel { public static partial class Utils { public static void WriteCompressedUInt32(this Stream str, uint u) { while (true) { if ((u & ~0x7Fu) == 0) { str.WriteByte(unchecked((byte)u)); break; } else { str.WriteByte(unchecked((byte)((u & 0x7Fu) | 0x80u))); u = (u >> 7); } } } } }