# Parse a super class declaration
# Fatal error if the `string` is not a syntactically correct super class declaration
# Parse a super class declaration
# Fatal error if the `string` is not a syntactically correct super class declaration
do
var mod_string = "class Dummy\nsuper {string}\nend"
var nclassdef = parse_classdef(mod_string).as(AStdClassdef)
do
var mod_string = "class Dummy\nsuper {string}\nend"
var nclassdef = parse_classdef(mod_string).as(AStdClassdef)
if nsuperclasses.length != 1 then
self.fatal_error(null, "Fatal Error: not a super class declaration")
abort
if nsuperclasses.length != 1 then
self.fatal_error(null, "Fatal Error: not a super class declaration")
abort