/*
This file is part of LilyPond, the GNU music typesetter.
- Copyright (C) 2004--2010 Han-Wen Nienhuys <hanwen@xs4all.nl>
+ Copyright (C) 2004--2011 Han-Wen Nienhuys <hanwen@xs4all.nl>
LilyPond is free software: you can redistribute it and/or modify
it under the terms of the GNU General Public License as published by
int off = ps->start_location_.start () - sf->c_str ();
- scm_seek (port, scm_long2num (off), scm_long2num (SEEK_SET));
+ scm_seek (port, scm_from_long (off), scm_from_long (SEEK_SET));
SCM from = scm_ftell (port);
scm_set_port_line_x (port, scm_from_int (ps->start_location_.line_number () -1));